Program drill-down
NEW_CS_AUDIT
COLD STORAGE AUDIT. Type DSP, base table LOCATION_MAST.
Field inventory
36
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 | 291, 25 | ||
| 1 | 0.0 | Label 3 | T | -1 | 311, 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 | Work 8 | I | -1 | 421, 145 | $SELECT S:AGENT_CODE;I\AGN I:I\AGN;<>; 'F:AGENT_MAST;Y;;T\ANAME=AM_NAME;AM_CODE='$I\AGN$';I\AGN F:AGENT_MAST;Y;;T\ANAME=AM_NAME;AM_MARKET='$I\MARKET$' AND AM_CODE='$I\AGN$';I\AGN |
|
| 1 | 0.0 | Work 9 | I | -1 | 421, 253 | $SELECT S:LOCATION_MAST;I\ROOM_NO I:I\ROOM_NO;<>; DO(02) F:LOCATION_MAST;Y;;LM_CODE='$I\ROOM_NO$';I\ROOM_NO DOEND(02) |
|
| 1 | 0.0 | Work 10 | I | -1 | 421, 289 | $SELECT S:LOCATION_TYPE;I\ROOM_TYPE $VALIDATE I:I\ROOM_TYPE;<>; DO(01) F:LOCATION_TYPE;Y;;T\TYPE_DESC=LC_DESC,I\ROOM_TYPE=LC_TYPE;LC_TYPE='$I\ROOM_TYPE$';I\ROOM_TYPE DOEND(01) |
|
| 1 | 0.0 | Work 11 | I | -1 | 421, 181 | $CALCULATE I:I\FROM_DATE;=; A:DATE;DD MMM YYYY;I\FROM_DATE |
|
| 1 | 0.0 | Label 12 | T | -1 | 261, 145 | ||
| 1 | 0.0 | Label 13 | T | -1 | 261, 253 | ||
| 1 | 0.0 | Label 14 | T | -1 | 261, 289 | ||
| 1 | 0.0 | Label 15 | T | -1 | 261, 181 | ||
| 1 | 0.0 | Label 16 | T | -1 | 261, 217 | ||
| 1 | 0.0 | Work 17 | I | -1 | 421, 217 | $CALCULATE I:I\TO_DATE;=; A:DATE;DD MMM YYYY;I\TO_DATE |
|
| 1 | 0.0 | Work 18 | I | 0 | 1, 61 | $DEFAULT O:LOADPIC;$GBLROOT$LEGEND\PROJ_FMS\PICS\NEW_TEXT_DOC.ICO;C\RUN 'LOAD MARKET CODE A:ORG;;I\MARKET 'LOAD MARKET NAME F:CLIENT_MAST;;CM_CODE;T\MARKET=CM_NAME,I\DELNO_BY_AGENT=CM_DEL_BY_AGENT 'CONVERT ONLY THE FIRST CHARACTER OF THE MARKET LABEL C:MCASE;;T\MARKET A:DATE;DD MMM YYYY;T\DATE A:TIME; |
|
| 1 | 0.0 | Work 19 | I | 0 | 31, 61 | $DEFAULT A:DATE;DD MMM YYYY;T\DATE A:TIME;HH:MM:SS;T\TIME A:TIMER_ON;1000 |
|
| 1 | 0.0 | CMD 20 | C | -1 | 331, 409 | $SELECT I:I\AGN;<>; F:AGENT_MAST;Y;;T\AGENT1=AM_NAME;AM_CODE='$I\AGN$';I\AGN A:CONST;REPORT IN PROGRESS ............;T\PROG E:$GBLROOT$LEGEND\PROJ_FMS\BIN\PRINTING.EXE /PRINT=PRINT_NEW_CS_AUDIT;$I\MARKET$,$I\AGN$,$I\FROM_DATE$,$I\TO_DATE$,$I\ROOM_NO$,$I\ROOM_TYPE$,$I\OTHER$,$I\AGN_MKT$,S A:CONST;DONE ! ! ! |
|
| 1 | 0.0 | Label 21 | T | -1 | 301, 433 | ||
| 1 | 0.0 | Label 26 | T | -1 | 561, 145 | ||
| 1 | 0.0 | Label 22 | T | -1 | 261, 325 | ||
| 1 | 0.0 | Label 4 | T | -1 | 261, 361 | ||
| 1 | 0.0 | CMD 25 | C | -1 | 521, 145 | $SELECT S:AGENT_CODE;I\AGN |
|
| 1 | 0.0 | CMD 1 | C | -1 | 521, 253 | $SELECT S:LOCATION_MAST;I\ROOM_NO |
|
| 1 | 0.0 | Work 3 | I | -1 | 421, 325 | $VALIDATE C:UCASE V:A;;O |
|
| 1 | 0.0 | CMD 7 | C | -1 | 521, 289 | $SELECT S:LOCATION_TYPE;I\ROOM_TYPE |
|
| 1 | 0.0 | Work 1 | I | -1 | 421, 361 | $VALIDATE C:UCASE V:A;;M O:SETFOCUS;C\RUN O:BACKCOLOR;C\RUN;YELLOW |
|
| 1 | 0.0 | Label 2 | T | -1 | 551, 289 | ||
| 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 |