Program drill-down
ONCE_OFF_EFT
ONCE OFF PAYMENTS. Type MAN, base table OTHER_BANK.
Field inventory
43
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 | Label 1 | T | -1 | 1, 25 | ||
| 1 | 0.0 | Label 2 | T | -1 | 350, 25 | ||
| 1 | 0.0 | Label 3 | T | -1 | 621, 25 | ||
| 1 | 0.0 | Label 4 | T | -1 | 671, 25 | ||
| 1 | 0.0 | Label 5 | T | -1 | 621, 49 | ||
| 1 | 0.0 | Label 6 | T | -1 | 671, 49 | ||
| 1 | 0.0 | Label 7 | T | -1 | 350, 49 | ||
| 1 | 0.0 | Label 8 | T | -1 | 421, 121 | ||
| 1 | 0.0 | Label 9 | T | -1 | 271, 457 | ||
| 1 | 0.0 | Label 10 | T | -1 | 101, 265 | ||
| 1 | 0.0 | Label 11 | T | -1 | 421, 265 | ||
| 1 | 0.0 | Label 12 | T | -1 | 421, 157 | ||
| 1 | 0.0 | Label 13 | T | -1 | 101, 229 | ||
| 1 | 0.0 | OTHER_BANK | OB_CODE_DESC | I | -1 | 231, 193 | $VALIDATE C:MCASE |
| 1 | 0.0 | Label 17 | T | -1 | 101, 157 | ||
| 1 | 0.0 | OTHER_BANK | OB_CODE | I | -1 | 231, 121 | $SELECT S:PAYMENT_CODE;I\CODE $VALIDATE C:MCASE |
| 1 | 0.0 | Label 22 | T | -1 | 101, 301 | ||
| 1 | 0.0 | Label 23 | T | -1 | 421, 301 | ||
| 1 | 0.0 | Label 24 | T | -1 | 341, 229 | ||
| 1 | 0.0 | Label 26 | T | -1 | 101, 337 | ||
| 1 | 0.0 | Work 28 | I | -1 | 531, 121 | $VALIDATE C:MCASE |
|
| 1 | 0.0 | Work 30 | I | -1 | 231, 265 | $VALIDATE C:MCASE |
|
| 1 | 0.0 | Work 31 | I | 0 | 51, 49 | ||
| 1 | 0.0 | OTHER_BANK | OB_ACC_NO | I | -1 | 531, 157 | $VALIDATE C:MCASE |
| 1 | 0.0 | OTHER_BANK | OB_ACC_NAME | I | -1 | 451, 229 | $VALIDATE C:MCASE |
| 1 | 0.0 | OTHER_BANK | OB_BRANCH_CODE | I | -1 | 231, 229 | $VALIDATE C:MCASE |
| 1 | 0.0 | Work 36 | I | -1 | 231, 157 | $VALIDATE C:MCASE |
|
| 1 | 0.0 | Work 37 | I | -1 | 231, 301 | $VALIDATE I:I\AMOUNT;=; D:ENTER A VALID AMOUNT;ERRORM;I\AMOUNT I:I\AMOUNT;<=;0 D:ENTER A VALID AMOUNT;ERRORM;I\AMOUNT |
|
| 1 | 0.0 | Work 38 | I | -1 | 531, 301 | ||
| 1 | 0.0 | OTHER_BANK | OB_REMARKS | I | -1 | 231, 337 | $CALCULATE 'C:MCASE 'A:DATE;YYYY/MM/DD;I\DATE_MOD 'U:MARKET_FUNCTIONS;CONFIRM_PAYMENT 'I:I\ERROR;<>;Y 'DO(0) 'U:MARKET_FUNCTIONS;CREATE_PAYMENT 'DOEND(0) 'I:I\ERROR;=;Y 'O:SETFOCUS;I\AGENT |
| 1 | 0.0 | Work 40 | I | -1 | 531, 265 | $VALIDATE C:MCASE |
|
| 1 | 0.0 | CMD 41 | C | 0 | 301, 421 | $SELECT I:I\ERROR;<>;Y DO(0) '''A:CONST;PROCESSING . . . .;T\PROG U:MARKET_FUNCTIONS;ONCE_OFF_EFT '''A:CONST;DONE PROCESSING !!!!;T\PROG '''A:CONST;;I\AGENT,I\TO_ACCOUNT,I\TO_BRANCH,I\TO_NAME,I\AMOUNT,I\REMARKS,I\TRDATE,I\FROM_ACCOUNT,I\FROM_BRANCH,I\RECEIVER DOEND(0) A:DATE;DD MMM YYYY;I\TRDATE O: |
|
| 1 | 0.0 | OTHER_BANK | OB_MARKET | I | 0 | 21, 49 | $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 F:MARKET_BANK;;;I\FROM_ACCOUNT=MB_ACC_NO,I\FROM_BRANCH=MB_BANK_CODE;MB_MARKET='$I\MARKET$'; 'INITIALIZES THE DATE AND TIME INTO |
| 1 | 0.0 | OTHER_BANK | OB_DATE_MODIFIED | I | 0 | 21, 85 | |
| 1 | 0.0 | Label 2 | T | -1 | 101, 121 | ||
| 1 | 0.0 | Label 6 | T | -1 | 101, 193 | ||
| 1 | 0.0 | CMD 1 | C | -1 | 281, 121 | $SELECT S:PAYMENT_CODE;I\CODE |
|
| 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 | $BEFORE_WRITE C:MCASE A:DATE;YYYY/MM/DD;I\DATE_MOD U:MARKET_FUNCTIONS;CONFIRM_PAYMENT I:I\ERROR;<>;Y DO(0) U:MARKET_FUNCTIONS;CREATE_PAYMENT DOEND(0) I:I\ERROR;=;Y O:SETFOCUS;I\AGENT |
|
| 10 | 0.0 | ZX_EXIT | Z | 0 | 0, 0 |