Program drill-down
ZZ_G
GENERATE VALUE. Type ZZD, base table G1_GENERAL.
Field inventory
23
Live detail pulled from the database.
| Page | Seq | Table | Field | Type | Visible | Position | Logic snippet |
|---|---|---|---|---|---|---|---|
| 1 | 0.0 | H | -1 | 0, 0 | x |
||
| 1 | 0.0 | Label 1 | T | -1 | 1, 61 | x |
|
| 1 | 0.0 | Work 2 | I | -1 | 191, 61 | $SELECT S:ZT_TABLE;I\ZT_TABLE $VALIDATE C:UCASE F:ZT_TABLE;Y;ZT_TABLE $DEFAULT O:DELAY;500 U:ZZ_READ_PARM;I\KEY_VALUE,I\ZT_TABLE,I\READ_KEY,I\INC_FIELD,I\RET_FIELD I:I\ZT_TABLE;=; DO A:CONST;ZV_USER_DEFAULTS;I\ZT_TABLE A:CONST;ZV_CODE;I\READ_KEY A:CONST;ZV_NUMBER;I\INC_FIELD DOEND ' ' G:$I\ZZORG$,_,LAST_ |
|
| 1 | 0.0 | CMD 1 | C | -1 | 451, 61 | x |
|
| 1 | 0.0 | Label 2 | T | -1 | 1, 109 | x |
|
| 1 | 0.0 | Work 4 | I | -1 | 191, 109 | $SELECT S:ZF_TABLE_DTL;I\READ_KEY;I\ZT_TABLE $VALIDATE C:UCASE |
|
| 1 | 0.0 | CMD 1 | C | -1 | 451, 109 | $SELECT S:ZF_TABLE_DTL;I\READ_KEY;I\ZT_TABLE |
|
| 1 | 0.0 | Label 5 | T | -1 | 1, 157 | x |
|
| 1 | 0.0 | Work 6 | I | -1 | 191, 157 | $VALIDATE M: |
|
| 1 | 0.0 | Label 2 | T | -1 | 1, 205 | x |
|
| 1 | 0.0 | Work 1 | I | -1 | 191, 205 | $SELECT S:ZF_TABLE_DTL;I\INC_FIELD;I\ZT_TABLE $VALIDATE C:UCASE |
|
| 1 | 0.0 | CMD 5 | C | -1 | 451, 205 | $SELECT S:ZF_TABLE_DTL;I\INC_FIELD;I\ZT_TABLE |
|
| 1 | 0.0 | Label 3 | T | -1 | 1, 253 | x |
|
| 1 | 0.0 | Work 4 | I | -1 | 191, 253 | $SELECT S:ZX_PGMS_FIELDS;I\RET_FIELD;T\ZP_PROGRAM $VALIDATE C:UCASE |
|
| 1 | 0.0 | CMD 10 | C | -1 | 451, 253 | $SELECT S:ZX_PGMS_FIELDS;I\RET_FIELD;T\ZP_PROGRAM |
|
| 1 | 0.0 | Label 7 | T | 0 | 181, 517 | x |
|
| 1 | 0.0 | Label 11 | T | 0 | 181, 541 | x |
|
| 1 | 0.0 | Label 8 | T | 0 | 181, 565 | x |
|
| 10 | 0.0 | ZX_PRINT | Z | 0 | 0, 0 | x |
|
| 10 | 0.0 | ZX_DELETE | Z | 0 | 0, 0 | x |
|
| 10 | 0.0 | ZX_SELECT | Z | 0 | 0, 0 | x |
|
| 10 | 0.0 | ZX_EXIT | Z | 0 | 0, 0 | x |
|
| 10 | 0.0 | ZX_UPDATE | Z | 0 | 0, 0 | $BEFORE_WRITE U:ZZ_WRITE_PARM;I\KEY_VALUE,I\ZT_TABLE,I\READ_KEY,I\INC_FIELD,I\RET_FIELD |