Program drill-down
CS_ADJUSTMENTS_NEW
CS ADJUSTMENTS NEW. Type DSP, base table LOC_TRANS.
Field inventory
51
Live detail pulled from the database.
| Page | Seq | Table | Field | Type | Visible | Position | Logic snippet |
|---|---|---|---|---|---|---|---|
| 1 | 0.0 | H | -1 | 0, 0 | |||
| 1 | 0.0 | MARKET | T | -1 | 1, 25 | ||
| 1 | 0.0 | FRESH | T | -1 | 291, 25 | ||
| 1 | 0.0 | SCREEN | T | -1 | 271, 49 | ||
| 1 | 0.0 | Label 4 | T | -1 | 621, 25 | ||
| 1 | 0.0 | Label 5 | T | -1 | 671, 25 | ||
| 1 | 0.0 | Label 6 | T | -1 | 621, 49 | ||
| 1 | 0.0 | Label 7 | T | -1 | 671, 49 | ||
| 1 | 0.0 | USERID | I | 0 | 61, 61 | $DEFAULT A:USERID;;I\USERID |
|
| 1 | 0.0 | IP | I | 0 | 41, 61 | $DEFAULT A:USERIP;;I\IP |
|
| 1 | 0.0 | AGENT | I | 0 | 21, 61 | $DEFAULT A:ORGS;;I\ORGS |
|
| 1 | 0.0 | MARKET | I | 0 | 1, 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 '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\MAR |
|
| 1 | 0.0 | CMD 12 | C | -1 | 651, 541 | $SELECT I:I\QTY;=; DO(SSA) I:I\VAL;=; DO(LAQ) I:I\PALL_QTY;=; D:PLEASE MAKE AN ADJUSTMENT;ERRORM;I\QTY I:I\PALL_QTY;=;0 D:PLEASE MAKE AN ADJUSTMENT;ERRORM;I\QTY DOEND(LAQ) I:I\VAL;=;0 DO(MAM) I:I\PALL_QTY;=; D:PLEASE MAKE AN ADJUSTMENT;ERRORM;I |
|
| 1 | 0.0 | TMP | I | 0 | 671, 493 | ||
| 1 | 0.0 | DOCNO | T | -1 | 181, 85 | ||
| 1 | 0.0 | DOCNO | I | -1 | 321, 85 | $SELECT S:DEPOSIT_NO1;I\DOCNO $CALCULATE M: F:LOC_TRANS;Y;;T\COMMOD=LT_ITEM,T\DEBTOR=LT_DEBTOR,T\DEP=LT_DEPNO,T\AGN=LT_AGENT,T\CONS=LT_CONSIGNO,T\ROOMNO=LT_LOCA,T\OLD_QTY2=LT_PRQTY,T\OLD_PALL_QTY2=LT_PALL_QTY,I\DELDATE=LT_DELDATE;LT_DOCNO = '$I\DOCNO$' AND LT_TYPE = 'IS' U:CS_ADJUSTMENTS;COMPLETE_DETAILS A: |
|
| 1 | 0.0 | CMD 4 | C | -1 | 431, 85 | $SELECT S:DEPOSIT_NO1;I\DOCNO |
|
| 1 | 0.0 | CONSIGND | T | -1 | 211, 301 | ||
| 1 | 0.0 | QTY | I | -1 | 321, 433 | $CALCULATE 'A:CONST;;I\PALL_QTY,I\VAL 'I:I\QTY;=; 'DO(DQL) ' I:T\OLD_PALL_QTY2;=;0 ' O:DISABLEINPUT;I\PALL_QTY ' O:ENABLEINPUT;I\VAL 'DOEND(DQL) 'I:T\OLD_PALL_QTY2;=;0 ' O:DISABLEINPUT;I\PALL_QTY 'I:I\QTY;<>; 'DO(LAL) ' O:DISABLEINPUT;I\VAL ' O:SETFOCUS;C\UPDATE ' O:BACKCOLOR;C\UP |
|
| 1 | 0.0 | PALL_QTY | I | -1 | 321, 469 | ||
| 1 | 0.0 | CONS | T | -1 | 381, 301 | ||
| 1 | 0.0 | ROOM | T | -1 | 211, 157 | ||
| 1 | 0.0 | ROOMNO | T | -1 | 381, 157 | ||
| 1 | 0.0 | QTY | T | -1 | 181, 433 | ||
| 1 | 0.0 | PALL_QTY | T | -1 | 181, 469 | ||
| 1 | 0.0 | VAL | I | -1 | 321, 505 | $CALCULATE O:SETFOCUS;C\UPDATE O:BACKCOLOR;C\UPDATE;YELLOW |
|
| 1 | 0.0 | VAL | T | -1 | 181, 505 | ||
| 1 | 0.0 | OLD_QTY1 | T | -1 | 211, 361 | ||
| 1 | 0.0 | OLD_QTY2 | T | -1 | 381, 361 | ||
| 1 | 0.0 | OLD_PALL_QTY1 | T | -1 | 211, 385 | ||
| 1 | 0.0 | OLD_PALL_QTY2 | T | -1 | 381, 385 | ||
| 1 | 0.0 | SUPPL _NAME | T | -1 | 501, 265 | ||
| 1 | 0.0 | FLOOR | T | -1 | 381, 337 | ||
| 1 | 0.0 | SUPPL1 | T | -1 | 211, 265 | ||
| 1 | 0.0 | SUPPL | T | -1 | 381, 265 | ||
| 1 | 0.0 | AGN1 | T | -1 | 211, 121 | ||
| 1 | 0.0 | AGN | T | -1 | 381, 121 | ||
| 1 | 0.0 | FQTY | T | -1 | 211, 337 | ||
| 1 | 0.0 | COMM | T | -1 | 211, 229 | ||
| 1 | 0.0 | COMMOD | T | -1 | 381, 229 | ||
| 1 | 0.0 | Work 28 | I | 0 | 41, 553 | ||
| 1 | 0.0 | ERROR | I | 0 | 671, 469 | ||
| 1 | 0.0 | DEPNO | T | -1 | 211, 193 | ||
| 1 | 0.0 | T | -1 | 381, 193 | |||
| 1 | 0.0 | Label 5 | T | -1 | 601, 85 | ||
| 1 | 0.0 | Label 6 | T | -1 | 491, 85 | ||
| 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 | ||
| 10 | 0.0 | ZX_EXIT | Z | 0 | 0, 0 |