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* |