Program drill-down
WHOLESALE_STATS_SCRN
WHOLESALE STATS REPORTS. Type DSP, base table STK_DETS.
Field inventory
39
Live detail pulled from the database.
| Page | Seq | Table | Field | Type | Visible | Position | Logic snippet |
|---|---|---|---|---|---|---|---|
| 1 | 0.0 | H | -1 | 0, 30 | |||
| 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 | 241, 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 | IP | I | 0 | 61, 61 | $DEFAULT A:USERIP;;I\IP |
|
| 1 | 0.0 | AGENT | Work 9 | I | 0 | 41, 61 | $DEFAULT A:ORGS;;I\AGENT |
| 1 | 0.0 | MARKET | I | 0 | 21, 61 | $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 | Work 11 | I | 0 | 1, 61 | $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 |
|
| 1 | 0.0 | Label 12 | T | -1 | 201, 337 | ||
| 1 | 0.0 | Label 13 | T | -1 | 201, 361 | ||
| 1 | 0.0 | Label 14 | T | -1 | 201, 313 | ||
| 1 | 0.0 | CMD 15 | C | -1 | 471, 313 | $SELECT S:ITEM_NEW;I\ITEM |
|
| 1 | 0.0 | USERID | I | 0 | 81, 61 | $DEFAULT A:USERID;;I\USERID |
|
| 1 | 0.0 | Work 17 | I | -1 | 371, 337 | $CALCULATE A:CONST;;T\PROG I:I\SDATE;=; A:CONST;$T\DATE$;I\SDATE A:CONST;$I\SDATE$;I\EDATE |
|
| 1 | 0.0 | Work 18 | I | -1 | 371, 361 | $CALCULATE I:I\EDATE;=; A:CONST;$T\DATE$;I\EDATE O:SETFOCUS;C\RUN O:BACKCOLOR;C\RUN;YELLOW |
|
| 1 | 0.0 | Work 19 | I | -1 | 371, 313 | $SELECT S:ITEM_NEW;I\ITEM $CALCULATE C:UCASE I:I\ITEM;<>; DO(OPA) A:LEN;I\ITEM;W\LEN A:LEFT;I\ITEM,2;W\PROD I:W\LEN;>;2 F:STK_DETS;Y;;;SD_ITEM = '$I\ITEM$';;; ITEM DOES NOT EXIST I:W\LEN;<=;2 F:PRODUCT_MAST;Y;;;PR_PRODUCT='$W\PROD$';;; PRODUCT DOES NOT EXIST DOEND(OPA) |
|
| 1 | 0.0 | CMD 20 | C | -1 | 321, 421 | $SELECT I:I\SELECTION;=; D:PLEASE SELECT A REPORT;ERRORM;I\SELECTION 'I:I\SELECTION;<>;1,2,3,4,5 'D:PLEASE SELECT BETWEEN 1-5;ERRORM;I\SELECTION I:I\SDATE;=; D:PLEASE ENTER A STARTING DATE;ERRORM;I\SDATE I:I\EDATE;=; D:PLEASE ENTER AN ENDING DATE;ERRORM;I\EDATE A:CONST;COLLECTING DATA...;T\PROG |
|
| 1 | 0.0 | Label 1 | T | 0 | 201, 385 | ||
| 1 | 0.0 | Check 2 | K | 0 | 371, 385 | '$CALCULATE 'O:SETFOCUS;C\RUN 'O:BACKCOLOR;C\RUN;YELLOW |
|
| 1 | 0.0 | Work 1 | I | 0 | 1, 397 | ||
| 1 | 0.0 | Work 2 | I | 0 | 11, 433 | ||
| 1 | 0.0 | Label 1 | T | -1 | 321, 457 | ||
| 1 | 0.0 | Label 1 | T | -1 | 161, 97 | ||
| 1 | 0.0 | Label 2 | T | -1 | 271, 133 | ||
| 1 | 0.0 | Label 3 | T | -1 | 271, 157 | ||
| 1 | 0.0 | Label 4 | T | -1 | 201, 289 | ||
| 1 | 0.0 | Work 5 | I | -1 | 371, 289 | $VALIDATE M: V:1;2;3;4;5 I:I\SELECTION;=;5 DO(01) A:CONST;;I\ITEM O:DISABLEINPUT;I\ITEM,C\ITEM DOEND(01) I:I\SELECTION;<>;5 DO(02) O:ENABLEINPUT;I\ITEM,C\ITEM DOEND(02) |
|
| 1 | 0.0 | Label 6 | T | -1 | 271, 181 | ||
| 1 | 0.0 | Label 7 | T | -1 | 271, 205 | ||
| 1 | 0.0 | Label 8 | T | -1 | 271, 229 | ||
| 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 |