Author: smileheal
Posted: Fri Jun 16, 2017 12:16 am (GMT 5.5)
Hi Robert, thanks for the feedback.
I called BPXWDYN in my pgm. Apology 4 the typo.
I had set the RC from the call and following is the display.
77 WS-DYN-RC PIC S9(08) COMP-5.
CALL BPXWDYN USING WS-ALLOC-STRING RETURNING WS-DYN-RC.
RC1 :- 000000002N
Posted: Fri Jun 16, 2017 12:16 am (GMT 5.5)
Hi Robert, thanks for the feedback.
I called BPXWDYN in my pgm. Apology 4 the typo.
I had set the RC from the call and following is the display.
77 WS-DYN-RC PIC S9(08) COMP-5.
CALL BPXWDYN USING WS-ALLOC-STRING RETURNING WS-DYN-RC.
RC1 :- 000000002N