hello,everybody
Yestoday , I coded a program have O specification .After that,Compiled it successfully,but it generated a Error Message following when i used "Call" Command to called it. Any ideas? thanks in advance..
Error message:
Job 174663/PLEI/QPADEV0026 started on 09/04/05 at 21:32:53 in subsystem QINT
Message queue PLEI is allocated to another job.
Error message CPF4101 appeared during OPEN for file AAA (C S D F).
Program Code:
Yestoday , I coded a program have O specification .After that,Compiled it successfully,but it generated a Error Message following when i used "Call" Command to called it. Any ideas? thanks in advance..
Error message:
Job 174663/PLEI/QPADEV0026 started on 09/04/05 at 21:32:53 in subsystem QINT
Message queue PLEI is allocated to another job.
Error message CPF4101 appeared during OPEN for file AAA (C S D F).
Program Code:
Code:
h*datedit(*ymd)
ftemppf1 ip e disk
f*temppf if e k disk rename(rtemppf:rr1)
faaa o f 85 printer
d t s 8 0
d t1 s 8b 0
d ddd ds
d abc 8 0
d*aaa 1 0 OVERLAY(ddd:2)
C* *ENTRY PLIST
C* PARM P1 10
C* PARM p2 10
C z-add *date t
c seton 99
c* acct chain rr1 99
C* UPDATE RR
c* 99 exsr @exit
c* @exit begsr
c* eval *inlr='1'
c* return
c* endsr
c *inzsr begsr
c z-add *zero t
c endsr
oaaa h 1p 2
o 80 'PAYROLL REGISTER'
o *DATE y 50
o d n1pn99 2
o 10 'jkjkljkl'
o t lr
o 10 'end'



Comment