Program drill-down
SUNDRY_PAYMENTS
SUNDRY PAYMENTS. Type DSP, base table DEBTOR_TRANS.
Field inventory
44
Live detail pulled from the database.
| Page | Seq | Table | Field | Type | Visible | Position | Logic snippet |
|---|---|---|---|---|---|---|---|
| 1 | 0.0 | Label 3 | T | -1 | 311, 49 | ||
| 1 | 0.0 | Label 2 | T | -1 | 291, 25 | ||
| 1 | 0.0 | H | -1 | 0, 0 | |||
| 1 | 0.0 | Label 1 | T | -1 | 1, 25 | ||
| 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 | 41, 61 | $DEFAULT A:USERID;;I\USERID U:MENU_GROUP;LOOKUP |
|
| 1 | 0.0 | IP | I | 0 | 21, 61 | $DEFAULT A:USERIP;;I\IP |
|
| 1 | 0.0 | MARKET | I | 0 | 1, 61 | $DEFAULT 'PUTS PIC ON THE UPDATE BUTTON O:LOADPIC;$GBLROOT$LEGEND\PROJ_FMS\PICS\NEW_TEXT_DOC.ICO;C\PROCESS '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 'INITIALIZES THE DATE AND |
|
| 1 | 0.0 | Label 12 | T | -1 | 231, 157 | ||
| 1 | 0.0 | CMD 13 | C | -1 | 441, 157 | ||
| 1 | 0.0 | DEBTOR | I | -1 | 341, 157 | $SVAR_FOCUS I:I\PARM;<>;DEV DO(LLL) I:I\PARM;<>;HEA DO(CCC) O:DISABLEINPUT;I\LINE,I\PMT,C\PROCESS,C\13 D:ONLY HEAD CASHIER MAY USE THIS SCREEN;ERRORM;I\DEBTOR DOEND(CCC) DOEND(LLL) $SELECT I:I\PARM;<>;DEV DO(LLL) I:I\PARM;<>;HEA DO(CCC) O:DISABLEINPUT;I\LINE,I\PMT,C\PROCESS,C\13 |
|
| 1 | 0.0 | Label 15 | T | -1 | 491, 157 | ||
| 1 | 0.0 | Work 16 | G | -1 | 11, 289 | ||
| 1 | 0.0 | Label 17 | T | -1 | 11, 241 | ||
| 1 | 0.0 | LINE | I | -1 | 11, 265 | $CALCULATE I:I\LINE;=; DO(SKS) O:DISABLEINPUT;I\LINE,I\PMT,W\DEL O:SETFOCUS;C\PROCESS O:BACKCOLOR;C\PROCESS;YELLOW DOEND(SKS) I:I\LINE;<>; DO(002) I:I\LINE;<>;+ DO(003) U:ZZGRID_SPLIT;GRID_TO_SCREEN;G\GRID;I\LINE O:ENABLEINPUT;I\LINE,I\PMT,W\DEL DOEND(003) I:I\LINE;=;+ D |
|
| 1 | 0.0 | Label 19 | T | -1 | 51, 241 | ||
| 1 | 0.0 | DOCNO | I | -1 | 51, 265 | ||
| 1 | 0.0 | Label 21 | T | -1 | 171, 241 | ||
| 1 | 0.0 | TRDATE | I | -1 | 171, 265 | ||
| 1 | 0.0 | Label 23 | T | -1 | 281, 241 | ||
| 1 | 0.0 | DEL | I | -1 | 761, 265 | $ESC O:SETFOCUS;I\PMT $CALCULATE C:UCASE I:W\DEL;=; A:CONST;Y;W\DEL V:C;Y I:W\DEL;= A:CONST;Y;W\DEL I:W\DEL;=;C DO(CAC) A:CONST;;I\LINE,I\DOCNO,I\TRDATE,I\QTY,I\VAL,I\VAT,I\TOTAL,I\DUE,I\PMT,W\DEL O:SETFOCUS;I\LINE DOEND(CAC) I:W\DEL;=;Y DO(SLA) U:ZZGRID_SPLIT;SCREEN_TO_GRID;G\GRID;I\LINE |
|
| 1 | 0.0 | QTY | I | -1 | 281, 265 | ||
| 1 | 0.0 | Label 25 | T | -1 | 331, 241 | ||
| 1 | 0.0 | VAL | I | -1 | 331, 265 | ||
| 1 | 0.0 | VAT | I | -1 | 431, 265 | ||
| 1 | 0.0 | Label 28 | T | -1 | 431, 241 | ||
| 1 | 0.0 | TOTAL | I | -1 | 491, 265 | ||
| 1 | 0.0 | Label 30 | T | -1 | 491, 241 | ||
| 1 | 0.0 | PAYMENT | I | -1 | 671, 265 | $CALCULATE I:I\PMT;=; A:VAR;I\DUE;I\PMT I:I\PMT;=;0 A:VAR;I\DUE;I\PMT I:I\PMT;>;I\DUE DO(ALW) A:VAR;I\DUE;I\PMT D:CANNOT PAY MORE THAN IS DUE ON THIS DOCKET;ERRORM;I\PMT DOEND(ALW) |
|
| 1 | 0.0 | Label 32 | T | -1 | 671, 241 | ||
| 1 | 0.0 | Label 34 | T | -1 | 751, 241 | ||
| 1 | 0.0 | CMD 36 | C | -1 | 651, 541 | $SELECT I:I\DEBTOR;=; D:PLEASE ENTER A DEBTOR NUMBER!;ERRORM;I\DEBTOR I:I\PARM;<>;DEV DO(LLL) I:I\PARM;<>;HEA DO(CCC) A:CONST;I\DEBTOR,I\LINE,I\PMT,C\PROCESS,C\13 O:DISABLEINPUT;I\LINE,I\PMT,C\PROCESS,C\13 U:SUNDRY_INVOICES;CLEAR_GRID D:ONLY HEAD CASHIER MAY USE THIS SCREEN;ERRORM;I\DEBT |
|
| 1 | 0.0 | PARM | I | 0 | 671, 517 | ||
| 1 | 0.0 | DUE | I | -1 | 581, 265 | ||
| 1 | 0.0 | Label 2 | T | -1 | 581, 241 | ||
| 1 | 0.0 | TMP1 | I | 0 | 421, 541 | ||
| 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 |