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;
This was first published in September 2007