Program drill-down
BUYER_MSG
BUYER MESSAGE. Type DSP, base table BUYER_MSG.
Field inventory
41
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 5 | T | -1 | 291, 25 | ||
| 1 | 0.0 | Label 6 | T | -1 | 321, 49 | ||
| 1 | 0.0 | Label 7 | T | -1 | 1, 25 | ||
| 1 | 0.0 | Label 8 | T | -1 | 191, 133 | ||
| 1 | 0.0 | BM_DEBTOR | I | -1 | 321, 133 | $SELECT S:DEBTOR;I\DEBTOR $VALIDATE 'PASSING PARAMETTERS A:CONST;;T\BUYER,T\PROCESS I:I\DEBTOR;<>; DO(CHK) F:DEBTOR_MAST;Y;DM_DEBTOR;T\BUYER=DM_NAME,I\ACCTYPE=DM_ACCTYPE;;I\DEBTOR A:CONST;;I\DEBTOR_TYPE A:CONST;;T\ACC_TYPE O:DISABLEINPUT;I\DEBTOR_TYPE,C\TYPE DOEND(CHK) I:I\DEBTOR;= |
|
| 1 | 0.0 | Label 2 | T | -1 | 191, 205 | ||
| 1 | 0.0 | BUYER_MSG | BM_MSG | I | -1 | 321, 205 | $VALIDATE C:UCASE I:I\MESSAGE;=; D:ENTER BUYER MESSAGE;ERRORM;I\MESSAGE I:I\MARKET;<>;11 DO(NOT_11) O:SETFOCUS;I\EXP_DATE DOEND(NOT_11) |
| 1 | 0.0 | Label 1 | T | -1 | 621, 25 | ||
| 1 | 0.0 | Label 2 | T | -1 | 621, 49 | ||
| 1 | 0.0 | Label 3 | T | -1 | 671, 25 | ||
| 1 | 0.0 | Label 4 | T | -1 | 671, 49 | ||
| 1 | 0.0 | Work 5 | I | 0 | 1, 385 | $DEFAULT A:TIME;HH:MM:SS;T\TIME A:DATE;DD MMM YYYY;T\DATE A:TIMER_ON;1000 O:LOADPIC;$GBLROOT$LEGEND\PROJ_FMS\PICS\NEW_TEXT_DOC.ICO;C\CREATE |
|
| 1 | 0.0 | Label 2 | T | -1 | 191, 169 | ||
| 1 | 0.0 | Work 1 | I | -1 | 321, 169 | $SELECT S:BUYER_ACC;I\DEBTOR_TYPE $VALIDATE A:CONST;;T\ACC_TYPE I:I\DEBTOR_TYPE;<>; F:ACCOUNT_TYPE;Y;;T\ACC_TYPE=AT_DESC;AT_CODE='$I\DEBTOR_TYPE$';I\DEBTOR_TYPE |
|
| 1 | 0.0 | Work 3 | I | 0 | 1, 421 | ||
| 1 | 0.0 | CMD 3 | C | -1 | 651, 541 | $SCMD_FOCUS O:BACKCOLOR;C\CREATE;YELLOW $SELECT I:I\DEBTOR;<>; DO(CHK2) I:I\DEBTOR_TYPE;<>; D:YOU CAN NOT ENTER BOTH BUYER AND BUYER TYPE;ERRORM;I\DEBTOR DOEND(CHK2) I:I\EXP_DATE;=; DO(CHK2) D:BUYER MESSAGE MUST HAVE EXPIRY DATE;ERRORM;I\EXP_DATE DOEND(CHK2) A:CONST;PROCESSING...;T\PROCESS U:BU |
|
| 1 | 0.0 | BUYER_MSG | BM_MSG_LINE6 | I | -1 | 321, 325 | $VALIDATE 'UPPERCASE C:UCASE |
| 1 | 0.0 | BUYER_MSG | BM_MSG_LINE5 | I | -1 | 321, 301 | $VALIDATE 'UPPERCASE C:UCASE |
| 1 | 0.0 | BUYER_MSG | BM_MSG_LINE7 | I | -1 | 321, 349 | $VALIDATE 'UPPERCASE C:UCASE |
| 1 | 0.0 | BUYER_MSG | BM_MSG_LINE1 | I | -1 | 321, 205 | $VALIDATE C:UCASE I:I\MSG_LINE1;=; D:ENTER BUYER MESSAEGE;ERRORM;I\MSG_LINE1 |
| 1 | 0.0 | BUYER_MSG | BM_MSG_LINE2 | I | -1 | 321, 229 | $VALIDATE 'UPPERCASE C:UCASE 'I:I\MSG_LINE2;=; 'D:ENTER BUYER MESSAEGE;ERRORM;I\MSG_LINE2 |
| 1 | 0.0 | BUYER_MSG | BM_MSG_LINE3 | I | -1 | 321, 253 | $VALIDATE 'UPPERCASE C:UCASE 'I:I\MSG_LINE3;=; 'D:ENTER BUYER MESSAEGE;ERRORM;I\MSG_LINE3 |
| 1 | 0.0 | CMD 1 | C | -1 | 421, 133 | $SELECT S:DEBTOR;I\DEBTOR |
|
| 1 | 0.0 | CMD 4 | C | -1 | 421, 169 | $SELECT S:BUYER_ACC;I\DEBTOR_TYPE |
|
| 1 | 0.0 | Label 2 | T | -1 | 451, 133 | ||
| 1 | 0.0 | Label 1 | T | -1 | 391, 505 | ||
| 1 | 0.0 | Label 5 | T | -1 | 451, 169 | ||
| 1 | 0.0 | Work 1 | I | 0 | 1, 397 | $DEFAULT 'LOAD MARKET CODE A:ORG;;I\MARKET 'LOAD MARKET NAME F:CLIENT_MAST;;CM_CODE;T\MKT=CM_NAME 'CHANGING TEXT CASE FOR THE FIRST CHARACTER TO UPPER CASE C:MCASE;;T\MKT 'I:I\MARKET;=;11 O:HIDE;I\MESSAGE 'I:I\MARKET;<>;11 'O:HIDE;I\MSG_LINE1,I\MSG_LINE2,I\MSG_LINE3,I\MSG_LINE4,I\MSG_LINE5,I\MSG_ |
|
| 1 | 0.0 | BUYER_MSG | BM_MSG_LINE10 | I | -1 | 321, 421 | $VALIDATE 'UPPERCASE C:UCASE |
| 1 | 0.0 | BUYER_MSG | BM_MSG_LINE4 | I | -1 | 321, 277 | $VALIDATE 'UPPERCASE C:UCASE |
| 1 | 0.0 | Work 2 | I | 0 | 1, 361 | ||
| 1 | 0.0 | BUYER_MSG | BM_MSG_LINE8 | I | -1 | 321, 373 | $VALIDATE 'UPPERCASE C:UCASE |
| 1 | 0.0 | BUYER_MSG | BM_MSG_LINE9 | I | -1 | 321, 397 | |
| 1 | 0.0 | Work 1 | I | -1 | 321, 457 | $VALIDATE M: O:SETFOCUS;C\CREATE O:BACKCOLOR;C\CREATE;YELLOW |
|
| 1 | 0.0 | Label 2 | T | -1 | 181, 457 | ||
| 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 |