Program drill-down
ZZ_USER_REP
USER REPORT GENERATOR. Type MAN, base table FT_FILE_TEMP.
Field inventory
50
Live detail pulled from the database.
| Page | Seq | Table | Field | Type | Visible | Position | Logic snippet |
|---|---|---|---|---|---|---|---|
| 1 | 0.0 | FT_FILE_TEMP | FT_DESC | T | -1 | 51, 85 | |
| 1 | 0.0 | FT_FILE_TEMP | FT_TABLE | I | -1 | 151, 109 | $DEFAULT ' INITIALIZE THE MAIN GRID U:ZZGRID_SPLIT;INIT_GRID;G\GRID;I\SEQ,D\FIELD,I\FIELD:H,I\SDESC,I\SEL,I\SORT,I\GROUP,I\ALIGN,I\LEN,W\DEL ' SETUP THE DATE AND TIME A:DATE;DD MMM YYYY;T\DATE A:TIME;HH:MM:SS;T\TIME ' INITIALIZE THE TIMER AT 1000MS (1 SEC) A:TIMER_ON;1000;I\TMP2 $SELECT S:FT_FILE_TEMP |
| 1 | 0.0 | REPORT | I | -1 | 151, 85 | $DEFAULT O:DISABLEINPUT;C\PRINT $SELECT 'S:D:,I\PATH O:DIALOGBOX;;I\REPORT;;O $CALCULATE U:USER_REPORT;LOAD;G\GRID ' UPDATE TOTALS U:ZZGRID_SPLIT;GRID_SUM;G\GRID;I\LEN,I\LEN_TOT $BEFORE_WRITE I:I\REPORT;=; D:MUST HAVE A REPORT NAME TO SAVE;ERRORM;I\REPORT $AFTER_WRITE U:USER_REPORT;SAVE;G\GRID |
|
| 1 | 0.0 | HEAD | T | -1 | 221, 25 | ||
| 1 | 0.0 | ALIGN | I | -1 | 651, 253 | $CALCULATE V:L;R;C |
|
| 1 | 0.0 | H | -1 | 0, 0 | |||
| 1 | 0.0 | FT_FILE_TEMP | FT_TABLE | T | -1 | 51, 109 | |
| 1 | 0.0 | CMD 4 | C | -1 | 391, 109 | $SELECT S:FT_FILE_TEMP;I\FT_TABLE |
|
| 1 | 0.0 | GRID | G | -1 | 11, 277 | ||
| 1 | 0.0 | CMD 5 | C | -1 | 731, 85 | $SELECT 'S:D:,I\PATH;I\REPORT O:DIALOGBOX;;I\REPORT;;O |
|
| 1 | 0.0 | Label 4 | T | -1 | 331, 229 | ||
| 1 | 0.0 | FIELD | D | -1 | 51, 253 | $AFTER_READ B:READTABLE;D\FIELD;FN_FIELD_NAME;FN_NAME;SELECT * FROM FN_FIELD_NAME WHERE FN_CODE IN($I\FT_ALL_TABLES$) $CALCULATE F:FN_FIELD_NAME;Y;FN_NAME;I\FIELD=FN_FLD_CODE;FN_CODE IN($I\FT_ALL_TABLES$) $ESC A:CON;+;I\SEQ |
|
| 1 | 0.0 | ALIGN | T | -1 | 651, 229 | ||
| 1 | 0.0 | SDESC | I | -1 | 331, 253 | $CALCULATE |
|
| 1 | 0.0 | SORT | I | -1 | 551, 253 | $CALCULATE I:I\SORT;<>; R:1;99 |
|
| 1 | 0.0 | SEL | I | -1 | 501, 253 | $CALCULATE C:UCASE V:Y;N;R |
|
| 1 | 0.0 | DEL | I | -1 | 751, 253 | $CALCULATE C:UCASE V:Y;N ' SAVE ENTRY TO GRID U:ZZGRID_SPLIT;SCREEN_TO_GRID;G\GRID;I\SEQ ' UPDATE TOTALS U:ZZGRID_SPLIT;GRID_SUM;G\GRID;I\LEN,I\LEN_TOT O:DISABLEINPUT;D\FIELD,I\SEL,I\SORT,I\GROUP,I\ALIGN,I\LEN,W\DEL A:CONST;;D\FIELD,I\SDESC,I\SEL,I\SORT,I\GROUP,I\ALIGN,I\LEN,W\DEL ' MOVE A + SIGN TO I\SEQ |
|
| 1 | 0.0 | Label 16 | T | -1 | 51, 229 | ||
| 1 | 0.0 | GROUP | I | -1 | 601, 253 | $CALCULATE C:UCASE I:I\GROUP;<>; R:1;99 |
|
| 1 | 0.0 | LEN | I | -1 | 701, 253 | $CALCULATE R:1;250 |
|
| 1 | 0.0 | Label 17 | T | -1 | 501, 229 | ||
| 1 | 0.0 | Label 4 | T | -1 | 11, 229 | ||
| 1 | 0.0 | ORIENT | D | -1 | 361, 181 | $DEFAULT A:CONST;L;D\ORIENT $AFTER_READ B:ADDITEM;D\ORIENT;P = PORTRATE,L = LANDSCAPE $VALIDATE A:LEFT;D\ORIENT,1;D\ORIENT B:VALIDATE;D\ORIENT;P,L |
|
| 1 | 0.0 | Label 23 | T | -1 | 431, 481 | ||
| 1 | 0.0 | LEN_TOT | I | -1 | 691, 481 | ||
| 1 | 0.0 | Label 20 | T | -1 | 701, 229 | ||
| 1 | 0.0 | Label 21 | T | -1 | 751, 229 | ||
| 1 | 0.0 | Label 19 | T | -1 | 601, 229 | ||
| 1 | 0.0 | Label 7 | T | -1 | 641, 25 | ||
| 1 | 0.0 | Label 8 | T | -1 | 641, 49 | ||
| 1 | 0.0 | PATH | I | 0 | 11, 505 | $DEFAULT A:CONST;$GBLROOT$LEGEND\PROJ_FMS\USERREP\$GBLUSER$\*.* |
|
| 1 | 0.0 | C | -1 | 701, 145 | $SELECT U:USER_REPORT;PRINT;G\GRID |
||
| 1 | 0.0 | Label 18 | T | -1 | 551, 229 | ||
| 1 | 0.0 | TIME | T | -1 | 701, 49 | ||
| 1 | 0.0 | PITCH | D | -1 | 151, 181 | $DEFAULT A:CONST;10;D\PITCH $AFTER_READ B:ADDITEM;D\PITCH;10,12,15 $VALIDATE B:VALIDATE;D\PITCH;10,12,15 |
|
| 1 | 0.0 | FT_FILE_TEMP | FT_ALL_TABLES | I | 0 | 441, 109 | |
| 1 | 0.0 | DATE | T | -1 | 701, 25 | ||
| 1 | 0.0 | SEQ | I | -1 | 11, 253 | $CALCULATE I:I\SEQ;=; DO(004) O:DISABLEINPUT;D\FIELD,I\SEL,I\SORT,I\GROUP,I\ALIGN,I\LEN,W\DEL DOEND(004) I:I\SEQ;<>; DO(001) O:ENABLEINPUT;D\FIELD,I\SEL,I\SORT,I\GROUP,I\ALIGN,I\LEN,W\DEL I:I\SEQ;=;+ DO(002) A:CONST;;I\SEQ,D\FIELD,I\SEL,I\SORT,I\GROUP,I\ALIGN,I\LEN,W\DEL DOEND(002) I:I\SEQ |
|
| 1 | 0.0 | Label 27 | T | -1 | 251, 181 | ||
| 1 | 0.0 | Label 26 | T | -1 | 51, 181 | ||
| 1 | 0.0 | MARKET | T | -1 | 1, 25 | ||
| 1 | 0.0 | MARKET | I | 0 | 1, 61 | $DEFAULT A:ORG F:CLIENT_MAST;;CM_CODE;T\MARKET=CM_NAME C:MCASE;;T\MARKET |
|
| 1 | 0.0 | HEADING | I | -1 | 151, 145 | ||
| 1 | 0.0 | FIELD | I | 0 | 11, 481 | ||
| 1 | 0.0 | Label 1 | T | -1 | 51, 145 | ||
| 10 | 0.0 | ZX_EXIT | Z | 0 | 0, 0 | ||
| 10 | 0.0 | ZX_DELETE | Z | 0 | 0, 0 | ||
| 10 | 0.0 | ZX_UPDATE | Z | 0 | 0, 0 | $UPDATE O:DISABLEINPUT;C\PRINT |
|
| 10 | 0.0 | ZX_SELECT | Z | 0 | 0, 0 | ||
| 10 | 0.0 | ZX_PRINT | Z | 0 | 0, 0 |