Program drill-down
TRANSPORTER_MAN
TRANSPORTER MAINTENANCE. Type MDL, base table TRANSPORTER_MAST.
Field inventory
54
Live detail pulled from the database.
| Page | Seq | Table | Field | Type | Visible | Position | Logic snippet |
|---|---|---|---|---|---|---|---|
| 1 | 0.0 | H | -1 | 1, 1 | |||
| 1 | 0.0 | TRANSPORTER_MAST | TR_ADD1 | T | -1 | 231, 217 | |
| 1 | 0.0 | TRANSPORTER_MAST | TR_NAME | T | -1 | 231, 181 | |
| 1 | 0.0 | TRANSPORTER_MAST | TR_ADD1 | I | -1 | 321, 217 | 'CHANGING TEXT CASE TO UPPER CASE AND SET THIS FIELD OPTIONAL $VALIDATE C:UCASE '$CALCULATE 'IF THIS FIELD IS NULL THEN CLEAR LINE2,LINE3 AND POSTAL CODE, AND SET FOCUS TO TEL NO. I:I\TR_ADD1;=; A:CONST;;I\TR_ADD2,I\TR_ADD3,I\TR_PCODE O:DISABLEINPUT;I\TR_ADD2,I\TR_ADD3,I\TR_PCODE I:I\TR_ADD1;<>; O:ENABLEIN |
| 1 | 0.0 | TRANSPORTER_MAST | TR_NAME | I | -1 | 321, 181 | 'CHANGING TEXT CASE TO UPPER CASE AND SET THIS FIELD MANDATORY $VALIDATE M: C:UCASE |
| 1 | 0.0 | TRANSPORTER_MAST | TR_CODE | I | -1 | 321, 145 | $DEFAULT A:PARM;2 'SELECT TRANSPORT CODE FROM TRANSPORTER_MAST $SELECT ''S:TRANSPORTER_MAST;I\TR_CODE S:TRANSPORTER_AGENT;I\TR_CODE;I\TR_AGENT 'CHANGING TEXT CASE TO UPPER CASE AND SET THIS FIELD MANDATORY $VALIDATE M: C:UCASE 'VALIDATE THE TRANSPORTER CODE FROM SPECIAL KEYS U:CALC_TYPE;SPECKEY_CH |
| 1 | 0.0 | TRANSPORTER_MAST | TR_CODE | T | -1 | 231, 145 | |
| 1 | 0.0 | Label 5 | T | -1 | 1, 25 | ||
| 1 | 0.0 | Label 6 | T | -1 | 291, 25 | ||
| 1 | 0.0 | Label 7 | T | -1 | 281, 49 | ||
| 1 | 0.0 | Label 8 | T | -1 | 621, 49 | ||
| 1 | 0.0 | Label 9 | T | -1 | 621, 25 | ||
| 1 | 0.0 | Label 10 | T | -1 | 671, 49 | ||
| 1 | 0.0 | Label 11 | T | -1 | 671, 25 | ||
| 1 | 0.0 | Work 12 | I | 0 | 11, 61 | $DEFAULT A:DATE;DD MMM YYYY;T\DATE A:TIME;HH:MM:SS;T\TIME A:TIMER_ON;1000 A:STOPDELETE;TRUE |
|
| 1 | 0.0 | TRANSPORTER_MAST | TR_ADD2 | I | -1 | 321, 253 | 'CHANGING TEXT CASE TO UPPER CASE AND SET THIS FIELD OPTIONAL $VALIDATE C:UCASE |
| 1 | 0.0 | TRANSPORTER_MAST | TR_ADD2 | T | -1 | 231, 253 | |
| 1 | 0.0 | TRANSPORTER_MAST | TR_ADD3 | I | -1 | 321, 289 | 'CHANGING TEXT CASE TO UPPER CASE AND SET THIS FIELD OPTIONAL $VALIDATE C:UCASE |
| 1 | 0.0 | TRANSPORTER_MAST | TR_ADD3 | T | -1 | 231, 289 | |
| 1 | 0.0 | CMD 5 | C | -1 | 401, 145 | 'SELECT TRANSPORT CODE FROM TRANSPORTER_MAST $SELECT ''S:TRANSPORTER_MAST;I\TR_CODE S:TRANSPORTER_AGENT;I\TR_CODE;I\TR_AGENT |
|
| 1 | 0.0 | TRANSPORTER_MAST | TR_PCODE | I | -1 | 321, 325 | 'LP20091029 ON KASSIE'S REQUEST $SELECT S:AREA_CODE;I\TR_PCODE 'CHECKING IF THE USER ENTERS NUMBERS NOT TEXT $VALIDATE I:I\TR_ADD1;<>; DO(0004) A:ISNUMERIC;I\TR_PCODE;W\TR_PCODE I:W\TR_PCODE;=;N D:POSTAL CODE MUST CONTAIN 4 NUMBERS;ERRORM;I\TR_PCODE A:VAR;I\TR_PCODE;I\TR_PCODE;;0000 |
| 1 | 0.0 | TRANSPORTER_MAST | TR_PCODE | T | -1 | 231, 325 | |
| 1 | 0.0 | TRANSPORTER_MAST | TR_TELNO | I | -1 | 321, 361 | 'VALIDATING THE TELEPHONE NUMBER $VALIDATE 'CHECK IS NUMERIC 'I:I\TR_TELNO;<>; ' DO(002) ' A:ISNUMERIC;I\TR_TELNO;W\TR_TELNO ' I:W\TR_TELNO;=;N ' D:TELEPHONE NUMBER MUST CONTAIN 10 NUMBERS;ERRORM;I\TR_TELNO 'CHECKING THE LENGHT IF IS NOT LESS THAN 10 'A:LEN;I\TR_TELNO;W\TR_TELNO 'I:W\T |
| 1 | 0.0 | TRANSPORTER_MAST | TR_TELNO | T | -1 | 231, 361 | |
| 1 | 0.0 | TRANSPORTER_MAST | TR_CELLNO | I | -1 | 321, 397 | 'VALIDATING THE CELLPHONE NUMBER $VALIDATE 'CHECK IF IS NUMERIC I:I\TR_CELLNO;<>; DO(000) A:ISNUMERIC;I\TR_CELLNO;W\TR_CELLNO I:W\TR_CELLNO;=;N D:CELLPHONE NUMBER MUST CONTAIN 10 NUMBERS;ERRORM;I\TR_CELLNO 'CHECKING THE LENGHT IF IS NOT LESS THAN 10 A:LEN;I\TR_CELLNO;W\TR_CELLNO I |
| 1 | 0.0 | TR_AGENT | T | -1 | 231, 109 | ||
| 1 | 0.0 | AGENT LABEL | T | -1 | 401, 109 | ||
| 1 | 0.0 | TRANSPORTER_MAST | TR_CELLNO | T | -1 | 231, 397 | |
| 1 | 0.0 | TRANSPORTER_MAST | TR_EMAIL | I | -1 | 321, 433 | 'EMAIL ADDRESS MUST CONTAIN @ SYMBOL TO BE VALID $VALIDATE I:I\TR_EMAIL;<>; DO(003) U:NUMBER_VALIDATE;EMAIL_CHK;I\TR_EMAIL,@,W\TR_EMAIL I:W\TR_EMAIL;=;N D:INVALID E-MAIL ADDRESS;ERRORM;I\TR_EMAIL DOEND(003) |
| 1 | 0.0 | TRANSPORTER_MAST | TR_VEH_REG | I | -1 | 321, 505 | $VALIDATE C:UCASE |
| 1 | 0.0 | TRANSPORTER_MAST | TR_EMAIL | T | -1 | 231, 433 | |
| 1 | 0.0 | TRANSPORTER_MAST | TR_CONTACT | I | -1 | 321, 469 | 'CHANGE TEXT CASE TO UPPER CASE AND SET THIS FIELD MANDATORY $VALIDATE C:UCASE |
| 1 | 0.0 | TRANSPORTER_MAST | TR_VEH_REG | T | -1 | 231, 505 | |
| 1 | 0.0 | Work 1 | I | 0 | 111, 73 | $DEFAULT A:PARM;1 $AFTER_WRITE I:I\ZV_CODE;<>; W:ZV_USER_DEFAULTS;Y;;ZV_CODE=I\ZV_CODE,ZV_TEXT=I\SUM_SUPPL;ZV_CODE='$I\ZV_CODE$' |
|
| 1 | 0.0 | CMD 1 | C | -1 | 371, 325 | 'LP20091029 ON KASSIE'S REQUEST $SELECT S:AREA_CODE;I\TR_PCODE |
|
| 1 | 0.0 | TRANSPORTER_MAST | TR_AGENT | I | -1 | 321, 109 | $DEFAULT 'A:ORGS;;I\TR_AGENT A:ORGS;;I\ORGS A:PARM;3 'LOAD AGENT NAME I:I\ORGS;<>; DO(AGN) A:CONST;$I\ORGS$;I\TR_AGENT F:AGENT_MAST;;;T\AGENT=AM_NAME;AM_CODE ='$I\TR_AGENT$' O:DISABLEINPUT;I\TR_AGENT DOEND(AGN) I:I\ORGS;=; O:ENABLEINPUT;I\TR_AGENT $SELECT S:AGENT_CODE;I\TR_AGENT $ |
| 1 | 0.0 | TRANSPORTER_MAST | TR_CONTACT | T | -1 | 231, 469 | |
| 1 | 0.0 | Work 1 | I | 0 | 401, 325 | ||
| 1 | 0.0 | Work 2 | I | 0 | 511, 361 | ||
| 1 | 0.0 | Work 3 | I | 0 | 511, 397 | ||
| 1 | 0.0 | Work 4 | I | 0 | 681, 397 | ||
| 1 | 0.0 | Work 5 | I | 0 | 431, 145 | ||
| 1 | 0.0 | Work 9 | I | 0 | 51, 61 | $DEFAULT 'LOAD MARKET CODE A:ORG;;I\MARKET 'LOAD MARKET NAME F:CLIENT_MAST;;CM_CODE;T\MARKET=CM_NAME 'CHANGING TEXT CASE FOR THE FIRST CHARACTER TO UPPER CASE C:MCASE;;T\MARKET |
|
| 1 | 0.0 | I | 0 | 11, 97 | $DEFAULT A:CONST;N;I\TR_DELIND |
||
| 1 | 0.0 | Work 1 | I | 0 | 21, 529 | ||
| 1 | 0.0 | Work 1 | I | 0 | 171, 433 | ||
| 1 | 0.0 | TRANSPORTER_MAST | TR_DELIND | I | 0 | 571, 145 | $VALIDATE C:UCASE 'IF BLANK DEFAULT TO 'N' I:I\TR_DELIND;=; A:CONST;N;I\TR_DELIND |
| 1 | 0.0 | Label 2 | T | 0 | 471, 145 | ||
| 1 | 0.0 | Work 1 | I | 0 | 11, 133 | 'ADDED BY LAZ ON 20100702 ON KASSIE'S REQUEST TO DEFAULT AGENT CODE AND DISABLED THE FIELD IF THIS RUNS BY AGENT |
|
| 10 | 0.0 | ZX_PRINT | Z | 0 | 1, 1 | ||
| 10 | 0.0 | ZX_SELECT | Z | 0 | 1, 1 | ||
| 10 | 0.0 | ZX_DELETE | Z | 0 | 1, 1 | ||
| 10 | 0.0 | ZX_UPDATE | Z | 0 | 1, 1 | ||
| 10 | 0.0 | ZX_EXIT | Z | 0 | 1, 1 |