©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
SCRPW303 ; BPFO/JRC - Performance Monitor Report Utils; 30 Jul 2003 ; 4/2/04 7:21am
Source file <SCRPW303.m>
| Package | Total | Call Graph |
|---|---|---|
| Registration | 1 | FIRST^VAUTOMA |
| VA Fileman | 1 | ^DIR |
| Package | Total | Caller Graph |
|---|---|---|
| Scheduling | 3 | SCRPW301 SCRPW304 SDPMHLS |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ROLLUP(SCRNARR,SORTARR) | ;Set screen and sort arrays for national rollup
|
|
| RANGE(SCRNARR) | ;Screen array by range
|
|
| SRT2TXT(CODE) | ||
| EXCSTOP | ;Exclusion list of stop codes
|
|
| STOP | ;List of acceptable stop codes and credit pairs
|
|
| NTNLESC(SCRNARR) | ;Set exclusion array of stop codes for national reporting
|
|
| NTNLSC(SCRNARR) | ;Set inclusion array of stop codes for national reporting
|
|
| DSS(SCRNARR) | ;Set Stop Codes into screen array (prompt is one/many/all)
|
|
| SC2PTR(CODE) | ||
| SORT(SORTARR) | ; Set sort order into sort array
|
| FileNo | Call Tags |
|---|---|
| ^DIC(40.7 - [#40.7] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(40.7 - [#40.7] | SC2PTR+5, SC2PTR+6 |
| Name | Line Occurrences |
|---|---|
| $$SC2PTR | NTNLSC+16, NTNLSC+19, NTNLSC+20, NTNLESC+15, RANGE+15 |
| $$SRT2TXT | SORT+19, SORT+28 |
| NTNLESC | DSS+45, ROLLUP+18 |
| RANGE | DSS+27 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ARRY | DSS+20~ |
| CODE | DSS+20~, SRT2TXT~, SRT2TXT+4, SRT2TXT+5, SRT2TXT+6, SRT2TXT+7, SRT2TXT+8, SRT2TXT+9, NTNLSC+8~, NTNLSC+12* , NTNLSC+13, NTNLSC+16, NTNLSC+19, NTNLSC+20, NTNLESC+7~, NTNLESC+11*, NTNLESC+12, NTNLESC+15, RANGE+1~, RANGE+14* , RANGE+15, SC2PTR~, SC2PTR+5 |
| DIC | DSS+20~, DSS+30* |
| DIR | DSS+20~, DSS+38~, SORT+11~, SORT+21!, RANGE+1~ |
| DIR("?" | RANGE+6* |
| DIR("A" | DSS+24*, DSS+41*, DSS+42*, SORT+15*, SORT+23*, RANGE+5* |
| DIR("B" | DSS+23*, DSS+40* |
| DIR("S" | SORT+24* |
| DIR(0 | DSS+23*, DSS+39*, SORT+14*, SORT+22*, RANGE+7* |
| DIROUT | DSS+38~, SORT+11~ |
| DIRUT | DSS+20~, DSS+26, DSS+38~, DSS+44, SORT+11~, SORT+17, SORT+26, RANGE+1~, RANGE+9 |
| DSS | DSS+20~ |
| DTOUT | DSS+26, DSS+38~, SORT+11~, RANGE+1~, RANGE+9 |
| DUOUT | DSS+38~, SORT+11~ |
| FLG | DSS+20~, DSS+23*, DSS+26, DSS+27, RANGE+11* |
| J | NTNLSC+8~, NTNLSC+12*, NTNLESC+7~, NTNLESC+11*, RANGE+1~, RANGE+14* |
| NODE | RANGE+1~, RANGE+13*, RANGE+14, SC2PTR+4~, SC2PTR+6*, SC2PTR+7 |
| OFF | NTNLSC+8~, NTNLSC+11*, NTNLESC+7~, NTNLESC+10* |
| PTR | SC2PTR+4~, SC2PTR+5*, SC2PTR+6, SC2PTR+7 |
| PTR1 | NTNLSC+8~, NTNLSC+16*, NTNLSC+17, NTNLSC+19*, NTNLSC+21, NTNLESC+7~, NTNLESC+15*, NTNLESC+16, RANGE+1~, RANGE+15* , RANGE+16 |
| PTR2 | NTNLSC+8~, NTNLSC+20*, NTNLSC+21, NTNLESC+7~ |
| SCANARR | DSS+20~, DSS+37, DSS+44!, DSS+47, DSS+50 |
| SCRNARR | DSS~, DSS+21, DSS+27, DSS+29, DSS+45, DSS+48, DSS+49, DSS+50, ROLLUP~, ROLLUP+14 , ROLLUP+15, ROLLUP+16, ROLLUP+17, ROLLUP+18, ROLLUP+19, NTNLSC~, NTNLSC+9, NTNLSC+10, NTNLSC+17, NTNLSC+21 , NTNLESC~, NTNLESC+8, NTNLESC+9, NTNLESC+16, RANGE~, RANGE+2, RANGE+3, RANGE+4, RANGE+16 |
| SORTARR | SORT~, SORT+12, SORT+18, SORT+19, SORT+23, SORT+24, SORT+26, SORT+27, SORT+28, ROLLUP~ , ROLLUP+14, ROLLUP+20, ROLLUP+21 |
| SUB | RANGE+1~, RANGE+12*, RANGE+13 |
| TEXT | NTNLSC+8~, NTNLSC+11*, NTNLSC+12, NTNLESC+7~, NTNLESC+10*, NTNLESC+11 |
| TMP | NTNLSC+8~, NTNLSC+13*, NTNLSC+14, NTNLESC+7~, NTNLESC+12*, NTNLESC+13 |
| VAUTNI | DSS+20~, DSS+33* |
| VAUTSTR | DSS+20~, DSS+31* |
| VAUTVB | DSS+20~, DSS+32* |
| X | DSS+20~, DSS+38~, SORT+11~, SORT+21! |
| Y | DSS+20~, DSS+27, DSS+35, DSS+38~, DSS+45, SORT+11~, SORT+18, SORT+19, SORT+21!, SORT+27 , SORT+28, RANGE+1~, RANGE+10 |
| Y( | RANGE+12, RANGE+13 |
| Name | Field # of Occurrence |
|---|---|
| $T(EXCSTOP+OFF | NTNLESC+10 |
| $T(STOP+OFF | NTNLSC+11 |