Program drill-down
COUNT_MAST
COUNT MAINTENANCE. Type MDL, base table COUNT_MAST.
Field inventory
52
Live detail pulled from the database.
| Page | Seq | Table | Field | Type | Visible | Position | Logic snippet |
|---|---|---|---|---|---|---|---|
| 1 | 0.0 | H | -1 | 1, 85 | |||
| 1 | 0.0 | CNT_DESC | I | -1 | 211, 181 | '$VALIDATE 'MAKE THIS FIELD A MANDATORY FIELD 'M: 'CONVERT TO UPPERCASE 'C:UCASE 'REMOVE EMPTY SPACES ON EOTHER SIDE 'A:TRIM;I\CNT_DESC;I\CNT_DESC 'CLEAR FIELDS 'A:CONST;;W\TEMP1 'A:CONST;;W\TEMP2 'CODE BELOW CHECKS IF THE DESCRIPTION ALREADY EXISTS 'CHECK IF CODE ALREADY EXISTS 'U |
|
| 1 | 0.0 | NUMTST | I | 0 | 121, 565 | ||
| 1 | 0.0 | COUNT_MAST | CNT_DESC | T | -1 | 211, 157 | |
| 1 | 0.0 | COUNT_MAST | CNT_COUNT | I | -1 | 611, 181 | '$VALIDATE 'NOW CHANGED TO A CALCULATE $CALCULATE 'CONVERT TO UPPERCASE C:UCASE M: 'CODE IS FROM THE COUNT FIELD '$BEFORE_WRITE '========================== BEGIN ===== '$VALIDATE 'CONVERT TO UPPERCASE C:UCASE 'GIVE ERROR IF THE VALUE IS LESS THAN 0 I:I\CNT_COUNT;<;0;NUM D:ERROR - ONLY POSITIVE VALU |
| 1 | 0.0 | Work 2 | I | 0 | 61, 61 | $DEFAULT A:USERIP;;I\IP |
|
| 1 | 0.0 | Work 3 | I | 0 | 561, 517 | $AFTER_WRITE U:GRADING_METHOD;SET_AUDIT;ON $AFTER_DELETE U:GRADING_METHOD;SET_AUDIT;ON |
|
| 1 | 0.0 | FOUND | I | 0 | 31, 505 | ||
| 1 | 0.0 | COUNT_MAST | CNT_COUNT | T | -1 | 611, 157 | |
| 1 | 0.0 | Label 8 | T | -1 | 311, 49 | ||
| 1 | 0.0 | Label 1 | T | -1 | 291, 25 | ||
| 1 | 0.0 | Label 2 | T | -1 | 1, 25 | ||
| 1 | 0.0 | Label 3 | T | -1 | 621, 25 | ||
| 1 | 0.0 | Label 4 | T | -1 | 621, 49 | ||
| 1 | 0.0 | Label 5 | T | -1 | 671, 25 | ||
| 1 | 0.0 | Label 6 | T | -1 | 671, 49 | ||
| 1 | 0.0 | DEFAULT | I | 0 | 11, 61 | $DEFAULT 'TURN AUDIT OFF!!!!!!!!!!!!!!! LP20100920 ON JD PERMISSION 'U:GRADING_METHOD;SET_AUDIT;OFF 'PUTS PIC ON THE UPDATE BUTTON O:LOADPIC;$GBLROOT$LEGEND\PROJ_FMS\PICS\NEW_TEXT_DOC.ICO;C\CREATE A:DATE;DD MMM YYYY;T\DATE A:TIME;HH:MM:SS;T\TIME A:TIMER_ON;1000 U:ZZGRID_SPLIT;INIT_GRID;G\GRIDM;I\CNT_ |
|
| 1 | 0.0 | Work 2 | G | -1 | 51, 205 | ||
| 1 | 0.0 | CMD 4 | C | -1 | 181, 181 | $SELECT 'ALLOW THE USER TO USER TO PRESS F5 TO VIEW SELECTION WINDOW S:CONT_MAST;I\CNT_CONTAINER;I\CNT_PRODUCT |
|
| 1 | 0.0 | COUNT_MAST | CNT_CONTAINER | T | -1 | 121, 157 | |
| 1 | 0.0 | CMD 3 | C | -1 | 91, 181 | $SELECT 'ALLOW THE USER TO USER TO PRESS F5 TO VIEW SELECTION WINDOW S:COUNT_MAST;I\CNT_PRODUCT |
|
| 1 | 0.0 | COUNT_MAST | CNT_PRODUCT | I | -1 | 51, 181 | $SELECT 'ALLOW THE USER TO USER TO PRESS F5 TO VIEW SELECTION WINDOW S:PRODUCT_MAST_2;I\CNT_PRODUCT 'LOAD THE REST OF THE FIELDS FROM THE F5 SELECTION WINDOW 'A:SELPARM;2;I\CNT_CONTAINER 'A:SELPARM;3;I\CNT_COUNT 'A:SELPARM;4;I\CNT_DESC 'A:SELPARM;5;I\CNT_GRADE $SELECT6 'ALLOW THE USER TO USER TO PRESS |
| 1 | 0.0 | COUNT_MAST | CNT_PRODUCT | T | -1 | 51, 157 | |
| 1 | 0.0 | COUNT_MAST | CNT_CONTAINER | I | -1 | 121, 181 | $SELECT 'ALLOW THE USER TO USER TO PRESS F5 TO VIEW SELECTION WINDOW S:CONT_MAST;I\CNT_CONTAINER;I\CNT_PRODUCT $CALCULATE 'MAKE THIS FIELD A MANDATORY FIELD M: 'CONVERT TO UPPERCASE C:UCASE F:CONT_MAST;Y;CN_CONT;I\CNT_DESC=CN_DESC;CN_PRODUCT='$I\CNT_PRODUCT$';I\CNT_CONTAINER U:ZZGRID_SPLIT;DB_TO_GRID;G\GRI |
| 1 | 0.0 | COUNT_MAST | CNT_GRADE | I | -1 | 561, 181 | $SELECT S:GRADE2;I\CNT_GRADE A:SELPARM;2;I\CLASS A:CON;I\CNT_GRADE,I\CLASS;I\CNT_GRADE $VALIDATE 'CONVERT TO UPPERCASE C:UCASE A:RIGHT;I\CNT_GRADE,1;I\TMP_CLASS I:I\TMP_CLASS;=;* D:TO ASSIGN A COUNT TO ALL CLASSES OF THE SAME SIZE, USE *(SIZE) EG: *L;ERRORM;I\CNT_GRADE 'CLEAR THE WORK FIELDS A:CONST; |
| 1 | 0.0 | COUNT_MAST | CNT_GRADE | T | -1 | 561, 157 | |
| 1 | 0.0 | Work 1 | I | 0 | 731, 181 | ||
| 1 | 0.0 | Work 2 | I | 0 | 731, 205 | ||
| 1 | 0.0 | Work 1 | I | 0 | 31, 565 | ||
| 1 | 0.0 | Work 1 | I | 0 | 731, 229 | ||
| 1 | 0.0 | Work 1 | I | 0 | 71, 541 | ||
| 1 | 0.0 | Work 2 | I | 0 | 71, 565 | ||
| 1 | 0.0 | Work 5 | I | 0 | 31, 61 | $DEFAULT 'LOAD MARKET CODE A:ORG;;I\MARKET 'LOAD MARKET NAME F:CLIENT_MAST;;CM_CODE;T\MARKET=CM_NAME 'CONVERT ONLY THE FIRST CHARACTER OF THE MARKET LABEL C:MCASE;;T\MARKET |
|
| 1 | 0.0 | Work 1 | I | 0 | 561, 133 | ||
| 1 | 0.0 | Work 1 | I | 0 | 411, 517 | ||
| 1 | 0.0 | Work 2 | I | 0 | 391, 517 | ||
| 1 | 0.0 | Work 8 | I | 0 | 11, 541 | ||
| 1 | 0.0 | Work 9 | I | 0 | 31, 541 | ||
| 1 | 0.0 | Work 10 | I | 0 | 51, 565 | ||
| 1 | 0.0 | BLOCKED | I | 0 | 11, 565 | ||
| 1 | 0.0 | Work 1 | I | 0 | 201, 541 | ||
| 1 | 0.0 | Work 2 | I | 0 | 181, 541 | ||
| 1 | 0.0 | Work 1 | I | 0 | 51, 541 | ||
| 1 | 0.0 | SZ_BLK | I | 0 | 111, 541 | ||
| 1 | 0.0 | CL_BLK | I | 0 | 131, 541 | ||
| 1 | 0.0 | CLASS1 | I | 0 | 161, 541 | ||
| 1 | 0.0 | Work 1 | I | 0 | 91, 61 | $DEFAULT A:USERID;;I\USERID |
|
| 10 | 0.0 | ZX_SELECT | Z | 0 | 1, 85 | ||
| 10 | 0.0 | ZX_UPDATE | Z | 0 | 1, 85 | ||
| 10 | 0.0 | ZX_DELETE | Z | 0 | 1, 85 | ||
| 10 | 0.0 | ZX_PRINT | Z | 0 | 1, 85 | ||
| 10 | 0.0 | ZX_EXIT | Z | 0 | 1, 85 |