1、aws_ttsrv2_service.4gl 中
WHEN "cws_CreatWoData" #add by 180424
LET l_op = com.WebOperation.CreateDOCStyle("cws_CreatWoData", p_op_name, g_request, g_response)
FUNCTION cws_CreatWoData() #add by 181211
LET g_service = "SaveWosplitData"
CALL cws_save_wosplit_data()
END FUNCTION
2、执行aws_ttcfg2,录入服务代码SaveWosplitData,对应函式名称:cws_CreatWoData
p_link中查询aws_ttsrv2 ,然后单身增加cws_save_wosplit_data.4gl
3、如果是与CROSS整合,还要在aws_crosscfg作业中注册服务SaveWosplitData,否则对方找不到服务名
4、如果是与CROSS整合,还要在aws_invoke_srv.4gl中增加
WHEN "SaveWosplitData" #
CALL cws_save_wosplit_data()
5、新建cws_save_wosplit_data.4gl 主文件
6、p_link 中查询 aws_ttsrv2,然后在单身增加 cws_save_wosplit_data.4gl
改了程序之后一定要链接一下aws_ttsrv2
7、aws/4gl 文件夹下 ps -ef|grep ttsrv2(修改过程序一定要重启ws,做7,8,9步骤)
8、kill -9 20300 20301
9、startws 5.1版本用 startweb as restart / startweb as start
10、
ERP改了程序之后一定要链接一下 aws_ttsrv2