Define a field as an Indicator....

[Guest.Visitor]

Just starting to use RPGIV.....and I like it. How do I define a field as an indicator so i don't have to use numbers any more. I need the syntax for the D Spec. Thanks

[Guest.Visitor]

Do a search on this forum for INDARA

[B.Myrick]

Eric, In your D-specs, code this: * Give indicators meaninful names * ------------------------------- d indptr s * inz(%addr(*in)) d indicators ds based(indptr) d exit 3 3 d process 5 5 d sfl_dsp 60 60 d sfl_ctl 61 61 d sfl_clr 62 62 d page_up 80 80 d page_down 81 81 d got_upc 97 97 d alarm 98 98 d over_flow 99 99 The numerick fields you see to the right are the indicator you are substituting for. In the C-specs you can check and/or evaluate the substitute field. c if exit = *on c leave c endif c dou exit = *on c . c . c enddo c eval exit = *on And so forth. Hope this helps, Bret

[Guest.Visitor]

Eric, the type of an indicator is N. If you specify a length, it has to be 1.

 D fileExists s n inz(*on) D custErrors s n dim(10) 

The pointer that Jeff gave you for INDARA (and INDDS) is somewhat related to named indicators, but it's only one very specific use for them related to avoiding using the *IN indicators for display files. Barbara Morris