没有合适的资源?快使用搜索试试~ 我知道了~
资源推荐
资源详情
资源评论













t100 集成泛微 demo
后端代码 bron1984 1 年前 (2019-08-12) 540 浏览
一、获取泛微 OA 的 Webservices 地址。
在对应的文件下面生成 T100 目录/aws/4gl 下以下命令:
fglwsdl [-command] <filename | url | regex value>
fglwsdl -o aws_work_test http://192.168.X.X/services/NibWorkflowService
?wsdl
只在对应目录下生成两个 4gl/inc 文件
直接调用里面的 function 即可。
二、编写发送端代码
PRIVATE FUNCTION aint311_OAinsert()
DEFINE l_n,l_i,l_i1 LIKE type_t.num5
DEFINE l_sql STRING
DEFINE l_request STRING
DEFINE l_cnt1,l_cnt2,l_cnt3,l_cnt4,l_msglength,l_msglength2 LIKE type_
t.num5
DEFINE l_msg LIKE type_t.chr1000
DEFINE l_msg1 LIKE type_t.chr1000
DEFINE li_result STRING
DEFINE li_msg STRING
#
单头数据
DEFINE l_inbi RECORD

DJBH LIKE inbi_t.inbidocno, #
单据编号
SQRY LIKE inbi_t.inbi001, #
申请人
SQBM LIKE inbi_t.inbi002, #
申请部门
SQRQ LIKE inbi_t.inbidocdt, #
申请日期
BFYY LIKE inbi_t.inbi003, #
报废原因
BZ LIKE inbi_t.inbi021 #
备注
END RECORD
#
单身数据
DEFINE l_inbj DYNAMIC ARRAY OF RECORD
WLBH LIKE inbj_t.inbj001, #
料件编号
PMGG LIKE imaal_t.imaal003, #
品名
GG LIKE imaal_t.imaal004, #
规格
DW LIKE inbj_t.inbj008, #
单位
BFSL LIKE inbj_t.inbj009, #
报废数量
ZL LIKE inbj_t.inbjud001, #
重量
KW LIKE inbj_t.inbj005, #
库位
PH LIKE inbj_t.inbj007, #
批号
(inbj007)
BZ LIKE inbj_t.inbj031, #
备注
(inbj031)
GSBM LIKE inbj_t.inbj017 #
归属部门
END RECORD

DEFINE g_logtime string
DEFINE tmpXmlFile string
DEFINE r_success LIKE type_t.num5
LET r_success = TRUE
#
日志相关记录
LET g_logtime = YEAR(CURRENT) USING "####", MONTH(CURRENT) USING "&&",
DAY(CURRENT) USING "&&","-", TIME(CURRENT)
LET g_time = TIME
#
抓单头数据
LET l_sql = " SELECT INBIDOCNO,INBI001,INBI002,INBIDOCDT,INBI003,INBI0
21 FROM INBI_T ",
" WHERE INBIDOCNO = '",g_inbi_m.inbidocno,"' ",
" AND INBIENT = '",g_enterprise,"' AND INBISITE = '",g_si
te,"' "
PREPARE l_pre1 FROM l_sql
DECLARE l_cur1 CURSOR FOR l_pre1
FOREACH l_cur1 INTO l_inbi.DJBH,l_inbi.SQRY,l_inbi.SQBM,
l_inbi.SQRQ,l_inbi.BFYY,l_inbi.BZ
IF SQLCA.SQLCODE THEN
INITIALIZE g_errparam TO NULL
剩余12页未读,继续阅读
资源评论


壹陌
- 粉丝: 302
上传资源 快速赚钱
我的内容管理 展开
我的资源 快来上传第一个资源
我的收益
登录查看自己的收益我的积分 登录查看自己的积分
我的C币 登录后查看C币余额
我的收藏
我的下载
下载帮助


最新资源
- 数控编程与加工操作说课稿.ppt
- 交通目标检测识别,包含:行人、人骑车、机动车
- 数据结构精品课网站的方案设计书与实现大学本科方案设计书.doc
- 森林防火信息化建设与新技术应用实践探析.docx
- 《计算机网络与多媒体》教学模式创新研究.docx
- JSP网上商城后台管理系统设计文献综述.doc
- 试析我国互联网金融存在的风险及监管方案.docx
- 大数据助推社会发展.docx
- 美国欧盟本对儿童服装上绳带小部件安全项目管理的基本要求.doc
- 基于嵌入式教学模式的景观与园林设计课程改革.docx
- Flet框架实现的带柱子颜色变化带悬停交互效果的条形图自定义模板
- 大数据时代公民数据隐私困境及破解之道.docx
- 医疗器械软件研究分析模板.docx
- 二《C程序设计》dfgfg.doc
- 计算机自动视野计的临床应用.ppt
- 大数据时代的医院人事档案管理.docx
资源上传下载、课程学习等过程中有任何疑问或建议,欢迎提出宝贵意见哦~我们会及时处理!
点击此处反馈



安全验证
文档复制为VIP权益,开通VIP直接复制
