NURAAGS0 ;HIRMFO/RM,JH,MD-MULTIDIVISIONAL GENERIC SORT ROUTINE FOR ADMIN REPORTS ;11/18/96
Source file <NURAAGS0.m>
| Package | Total | Call Graph |
|---|---|---|
| Nursing Service | 2 | (CHKPOS,SETCAT,SETCERT,SETFAC,SETLIC,SETLOC,SETMIL,SETPOS,SETPROG,SETUPTL)^NURAAGS1 (EN2,EN3,EN4)^NURSAUTL |
| VA Fileman | 1 | $$GET1^DIQ |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ACSORT | ; SORT FROM NURSING "AC" & "C" XREF
|
|
| CSORT | ; SORT FROM NURSING "D" XREF
|
|
| Q | ||
| EN1 | ; SER.CAT-SPEC. SORT
|
|
| EN2 | ; PRIO.SQ.-SER.POS.-SPEC. SORT
|
|
| EN3 | ; LOC-SER.CAT.-SPEC. SORT
|
|
| EN4 | ; LOC.-PRIO.SQ.-SER.POS.-SPEC. SORT
|
|
| ESORT | ; SORT FROM NURSING "B" XREF
|
|
| SETVAR | ; SET SUBSCRIPTS FOR GLOBAL SET
|
| Name | Field # of Occurrence |
|---|---|
| $$GET1^DIQ | SETVAR+27 |
| CHKPOS^NURAAGS1 | ACSORT+2, ESORT+2, CSORT+2 |
| SETCAT^NURAAGS1 | SETVAR+4 |
| SETCERT^NURAAGS1 | SETVAR+14 |
| SETFAC^NURAAGS1 | SETVAR+4 |
| SETLIC^NURAAGS1 | SETVAR+22 |
| SETLOC^NURAAGS1 | SETVAR+4 |
| SETMIL^NURAAGS1 | SETVAR+25 |
| SETPOS^NURAAGS1 | SETVAR+4 |
| SETPROG^NURAAGS1 | SETVAR+4 |
| SETUPTL^NURAAGS1 | SETVAR+22, SETVAR+24, SETVAR+38 |
| EN2^NURSAUTL | SETVAR+2 |
| EN3^NURSAUTL | SETVAR+2 |
| EN4^NURSAUTL | EN3+3, EN4+3 |
| FileNo | Call Tags |
|---|---|
| ^NURSF(212.7 - [#212.7] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^NURSF(210 - [#210] | ACSORT+1, ESORT+3, CSORT+2, SETVAR+13, SETVAR+14, SETVAR+17, SETVAR+18, SETVAR+20, SETVAR+21, SETVAR+24 , SETVAR+25 |
| ^NURSF(211.1 - [#211.1] | SETVAR+17 |
| ^NURSF(211.3 - [#211.3] | SETVAR+11, SETVAR+34 |
| ^NURSF(211.4 - [#211.4] | SETVAR+5, SETVAR+15 |
| ^NURSF(211.8 - [#211.8] | ACSORT+2, ESORT+2, ESORT+3, CSORT+1, CSORT+2, SETVAR+15 |
| ^NURSF(212.1 - [#212.1] | SETVAR+13, SETVAR+18 |
| ^NURSF(212.7 - [#212.7] | SETVAR+27 |
| ^TMP("NURSCAT" | SETVAR+10 |
| ^TMP($J | SETVAR+28, SETVAR+29*, SETVAR+30* |
| ^VA(200 - [#200] | ACSORT+1, ESORT+3, SETVAR+12, SETVAR+16, SETVAR+19 |
| Name | Line Occurrences |
|---|---|
| ACSORT | EN1+1, EN2+2, EN3+3, EN4+3 |
| CSORT | EN2+1 |
| ESORT | EN3+2, EN4+2 |
| Q | EN1+2, EN2+1, EN2+3, EN3+2, EN3+4, EN4+2 |
| SETVAR | ACSORT+2, ESORT+3, CSORT+2 |
| Name | Field # of Occurrence |
|---|---|
| ^("I" | SETVAR+5 |
| ^(0 | ACSORT+1, ESORT+3, SETVAR+12, SETVAR+13, SETVAR+15, SETVAR+17, SETVAR+18 |
| ^(1 | SETVAR+16, SETVAR+19 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| D0 | Q!, SETVAR+14*, SETVAR+20*, SETVAR+21, SETVAR+25* |
| DA | Q!, ACSORT+1*, ESORT+3*, CSORT+2*, SETVAR+1, SETVAR+13, SETVAR+14, SETVAR+17, SETVAR+18, SETVAR+20 , SETVAR+21, SETVAR+24, SETVAR+25, SETVAR+30 |
| DA(1 | ACSORT+1*, ACSORT+2, ESORT+3*, CSORT+1*, CSORT+2, SETVAR+12, SETVAR+16, SETVAR+19 |
| IOST | SETVAR+29 |
| NLOCN | Q!, SETVAR+5 |
| NLOCN(1 | SETVAR+9, SETVAR+28, SETVAR+29 |
| NLOCN(2 | SETVAR+5* |
| NNM | Q!, SETVAR+12*, SETVAR+30 |
| NPODA | Q!, SETVAR+11* |
| >> NPOS | CSORT+1, CSORT+2, SETVAR+11 |
| NPRI | Q!, SETVAR+28, SETVAR+29 |
| NPWARD | Q! |
| >> NRPT | SETVAR+1, SETVAR+11, SETVAR+13, SETVAR+14, SETVAR+15, SETVAR+16, SETVAR+17, SETVAR+18, SETVAR+19, SETVAR+20 , SETVAR+24, SETVAR+25, SETVAR+26, SETVAR+32, SETVAR+33, SETVAR+34, SETVAR+36, SETVAR+37 |
| >> NSP | SETVAR+19, SETVAR+22, SETVAR+24, SETVAR+37 |
| >> NSPC | SETVAR+19, SETVAR+22, SETVAR+24, SETVAR+37 |
| >> NSPC(1 | SETVAR+19 |
| >> NSPC(2 | SETVAR+22, SETVAR+24 |
| NSPEC | Q!, SETVAR+13!*, SETVAR+15*, SETVAR+16*, SETVAR+17*, SETVAR+18*, SETVAR+19*, SETVAR+22, SETVAR+24*, SETVAR+35* , SETVAR+36, SETVAR+37 |
| NSPOSN | Q!, SETVAR+11, SETVAR+28, SETVAR+29, SETVAR+34 |
| >> NSTAT | SETVAR+21 |
| >> NSTAT(1 | SETVAR+21 |
| NURCAT | Q! |
| NUREQWRD | Q!, ESORT+1*, ESORT+2 |
| >> NURFAC | SETVAR+6 |
| >> NURFAC(1 | SETVAR+6 |
| >> NURFAC(2 | SETVAR+6, SETVAR+28, SETVAR+29 |
| NURFLAG | Q! |
| >> NURHOSP | EN3+2, EN4+2, SETVAR+9 |
| >> NURMDSW | SETVAR+6 |
| NURNEN | EN1+1*, EN2+1*, EN2+2*, EN3+1*, EN4+1*, Q!, SETVAR+4, SETVAR+9, SETVAR+10, SETVAR+11 |
| NURNEN(1 | ACSORT+2, ESORT+2, CSORT+2 |
| NURNODE4 | Q!, ACSORT+2*, ESORT+2*, ESORT+3, CSORT+1*, CSORT+2, SETVAR+15, SETVAR+30 |
| >> NURNODE5 | ACSORT+2*, ESORT+2*, ESORT+3, CSORT+2*, SETVAR+15 |
| >> NURPLSW | SETVAR+7, SETVAR+8, SETVAR+27 |
| >> NURPROG | SETVAR+7 |
| >> NURPROG(1 | SETVAR+7 |
| >> NURPROG(2 | SETVAR+7, SETVAR+8*, SETVAR+27, SETVAR+28, SETVAR+29 |
| >> NURPROG(3 | SETVAR+27* |
| NURSCAT | Q! |
| NURSCATY | Q!, SETVAR+10, SETVAR+22, SETVAR+24, SETVAR+33 |
| >> NURSER | EN2+1, SETVAR+11 |
| >> NURSIEN | ESORT+1* |
| >> NURSNLOC( | ESORT+1, SETVAR+9 |
| >> NURSORT | SETVAR+26*, SETVAR+29* |
| NURSZ | Q!, ESORT+1* |
| >> NURSZAP | EN3+3, EN4+3, SETVAR+1, SETVAR+2, SETVAR+15 |
| >> NURSZDA | SETVAR+1 |
| >> NURSZLO( | SETVAR+15 |
| NURSZORT | Q!, SETVAR+1*, SETVAR+2, SETVAR+3 |
| U | ESORT+3, CSORT+2, SETVAR+5, SETVAR+11, SETVAR+12, SETVAR+13, SETVAR+15, SETVAR+16, SETVAR+17, SETVAR+18 , SETVAR+19, SETVAR+34 |
| X | SETVAR+28~*, SETVAR+29*, SETVAR+30 |
| >> Z | ACSORT+1* |