Program drill-down
CHEP_PALL_SYST_SETUP
CHEP PALLET SYSTEM SETUP. Type MAN, base table CHEP_MAST.
Field inventory
29
Live detail pulled from the database.
| Page | Seq | Table | Field | Type | Visible | Position | Logic snippet |
|---|---|---|---|---|---|---|---|
| 1 | 0.0 | Label 1 | T | -1 | 291, 25 | ||
| 1 | 0.0 | Label 2 | T | -1 | 281, 49 | ||
| 1 | 0.0 | Label 3 | T | -1 | 621, 25 | ||
| 1 | 0.0 | H | -1 | 0, 0 | |||
| 1 | 0.0 | Label 4 | T | -1 | 671, 25 | ||
| 1 | 0.0 | Label 5 | T | -1 | 621, 49 | ||
| 1 | 0.0 | Label 6 | T | -1 | 671, 49 | ||
| 1 | 0.0 | Work 7 | I | 0 | 11, 73 | $DEFAULT A:DATE;DD MMM/YYYY;T\DATE A:TIME;HH:MM:SS;T\TIME A:TIMER_ON;1000 |
|
| 1 | 0.0 | Label 8 | T | -1 | 1, 25 | ||
| 1 | 0.0 | Label 9 | T | -1 | 341, 121 | ||
| 1 | 0.0 | CHEP_MAST | CH_ADD2 | I | -1 | 341, 277 | $VALIDATE 'CONVERT TO UPPERCASE C:UCASE 'CHECK IF THE FIRST ADDRESS LINE IS NULL I:I\CH_ADD2;<>; DO(CHK) I:I\CH_ADD1;=; D:ENTER THE FIRST ADDRESS LINE;ERRORM;I\CH_ADD2 DOEND(CHK) |
| 1 | 0.0 | CHEP_MAST | CH_ADD1 | T | -1 | 201, 253 | |
| 1 | 0.0 | CHEP_MAST | CH_NAME | T | -1 | 201, 193 | |
| 1 | 0.0 | CHEP_MAST | CH_NAME | I | -1 | 341, 193 | $VALIDATE 'MAKE THIS FIELD MANDATORY M: 'CONVERT TO UPPERCASE C:UCASE |
| 1 | 0.0 | CHEP_MAST | CH_VATNO | T | -1 | 201, 361 | |
| 1 | 0.0 | CHEP_MAST | CH_VATNO | I | -1 | 341, 361 | $VALIDATE 'MAKE THIS FIELD MANDATORY M: 'CONVERT TO UPPERCASE 'C:UCASE $AFTER_WRITE 'CLEAR FIELDS A:CONST;;I\CH_MARKET,I\CH_NAME,I\CH_ADD1,I\CH_ADD2,I\CH_ADD3,I\CH_PCODE,I\CH_VATNO |
| 1 | 0.0 | CHEP_MAST | CH_ADD1 | I | -1 | 341, 253 | $VALIDATE 'MAKE THIS FIELD MANDATORY M: 'CONVERT TO UPPERCASE C:UCASE |
| 1 | 0.0 | CHEP_MAST | CH_PCODE | I | -1 | 341, 325 | $VALIDATE 'MAKE THIS FIELD MANDATORY M: 'GET THE LENGTH OF THIS FIELD A:LEN;I\CH_PCODE;W\LEN 'CHECK IF THE LENGTH IS GREATER OR LESS THAN FOUR I:W\LEN;<>;4 D:ERROR- POSTAL CODE MUST BE FOUR DIGITS LONG;ERRORM;I\CH_PCODE |
| 1 | 0.0 | CHEP_MAST | CH_ADD3 | I | -1 | 341, 301 | $VALIDATE 'CONVERT TO UPPERCASE C:UCASE 'CHECK IF THE FIRST ADDRESS LINE IS NULL I:I\CH_ADD3;<>; DO(CHK) I:I\CH_ADD2;=; D:ENTER THE SECOND ADDRESS LINE;ERRORM;I\CH_ADD3 DOEND(CHK) |
| 1 | 0.0 | CHEP_MAST | CH_PCODE | T | -1 | 201, 325 | |
| 1 | 0.0 | Work 8 | I | 0 | 11, 109 | $DEFAULT 'LOAD MARKET CODE A:ORG;;I\MARKET 'LOAD MARKET NAME F:CLIENT_MAST;;CM_CODE;T\MARKET=CM_NAME,I\CH_MARKET=CM_PALLMKT I:I\CH_MARKET;<>; F:CHEP_MAST;;;I\CH_NAME=CH_NAME,I\CH_ADD1=CH_ADD1,I\CH_ADD2=CH_ADD2,I\CH_ADD3=CH_ADD3,I\CH_PCODE=CH_PCODE,I\CH_VATNO=CH_VATNO;CH_MARKET='$I\CH_MARKET$' 'ENABLE IN |
|
| 1 | 0.0 | CHEP_MAST | CH_MARKET | I | 0 | 181, 121 | |
| 1 | 0.0 | CHEP_MAST | CH_MARKET | T | -1 | 201, 121 | |
| 1 | 0.0 | Work 11 | I | 0 | 21, 505 | ||
| 10 | 0.0 | ZX_EXIT | Z | 0 | 0, 0 | ||
| 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 |