Say we have the following structure:
01 PARM-STRING.
05 PARM-LEN PIC S9(4) COMP.
05 PARM-DATA.
10 PARM-DATA-CHAR OCCURS 1 to 100 TIMES
DEPENDING ON PARM-LEN.
01 OUTPUT-STRING PIC X(20) JUST RIGHT.
Will
MOVE PARM-DATA TO OUTPUT-STRING
use the PARM-LEN field so that if PARM-LEN = 1 that the OUTPUT-STRING value
will be 19 spaces followed by the value of PARM-DATA and that if PARM-LEN = 2
then it will be 18 spaces followed by two characters, etc.?
--
Binyamin Dissen <[email protected]>
http://www.dissensoftware.com
Director, Dissen Software, Bar & Grill - Israel
Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.
I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
