RE: RPG400-L Digest, Vol 7, Issue 969

James,

First, realize that in optimizing the code, the program does not load any fields that are not used in the program. To overcome this check the *DEBUG option in the h-specs for compilation. From WDSc help:

DEBUG{(*INPUT | *DUMP | *XMLSAX | *NO | *YES)}
The DEBUG keyword controls what debugging aids are generated into the module.
When the DEBUG keyword is specified with one or more of the *INPUT, DUMP or *XMLSAX parameters, you can choose exactly which debugging aids are to be generated into the module. When the DEBUG keyword is specified with *YES or *NO, no other parameters can be specified.
*INPUT
All externally described input fields will be read during input operations even if they are not used in the program. Normally, externally described input fields are only read during input operations if the field is otherwise used within the program.
*DUMP
DUMP operations are performed.
Note: You can force a DUMP operation to be performed by specifying operation extender A on the DEBUG operation code. This operation extender means that a dump is always performed, regardless of the value of the DEBUG keyword.
*XMLSAX
An array with the name _QRNU_XMLSAX will be generated into the module if it has a debug view (if it is compiled with a value for the DBGVIEW parameter other than *NONE). The values of the array will be the names of the *XML special words, without the "*XML_" prefix. For example, if *XML_START_DOCUMENT has the value 1, _QRNU_XMLSAX(1) will have the value "START_DOCUMENT".


Thanks,

Marvin


message: 8
date: Thu, 30 Oct 2008 12:50:01 -0800
from: James Lampert <jamesl@xxxxxxxxxxxxxxxxx>
subject: Question on /FREE

Can somebody explain why

C READ CUSTLCONR

puts the values into the fields just fine, while

/FREE
READ CUSTLCONR
/END-FREE

doesn't?

I have an apprentice now, who knows more about /free than I do, and is
asking *me* why the latter form isn't putting the data into the fields.

--
James H. H. Lampert
Touchtone Corporation