Program drill-down
REPRINT_PR_ENTRY
REPRINT PALL RETURNS. Type PRT, base table PALL_TRANS.
Field inventory
24
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 | T | -1 | 231, 205 | |||
| 1 | 0.0 | I | -1 | 371, 205 | $SELECT S:RECNO;I\DOCNO $VALIDATE M: C:UCASE F:PALL_TRANS;Y;;;PT_DOCNO='$I\DOCNO$';I\DOCNO @F:PALL_TRANS;;;I\TRTYPE=PT_TRTYPE;PT_DOCNO = '$I\DOCNO$' AND PT_DELIND <> 'Y' AND PT_TRTYPE IN('AR','CA') U:REPRINT_PALL_RETURNS;TYPE I:I\TRTYPE;<>;AR DO(AR) I:I\TRTYPE;<>;CA D:RECEIPT NO IS NOT A RETURN OR |
||
| 1 | 0.0 | CMD 3 | C | -1 | 471, 205 | $SELECT S:RECNO;I\DOCNO |
|
| 1 | 0.0 | Label 4 | T | -1 | 1, 25 | ||
| 1 | 0.0 | Label 5 | T | -1 | 291, 25 | ||
| 1 | 0.0 | Label 6 | T | -1 | 291, 49 | ||
| 1 | 0.0 | Label 7 | T | -1 | 621, 25 | ||
| 1 | 0.0 | Label 8 | T | -1 | 671, 25 | ||
| 1 | 0.0 | Label 9 | T | -1 | 621, 49 | ||
| 1 | 0.0 | Label 10 | T | -1 | 671, 49 | ||
| 1 | 0.0 | Work 11 | I | 0 | 111, 85 | $DEFAULT A:USERIP;;I\IP |
|
| 1 | 0.0 | Work 12 | I | 0 | 91, 85 | $DEFAULT A:USERID;;I\USERID |
|
| 1 | 0.0 | Work 13 | I | 0 | 71, 85 | $DEFAULT A:ORGS;;I\ORGS |
|
| 1 | 0.0 | Work 14 | I | 0 | 51, 85 | $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 | Work 15 | I | 0 | 31, 85 | $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 O:CAPTION_UPD;REPRINT |
|
| 1 | 0.0 | I | 0 | 371, 253 | |||
| 1 | 0.0 | Work 17 | I | 0 | 691, 529 | $PRINT I:I\TRTYPE;=;AR U:REPRINT_PALL_RETURNS;AGENT_RETURN I:I\TRTYPE;=;CA U:REPRINT_PALL_RETURNS;CANCELLED_RETURN A:CONST;;I\DOCNO O:SETFOCUS;I\DOCNO |
|
| 1 | 0.0 | Work 19 | I | 0 | 131, 85 | $DEFAULT F:AGENT_MAST;;;I\AGN_PALL_POOL=AM_PALLET_POOL;AM_CODE='$I\ORGS$' ''I:I\AGN_PALL_POOL;<>;1 ''DO(QWE) '' O:DISABLEINPUT;I\DOCNO,C\DOC '' D:AGENT NOT SET UP TO USE PALLET POOL;ERRORM;I\DOCNO ''DOEND(QWE) |
|
| 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 |