Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: NURCRL1

Package: Nursing Service

Routine: NURCRL1


Information

NURCRL1 ;HIRMFO/RM,RTK-RANK ORDER PRINT (CONT.) ;8/29/96

Source Information

Source file <NURCRL1.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
VA FileMan 2 DD^%DT  ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Nursing Service 1 NURCRL4  

Entry Points

Name Comments DBIA/ICR reference
HEADER(PG) ; FUNCTION PRINTS HEADER FOR NEXT PAGE
; FUNCTION VALUE IS THE NUMBER OF NEW PAGE, -1 IF ABNORMAL USER EXIT
RETURN
HDRINT() ; PRINTS HEADER FOR INTERVENTIONS UNDER A PROBLEM
; FUNCTION VALUE IS 1 IF ABNORMAL USER END, ELSE 0
WRTPROB(RANK,PROB,FREQ) ; WRITES OUT LINE FOR PROBLEM, CHECKS FOR HEADER PRINT
; FUNCTION VALUE IS 1 IF ABNORMAL USER END, ELSE 0
WRTORD(RANK,ORD,FREQ) ; WRITES OUT LINE FOR ORDERABLE, CHECKS FOR HDR PRINT
; FUNCTION VALUE IS 1 IF ABNORMAL USER EXIT, ELSE 0
WRTOPT(BS5) ; WRITES OUT LINE FOR PATIENTS UNDER ORDERABLE, CHECKS FOR HDR
; FUNCTION VALUE IS 1 IF ABNORMAL USER END, ELSE 0
WRTPPT(BS5) ; WRITES OUT LINE FOR PATIENTS UNDER PROBLEM, CHECKS FOR HDR
; FUNCTION VALUE IS 1 IF ABNORMAL USER END, ELSE 0
ACTIVE(PR,NCP,BDT,EDT) ;
; FUNCTION VALUE IS 0 IF THIS PROBLEM IS ACTIVE OVER DATE/TIME RANGE
; BGD-EDT, ELSE VALUE IS 1
PROBLEM(AGGY) ;
; FUNCTION VALUE IS 1 IF AGGY HAS CLASS OF NURSING PROBLEM, ELSE
; RETURNS 0.
GETTRM(PR,CLAS) ;
; GETS FIRST TERM ENCOUNTERED IN TREE WITH PR AS ROOT WITH CLASS.=CLAS
RECUR1
GETLST(PR,CLAS) ; GETS LIST OF TERMS IN TREE WITH PR AS ROOT WITH CLASS.=CLAS
; FUNCTION RETURNS 1 IF LIST NOT EMPTY, ELSE RETURNS 0.
RECUR

External References

Name Field # of Occurrence
DD^%DT HEADER+6
^DIR HEADER+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $E(IOST)="C"!(PG>1)
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: !,"RANK LISTING OF "_$S(NURCRTYP=1:"NURSING PROBLEMS",NURCRTYP=2:"NURSING PROBLEMS/INTERVENTIONS",1:"NURSING INTERVENTIONS"),?71,"PAGE",$J(PG,3)
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: !,"From: ",Y
  • Line Location: HEADER+6
Function Call: WRITE
  • Prompt: " to: ",Y
  • Line Location: HEADER+6
Function Call: WRITE
  • Prompt: " Report Identifier: ",NURCLID
  • Line Location: HEADER+7
Function Call: WRITE
  • Prompt: !,"=============================================================================="
  • Line Location: HEADER+8
Function Call: WRITE
  • Prompt: !?5,"Rank Freq Intervention",!?5,"---- ---- ------------"
  • Line Location: HDRINT+3
Function Call: WRITE
  • Prompt: !!,$J(RANK,3),?5,$J(FREQ,4),?11,$P($G(^GMRD(124.2,+PROB,0)),"^")
  • Line Location: WRTPROB+3
Function Call: WRITE
  • Prompt: !?5,$J(RANK,3),?10,$J(FREQ,4),?16,$P($G(^GMRD(124.2,+ORD,0)),"^")
  • Line Location: WRTORD+3
