Program drill-down
ZZ_A_GEN
GENERAL ASSIGN. Type ZZD, base table G1_GENERAL.
Field inventory
19
Live detail pulled from the database.
| Page | Seq | Table | Field | Type | Visible | Position | Logic snippet |
|---|---|---|---|---|---|---|---|
| 1 | 0.0 | H | -1 | 1, 1 | x |
||
| 1 | 0.0 | Label 1 | T | -1 | 181, 61 | x |
|
| 1 | 0.0 | Work 2 | I | -1 | 311, 61 | $VALIDATE C:UCASE V:UCASE;LCASE;FCASE $DEFAULT U:ZZ_READ_PARM;I\CASE,I\FIELD_FROM,I\FIELD_TO |
|
| 1 | 0.0 | Label 3 | T | -1 | 181, 97 | x |
|
| 1 | 0.0 | Work 4 | I | -1 | 311, 97 | $SELECT S:ZX_PGMS_FIELDS;;T\ZP_PROGRAM $VALIDATE C:UCASE |
|
| 1 | 0.0 | CMD 9 | C | -1 | 521, 97 | $SELECT S:ZX_PGMS_FIELDS;I\FIELD_FROM;T\ZP_PROGRAM |
|
| 1 | 0.0 | Label 5 | T | -1 | 181, 133 | x |
|
| 1 | 0.0 | Work 6 | I | -1 | 311, 133 | $SELECT S:ZX_PGMS_FIELDS;;T\ZP_PROGRAM C:UCASE |
|
| 1 | 0.0 | CMD 10 | C | -1 | 521, 133 | $SELECT S:ZX_PGMS_FIELDS;I\FIELD_TO;T\ZP_PROGRAM |
|
| 1 | 0.0 | Label 1 | T | -1 | 181, 169 | x |
|
| 1 | 0.0 | Work 2 | I | -1 | 311, 169 | x |
|
| 1 | 0.0 | Label 7 | T | 0 | 311, 397 | x |
|
| 1 | 0.0 | Label 11 | T | 0 | 311, 421 | x |
|
| 1 | 0.0 | Label 8 | T | 0 | 311, 445 | x |
|
| 10 | 0.0 | ZX_SELECT | Z | 0 | 1, 1 | x |
|
| 10 | 0.0 | ZX_EXIT | Z | 0 | 1, 1 | x |
|
| 10 | 0.0 | ZX_UPDATE | Z | 0 | 1, 1 | $BEFORE_WRITE U:ZZ_WRITE_PARM;I\CASE,I\FIELD_FROM,I\FIELD_TO |
|
| 10 | 0.0 | ZX_PRINT | Z | 0 | 1, 1 | x |
|
| 10 | 0.0 | ZX_DELETE | Z | 0 | 1, 1 | x |