|
Hi Mark, Like I said, it's been a long time. I did mention making the ID field a hidden field. What were they, S & D specs? But I also noticed that the input specs were NOT correct, other than the 1st one. I didn't bump up the from/to positions on the other fields. And to be able to easily identify which format was read, the record ID indicator should be different or there should be a record ID field. Should be: 0117.00 IDE123SF NS 01 1 C4 <------------------------ 0118.00 I* Format-DE123S04 0118.50 I 1 1 RECID (optional) 0119.00 I 2 5 CBATNO 0120.00 I 6 11 CBDATE 0121.00 * 0122.00 IDE123SF NS 02 1 C6 <------------------------ 0123.00 I* Format-DE123S06 0123.50 I 1 1 RECID (optional) 0124.00 I 2 2 MCODE 0125.00 I 3 12 CZPN 0126.00 I 13 22 CZCOMP I'm not sure what you mean when you say "there's no need to define MCODE anywhere." MCODE is the field Kathie was interested in, and must be defined in the input specs. As you say, the record ID field does not need to be output, but it makes it clearer (to me at least) which output specs are related to which input specs and I doubt that it has any performance impact. The screen field can be hidden and protected, or displayable protected in case it helps in debugging. Regards, Peter Dow Dow Software Services, Inc. 909 425-0194 voice 909 425-0196 fax ----- Original Message ----- From: "M. Lazarus" <mlazarus@ttec.com> To: <RPG400-L@midrange.com> Sent: Saturday, October 07, 2000 7:02 PM Subject: Re: System 36 internal display file > Peter, > > At 10/6/00 11:07 AM -0700, you wrote: > >It's been a long time since I did any S36 programming, so I can't remember > >if the format name you're outputting with the K8 is returned. Doesn't look > >like it since you made no provision for it in your input specs, so I'd say > >you need to output something unique to the screen that will be read back in > >to identify the screen. It could be a hidden field. Use that on your input > >specs to identify which format was just read: > > Close, but no cigar. Define the "ID" field as a hidden, protected field > w/ a constant value. The I spec changes you made are correct, but there's > no need to define MCODE anywhere. The O specs have no need to output the > value; it probably shouldn't. > > -mark > > > > 0117.00 IDE123SF NS 01 1 C4 <------------------------ > > > 0118.00 I* Format-DE123S04 > > > 0119.00 I 1 4 CBATNO > > > 0120.00 I 5 10 CBDATE > > > 0121.00 * > > > 0122.00 IDE123SF NS 01 1 C6 <------------------------ > > > 0123.00 I* Format-DE123S06 > > > 0124.00 I 1 1 MCODE > > > 0125.00 I 2 11 CZPN > > > 0126.00 I 12 21 CZCOMP > > > > > > > > > 1232.00 O E 84 SCRN4 > > > 1233.00 O K8 'DE123S04' > >-------------->O 1 '4' > > > 1234.00 O CBATNO 5 > > > 1235.00 O CBDATE 11 > > > 1236.00 O 13 ERRMS4 66 > > > 1237.00 * > > > 1255.00 O E 86 SCRN6 > > > 1256.00 O K8 'DE123S06' > >-------------->O 1 '6' > > +--- > | This is the RPG/400 Mailing List! > | To submit a new message, send your mail to RPG400-L@midrange.com. > | To subscribe to this list send email to RPG400-L-SUB@midrange.com. > | To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com. > | Questions should be directed to the list owner/operator: david@midrange.com > +--- __________________________________________________ Do You Yahoo!? Talk to your friends online with Yahoo! Messenger. http://im.yahoo.com +--- | This is the RPG/400 Mailing List! | To submit a new message, send your mail to RPG400-L@midrange.com. | To subscribe to this list send email to RPG400-L-SUB@midrange.com. | To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: david@midrange.com +---
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
midrange.com