Function Call: WRITE
  • Prompt: BS5,","
  • Line Location: WRTOPT+3
Function Call: WRITE
  • Prompt: BS5,","
  • Line Location: WRTPPT+3
Routine Call
  • DIR
  • Line Location:
    • HEADER+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^GMRD(124.2 - [#124.2] WRTPROB+3, WRTORD+3, PROBLEM+5, RECUR1, RECUR
^GMRD(124.25 - [#124.25] PROBLEM+4
^NURSC(216.8 - [#216.8] ACTIVE+4, ACTIVE+5

Label References

Name Line Occurrences
$$HEADER HDRINT+2, WRTPROB+2, WRTORD+2, WRTOPT+2, WRTPPT+2
$$PROBLEM ACTIVE+4
RECUR GETLST+3, RECUR
RECUR1 GETTRM+3, RECUR1
RETURN HEADER+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A GETTRM+2~, GETTRM+3*, RECUR1*, GETLST+2~, GETLST+3*, RECUR*
ACTIVE ACTIVE+3~*, ACTIVE+4*, ACTIVE+5*, ACTIVE+6
AGGY PROBLEM~, PROBLEM+5
B GETTRM+2~, RECUR1~*, GETLST+2~, RECUR~*
BDT ACTIVE~, ACTIVE+5
BS5 WRTOPT~, WRTOPT+3, WRTPPT~, WRTPPT+3
C GETTRM+2~, RECUR1*, GETLST+2~, RECUR*
CLAS PROBLEM+3~, PROBLEM+4*, PROBLEM+5, GETTRM~, RECUR1, GETLST~, RECUR
D GETTRM+2~, RECUR1~*, GETLST+2~, RECUR~*
DIR HEADER+2~
DIR(0 HEADER+2*
E GETTRM+2~, GETTRM+3*, GETTRM+4, RECUR1*
EDT ACTIVE~, ACTIVE+5
FREQ WRTPROB~, WRTPROB+3, WRTORD~, WRTORD+3
IOF HEADER+5
IOM WRTOPT+2, WRTPPT+2
IOSL HDRINT+2, WRTPROB+2, WRTORD+2, WRTOPT+2, WRTPPT+2
IOST HEADER+2, HEADER+5
NCP ACTIVE~, ACTIVE+4
NNCP ACTIVE+3~, ACTIVE+4*, ACTIVE+5
>> NURCBGDT HEADER+6
>> NURCENDT HEADER+6
>> NURCLID HEADER+7
>> NURCPAGE HDRINT+2*, WRTPROB+2*, WRTORD+2*, WRTOPT+2*, WRTPPT+2*
>> NURCRTYP HEADER+5
NURSLIST GETLST+2!, GETLST+4
NURSLIST( RECUR*
ORD WRTORD~, WRTORD+3
PG HEADER~, HEADER+2*, HEADER+3, HEADER+4*, HEADER+5, RETURN
PR ACTIVE~, ACTIVE+4, ACTIVE+5, GETTRM~, GETTRM+3, GETLST~, GETLST+3
PROB WRTPROB~, WRTPROB+3
PROBLEM PROBLEM+3~*, PROBLEM+4*, PROBLEM+5*, PROBLEM+6
RANK WRTPROB~, WRTPROB+3, WRTORD~, WRTORD+3
WRT HDRINT+2~*, HDRINT+3, HDRINT+4, WRTPROB+2~*, WRTPROB+3, WRTPROB+4, WRTORD+2~*, WRTORD+3, WRTORD+4, WRTOPT+2~*
, WRTOPT+3, WRTOPT+4, WRTPPT+2~*, WRTPPT+3, WRTPPT+4
X HEADER+2~, ACTIVE+3~, ACTIVE+5*
Y HEADER+2~, HEADER+6*, ACTIVE+3~, ACTIVE+5*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All