©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
NURCEVE0 ;HIRMFO/RTK,RM-Nursing Care Plans Edit Report ;8/29/96
Source file <NURCEVE0.m>
| Package | Total | Call Graph |
|---|---|---|
| Nursing Service | 7 | EN2^NURCCPU3 ($$GETPRB,$$PCKPROB,$$SRTPROB)^NURCEVE1 ($$ACTIVE,$$SELDAT,GOALS)^NURCEVE2 ORDERS^NURCEVE3 EN1^NURCEVE5 ^NURCKILL REASK^NURCPPS1 |
| VA Fileman | 3 | ^DIC D^DIQ ^DIR |
| General Medical Record - Generator | 2 | EN1^GMRGRUT2 EN1^GMRGRUT3 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ENT1 | ;
|
|
| SET(A,B) | ; GIVEN AGGY IEN (A) AND ZEROTH NODE (B) AND PLAN IN GMRGPDA,
; THIS FUNCTION RETURNS A_"^"_$P(B,U)_"^"_(ENTRY IN 124.31) |
|
| RECUR(NURCX) | ; GIVEN AN AGGREGATE TERM (NURCX) THIS PROCESS WILL LOOP THROUGH
; ALL OF ITS CHILDREN AND PUT ALL GOALS IN ^TMP("NURGOAL",$J, ALL ; INTERVENTIONS IN ^TMP("NURINT",$J. THEN THIS PROCEDURE WILL CALL ; ITSELF RECURSIVELY FOR EACH CHILD |
|
| NEDT | ; EDIT THE DATA FOR A PARTICULAR NURSING PROBLEM
|
|
| END | ; CLEAN UP VARIABLES
|
| Name | Field # of Occurrence |
|---|---|
| ^DIC | ENT1+5 |
| D^DIQ | ENT1+9, ENT1+16 |
| ^DIR | ENT1+22 |
| EN1^GMRGRUT2 | NEDT+7 |
| EN1^GMRGRUT3 | SET+3 |
| EN2^NURCCPU3 | NEDT+12 |
| $$GETPRB^NURCEVE1 | ENT1+10, ENT1+17 |
| $$PCKPROB^NURCEVE1 | ENT1+19 |
| $$SRTPROB^NURCEVE1 | ENT1+19 |
| $$ACTIVE^NURCEVE2 | RECUR+10 |
| $$SELDAT^NURCEVE2 | NEDT+7, NEDT+12 |
| GOALS^NURCEVE2 | NEDT+13 |
| ORDERS^NURCEVE3 | NEDT+14 |
| EN1^NURCEVE5 | ENT1+23 |
| ^NURCKILL | END+2 |
| REASK^NURCPPS1 | SET+3 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^GMR(124.3 - [#124.3] | ENT1+7, ENT1+9, ENT1+14, ENT1+16, NEDT+12, SET+2 |
| ^GMRD(124.2 - [#124.2] | ENT1+1, ENT1+2, ENT1+24, RECUR+5, RECUR+6, RECUR+7 |
| ^GMRD(124.25 - [#124.25] | NEDT+8, NEDT+9 |
| ^NURSC(216.8 - [#216.8] | ENT1+8, ENT1+15, NEDT+1 |
| ^TMP( | END+1!, NEDT+15!, RECUR+10* |
| ^TMP("NURCHC" | ENT1+6!, ENT1+13!, END+1!, NEDT+1 |
| ^TMP("NURGOAL" | NEDT+10! |
| ^TMP("NURINT" | NEDT+10! |
| ^TMP("NURPRB" | ENT1+6!, ENT1+13! |
| ^TMP("NURUSL" | ENT1+21 |
| ^TMP($J | END+1! |
| Name | Line Occurrences |
|---|---|
| $$SET | RECUR+10 |
| NEDT | ENT1+21 |
| RECUR | NEDT+10, RECUR+10 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| A | SET~, SET+2 |
| B | SET~, SET+2 |
| >> DEVDT | ENT1+9*, ENT1+16* |
| >> DFN | ENT1+5*, ENT1+7, ENT1+14, ENT1+24* |
| >> DIC | ENT1+5* |
| >> DIC(0 | ENT1+5* |
| DIR | ENT1+22! |
| DIR("A" | ENT1+22* |
| DIR("B" | ENT1+22* |
| DIR(0 | ENT1+22* |
| GMRGOUT | NEDT+12*, SET+3! |
| >> GMRGPDA | ENT1+7*, ENT1+8, ENT1+9, ENT1+14*, ENT1+15, ENT1+16, NEDT+1*, NEDT+3, NEDT+5, NEDT+7* , NEDT+12, RECUR+10, SET+2 |
| GMRGPDAA | ENT1+13! |
| GMRGPDAA( | NEDT+2, NEDT+3, NEDT+5* |
| >> GMRGRT | ENT1+1*, ENT1+2*, ENT1+3, ENT1+7, ENT1+14, ENT1+24* |
| GMRGTERM | NEDT+12*, NEDT+16! |
| GMRGXPRT | NEDT+7*, NEDT+12*, SET+3*! |
| GMRGXPRT(0 | NEDT+7*, NEDT+12* |
| GMRGXPRT(1 | NEDT+7*, NEDT+12* |
| >> MATCH | NEDT+1*, NEDT+3*, NEDT+5 |
| >> NCPDFN | ENT1+5*, ENT1+24 |
| >> NCPFLG | NEDT+12*, NEDT+13, NEDT+14 |
| >> NLPVAR | ENT1+21*, NEDT+1 |
| >> NURACM | ENT1+7*, ENT1+10*, ENT1+14*, ENT1+17*, ENT1+19 |
| NURCGL | NEDT+9*, NEDT+16!, RECUR+7 |
| NURCGOEX | NEDT+6!, NEDT+8*, NEDT+16!, RECUR+8, RECUR+10 |
| NURCGOEX(0 | NEDT+11*, RECUR+8*, RECUR+10* |
| NURCINT | NEDT+6!, NEDT+8*, NEDT+16!, RECUR+9, RECUR+10 |
| NURCINT(0 | NEDT+11*, RECUR+9*, RECUR+10* |
| NURCORD | NEDT+9*, NEDT+16!, RECUR+7 |
| >> NURCPDT( | ENT1+9*, ENT1+16* |
| NURCX | NEDT+1*, NEDT+7, NEDT+10, NEDT+12, NEDT+16!, RECUR~, RECUR+5, RECUR+6 |
| NURCY | RECUR+4~, RECUR+5*, RECUR+6 |
| NURCZ | RECUR+4~, RECUR+6*, RECUR+7, RECUR+8, RECUR+9, RECUR+10 |
| >> NUREDB | SET+3* |
| >> NUROUT | ENT1+1*, ENT1+3*, ENT1+4, ENT1+5, ENT1+20*, NEDT+12, NEDT+14, SET+3* |
| >> NURPROC | ENT1+10*, ENT1+12, ENT1+17*, ENT1+19*, ENT1+20 |
| >> NURSCPE | ENT1+8*, ENT1+10, ENT1+15*, ENT1+17, NEDT+1* |
| >> NURSGMRG | SET+3* |
| >> NURSOUT | SET+3* |
| >> REVDT | ENT1+7*, ENT1+14* |
| U | ENT1+9, ENT1+16, NEDT+1, NEDT+7, NEDT+12, RECUR+7, RECUR+8, RECUR+9, RECUR+10, SET+2 |
| >> X | END+1*, NEDT+2*, NEDT+3, NEDT+15*, RECUR+7*, RECUR+8, RECUR+9, RECUR+10 |
| >> Y | ENT1+5, ENT1+9*, ENT1+16*, ENT1+23, RECUR+7*, RECUR+10, SET+3 |