©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
NURCROP0 ;HIRMFO/RM,RTK-CARE PLAN RANK ORDER PRINT ;8/29/96
Source file <NURCROP0.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ; ENTRY FROM TASK TO PRINT RANK ORDER PRINT IF QUEUED TO DEVICE
|
||
| EN1 | ; ENTRY FROM OPTION TO PRINT RANK ORDER LISTING OF CARE PLAN
|
|
| EXIT | ;
; Clean up variables |
|
| ENDT | ||
| DEV | ; Ask device and allow to queue
; If QUEUE then call ^%ZTLOAD and exit |
| Name | Field # of Occurrence |
|---|---|
| ^%DT | EN1+3, ENDT |
| NOW^%DTC | PRINT+5 |
| ^%ZIS | DEV+2 |
| ^%ZISC | DEV+3 |
| ^%ZTLOAD | DEV+5 |
| KILL^%ZTLOAD | EXIT+2 |
| ^NURCKILL | EXIT+3 |
| $$ACTIVE^NURCROP1 | PRINT+17 |
| $$GETLST^NURCROP1 | PRINT+25 |
| $$GETTRM^NURCROP1 | PRINT+20 |
| $$HEADER^NURCROP1 | PRINT+6, PRINT+38 |
| $$RPRTID^NURCROP2 | ENDT+9 |
| $$SORTYP^NURCROP2 | ENDT+12 |
| PRINT^NURCROP2 | PRINT+43 |
| $$CENSUS^NURSACE0 | PRINT+6 |
| $$MDIC^NURSAGS0 | ENDT+4 |
| CLOSE^NURSUT1 | EXIT+3 |
| DEM^VADPT | PRINT+11 |
| KVAR^VADPT | EXIT+3 |
| EN^XQH | DEV+3 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(42 - [#42] | ENDT+6 |
| ^GMR(124.3 - [#124.3] | PRINT+11, PRINT+13, PRINT+17, PRINT+25 |
| ^GMRD(124.2 - [#124.2] | PRINT+5 |
| ^GMRD(124.25 - [#124.25] | PRINT+5 |
| ^NURSF(211.4 - [#211.4] | ENDT+5, ENDT+6 |
| ^TMP($J | PRINT+4!, PRINT+11, PRINT+27!, PRINT+28*, PRINT+31!, PRINT+32*, PRINT+39, EXIT+3! |
| Name | Line Occurrences |
|---|---|
| DEV | DEV+3 |
| ENDT | ENDT |
| EXIT | EN1+3, ENDT+1, ENDT+4, ENDT+9, ENDT+12, DEV+2, DEV+5, PRINT+6, PRINT+39 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | PRINT+5 |
| >> %DT | EN1+3*, ENDT* |
| >> %DT("A" | EN1+3*, ENDT* |
| >> %DT(0 | EN1+3*, ENDT* |
| >> %ZIS | DEV+2* |
| >> DFN | PRINT+11*, PRINT+13 |
| DIRUT | ENDT+9! |
| IO | PRINT+6, PRINT+38 |
| IO("Q" | DEV+2!, DEV+3, DEV+4! |
| IO("S" | DEV+3 |
| ION | DEV+4 |
| IOST | DEV+3 |
| >> NURC | ENDT+5*, ENDT+6 |
| >> NURCBGDT | EN1+4*, ENDT, PRINT+6, PRINT+17 |
| >> NURCBS5 | PRINT+11*, PRINT+28, PRINT+32 |
| >> NURCDATE | PRINT+11*, PRINT+13 |
| >> NURCENDT | ENDT*, PRINT+6, PRINT+11, PRINT+17 |
| >> NURCINT | PRINT+5*, PRINT+6, PRINT+20 |
| >> NURCITRM | PRINT+20*, PRINT+25 |
| >> NURCLID | ENDT+9* |
| >> NURCNCP | PRINT+5*, PRINT+6, PRINT+11, PRINT+13 |
| >> NURCNOW | PRINT+5*, PRINT+6 |
| >> NURCORD | PRINT+5*, PRINT+6, PRINT+25 |
| >> NURCOTRM | PRINT+25*, PRINT+27, PRINT+28 |
| >> NURCPAGE | PRINT+6*, PRINT+38* |
| >> NURCPDA | PRINT+13*, PRINT+17, PRINT+25 |
| >> NURCPDA1 | PRINT+17* |
| >> NURCPTRM | PRINT+17*, PRINT+20, PRINT+27, PRINT+28, PRINT+31, PRINT+32 |
| >> NURCSORT | ENDT+12*, PRINT+6 |
| >> NURSLIST( | PRINT+25 |
| >> NURSMAS | ENDT+6* |
| >> NURSMAS( | ENDT+6* |
| >> NURSMAS(0 | ENDT+6* |
| >> NURSNLOC( | ENDT+5 |
| >> POP | DEV+2 |
| >> VADM(1 | PRINT+11 |
| >> VADM(2 | PRINT+11 |
| >> X | ENDT*, ENDT+5* |
| XQH | DEV+3*! |
| >> Y | EN1+3, EN1+4, ENDT, ENDT+5*, ENDT+6 |
| >> ZTDESC | DEV+4* |
| >> ZTIO | DEV+4* |
| >> ZTRTN | DEV+4* |
| >> ZTSAVE("NURCBGDT" | DEV+4* |
| >> ZTSAVE("NURCENDT" | DEV+4* |
| >> ZTSAVE("NURCLID" | DEV+4* |
| >> ZTSAVE("NURCSORT" | DEV+4* |
| >> ZTSAVE("NURSMAS*" | DEV+4* |
| ZTSK | DEV+5!, EXIT+2 |