当前位置: 首页 > 工具软件 > tiptop > 使用案例 >

【TIPTOP】 接口步骤 服务端

司宏伯
2023-12-01
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
 类似资料: