Program drill-down
UNBLOCK_MOBI_SALES
UNBLOCK MOBI SALES. Type DSP, base table ZU_USER.
Field inventory
32
Live detail pulled from the database.
| Page | Seq | Table | Field | Type | Visible | Position | Logic snippet |
|---|---|---|---|---|---|---|---|
| 1 | 0.0 | Label 4 | T | -1 | 191, 145 | ||
| 1 | 0.0 | Work 5 | I | -1 | 291, 145 | $VALIDATE M: F:AGENT_MAST;;;T\AM_NAME=AM_NAME;AM_MARKET='$I\MARKET$' AND AM_CODE='$I\AGENT$';I\AGENT I:T\AM_NAME;=; D:AGENT $I\AGENT$ DOES NOT EXIST;ERRORM;I\AGENT |
|
| 1 | 0.0 | Label 6 | T | -1 | 341, 145 | ||
| 1 | 0.0 | IP | I | 0 | 61, 91 | $DEFAULT A:USERIP;;I\IP |
|
| 1 | 0.0 | I | -1 | 291, 181 | $VALIDATE M: A:CONST;;T\PROG F:DEBTOR_MAST;;;T\NAME=DM_NAME;DM_MARKET='$I\MARKET$' AND DM_DEBTOR='$I\DEBTOR$';I\DEBTOR I:T\NAME;=; D:BUYER NUMBR $I\DEBTOR$ DOES NOT EXIST;ERRORM;I\DEBTOR |
||
| 1 | 0.0 | Work 1 | I | 0 | 41, 133 | ||
| 1 | 0.0 | H | -1 | 0, 60 | |||
| 1 | 0.0 | USERID | I | 0 | 81, 91 | $DEFAULT A:USERID;;I\USERID |
|
| 1 | 0.0 | Work 11 | I | 0 | 1, 91 | $DEFAULT A:DATE;DD MMM YYYY;T\DATE A:TIME;HH:MM:SS;T\TIME A:TIMER_ON;1000 A:DATE;DD MMM YYYY;I\SDATE A:DATE;DD MMM YYYY;I\EDATE A:CONST;Y;I\UNBLOCK 'PUTS PIC ON THE UPDATE BUTTON O:LOADPIC;$GBLROOT$LEGEND\PROJ_FMS\PICS\NEW_TEXT_DOC.ICO;C\UPDATE A:CONST;;T\PROG |
|
| 1 | 0.0 | Work 1 | I | -1 | 291, 217 | $VALIDATE F:STK_TRANS;Y;;W\EXIST=ST_DEBTOR;ST_MARKET='$I\MARKET$' AND ST_AGENT='$I\AGENT$' AND ST_DEBTOR='$I\DEBTOR$' AND ST_TRTYPE = 'SA' AND ST_TAXINV='$I\TAXINV$' AND ST_MOBI_SALES = 'Y' AND ST_MOBI_DKT_PRT_BLOCKED = 'Y';I\TAXINV |
|
| 1 | 0.0 | Label 2 | T | -1 | 191, 217 | ||
| 1 | 0.0 | Label 3 | T | -1 | 401, 181 | ||
| 1 | 0.0 | I | -1 | 291, 253 | $VALIDATE I:I\UNBLOCK;<>; C:UCASE V:Y;N I:I\UNBLOCK;=;Y DO(9) A:CONST;IN PROGRESS ...;T\PROG U:PRINT_MOBI_SALES;UNBLOCK A:CONST;COMPLETE !!!;T\PROG DOEND(9) A:CONST;;I\DEBTOR,I\TAXINV,I\UNBLOCK O:SETFOCUS;I\DEBTOR |
||
| 1 | 0.0 | Work 1 | I | 0 | 1, 133 | ||
| 1 | 0.0 | Label 1 | T | -1 | 1, 25 | ||
| 1 | 0.0 | Label 2 | T | -1 | 291, 25 | ||
| 1 | 0.0 | Label 3 | T | -1 | 291, 49 | ||
| 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 | Label 12 | T | -1 | 191, 181 | ||
| 1 | 0.0 | Label 13 | T | -1 | 191, 253 | ||
| 1 | 0.0 | Label 5 | T | -1 | 221, 301 | ||
| 1 | 0.0 | MARKET | I | 0 | 21, 91 | $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 |
|
| 1 | 0.0 | AGENT | Work 9 | I | 0 | 41, 91 | $DEFAULT A:ORGS;;I\ORGS |
| 1 | 0.0 | Work 4 | I | 0 | 111, 91 | ||
| 10 | 0.0 | ZX_PRINT | Z | 0 | 0, 60 | ||
| 10 | 0.0 | ZX_SELECT | Z | 0 | 0, 60 | ||
| 10 | 0.0 | ZX_DELETE | Z | 0 | 0, 60 | ||
| 10 | 0.0 | ZX_UPDATE | Z | 0 | 0, 60 | ||
| 10 | 0.0 | ZX_EXIT | Z | 0 | 0, 60 |