Re: D spec to free format question

On 2/6/2019 3:34 PM, Burrows, Thomas 1001 wrote:

How do you turn this into a Free format statement?

D @Process s n inz('0')

The D means the specification is declaring a variable.
The @Process is the name of the variable.
The s indicates this is a simple variable, not a data structure.
The n indicates this variable is an indicator (hee hee!)
The inz('0') tells the compiler to initialise the starting value to '0',
which is the same as *OFF for an indicator.

The example I find online shows this.
Dcl-s @Process num inz(0) LIKE(LIMIT);

Not sure what LIMIT is????

Where are you looking? That's the point of my reply; to try to point you
to a better reference. I'm partial to the RPG Reference myself:
https://www.ibm.com/support/knowledgecenter/ssw_ibm_i_73/rzasd/rzasdmain.htm
What you're specifically looking for is 'Defining Data and Prototypes'.

From there, look at 'Standalone Fields' (because of that 's').

And this line.
D dsPgms EsDS EXTNAME(SYSAPGPF) PREFIX(Gv)

The stuff in the middle, EsDS says several things:
E - Externally described
s - program status data structure; returns information about the program
while it is running.
DS - Data Structure

EXTNAME() is the name of the file that describes the layout of the
structure.

PREFIX() appends Gv to the front of each subfield in the structure.