renle2007 发表于 2010-03-16 17:43

请问如何在RPGLE中加一段代码，让程序等待10秒再执行下一步操作？

rpg 程序中请问如何在RPGLE中加一段代码，让程序等待10秒再执行下一步操作？
最好能举一个完整的WAIT 处理模块。。{:3_194:}

huangxkst 发表于 2010-03-16 19:13

回复 1# renle2007


    ....
//加入的代码
   C    eval    qcmd='dlyjob DLY(秒数)‘
   c   call   ’qcmdexc‘
   c    parm                     qcmd         200
    C    parm   200             qcmdlen      15 5
。。。。。。。。。。

renle2007 发表于 2010-03-17 08:44

回复 2# huangxkst


    {:3_187:}谢谢

huangxkst 发表于 2010-03-17 12:54

回复 3# renle2007


    一起学习

renle2007 发表于 2010-03-17 17:48

回复 4# huangxkst


    可是你call   ’qcmdexc‘
       中的qcmdexc 是什么东西？？

JmLei 发表于 2010-03-22 11:12

C                   TIME                  xxTIMEa
C   xxTIMEa       ADDDUR    10:*S          xxTIMEb
C   xxTIMEa       DOWLE   xxTIMEb               
C                   TIME                  xxTIMEa
C                   ENDDO                           

比较笨的方法。呵呵

huangxkst 发表于 2010-03-22 12:13

回复 5# renle2007


    一个能在程序中执行cl命令的程序，在cl program书中也有讲到

renle2007 发表于 2010-03-22 12:19

哥们儿们谢勒。。。别答勒。。这个问题我已经解决勒。。谢谢。。。现在主要是API和MSG的问题。。。。

jiangyuyun 发表于 2010-03-26 13:34

d sleep pr 10u 0 extproc('sleep')
d secs 10u 0 value

/free
sleep(60);
/end-free

也可以在RPGLE中这么写

wht196503933 发表于 2013-12-23 11:13

学习一下，:$:$
页: [1]
查看完整版本: 请问如何在RPGLE中加一段代码，让程序等待10秒再执行下一步操作？