Program drill-down
REV_SUP_PALL_RETURNS
REVERSAL OF SUPPLIER PALLET RETURNS. Type DSP, base table PALL_TRANS.
Field inventory
43
Live detail pulled from the database.
| Page | Seq | Table | Field | Type | Visible | Position | Logic snippet |
|---|---|---|---|---|---|---|---|
| 1 | 0.0 | PALL_TRANS | PT_PALL | I | -1 | 41, 325 | |
| 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 | 241, 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 | Label 8 | T | -1 | 121, 121 | ||
| 1 | 0.0 | Label 9 | T | -1 | 121, 169 | ||
| 1 | 0.0 | Label 10 | T | -1 | 121, 217 | ||
| 1 | 0.0 | PALL_TRANS | PT_DOCNO | I | -1 | 261, 121 | $SELECT 'DISPLAY A SELECTION WINDOW S:PALL_DOC_NO;I\PT_DOCNO $VALIDATE 'INITIALIZE GRID U:ZZGRID_SPLIT;INIT_GRID;G\GRID;I\PT_PALL,I\PM_DESC,I\PT_SECT,I\SE_DESC,I\PT_TRQTY,I\PT_TRVAL 'CLEAR FIELDS A:CONST;;I\PT_OWNER,I\PT_SUPPL,T\AGENT,T\SUPPL 'MAKE THIS FIELD MANDATORY M: 'CONVERT TO UPPERCASE |
| 1 | 0.0 | PALL_TRANS | PT_OWNER | I | -1 | 261, 169 | $AFTER_READ 'LOAD THE AGENT NAME F:AGENT_MAST;;;T\AGENT=AM_NAME;AM_CODE='$I\PT_OWNER$' |
| 1 | 0.0 | PALL_TRANS | PT_SUPPL | I | -1 | 261, 217 | $AFTER_READ 'LOAD THE SUPPLIER NAME F:SUPPLIER_MAST;;;T\SUPPL=SUM_NAME;SUM_SUPPL='$I\PT_SUPPL$' |
| 1 | 0.0 | CMD 14 | C | -1 | 371, 121 | $SELECT 'DISPLAY A SELECTION WINDOW S:PALL_DOC_NO;I\PT_DOCNO |
|
| 1 | 0.0 | Label 15 | T | -1 | 371, 169 | ||
| 1 | 0.0 | Label 16 | T | -1 | 371, 217 | ||
| 1 | 0.0 | Label 18 | T | -1 | 41, 277 | ||
| 1 | 0.0 | Label 19 | T | -1 | 41, 301 | ||
| 1 | 0.0 | Label 20 | T | -1 | 101, 301 | ||
| 1 | 0.0 | Label 21 | T | -1 | 281, 277 | ||
| 1 | 0.0 | Label 22 | T | -1 | 281, 301 | ||
| 1 | 0.0 | PALL_TRANS | PT_SECT | I | -1 | 281, 325 | |
| 1 | 0.0 | Label 23 | T | -1 | 341, 301 | ||
| 1 | 0.0 | Label 24 | T | -1 | 521, 301 | ||
| 1 | 0.0 | Label 25 | T | -1 | 521, 277 | ||
| 1 | 0.0 | Label 26 | T | -1 | 581, 301 | ||
| 1 | 0.0 | PALL_MAST | PM_DESC | I | -1 | 101, 325 | |
| 1 | 0.0 | SECT_MAST | SE_DESC | I | -1 | 341, 325 | |
| 1 | 0.0 | PALL_TRANS | PT_TRQTY | I | -1 | 521, 325 | |
| 1 | 0.0 | PALL_TRANS | PT_TRVAL | I | -1 | 581, 325 | |
| 1 | 0.0 | Work 33 | G | -1 | 41, 325 | ||
| 1 | 0.0 | H | -1 | 0, 30 | |||
| 1 | 0.0 | Work 34 | I | 0 | 11, 73 | $DEFAULT 'PUTS PIC ON THE UPDATE BUTTON O:LOADPIC;$GBLROOT$LEGEND\PROJ_FMS\PICS\NEW_TEXT_DOC.ICO;C\CONFIRM 'CHE\ANGE UPDATE BUTTON TO "CONFIRM" O:CAPTION_UPD;CONFIRM 'GET USERNAME A:USERNAME;;I\USER 'GET USER IP A:USERIP;;I\IP A:DATE;DD MMM YYYY;T\DATE A:TIME;HH:MM:SS;T\TIME A:TIMER_ON;1000 |
|
| 1 | 0.0 | CMD 1 | C | -1 | 651, 541 | $SCMD_FOCUS O:BACKCOLOR;C\CONFIRM;YELLOW $SELECT 'CHECK FOR EMPTY FIELDS I:I\PT_DOCNO;=; D:ERROR - ENTER THE RECEIPT NUMBER;ERRORM;I\PT_DOCNO '''I:I\PT_OWNER;=; '''D:ERROR - AGENT CODE REQUIRED;ERRORM;I\PT_DOCNO '''I:I\PT_SUPPL;=; '''D:ERROR - SUPPLIER REQUIRED;ERRORM;I\PT_DOCNO 'UPDATE THE |
|
| 1 | 0.0 | Work 2 | I | 0 | 271, 481 | ||
| 1 | 0.0 | Work 3 | I | 0 | 291, 481 | ||
| 1 | 0.0 | Work 1 | I | -1 | 41, 73 | ||
| 10 | 0.0 | ZX_PRINT | Z | 0 | 0, 30 | ||
| 10 | 0.0 | ZX_SELECT | Z | 0 | 0, 30 | ||
| 10 | 0.0 | ZX_DELETE | Z | 0 | 0, 30 | ||
| 10 | 0.0 | ZX_UPDATE | Z | 0 | 0, 30 | ||
| 10 | 0.0 | ZX_EXIT | Z | 0 | 0, 30 |