Evaluate Weigh the pros and cons of technologies, products and projects you are considering.

Working with nulls in RPGLE

ISeries expert Kent Milligan offers help for working with nulls in RPGLE.

We are in the process of externalizing our I/O from our RPGLE Programs. We are also using more and more Forge in Keys that may contain nulls.

Is there a way to bring the row back and have a flag or indicator on an external data structure to handle the nulls? I am currently creating individual work fields for the null indicators.

Also, are there any plans to allow the RPG Programs to receive a Cursor that was created in a Stored Procedure?

With nulls, you can still fetch into a data structure. Simply specify the data structure followed by another data structure (array) that will hold the values of the null indicators. Define same number of elements in this array as there are fields in the data structure -- in the case of the example below, this is 12.


* CustomerRow -- an externally described data structure based on SQL view allCusts
d customerRow e ds extname(allCusts) qualified

* Null indicator arrays
d customerNIArr s 5i 0 dim(12)

FETCH custListCursor INTO :customerRow :customerNIArr;

Dig Deeper on DB2 UDB (universal databases)