Re: System 36 internal display file -- RPG400-L

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
+---