Program drill-down
SET_YEARS_TO_DEL
SET DEL YEARS FOR INACTIVE SUPPLIER. Type MAN, base table ZV_USER_DEFAULTS.
Field inventory
22
Live detail pulled from the database.
| Page | Seq | Table | Field | Type | Visible | Position | Logic snippet |
|---|---|---|---|---|---|---|---|
| 1 | 0.0 | CMD 6 | C | 0 | 21, 145 | $SELECT 'DISPLAY SELECTION WINDOW S:AGENT_CODE;I\AM_CODE |
|
| 1 | 0.0 | H | -1 | 0, 0 | |||
| 1 | 0.0 | DEFAULT | I | 0 | 151, 37 | 'DISPLAYING TIME $DEFAULT A:DATE;DD MMM YYYY;T\DATE A:TIME;HH:MM:SS;T\TIME A:TIMER_ON;1000 'A:CONST;$T\DATE$ |
|
| 1 | 0.0 | AGENT_MAST | AM_MARKET | I | 0 | 111, 37 | $DEFAULT 'LOAD MARKET CODE A:ORG;;I\MARKET 'LOAD MARKET NAME F:CLIENT_MAST;;CM_CODE;T\MARKET=CM_NAME '20221121 THEUNIS F:ZV_USER_DEFAULTS;;;I\ZV_NUMBER=ZV_NUMBER;ZV_CODE='SUPPL_INACTIVE_DEL_YEARS' 'CONVERT ONLY THE FIRST CHARACTER OF THE MARKET LABEL C:MCASE;;T\MARKET |
| 1 | 0.0 | ZV_NUMBER | I | -1 | 391, 145 | $SELECT $VALIDATE M: 'C:UCASE 'F:AGENT_MAST;Y;AM_CODE;I\AM_CODE=AM_CODE;;I\AM_CODE 'F:AGENT_MAST;Y;AM_CODE;T\AM_NAME=AM_NAME;;I\AM_CODE 'F:ZU_USER;Y;ZU_USERID;;;;I\AM_CODE |
|
| 1 | 0.0 | AGENT_MAST | AM_FLOOR_AREA | I | 0 | 51, 121 | |
| 1 | 0.0 | Label 1 | T | -1 | 1, 25 | ||
| 1 | 0.0 | Label 2 | T | -1 | 291, 25 | ||
| 1 | 0.0 | Label 3 | T | -1 | 211, 49 | ||
| 1 | 0.0 | Label 4 | T | -1 | 621, 49 | ||
| 1 | 0.0 | Label 5 | T | -1 | 621, 25 | ||
| 1 | 0.0 | Label 12 | T | -1 | 671, 25 | ||
| 1 | 0.0 | Label 13 | T | -1 | 671, 49 | ||
| 1 | 0.0 | Label 14 | T | -1 | 271, 145 | ||
| 1 | 0.0 | Label 15 | T | 0 | 21, 121 | ||
| 1 | 0.0 | Label 16 | T | 0 | 31, 145 | ||
| 1 | 0.0 | ZV_USER_DEFAULTS | ZV_CODE | I | 0 | 21, 181 | |
| 10 | 0.0 | ZX_PRINT | Z | 0 | 0, 0 | ||
| 10 | 0.0 | ZX_SELECT | Z | 0 | 0, 0 | ||
| 10 | 0.0 | ZX_DELETE | Z | 0 | 0, 0 | ||
| 10 | 0.0 | ZX_UPDATE | Z | 0 | 0, 0 | '$CALCULATE $AFTER_WRITE U:U_DEL_YEARS;CREATE |
|
| 10 | 0.0 | ZX_EXIT | Z | 0 | 0, 0 |