TIPTOPGP客制规范Word文档格式.docx
- 文档编号:22632553
- 上传时间:2023-02-04
- 格式:DOCX
- 页数:14
- 大小:145.34KB
TIPTOPGP客制规范Word文档格式.docx
《TIPTOPGP客制规范Word文档格式.docx》由会员分享,可在线阅读,更多相关《TIPTOPGP客制规范Word文档格式.docx(14页珍藏版)》请在冰豆网上搜索。
大陆功能模块:
如ggl--->
cggl
2.GP客制目录设定程序:
p_zmd(例:
新增客制目录cbm)
目的:
a.自动成立cbm目录及其下之系统标准目录(如:
42r、42m及4gl…等
b.设定模块变量及可执行程序途径名称于profile
c.成立模块之4ad及4tm之寄存目录
*p_zmd执行完成后,须从头login或执行profile
四、TIPTOPGP客制程式修改标准
1.所有调整皆在客制区中完成
2.程序命名规那么:
分为修改程序与新增程序作法
修改:
一概利用原程序代号
新增:
程序编号以「c」开头,分为以下几类,举例说明之-
a.一样程序:
、、
module内部函数命名:
i999_get_data()
b.AZZ公用程序:
、
c.Q类子程序:
内部函数命名:
与程序名称相同
d.动态查询函式:
cq_oma
e.LIB及SUB类子程序同标准区命名原那么
3程序调整及批注范例说明:
A.执行保护程序:
p_zmd-将新增$CUST/coo模块途径及目录(假设$CUST/coo之模块目录已存在,那么此步骤可省略)
a.点选【单身】
b.点选【新增】
c.输入
.模块代号:
COO
.模块变量值:
$CUST/coo
系统自动带出「可执行程序路径名称」及「可执行程序放置路径」
d.点选【确定】
点选【确定】后,系统将自动建立coo之目录及其下标准系统目录
f.重新执行【.profile】
B.复制标准区$AOO/4gl之至客制区$COO/4gl途径下
复制标准区程序至客制区准备修改
C.修改$COO/4gl/:
在程序修改处加上批注说明
a.4gl文件的档案起始位置需说明程序调整缘故,记录:
修改人员,日期,和修改目的,写法区分For客制修改(CUST)或鼎新(DSC)调整
范例一:
For客制修改(备注格式:
修改)
#Prog.Version..:
'
'
#
#
#Patternname...:
#Descriptions...:
营业人申报适用零税率销售额清单
#Date&
Author..:
95/02/28ByDanny
#Modify........:
010524bylinda原本抓oga_file,改用amd_file
#ModifyForCUST:
By..03825
#1.字轨号码原来是显示『应收帐款单别』amd01,
#改为抓『字轨号码』adm03
范例二:
For客制修改(备注格式:
新增字段,新增功能键)
出货单维护作业
95/01/05ByRoger
#modify:
95/07/20bystoneline1170-1172批号加上null处理
#modify版:
99/10/13ByKammy(原menu功能'
3.更改仓储'
改以多栏方式输入)
#ModifyForDSC.:
03/11/26By
#1.出至境外仓出货,『境外仓库』的检查..AFTERFIELD
#应改为AFTERFIELDcware
04/02/18By新增出货单单价控管
#a.新增字段ogaallow放行否(N/Y)N:
未放行Y:
已放行,或不需放行
#b.新增功能:
5.放行卡权限,未确认未作废才可执行,updogaallow='
Y'
#c.修改功能:
A.新增ogaallowdefault='
N'
#d.修改功能:
Y.确认单价低于定价(ima127,ima128)不可确认,出讯息
#确认时一并将ogaallowupdate='
范例三:
ForBUG调整(备注格式:
Bug调整)
销货统计表
95/05/22ByDanny
#Modify.........:
95/07/14ByDanny(将数量、金额之'
'
拿掉)
#ModifyForDsc.:
03/10/15By
#1.更新……………………………>
此为P_zlBUGNO.编号
#2.更新
03/10/28By
#1.调整g_sql:
UNION==>
UNIONALL
文件的程序中需明确标示修改片段,将原程序段remark,记录:
修改人员,日期,修改目的,。
原那么上要让一目了然,清楚程序修改了哪里!
藉由程序起始处的备注导引,能够快速找到程序的修改段落
范例四:
新增程序段,且只有一行(原程序remark,直接将程序新增于下)
"
ANDoga02BETWEEN'
b_date,"
AND'
e_date,"
#"
ANDoga01[1,3]=ogb01"
#ModifyBy#…>
原程序remark
ANDoga01[1,3]=oayslip"
…>
此为新增的程序段
"
ANDoga01=ogb01"
…
#ModifyBy..031028
#LETl_sql=g_sqlCLIPPED,"
UNION"
…………>
LETl_sql=g_sqlCLIPPED,"
UNIONALL"
此为新增的程序
SELECT'
2'
"
gem02,gen02,oab02,oha26,oha032,oca02,"
范例五:
新增程序段,且为多行以上(新增程序段,整个标示出来)
IFISNOTNULLAND<
>
THEN#若有指定仓库
LETl_sql=l_sqlCLIPPED,"
ANDimg02='
,"
ENDIF
#AddBy..040315#应同时考虑储位批号……………………
IFNOTcl_nullTHEN#若有指定储位│
LETl_sql=l_sqlCLIPPED,"
ANDimg03='
│
ENDIF │…>
新增程序段
IFNOTcl_nullTHEN#若有指定储位 │
ANDimg04='
│
ENDIF│
#EndAdd..040315……………………………
PREPAREs_g_ogb_p1FROMl_sql
DECLAREs_g_ogb_c1CURSORFORs_g_ogb_p1
范例六:
新增MENU(只需在MENU上面标示)
ONACTION"
4.更改送货客户"
IFcl_chk_act_auth()THENCALLt600_4()ENDIF
#AddBy..040218
ONACTION"
5.放行"
IFcl_prichk('
5'
)THENCALLt600_55()ENDIF
I.分录底稿"
IFcl_chk_act_auth()THENCALLt600_fsgl()ENDIF
范例七:
新增FUNCTION(只需在FUNCTION上面标示)
#AddBy..040218#放行………………>
只须于FUNCTOIN上头加注
FUNCTIONt650_5()
DEFINEl_oer04LIKE
IFs_shut(0)THENRETURNENDIF
SELECT*INTOg_oga.*FROMoga_fileWHEREoga01=
IFISNULLTHENCALLcl_err('
-400,0)RETURNENDIF
IFNOTcl_conf(18,10,'
cxm-002'
)THENRETURNENDIF#是否确认放行
BEGINWORKOPENt650_cl
FETCHt650_clINTOg_oga.*#锁住将被更改或取消的数据
UPDATEoga_fileSETogaallow='
WHEREoga01=
ENDFUNCTION
D.程序修改完成存盘后,执行command:
aooi080
a.点选【查询】
b.于程序代码字段,输入【aooi080】
E.执行保护程序:
p_zz-修改aooi080之「模块代码」及「UNIX执行指令」域值
c.点选【确定】
d.点选【更改】
e.将「模块代码」改为【COO】
e.将「UNIX执行指令」改为【$COOi/aooi080】
f.修改完成后,点选【确定】
F.执行p_zz之【保护链接文件数据】功能(即保护程序:
p_link)-将更新aooi080之程序执行途径
g.点选【单身】
h.修改「模块代码」为【coo】
i.修改后,点选【确定】
系统自动更新「完整路径」为【$CUST/coo/42m/】
j.点选【确定】后,系统出现是否自动产生42r文件之确认讯息:
点选【Y.是】后并离开
G.执行p_zz之【保护Action数据】功能(即保护程序:
p_base_act)-将产生客制程式:
aooi080之Action名称于客制区
a.系统出现是否自动撷取ACTION数据确认讯息,点选【Y是】
b.于系统自动撷取程序之ACTION数据后,点选【单身】
c.于Action相关数据修改完成后,点选【确定】
d.系统出现是否产生Action数据之确认讯息,点选【Y是】后并离开
H.执行p_zz之【更新单支权限】功能-更新客制程式:
aooi080之执行权限
I.执行p_zz之【执行】功能-测试客制程式:
aooi080是不是可正常执行
新增.4gl程式(例:
新增
p_zmd-同之步骤A
B.于客制区$CUST/coo/4gl途径下新增
C.程序批注说明:
于程序开端说明程序名称、程序说明、程序新增日期及作者
范例:
For客制新增
税别数据维护作业
04/12/20ByDSCYvonne
cooi000-同之步骤D
p_zz-新增cooi000(建议可采复制同类型之程序数据之方式新增)
五、TIPTOPGP客制Table/Field标准
1.新增Table
Table命名原那么:
第1~2码固定为「tc」,
第4~11码为Table名称,如ima_file
如:
tc_ima_file
Field命名原那么:
第4~6码为Table名称前三码,如ima
第7~9码为流水号,如001
tc_ima001
2.现有Table中新增字段:
Field命名原那么:
第1~2码固定为「ta」,
第4~6码为Table名称前三码,如oma
ta_oma001
3.现有Table中新增Index:
Index命名原那么:
第1~3码固定为「tic」,
第5~7码为Table名称前三码,如oma
第9~11码为流水号,如001
tic_oma_001
4.Table新增/字段更动后,
执行--->
从头产生$TOP/schema下之;
执行rebuild--->
从头编译程序及画面程序
于TableSchema描述文件中注明变更记录
保护p_feldname--->
供p_qry函数判定Table/字段存在否利用
六、TIPTOPGP客制相关保护程序及Shell
1.:
4gl程序编译工具--->
产生于$CXX/42m途径下
2.:
per档编译工具--->
产生于$CXX/42f途径下
3.:
per档画面预览工具--->
产生per参照之字段及其标准中英文说明于p_perlang
4.p_zz:
保护新增程序之程序代码、名称及相关信息及修改已修改之程序之执行途径及相关信息
5.p_link:
修改程序之相关链接程序--->
产生于$CXX/42r途径下
6.p_base_act:
产生程序之OnAction说明及其相关设定
7.p_perlang:
per文件字段说明显示(中英文)
8.p_zy:
设定程序对应用户群组权限
9.p_zm:
从头产生udm_tree
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- TIPTOPGP 规范