Program drill-down
ZZ_F
TABLE LOOKUP. Type ZZD, base table G2_GENERAL.
Field inventory
18
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 2 | T | -1 | 181, 61 | x |
|
| 1 | 0.0 | Work 1 | I | -1 | 321, 61 | $SELECT S:ZT_TABLE;I\ZT_TABLE $VALIDATE C:UCASE F:ZT_TABLE;Y;ZT_TABLE $DEFAULT O:DELAY;500 X:ZZ_READ;G\ASSIGN_SCREEN;ZZ_SCREEN SCREEN_VARIABLE 30 0,ZZ_OP OPERATION 12 0,ZZ_FIELD TABLE_FIELD 30 0;;;EDIT X:ZZ_READ;G\READ_CON;ZZ_FIELD TABLE_FIELD 30 0,ZZ_OP OPERATION 12 0,ZZ_SCREEN SCREEN_VARIABLE 30 0,ZZ_AND_OR A |
|
| 1 | 0.0 | CMD 3 | C | -1 | 531, 61 | $SELECT S:ZT_TABLE;I\ZT_TABLE |
|
| 1 | 0.0 | Label 4 | T | -1 | 181, 97 | x |
|
| 1 | 0.0 | Work 6 | I | -1 | 321, 97 | $VALIDATE V:Y;N; |
|
| 1 | 0.0 | Label 1 | T | 0 | 531, 97 | x |
|
| 1 | 0.0 | Label 1 | T | 0 | 531, 121 | x |
|
| 1 | 0.0 | Label 8 | T | -1 | 11, 133 | x |
|
| 1 | 0.0 | Label 1 | T | 0 | 531, 145 | x |
|
| 1 | 0.0 | Work 7 | G | -1 | 11, 157 | $GRID I:G\ASSIGN_SCREEN<COL>;=;3 S:ZF_TABLE_DTL;;I\ZT_TABLE I:G\ASSIGN_SCREEN<COL>;=;1 S:ZX_PGMS_FIELDS;;T\ZP_PROGRAM |
|
| 1 | 0.0 | Label 9 | T | -1 | 11, 313 | x |
|
| 1 | 0.0 | Work 11 | G | -1 | 11, 337 | $GRID I:G\READ_CON<COL>;=;1 S:ZF_TABLE_DTL;;I\ZT_TABLE I:G\READ_CON<COL>;=;3 S:ZX_PGMS_FIELDS;;T\ZP_PROGRAM |
|
| 10 | 0.0 | ZX_EXIT | Z | 0 | 0, 0 | x |
|
| 10 | 0.0 | ZX_PRINT | Z | 0 | 0, 0 | x |
|
| 10 | 0.0 | ZX_SELECT | Z | 0 | 0, 0 | x |
|
| 10 | 0.0 | ZX_DELETE | Z | 0 | 0, 0 | x |
|
| 10 | 0.0 | ZX_UPDATE | Z | 0 | 0, 0 | $BEFORE_WRITE U:ZZ_WRITE_PARM;I\ZT_TABLE,I\YNB,,G\ASSIGN_SCREEN,G\READ_CON |