GDDM V3R2 Base Application Programming Reference
|
Previous topic |
Next topic |
Contents |
Index |
Contact z/OS |
Library |
PDF |
BOOK
Sample output GDDM V3R2 Base Application Programming Reference SC33-0868-02 |
|
Assuming there were three arrays of fields called PROD, DESC, and COST (as there are in the sample map ERXORDER), the command
ERXMSVAR group1 map1 X_
/* GDDM-REXX: output from ERXMSVAR EXEC: . . 16:41:32*/
/* Initialize structure for */
/* MAPGROUP: ERXORDD6 , MAPNAME: ERXORDER */
X_=""
X_PROD.1 = " "
X_DESC.1 = " "
X_COST.1 = " "
X_QTY.1 = " "
X_QTY_COL_SEL.1 = " "
X_QTY_COL.1 = " "
X_TOT.1 = " "
X_PROD.2 = " "
...
... "
...
X_TOTAL = " "
X_MSG = " "
X_ASLENGTH=432 /* length of ADS string */
X_NO_NAME_3 = " "
X_NO_NAME_4 = " "
X_NO_NAME_4_COL_SEL = " "
X_NO_NAME_4_COL = " "
|
Copyright IBM Corporation 1990, 2012 |