Program drill-down
CHRG_SUPPL_CS
EXCLUDE SUPPLIER FROM CS CHARGES. Type MAN, base table SUPPLIER_MAST.
Field inventory
26
Live detail pulled from the database.
| Page | Seq | Table | Field | Type | Visible | Position | Logic snippet |
|---|---|---|---|---|---|---|---|
| 1 | 0.0 | CMD 25 | C | -1 | 351, 133 | $SELECT I:I\AGENT;<>; S:SUPPLIER_MAST1;I\SUM_SUPPL;I\AGENT I:I\AGENT;=; S:SUPPLIER_MAST;I\SUM_SUPPL |
|
| 1 | 0.0 | CMD 2 | C | 0 | 750, 505 | $SELECT S:SALESMAN_AGENT;I\SUM_SMAN;I\SUM_AGENT_CODE |
|
| 1 | 0.0 | H | -1 | 1, 1 | |||
| 1 | 0.0 | SUPPLIER_MAST | SUM_SUPPL | I | -1 | 271, 133 | $DEFAULT A:PARM;2 A:VAR;I\SUM_SUPPL;I\TMP_SUPPL O:SHOWUPDATE $SELECT I:I\AGENT;<>; S:SUPPLIER_MAST1;I\SUM_SUPPL;I\AGENT I:I\AGENT;=; S:SUPPLIER_MAST;I\SUM_SUPPL ++++++++++++++++++++++++++++++++++++++ 'SELECTING THE DUMMY SUPPLIERS ++++++++++++++++++++++++++++++++++++++ $SELECT6 I:I\DUMMY_SUPPL;=; |
| 1 | 0.0 | SUPPLIER_MAST | SUM_NAME | I | -1 | 271, 169 | 'JER ADD 08042011 B $DEFAULT A:CONST;;W\SUPP_NAME; 'JER ADD 08042011 E $CALCULATE M: C:UCASE 'JER ADD 08042011 B O:SETFOCUS;D\SUM_LANGUAGE I:I\SUM_NAME;<>; U:SM_UPD_FUZZY;RN_GEN_FUZZY I:W\SUPP_NAME;=; DO(001) U:SM_UPD_FUZZY;RM_FUZ_COUNT I:I\FUZZCOUNT;>;0 DO(002) E:$GBLROOT$LE |
| 1 | 0.0 | SUPPLIER_MAST | SUM_CS_CHARGE | I | -1 | 271, 205 | $VALIDATE V:Y;N |
| 1 | 0.0 | Work 47 | I | 0 | 61, 61 | $DEFAULT 'INITIALIZES THE DATE AND TIME INTO THE T\DATE AND T\TIME FIELDS A:DATE;DD MMM/YYYY;T\DATE A:TIME;HH:MM:SS;T\TIME A:TIMER_ON;1000 'FIXED BY JD 20130320. THIS WAS NOT TESTED AT ALL!!! 'JER ADD 14032013 B O:HIDE;I\SUM_SMAN O:HIDE;T\SUM_SMAM O:HIDE;T\SUM_SMAMC O:DISABLEINPUT;I\SUM_SMAM 'JER ADD 14 |
|
| 1 | 0.0 | SUPPLIER_MAST | SUM_MARKET | I | 0 | 81, 61 | $DEFAULT 'LOAD MARKET CODE AND AGENT CODE A:PARM;3;I\AGENT A:ORG;;I\MARKET A:ORGS;;I\AGENT 'LOAD MARKET NAME F:CLIENT_MAST;;CM_CODE;T\MARKET=CM_NAME,I\DUMMY_SUPPL=CM_DUMMY_SUPPLIER C:MCASE;;T\MARKET |
| 1 | 0.0 | AGENT | I | 0 | 111, 61 | $DEFAULT A:PARM;3 |
|
| 1 | 0.0 | Work 1 | I | 0 | 171, 73 | ||
| 1 | 0.0 | Work 2 | I | 0 | 451, 73 | ||
| 1 | 0.0 | SUPPLIER_MAST | SUM_SUPPL | T | -1 | 61, 133 | |
| 1 | 0.0 | SUPPLIER_MAST | SUM_NAME | T | -1 | 61, 169 | |
| 1 | 0.0 | SUPPLIER_MAST | SUM_ID_NO | T | -1 | 61, 205 | |
| 1 | 0.0 | Label 40 | T | -1 | 1, 25 | ||
| 1 | 0.0 | Label 41 | T | -1 | 291, 25 | ||
| 1 | 0.0 | Label 42 | T | -1 | 301, 49 | ||
| 1 | 0.0 | Label 43 | T | -1 | 621, 25 | ||
| 1 | 0.0 | Label 44 | T | -1 | 671, 25 | ||
| 1 | 0.0 | Label 45 | T | -1 | 621, 49 | ||
| 1 | 0.0 | Label 46 | T | -1 | 671, 49 | ||
| 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 | $UPDATE 'ADDED BY LP20100903 ON CHRISTO'S REQUEST U:GBL_AUDIT;ON |
|
| 10 | 0.0 | ZX_EXIT | Z | 0 | 1, 1 |