Program drill-down
CORRECT_PAY_METHOD
PAYMENT METHOD MAINTENANCE. Type DSP, base table DEBTOR_TRANS.
Field inventory
128
Live detail pulled from the database.
| Page | Seq | Table | Field | Type | Visible | Position | Logic snippet |
|---|---|---|---|---|---|---|---|
| 1 | 0.0 | UPDATE BUTTON | C | -1 | 651, 545 | $SCMD_FOCUS O:BACKCOLOR;C\UPDATE;YELLOW $SELECT A:CONST;;I\CHECKED,I\INVALID_PASSWORD 'LOOK FOR THE PRINTER. IF TABLE NOT SET UP ERROR =============== 'DO A BUYER NUMBER CHECK!!!! '=========================== U:CASHIER_TRANS_MAN;BUYER_CHECK I:I\DEBTOR_ERR;=;Y DO(DQQ) A:CONST;;I\DEBTOR_ERR 'ENABLE IT!! |
|
| 1 | 0.0 | CMD 16 | C | -1 | 251, 169 | $SELECT 'DISPLAY A SELECTION WINDOW S:DEBTOR_CODE;I\DT_DEBTOR |
|
| 1 | 0.0 | CMD 3 | C | -1 | 251, 205 | $SELECT S:CURRENT_RECEIPT;I\RECEIPT;I\DT_DEBTOR;I\DT_TRDATE;I\DT_TRTYPES |
|
| 1 | 0.0 | H | -1 | 0, 30 | |||
| 1 | 0.0 | Work 1 | I | 0 | 401, 505 | ||
| 1 | 0.0 | TMP ID | I | 0 | 711, 241 | ||
| 1 | 0.0 | MARKET CODE | I | 0 | 21, 49 | $DEFAULT 'LOAD MARKET CODE A:ORG;;I\MARKET U:DIGITAL_DISPLAY;NEXT CUSTOMER PLEASE... O:DISABLEINPUT;I\PERIOD 'COPY CONTENTS OF I\MARKET TO I\DT_MARKET A:VAR;I\MARKET;I\DT_MARKET 'LOAD MARKET NAME F:CLIENT_MAST;;CM_CODE;I\RFID=CM_USE_RFID,I\PIN_REF=CM_PIN_REFUND,T\MARKET=CM_NAME,I\PAY_AGAINST=CM_PAY_AGAINST |
|
| 1 | 0.0 | DT_CASHPNT | I | -1 | 151, 97 | $DEFAULT 'GET THE USER ID OF THE LOGGED IN USER A:USERID;;W\USERID A:ORG;;I\MARKET 'GETS USER'S IP ADDRESS 'F:ZU_USER;;;W\USER_IP=ZU_LOCAL_IP;ZU_USERID='$W\USERID$' A:USERIP;;I\IP 'GETS CASH POINT F:CASH_POINT;;;I\DT_CASHPNT=CPO_CASHPT;CPO_IP='$I\IP$' AND CPO_MARKET='$I\MARKET$'; 'GETS CASHIER AND CHEC |
|
| 1 | 0.0 | DT_CASHIER | I | -1 | 151, 133 | ||
| 1 | 0.0 | DT_DEBTOR | I | -1 | 151, 169 | $SELECT 'D$SELECT 'DISPLAY A SELECTION WINDOW S:DEBTOR_CODE;I\DT_DEBTOR $SVAR_FOCUS I:W\CASHIER;=; D:THIS USER IS NOT A CASHIER;ERRORM;I\DT_DEBTOR 'LOOK FOR THE PRINTER. IF TABLE NOT SET UP ERROR U:CASHIER_TRANS_MAN;GET_PRINTER I:I\PRN;=;N D:PRINTING TABLE NOT SET UP, CONTACT FRESHMARK;ERRORM;I\DT_DEBTO |
|
| 1 | 0.0 | DM_VATNO | I | -1 | 151, 241 | ||
| 1 | 0.0 | DM_OSBAL | I | -1 | 451, 205 | ||
| 1 | 0.0 | DT_TRTYPE | I | 0 | 751, 181 | $SELECT 'DISPLAY A SELECTION WINDOW S:TRANSACTION_TYPE_2;I\DT_TRTYPE $VALIDATE 'CLEAR THE LABLE A:CONST;;T\TRTYPE,W\PAYMETH 'MAKE THIS FIELD MANDATORY M: 'CONVERT TO UPPERCASE C:UCASE 'ONLY ALLOW DEPOSITS AND REFUNDS IF THE BUYER IS A 'SECURE CASH BUYER' 'I:I\DM_ACCTYPE;=;SC ' DO(ACC) ' '''I: |
|
| 1 | 0.0 | DT_TRVAL | I | -1 | 481, 241 | ||
| 1 | 0.0 | Work 1 | I | 0 | 221, 337 | ||
| 1 | 0.0 | DT_REMARK | I | -1 | 151, 385 | ||
| 1 | 0.0 | DEFAULT | I | 0 | 11, 541 | $DEFAULT A:DATE;DD MMM YYYY;T\DATE A:TIME;HH:MM:SS;T\TIME A:TIMER_ON;1000 A:DATE;YYYY/MM/DD;I\DT_TRDATE |
|
| 1 | 0.0 | Work 1 | I | 0 | 91, 505 | ||
| 1 | 0.0 | Work 2 | I | 0 | 91, 541 | ||
| 1 | 0.0 | TPM | I | 0 | 31, 505 | ||
| 1 | 0.0 | TMP1 | I | 0 | 111, 505 | ||
| 1 | 0.0 | Work 5 | I | 0 | 151, 541 | ||
| 1 | 0.0 | Work 6 | I | 0 | 631, 217 | ||
| 1 | 0.0 | Work 8 | I | 0 | 31, 541 | ||
| 1 | 0.0 | DM_ACCTYPE | I | 0 | 571, 217 | ||
| 1 | 0.0 | TRANS TYPES | I | 0 | 11, 505 | ||
| 1 | 0.0 | Work 12 | I | 0 | 731, 241 | ||
| 1 | 0.0 | USERDID | I | 0 | 111, 541 | ||
| 1 | 0.0 | USER IP | I | 0 | 131, 541 | ||
| 1 | 0.0 | PAYMETHOD | I | 0 | 151, 505 | ||
| 1 | 0.0 | PAY METHODS | I | 0 | 71, 505 | ||
| 1 | 0.0 | DT_MARKET | I | 0 | 1, 49 | ||
| 1 | 0.0 | Work 1 | I | 0 | 51, 541 | ||
| 1 | 0.0 | Work 2 | I | 0 | 71, 541 | ||
| 1 | 0.0 | ABSA_MAIN | I | 0 | 531, 109 | ||
| 1 | 0.0 | Work 2 | I | 0 | 1, 73 | ||
| 1 | 0.0 | I | 0 | 531, 85 | |||
| 1 | 0.0 | Work 2 | I | 0 | 501, 397 | ||
| 1 | 0.0 | Work 1 | I | 0 | 671, 181 | ||
| 1 | 0.0 | RANDOM_NO | I | 0 | 591, 181 | ||
| 1 | 0.0 | VALCHEQUE | I | 0 | 291, 97 | ||
| 1 | 0.0 | AMOUNT ALLOWED | I | 0 | 711, 217 | ||
| 1 | 0.0 | DEBTOR_ERR | I | 0 | 511, 181 | ||
| 1 | 0.0 | REF_AUTH | I | 0 | 581, 421 | ||
| 1 | 0.0 | Work 1 | I | 0 | 351, 97 | ||
| 1 | 0.0 | DLEN | I | 0 | 571, 181 | ||
| 1 | 0.0 | IP ADDRESS | I | 0 | 41, 49 | ||
| 1 | 0.0 | DEBTOR_TRANS | DM_DTYPE | I | 0 | 601, 217 | |
| 1 | 0.0 | PAY_AGAINST | I | 0 | 661, 217 | ||
| 1 | 0.0 | Work 1 | I | 0 | 731, 85 | ||
| 1 | 0.0 | EXIT FLAG | I | 0 | 731, 217 | ||
| 1 | 0.0 | DESCRIPTIONS | I | 0 | 131, 505 | ||
| 1 | 0.0 | Work 1 | I | 0 | 11, 337 | ||
| 1 | 0.0 | PIN_REF | I | 0 | 691, 265 | ||
| 1 | 0.0 | CFM | I | -1 | 651, 493 | ''$ESC ''O:SETFOCUS;I\DT_TRVAL $VALIDATE M: C:UCASE V:N;Y I:I\CFM;=;N DO(LD1) A:CONST;I\DT_TRVAL;0 O:SETFOCUS;I\DT_TRVAL '' O:HIDE;T\CFM,I\CFM DOEND(LD1) |
|
| 1 | 0.0 | Work 1 | I | 0 | 401, 469 | ||
| 1 | 0.0 | Work 1 | I | 0 | 151, 73 | ||
| 1 | 0.0 | CASHIER_SCAN | I | 0 | 521, 133 | ||
| 1 | 0.0 | CFM_AMT | I | 0 | 711, 85 | ||
| 1 | 0.0 | CODEFLD | I | 0 | 641, 121 | ||
| 1 | 0.0 | CARDZ | I | 0 | 611, 421 | ||
| 1 | 0.0 | Work 1 | I | 0 | 471, 181 | ||
| 1 | 0.0 | Work 2 | I | 0 | 431, 181 | ||
| 1 | 0.0 | Work 1 | I | 0 | 751, 85 | ||
| 1 | 0.0 | CTT_SCVAL | I | 0 | 731, 181 | ||
| 1 | 0.0 | CONVERT TO POSITIVE | I | 0 | 751, 217 | ||
| 1 | 0.0 | TEMP TRANS TYPES | I | 0 | 51, 505 | ||
| 1 | 0.0 | CASHIER | I | 0 | 261, 133 | ||
| 1 | 0.0 | PRN | I | 0 | 151, 49 | ||
| 1 | 0.0 | USER ID | I | 0 | 61, 49 | $DEFAULT A:USERID;;I\USERID U:MENU_GROUP;LOOKUP |
|
| 1 | 0.0 | Work 1 | I | 0 | 281, 133 | ||
| 1 | 0.0 | Work 1 | I | 0 | 711, 181 | ||
| 1 | 0.0 | UNREG | I | 0 | 431, 133 | ||
| 1 | 0.0 | ID | I | -1 | 151, 277 | ||
| 1 | 0.0 | CHARGE_CARD | I | 0 | 531, 181 | ||
| 1 | 0.0 | TEMP4 | I | 0 | 661, 121 | ||
| 1 | 0.0 | RANDOM_DEBTOR_NO | I | 0 | 651, 181 | ||
| 1 | 0.0 | PIN_ERR | I | 0 | 651, 265 | ||
| 1 | 0.0 | PIN | I | 0 | 672, 294 | $ESC O:SETFOCUS;D\DT_TRTYPE $CALCULATE M: I:I\PIN;<>;I\DEBTOR_PIN DO(F54) U:CASHIER_PINS;ERROR_INCREASE I:I\PIN_ERR;<;4 D:INCORRECT PIN. TRY AGAIN.;ERRORM;I\PIN I:I\PIN_ERR;>=;4 DO(D3D) U:CASHIER_PINS;BLOCK_BUYER O:DISABLEINPUT;C\UPDATE DOEND(D3D) DOEND(F54) |
|
| 1 | 0.0 | Work 1 | I | 0 | 751, 241 | ||
| 1 | 0.0 | INVALID_BUYER_NO | I | 0 | 631, 181 | ||
| 1 | 0.0 | DEBTOR_PIN | I | 0 | 671, 265 | ||
| 1 | 0.0 | INVALID_BUYER_SCAN | I | 0 | 611, 181 | ||
| 1 | 0.0 | Work 3 | I | 0 | 11, 373 | ||
| 1 | 0.0 | MAIN_DEBTOR | I | 0 | 431, 157 | ||
| 1 | 0.0 | Work 1 | I | 0 | 11, 409 | ||
| 1 | 0.0 | Work 1 | I | 0 | 451, 397 | ||
| 1 | 0.0 | Work 1 | I | 0 | 171, 541 | ||
| 1 | 0.0 | Work 1 | I | -1 | 481, 277 | $SELECT 'DISPLAY A SELECTION WINDOW S:PAYMENT_METHOD;I\PAYMETH;I\MARKET $VALIDATE 'CONVERT TO UPPERCASE C:UCASE I:I\PAYMETH;<>; DO(1) F:CASH_PAYMTHD;Y;;T\PAYDESC=CPM_DESC;CPM_PAYMETH='$I\PAYMETH$';I\PAYMETH DOEND(1) I:I\PAYMETH;=;I\DT_PAYMTHD D:ENTERED AMOUNTS NOT THE SAME;ERROR;I\PAYMETH I:I\PA |
|
| 1 | 0.0 | Work 2 | I | -1 | 151, 205 | $SELECT I:I\MAIN_DEBTOR;=; A:VAR;I\DTT_DEBTOR;I\MAIN_DEBTOR I:I\MAIN_DEBTOR;<>; A:VAR;I\MAIN_DEBTOR;I\DT_DEBTOR S:CURRENT_RECEIPT;I\RECEIPT;I\MAIN_DEBTOR;I\DT_TRDATE;I\DT_TRTYPES $VALIDATE I:I\RECEIPT;<>; F:DEBTOR_MAST;;;I\DT_DONE=DM_MAIN_DEBTOR;DM_MARKET='$I\MARKET$' AND DM_DEBTOR='$I\DT_DEBTOR$' F: |
|
| 1 | 0.0 | Work 1 | I | 0 | 211, 421 | ||
| 1 | 0.0 | Work 1 | I | 0 | 401, 529 | ||
| 1 | 0.0 | Work 1 | I | 0 | 261, 457 | ||
| 1 | 0.0 | Work 1 | I | 0 | 361, 445 | ||
| 1 | 0.0 | Work 1 | I | 0 | 481, 469 | ||
| 1 | 0.0 | Work 5 | I | 0 | 141, 445 | ||
| 1 | 0.0 | Work 4 | I | 0 | 1, 445 | ||
| 1 | 0.0 | Work 5 | I | 0 | 461, 433 | ||
| 1 | 0.0 | Work 2 | I | 0 | 221, 541 | ||
| 1 | 0.0 | Label 2 | T | -1 | 291, 277 | ||
| 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 | 671, 25 | ||
| 1 | 0.0 | Label 4 | T | -1 | 621, 49 | ||
| 1 | 0.0 | Label 5 | T | -1 | 671, 49 | ||
| 1 | 0.0 | Label 6 | T | -1 | 291, 25 | ||
| 1 | 0.0 | Label 7 | T | -1 | 241, 49 | ||
| 1 | 0.0 | Label 8 | T | -1 | 41, 97 | ||
| 1 | 0.0 | Label 10 | T | -1 | 41, 133 | ||
| 1 | 0.0 | Label 13 | T | -1 | 41, 169 | ||
| 1 | 0.0 | Label 15 | T | -1 | 41, 241 | ||
| 1 | 0.0 | Label 18 | T | -1 | 291, 169 | ||
| 1 | 0.0 | Label 19 | T | -1 | 291, 205 | ||
| 1 | 0.0 | Label 23 | T | -1 | 291, 241 | ||
| 1 | 0.0 | Label 25 | T | -1 | 41, 385 | ||
| 1 | 0.0 | T | 0 | 171, 505 | |||
| 1 | 0.0 | ID | T | -1 | 41, 277 | ||
| 1 | 0.0 | Label 1 | T | -1 | 571, 493 | ||
| 1 | 0.0 | Label 1 | T | 0 | 631, 294 | ||
| 1 | 0.0 | Label 1 | T | -1 | 41, 205 | ||
| 1 | 0.0 | Label 2 | T | -1 | 611, 277 | ||
| 1 | 0.0 | Work 1 | I | 0 | 111, 337 | ||
| 1 | 0.0 | CMD 1 | C | -1 | 581, 277 | $SELECT 'DISPLAY A SELECTION WINDOW S:PAYMENT_METHOD;I\PAYMETH;I\MARKET |
|
| 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 | $EXIT U:DIGITAL_DISPLAY;CASHIER CLOSED... |