COBOL ILE中如何访问DTAQ?

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

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

hsiang_wang 回复于：2004-11-09 16:25:01

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

PETER CAO 回复于：2004-11-09 16:59:35

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

hsiang_wang 回复于：2004-11-10 08:52:27

发送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！

PETER CAO 回复于：2004-11-10 12:41:44

Thank you!

原文转自：http://www.ltesting.net