NURCCPU5 ;HIRMFO/RD/RM-NURSING CARE PLAN UTILITIES (cont.) ;8/29/96
Source file <NURCCPU5.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DCINT | ; DC ALL INTERVENTIONS UNDER A PROBLEM
|
|
| PRCINT(DA) | ; STEP THROUGH CHILDREN OF X IF CHILD ORDERABLE THEN DC IF IN NCP
|
|
| PRC | ; IF Y IS ORDERABLE THEN DC IF IN NCP, ELSE RECURSIVELY CALL PRCINT
|
|
| DC | ; DC AN ORDER
|
|
| DCOK(X) | ; ARE ALL PROBLEMS UNDER WHICH AGGY TERM WITH IEN X LIES RESOLVED
; THIS FUNCTION RETURNS 1 IF THIS STATEMENT IS TRUE, ELSE 0. |
|
| OK(Z) | ; PART OF DCOK WHICH RETURNS 0 IF PROBLEM Z IS NOT RESOLVED, ELSE 1
|
|
| METGOAL(STAT) | ; IF PROBLEM IS RESOLVED SET GOAL STATUS TO STAT.
|
|
| PRCGO(DA) | ; STEP THROUGH CHILDREN OF X IF CHILD GOAL THEN DC IF IN NCP
|
|
| PRCG | ; IF Y IS GOAL THEN STATUS=MET IF IN NCP, ELSE RECURSIVELY CALL PRCGO
|
|
| MET | ; SET STATUS OF GOAL TO STAT
|
| FileNo | Call Tags |
|---|---|
| ^NURSC(216.8 - [#216.8] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^GMR(124.3 - [#124.3] | OK+1 |
| ^GMRD(124.2 - [#124.2] | DCINT+2, PRCINT+2, DCOK+3, METGOAL+3, PRCGO+2 |
| ^GMRD(124.25 - [#124.25] | DCINT+1, METGOAL+2 |
| ^NURSC(216.8 - [#216.8] | PRC+1, DC+2, DC+3*, OK+2, OK+3, PRCG+1, MET+2, MET+3* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | PRCINT~, PRCINT+2, DC+1~, DC+2*, DC+3, PRCGO~, PRCGO+2, MET+1~, MET+2*, MET+3 |
| DA(1 | DC+2*, DC+3, MET+2*, MET+3 |
| >> DIK | DC+4*, MET+4* |
| DUZ | DC+3, MET+3 |
| >> GMRGPDA | OK+1 |
| >> GMRGTERM | DCINT+2, METGOAL+3 |
| >> NURSCPE | PRC+1, DC+2, OK+2, OK+3, PRCG+1, MET+2 |
| NURSGOAL | METGOAL+1~, METGOAL+2*, PRCG+1 |
| NURSGOEX | METGOAL+1~, METGOAL+2*, METGOAL+3 |
| >> NURSI | PRC+1*, PRCG+1* |
| >> NURSINT | DCINT+1*, DCINT+2 |
| >> NURSJ | PRC+1*, PRCG+1* |
| >> NURSNUM | DC+2*, DC+3, MET+2*, MET+3 |
| >> NURSNWDT | DC+3, MET+3 |
| >> NURSORD | DCINT+1*, PRC+1 |
| >> NURSPROB | DCINT+1*, DCOK+3, METGOAL+2* |
| >> NURSZN | DC+2*, MET+2* |
| OK | DCOK+2~, DCOK+3*, DCOK+4 |
| STAT | METGOAL~, MET+3 |
| X | DCINT+2*, PRCINT+1~, PRCINT+2*, PRC+1, PRC+2, DC+1~, DCOK~, DCOK+3, METGOAL+3*, PRCGO+1~ , PRCGO+2*, PRCG+1, PRCG+2, MET+1~ |
| Y | DCINT+2*, PRCINT+2*, PRC+1*, DC+1*, DC+3, DCOK+2~, DCOK+3*, METGOAL+3*, PRCGO+2*, PRCG+1* , MET+1*, MET+3 |
| Z | DCOK+2~, DCOK+3*, OK~, OK+1, OK+2*, OK+3 |
