Program drill-down
TRANSFER_FACILITY
TRANSFER FACILITY. Type DSP, base table DEBT_ADDR.
Field inventory
58
Live detail pulled from the database.
| Page | Seq | Table | Field | Type | Visible | Position | Logic snippet |
|---|---|---|---|---|---|---|---|
| 1 | 0.0 | Work 3 | I | 0 | 411, 385 | ||
| 1 | 0.0 | H | -1 | 0, 0 | |||
| 1 | 0.0 | Work 12 | I | -1 | 181, 385 | $SELECT S:CS_FOR_TFR;I\ISSUE;I\AGENT;I\CONSIGN;I\DELDATE $CALCULATE M: C:UCASE F:LOC_TRANS;Y;;I\DELIND=LT_DELIND,I\QTY_ON_ISS=LT_PRQTY,I\DEPNO=LT_DEPNO;LT_MARKET='$I\MARKET$' AND LT_DOCNO='$I\ISSUE$' AND LT_CONSIGNO='$I\CONSIGN$' AND LT_DELDATE='$I\DELDATE$' ORDER BY LT_TRDATE DESC I:I\DELIND;=;Y D:THI |
|
| 1 | 0.0 | Label 10 | T | -1 | 291, 217 | ||
| 1 | 0.0 | Work 9 | I | -1 | 181, 325 | ||
| 1 | 0.0 | Label 10 | T | -1 | 121, 325 | ||
| 1 | 0.0 | Label 11 | T | -1 | 71, 385 | ||
| 1 | 0.0 | Work 8 | I | -1 | 601, 289 | ||
| 1 | 0.0 | Work 5 | I | -1 | 181, 289 | ||
| 1 | 0.0 | Work 6 | I | -1 | 311, 289 | ||
| 1 | 0.0 | Label 1 | T | -1 | 121, 289 | ||
| 1 | 0.0 | Label 2 | T | -1 | 251, 289 | ||
| 1 | 0.0 | Label 3 | T | -1 | 381, 289 | ||
| 1 | 0.0 | Label 4 | T | -1 | 511, 289 | ||
| 1 | 0.0 | Work 7 | I | -1 | 441, 289 | ||
| 1 | 0.0 | Work 9 | I | -1 | 181, 253 | ||
| 1 | 0.0 | CMD 3 | C | -1 | 291, 181 | ||
| 1 | 0.0 | Label 5 | T | -1 | 371, 181 | ||
| 1 | 0.0 | Label 6 | T | -1 | 71, 217 | ||
| 1 | 0.0 | Label 7 | T | -1 | 71, 253 | ||
| 1 | 0.0 | Work 4 | I | -1 | 481, 181 | ||
| 1 | 0.0 | Label 1 | T | -1 | 71, 433 | ||
| 1 | 0.0 | Work 2 | I | -1 | 181, 433 | $CALCULATE I:I\QTY;>;I\ONH D:MAY NOT EXCEED ON HAND QTY;ERRORM;I\QTY |
|
| 1 | 0.0 | CMD 4 | C | -1 | 341, 385 | ||
| 1 | 0.0 | Label 1 | T | -1 | 71, 481 | ||
| 1 | 0.0 | Work 2 | I | -1 | 181, 481 | $SELECT S:TFR_RSN;I\DEST $CALCULATE M: C:UCASE F:REASON_MAST;Y;;T\RSN_DESC=RSN_DESC,I\RSN_BLOCK=RSN_BLOCKED;RSN_REASON='$I\DEST$' AND RSN_TYPE='TF' O:ENABLEINPUT;C\PROCESS O:BACKCOLOR;C\PROCESS;YELLOW O:SETFOCUS;C\PROCESS |
|
| 1 | 0.0 | Label 1 | T | -1 | 1, 25 | ||
| 1 | 0.0 | Label 2 | T | -1 | 621, 25 | ||
| 1 | 0.0 | Label 3 | T | -1 | 291, 25 | ||
| 1 | 0.0 | Label 4 | T | -1 | 311, 49 | ||
| 1 | 0.0 | Label 5 | T | -1 | 621, 49 | ||
| 1 | 0.0 | Label 6 | T | -1 | 671, 25 | ||
| 1 | 0.0 | Label 7 | T | -1 | 671, 49 | ||
| 1 | 0.0 | Work 8 | I | 0 | 1, 61 | $DEFAULT 'LOAD MARKET CODE A:ORG;;I\MARKET A:ORGS;;I\ORGS 'LOAD MARKET NAME F:CLIENT_MAST;;CM_CODE;T\MARKET=CM_NAME,I\VATCD=CM_CSVATCD,I\PRN=CM_NOCSI_PRN 'CONVERT ONLY THE FIRST CHARACTER OF THE MARKET LABEL C:MCASE;;T\MARKET A:USERID;;I\USER A:USERIP;;I\IP A:DATE;DD MMM YYYY;T\DATE A:TIME;HH:MM:SS; |
|
| 1 | 0.0 | Work 9 | I | 0 | 31, 61 | ||
| 1 | 0.0 | Work 10 | I | 0 | 61, 61 | ||
| 1 | 0.0 | Work 11 | I | 0 | 91, 61 | ||
| 1 | 0.0 | Label 12 | T | -1 | 71, 121 | ||
| 1 | 0.0 | Work 13 | I | -1 | 181, 121 | $SELECT S:AGENT_CODE;I\AGENT $CALCULATE M: C:UCASE F:AGENT_MAST;Y;;T\AGENT_NAME=AM_NAME;AM_CODE='$I\AGENT$' |
|
| 1 | 0.0 | CMD 14 | C | -1 | 241, 121 | $SELECT S:AGENT_CODE;I\AGENT |
|
| 1 | 0.0 | Label 15 | T | -1 | 331, 121 | ||
| 1 | 0.0 | CMD 16 | C | -1 | 641, 548 | $SELECT 'CHECK FOR BLANKS I:I\CONSIGN;=; D:CONSIGNMENT NUMBER IS BLANK;ERRORM;I\CONSIGN I:I\DELDATE;=; D:DELIVERY DATE IS BLANK;ERRORM;I\CONSIGN I:I\QTY;=; D:TFR QTY IS BLANK;ERRORM;I\QTY I:I\DEST;=; D:DESTINATION CODE IS BLANK;ERRORM;I\DEST I:I\TMP_ISS;=;Y DO(AA1) I:I\ISSUE;=; D:IS |
|
| 1 | 0.0 | Label 1 | T | -1 | 71, 181 | ||
| 1 | 0.0 | Work 2 | I | -1 | 181, 181 | $SELECT S:CONS_AGENT;I\CONSIGN;I\AGENT; $CALCULATE O:DISABLEINPUT;C\PROCESS M: C:UCASE F:STK_DETS;Y;SD_CONSIGN;I\DELDATE=SD_DATE;SD_MARKET='$I\MARKET$' AND SD_AGENT='$I\AGENT$' AND SD_CDATE IS NULL A:VAR;I\DELDATE;I\DELDATE;;YYYY/MM/DD U:TRANSFER_FACILITY;DATA_FILL I:I\TMP_ISS;=;N DO(NK1) O:DISAB |
|
| 1 | 0.0 | Work 1 | I | 0 | 381, 385 | ||
| 1 | 0.0 | Work 8 | I | -1 | 181, 217 | ||
| 1 | 0.0 | Work 4 | I | 0 | 441, 385 | ||
| 1 | 0.0 | CMD 5 | C | -1 | 241, 481 | $SELECT S:TFR_RSN;I\DEST |
|
| 1 | 0.0 | Label 6 | T | -1 | 291, 481 | ||
| 1 | 0.0 | Work 1 | I | 0 | 471, 385 | ||
| 1 | 0.0 | Work 7 | I | 0 | 441, 481 | ||
| 1 | 0.0 | Work 2 | I | 0 | 151, 61 | ||
| 1 | 0.0 | Work 1 | I | 0 | 121, 61 | ||
| 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 |