论坛徽章:: 0

电梯直达

1楼 [收藏(0)] [报告]

发表于 2004-11-09 15:34 |只看该作者 |倒序浏览

查了一下本论坛的记录，有RPG和C的SAMPLE。
请哪位大侠给个COBOL的SAMPLE。

另外监视DTAQ的程序一般如何结束?是不是无限循环直到从DTAQ里接到一个结束指令？

文库|博客

hsiang_wang

丰衣足食

论坛徽章:: 0

2楼 [报告]

发表于 2004-11-09 16:25 |只看该作者

COBOL ILE中如何访问DTAQ?

你的问题能否清楚些？你想对DTAQ进行怎样操作在COBOL中？

实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？

PETER CAO

白手起家

论坛徽章:: 0

3楼 [报告]

发表于 2004-11-09 16:59 |只看该作者

COBOL ILE中如何访问DTAQ?

做的事情是：监视一个DTAQ，从其接收数据，处理完后，把结果放到另一个DTAQ里。
数据可能任何时候来。

初学AS400，请多指教。

实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？

hsiang_wang

丰衣足食

论坛徽章:: 0

4楼 [报告]

发表于 2004-11-10 08:52 |只看该作者

COBOL ILE中如何访问DTAQ?

发送DTAQ：
C                   CALL 'QSNDDTAQ'
C                   PARM          DTAQ
C                   PARM          LIB
C                   PARM          LEN
C                   PARM          DATA
接收DTAQ：
C                   CALL 'QRCVDTAQ'
C                   PARM          DTAQ
C                   PARM          LIB
C                   PARM          LEN
C                   PARM          DATA
C                   PARM          WAIT
以上是RPG的例子。有KEY的DTAQ你再看看帮助吧，COBOL中的参数用！USING！