忘记密码   免费注册 查看新帖 | 论坛精华区

ChinaUnix.net

  平台 论坛 博客 认证专区 大话IT HPC论坛 徽章 文库 沙龙 自测 下载 频道自动化运维 虚拟化 储存备份 C/C++ PHP MySQL 嵌入式 Linux系统
最近访问板块 发新帖
查看: 1417 | 回复: 1

关于DATAARA的使用方法 [复制链接]

论坛徽章:
0
发表于 2017-04-07 01:04 |显示全部楼层
  近期在使用dataara来进行后台pj间的 通讯。程序是写在rpg里面 但是两个pj运行一段时间后发现在out的时候会报错,报错的信息是 cannot allocate data ara xxx in library  xxx function check cpf1063
代码如下:
A PJ  仅仅读取声明的dataara
   IN          DATAARA1
   MOVEL   DATAARA1       WDATAARA


B  PJ  会读取同时修改dataara
   *lock     in   dataara1
               movel   dataara1   WDATAARA
               SELECT
               WHEN       WDATAARA  =  'A'
               EVAL        WDATAARA  = 'B'
               MOVEL      WDATAARA     DATAARA1
               OUT          DATAARA1               
               WHEN       WDATAARA  = 'B'
               EVAL        WDATAARA  = ' A'
               MOVEL     WDATAARA    DATAARA1
               OUT         DATAARA1
               ENDSL
B PJ 后台跑一段时间就会爆mes  但是具体原因搞不清楚
对于数据域有没有大牛 给解释一下

论坛徽章:
5
2015亚冠之阿尔艾因
日期:2015-08-10 02:23:34操作系统版块每日发帖之星
日期:2015-08-13 06:20:002015七夕节徽章
日期:2015-08-21 11:06:1715-16赛季CBA联赛之山西
日期:2016-04-13 02:36:59操作系统版块每日发帖之星
日期:2016-04-14 06:20:00
发表于 2017-04-08 07:50 来自手机 |显示全部楼层
把cpf1063的说明贴一下呗
您需要登录后才可以回帖 登录 | 注册

本版积分规则

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号 北京市公安局海淀分局网监中心备案编号:11010802020122
广播电视节目制作经营许可证(京) 字第1234号 中国互联网协会会员  联系我们:
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP