Program drill-down
CASHIER_TRANS_MAN2
CASHIER TRANSACTIONS 2. Type DSP, base table DEBTOR_TRANS.
Field inventory
95
Live detail pulled from the database.
| Page | Seq | Table | Field | Type | Visible | Position | Logic snippet |
|---|---|---|---|---|---|---|---|
| 1 | 0.0 | TMP ID | I | 0 | 551, 325 | ||
| 1 | 0.0 | H | -1 | 0, 30 | |||
| 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 | 231, 49 | ||
| 1 | 0.0 | Label 8 | T | -1 | 41, 97 | ||
| 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;T\MARKET=CM_NAME,I\PAY_AGAINST=CM_PAY_AGAINST,I\REF_AUTH=CM_REF_AUTH_REQ,I\CARDZ=CM_CARD |
|
| 1 | 0.0 | Label 10 | T | -1 | 41, 133 | ||
| 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 | $SELECT S:CASHIER;I\DT_CASHIER $CALCULATE M: C:UCASE F:CASH_MAST;Y;;;CSH_CASHIER='$I\DT_CASHIER$';I\DT_CASHIER 'LOAD THE TRANSACTION TYPES THE CASHIER IS ALLOWED TO PROCESS 'THIS CODE IS COMMENTED UNDER THE "D\DT_TRTYPE" FIELD F:CASH_MAST;;;I\TYPES=CSH_TRNTYPE,I\METHODS=CSH_PAYMETH;CSH_CASHIER='$I\DT_CASH |
|
| 1 | 0.0 | Label 13 | T | -1 | 41, 181 | ||
| 1 | 0.0 | DT_DEBTOR | I | -1 | 151, 181 | $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 'I:I\DT_CASHPNT;=; 'D:THERE IS NO CASH POINT SET UP FOR THIS CASHIER;ERRORM;I\DT_DEBTOR I:I\TYPES;=; DO(T) A:CONST;;T\NAME,I\DM_VATNO,T\REMARK,I\DM_ACCTYPE, |
|
| 1 | 0.0 | Label 15 | T | -1 | 41, 217 | ||
| 1 | 0.0 | CMD 16 | C | -1 | 261, 181 | $SELECT 'DISPLAY A SELECTION WINDOW S:DEBTOR_CODE;I\DT_DEBTOR |
|
| 1 | 0.0 | DM_VATNO | I | -1 | 151, 217 | ||
| 1 | 0.0 | Label 18 | T | -1 | 301, 181 | ||
| 1 | 0.0 | Label 19 | T | -1 | 291, 217 | ||
| 1 | 0.0 | DM_OSBAL | I | -1 | 451, 217 | ||
| 1 | 0.0 | Label 21 | T | -1 | 171, 289 | ||
| 1 | 0.0 | Label 22 | T | -1 | 171, 325 | ||
| 1 | 0.0 | Label 23 | T | -1 | 171, 361 | ||
| 1 | 0.0 | Label 24 | T | -1 | 171, 433 | ||
| 1 | 0.0 | Label 25 | T | -1 | 171, 469 | ||
| 1 | 0.0 | DT_TRTYPE | I | 0 | 561, 289 | $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_PAYMTHD | I | -1 | 341, 325 | $SELECT 'DISPLAY A SELECTION WINDOW I:W\PAYMETH;=; S:PAYMENT_METHOD;I\DT_PAYMTHD;I\MARKET I:W\PAYMETH;<>; S:PAYMENT_METHOD2;I\DT_PAYMTHD;I\MARKET;D\DT_TRTYPE $VALIDATE 'CLEAR THE LABLE A:CONST;;T\PAYMETH,W\RESULT 'MAKE THIS FIELD MANDATORY M: 'CONVERT TO UPPERCASE C:UCASE 'VALIDATE PAYMENT ME |
|
| 1 | 0.0 | CMD 29 | C | -1 | 401, 325 | $SELECT 'DISPLAY A SELECTION WINDOW ''S:PAYMENT_METHOD;I\DT_PAYMTHD;I\MARKET $SELECT 'DISPLAY A SELECTION WINDOW I:W\PAYMETH;=; S:PAYMENT_METHOD;I\DT_PAYMTHD;I\MARKET I:W\PAYMETH;<>; S:PAYMENT_METHOD2;I\DT_PAYMTHD;I\MARKET;D\DT_TRTYPE |
|
| 1 | 0.0 | DT_TRVAL | I | -1 | 341, 361 | $VALIDATE 'MAKE THIS FIELD MANDATORY M: 'ROUND THE TOTAL TO THE NEAREST FIVE CENT F:CLIENT_MAST;;;W\ROUND=CM_ROUND;CM_CODE='$I\MARKET$' A:ROUND;I\DT_TRVAL,0.05,W\ROUND;W\ROUNDED;;#0.00 I:W\ROUNDED;=;0.00 A:VAR;I\DT_TRVAL;W\ROUNDED $CALCULATE A:VAR;I\DT_TRVAL;I\DT_TRVAL;;0.00 'DO NOT PASS THE DEBTOR |
|
| 1 | 0.0 | DT_REFNO | I | -1 | 341, 433 | $VALIDATE 'CONVERT TO UPPERCASE C:UCASE |
|
| 1 | 0.0 | DT_REMARK | I | -1 | 171, 493 | $VALIDATE 'CONVERT TO UPPERCASE C:UCASE '$CALCULATE 'I:I\DM_DTYPE;=;B 'DO(GOS) ' I:I\DM_ACCTYPE;=;CR ' DO(DAW) ' I:I\PAY_AGAINST;=;I ' DO(YAM) ' A:CONST;Y;I\DONE ' E:$GBLROOT$LEGEND\PROJ_FMS\BIN\MAINMENU.EXE P DEBTOR_PAYMENT_DETS $I\DT_DEBTOR$ $I\DT_TRVAL$ ' DOEND(YAM) ' I |
|
| 1 | 0.0 | Label 33 | T | -1 | 411, 289 | ||
| 1 | 0.0 | Label 34 | T | -1 | 441, 325 | ||
| 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 |
|
| 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 | T | -1 | 171, 517 | |||
| 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 | 571, 325 | ||
| 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 | UPDATE BUTTON | C | -1 | 651, 545 | $SCMD_FOCUS O:BACKCOLOR;C\UPDATE;YELLOW $SELECT '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_DEBTOR '=========================== 'DO A BUYER NUMBER CHECK!!!! '=========================== U:CASHI |
|
| 1 | 0.0 | VALCHEQUE | I | 0 | 291, 97 | ||
| 1 | 0.0 | AMOUNT ALLOWED | I | 0 | 281, 361 | ||
| 1 | 0.0 | DEBTOR_ERR | I | 0 | 491, 181 | ||
| 1 | 0.0 | REF_AUTH | I | 0 | 581, 421 | ||
| 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 | 301, 361 | ||
| 1 | 0.0 | DESCRIPTIONS | I | 0 | 131, 505 | ||
| 1 | 0.0 | DEBTOR_TRANS | DT_TRTYPE | D | -1 | 341, 289 | $SELECT 'DISPLAY A SELECTION WINDOW 'S:TRANSACTION_TYPE_2;D\DT_TRTYPE $CALCULATE 'I:W\CASHIER;=; 'D:THIS USER IS NOT A CASHIER;ERRORM;I\DT_DEBTOR 'I:I\DT_CASHPNT;=; 'D:THERE IS NO CASH POINT SET UP FOR THIS CASHIER;ERRORM;I\DT_DEBTOR I:I\TYPES;=; D:NO TRANSACTION TYPES HAVE BEEN SET UP FOR THIS CASHIER |
| 1 | 0.0 | CFM | I | -1 | 541, 363 | ''$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 | 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 | 451, 181 | ||
| 1 | 0.0 | Work 2 | I | 0 | 411, 181 | ||
| 1 | 0.0 | Work 1 | I | 0 | 751, 85 | ||
| 1 | 0.0 | CTT_SCVAL | I | 0 | 541, 289 | ||
| 1 | 0.0 | CONVERT TO POSITIVE | I | 0 | 321, 361 | ||
| 1 | 0.0 | TEMP TRANS TYPES | I | 0 | 51, 505 | ||
| 1 | 0.0 | CASHIER | I | 0 | 261, 133 | ||
| 1 | 0.0 | Label 1 | T | -1 | 171, 397 | ||
| 1 | 0.0 | Work 2 | I | -1 | 341, 397 | $CALCULATE C:UCASE V:CURR;30;60;90;120; I:I\PERIOD;=; A:CONST;CURR;I\PERIOD |
|
| 1 | 0.0 | PRN | I | 0 | 321, 565 | ||
| 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 | 521, 289 | ||
| 1 | 0.0 | UNREG | I | 0 | 411, 157 | ||
| 1 | 0.0 | ID | T | -1 | 41, 253 | ||
| 1 | 0.0 | ID | I | -1 | 151, 253 | ||
| 1 | 0.0 | CHARGE_CARD | I | 0 | 551, 181 | ||
| 1 | 0.0 | TEMP4 | I | 0 | 641, 145 | ||
| 1 | 0.0 | Label 1 | T | -1 | 452, 363 | ||
| 1 | 0.0 | Work 1 | I | 0 | 381, 97 | ||
| 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... |