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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: NURCVED0

Package: Nursing Service

Routine: NURCVED0


Information

NURCVED0 ;HIRMFO/YH,MD,RM,FT-VITAL SIGNS EDIT SHORT FORM ;6/22/01 10:28

Source Information

Source file <NURCVED0.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
General Medical Record - Vitals 3 LIST^GMRVALL0  (EN3,Q)^GMRVED0  EN2^GMRVEE0  
Nursing Service 2 WARDPAT^NURCVUT0  EN5^NURSCUTL  
VA FileMan 2 ^%DT  YN^DICN  
Kernel 1 $$FMADD^XLFDT  
Registration 1 1^VADPT  

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: 2

Package Total Caller Graph
Nursing Service 2 NURCPE-VIT-ERROR  NURCVED2  

Entry Points

Name Comments DBIA/ICR reference
EN1 ;CALL TO EDIT PATIENT VITALS
EDTPT ;
ASKOK ; LOOPING THROUGH NAMES
ASL
SETUTIL ; SET ARRAY OF PATIENTS
WRDST ; SET UTILITY FOR PATIENTS ON WARD
SETWLO ; SET 42 FILE ENTRY FOR NURSWARD, NURWLO=$S(1:ONLY ONE 42 ENTRY,
; 0: MORE THAN ONE 42 ENTRY OR NO ENTRY)_"^"_(42 ENTRY)
; AND THE NURHLO ARRAY AS THE HOSPITAL LOCATIONS ASSOCIATED WITH 211.4
DATE ; CALL TO SET AND GMRVIDT (WHEN THE VITALS WERE TAKEN)
; ALSO RETURNS NURQUIT=1 IF TIMEOUT OR UPARROW OUT.
Q ;
EN2 ;EDIT A VITAL/MEASUREMENT ENTERED IN ERROR
Q5
MULTIVM

External References

Name Field # of Occurrence
^%DT DATE+2
YN^DICN ASKOK+1, ASL, MULTIVM
LIST^GMRVALL0 EN1+8
EN3^GMRVED0 EDTPT+2, MULTIVM+1
Q^GMRVED0 Q+1
EN2^GMRVEE0 EN2+2
WARDPAT^NURCVUT0 EN1+9
EN5^NURSCUTL EN2+2
1^VADPT WRDST+1
$$FMADD^XLFDT DATE+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,NURNAM,?$X+10,$S(NURRM=" BLANK":" ",1:NURRM)_"-"_$S(NBED=" BLANK":" ",1:NBED_" ")
  • Line Location: ASKOK+1
Function Call: WRITE
  • Prompt: $C(7),!,?4,"ANSWER 'YES' or 'NO'"
  • Line Location: ASKOK+2
Function Call: WRITE
  • Prompt: !,"Do you wish to stop looping through names?"
  • Line Location: ASL+0
Function Call: WRITE
  • Prompt: !
  • Line Location: ASL+0
Function Call: WRITE
  • Prompt: $C(7),!,?4,"ANSWER 'YES' or 'NO'"
  • Line Location: ASL+1
Function Call: WRITE
  • Prompt: !,?3,$C(7),"Sorry, you cannot enter a date more than 1 year old."
  • Line Location: DATE+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(42 - [#42] WRDST+3, WRDST+4, SETWLO+3
^NURSF(211.4 - [#211.4] WRDST+5, SETWLO+3
^NURSF(214 - [#214] SETUTIL+1, SETUTIL+2
^TMP($J EN1+9, EN1+10, EDTPT+1, SETUTIL+1!, WRDST+6*

Label References

Name Line Occurrences
ASKOK EDTPT+1, ASKOK+2
ASL ASL+1
DATE DATE+4, MULTIVM+1
EDTPT EN1+10
MULTIVM EDTPT+1, MULTIVM, MULTIVM+1
Q EN1+8, EN1+9, EN1+11
Q5 EN2+2
SETUTIL EN1+9
SETWLO SETUTIL+1, SETUTIL+2
WRDST SETUTIL+1, SETUTIL+2

Naked Globals

Name Field # of Occurrence
^( EDTPT+1
^(0 SETUTIL+1, WRDST+5, SETWLO+3
^(44 WRDST+3, WRDST+4, SETWLO+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% ASKOK+1*, ASKOK+2, ASL*, ASL+1, Q+1!, MULTIVM*
%DT DATE+2*!
%DT("A" DATE+2*
%DT(0 DATE+2*
C Q+1!
DFN EDTPT+1*, SETUTIL+1, SETUTIL+2*, WRDST+6, EN2+2, Q5!
DIC Q5!
DIC(0 EN2+2*
DT DATE+4
GDT Q+1!
>> GMRENTY EN1+8, EDTPT+2*, MULTIVM+1*
GMROK Q+1!
GMROUT EN1+5*, EN1+8, EDTPT+1, ASKOK+1*, Q+1!, MULTIVM+1
GMROV Q+1!
GMRP Q+1!
>> GMRSTR EDTPT+2*
GMRTYPE Q+1!
>> GMRVHLOC EDTPT+1*
GMRVIDT EN1+5*, DATE+5*, Q+1!
GMRVIEN Q+1!
GNUROP EN1+5*, Q+1!
I Q+1!
IOST WRDST+1
J Q+1!
K Q+1!
NACT EN2+2*, Q5!
NAME Q+1!
NASK EN2+2*, Q5!
NBED EN1+10*, EDTPT+1, ASKOK+1, Q+1!
NN EN1+10*, Q+1!
NPWARD Q+1!
>> NRMBD EN1+9
>> NRMBD( WRDST+2
NROOM Q+1!
NUREDB EN1+9, EDTPT+1, SETUTIL+1, SETUTIL+2, WRDST+2, Q+1!
NURENTY EDTPT+2*, Q+1!, MULTIVM+1*
NURHLO WRDST+3*, WRDST+4*, WRDST+5*, WRDST+6, Q+1!
NURHLO( SETWLO+3*
NURNAM EN1+10*, EDTPT+1, ASKOK+1, Q+1!
NURP Q+1!
NURQUIT EN1+5*, EN1+7*, EN1+9, EN1+10, EDTPT+1*, ASKOK+1*, ASL*, DATE+3*, Q+1!, MULTIVM+1
NURQUIT(1 EN1+7*, EDTPT+1, ASKOK+1*, ASL+2*
NURRM EN1+10*, EDTPT+1, ASKOK+1, Q+1!
>> NURSDBA EN1+5
NURSTR EDTPT+2*, Q+1!
NURWARD SETUTIL+1*, SETUTIL+2, WRDST+5, SETWLO+3, Q+1!
NURWLO WRDST+4, SETWLO+3*, SETWLO+4*, Q+1!
NURX Q+1!
>> VADM(1 WRDST+2, WRDST+6
>> VAIN(4 WRDST+3
>> VAIN(5 WRDST+2, WRDST+6
W Q+1!
>> X SETWLO+3*, DATE+2*, DATE+3
Y SETWLO+3*, SETWLO+4, DATE+3, DATE+4, DATE+5, Q+1!
Z SETWLO+3*, Q+1!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All