Thanks...
It's been 6 years since I've written any interactive
cobol on the AS/400. so I'm kind of relearning this.
so a question to you .. 3gm.
Is there another valid way of doing this..
such as creating a 2nd record by copying the first
in Screen Design Aid and then say delete...
Here's the layout of the file IN A COMPILED FORMAT...
FD LOADDAY
LABEL RECORDS ARE OMITTED.
01 LOADDAYREC.
COPY DDS-ALL-FORMATS OF LOADDAY.
05 LOADDAY-RECORD PIC X(44).
* INPUT FORMAT: LOADDDAY1 FROM FILE LOADDAY OF LIBRARY STEVE
05 LOADDAY1-I REDEFINES LOADDAY-RECORD...
I have a screen created thru SDA on an AS/400.
The input field is a single digit numeric field with no
signs. I'll call it LOADNUM.
There is an output field that I use to display
messages based on what day you chose. It's 44 characters
long and I call it LOADMSG.
1 being Sunday, 2 =...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.