Routine: GMRVSC0

Package	Total	Call Graph
General Medical Record - Vitals	3	FOOTER^GMRVSC0 (PRT,SETAR,SETAR1)^GMRVSC1 HDR^GMRVSC2
VA Fileman	3	^%DT NOW^%DTC ($$GET1,D)^DIQ
Kernel	1	^%ZISC
Registration	1	(DEM,INP,KVAR)^VADPT

Package

Total

Call Graph

General Medical Record - Vitals

FOOTER^GMRVSC0 (PRT,SETAR,SETAR1)^GMRVSC1 HDR^GMRVSC2

VA Fileman

^%DT NOW^%DTC ($$GET1,D)^DIQ

Kernel

^%ZISC

Registration

(DEM,INP,KVAR)^VADPT

Package	Total	Caller Graph
General Medical Record - Vitals	4	GMRV CUMULATIVE V/M GMRVSC0 GMRVSC1 GMRVSC2
Barcode Medication Administration	1	PSBOVT
Nursing Service	1	NURCVPR0
Order Entry Results Reporting	1	ORPRS14

Package

Total

Caller Graph

General Medical Record - Vitals

GMRV CUMULATIVE V/M GMRVSC0 GMRVSC1 GMRVSC2

Barcode Medication Administration

PSBOVT

Nursing Service

NURCVPR0

Order Entry Results Reporting

ORPRS14

Entry Points

Name	Comments	DBIA/ICR reference
DATE	;W !,"CALLED BY IA 1444 - NURSING, BCMA"
EN3(DFN,GMRVSDT,GMRVFDT)	; APPLICATION PROGRAM INTERFACE FOR PATIENT CUMULATIVE VITALS REPORT ; INPUT VARIABLES: DFN=PATIENT NUMBER ; GMRVSDT=START DATE ; GMRVFDT=FINISH DATE OF REPORT
EN5	;CALLED BY [NURCPP-VIT-CUM] - IA 1444, NURSING, BCMA
Q3
FOOTER	;REPORT FOOTER SUBROUTINE

Name	Field # of Occurrence
^%DT	DATE+1, DATE+3
NOW^%DTC	DATE+4, EN5+2
^%ZISC	Q3+3
$$GET1^DIQ	FOOTER+5
D^DIQ	EN5+2
FOOTER^GMRVSC0	Q3+1
PRT^GMRVSC1	EN5+9
SETAR^GMRVSC1	EN5+5
SETAR1^GMRVSC1	EN5+5
HDR^GMRVSC2	EN5+6
DEM^VADPT	EN5+1
INP^VADPT	EN5+1
KVAR^VADPT	Q3+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,?3,"PRINTED REPORTS MUST BE QUEUED!!",$C(7) Line Location: GMRVSC0+16
Function Call: WRITE	Prompt: !,?3,$C(7),"THE START DATE MUST BE BEFORE THE END DATE OF THIS REPORT" Line Location: DATE+6
Function Call: WRITE	Prompt: !!,"*** (E) - Error entry",!! Line Location: FOOTER+1
Function Call: WRITE	Prompt: ?17,$P($P(VADM(2),"^",2),"-",3) Condition for execution: VADM(1)'="" ?$X-3,$E(VADM(1),1,15) W:VADM(2)'="" Line Location: FOOTER+1
Function Call: WRITE	Prompt: ?43,$P(VADM(4),"^")_" YRS" Condition for execution: VADM(3)'="" ?30,$P(VADM(3),"^",2) W:VADM(4)'="" Line Location: FOOTER+1
Function Call: WRITE	Prompt: ?65,"VAF 10-7987j" Line Location: FOOTER+3
Function Call: WRITE	Prompt: !,"Unit: "_$S($P(VAIN(4),"^",2)'="":$P(VAIN(4),"^",2),1:" "),?32,"Room: "_$S($P(VAIN(5),"^")'="":$P(VAIN(5),"^"),1:" "),! Line Location: FOOTER+3
Function Call: WRITE	Prompt: "Division: "_$S(GMRVHLOC>0:$$GET1^DIQ(4,+$$GET1^DIQ(44,+GMRVHLOC,3,"I"),.01,"I"),1:""),! Line Location: FOOTER+5
Function Call: WRITE	Prompt: !!,"No cumulative vitals data for "_$S($D(OPSPNM):ORSPNM,1:"this patient"),! Line Location: EN5+7
Function Call: WRITE	Prompt: ! Line Location: Q3+0
Function Call: READ	Timeout: DTIME Variable: X Line Location: Q3+1
Function Call: WRITE	Prompt: ! Line Location: Q3+1

FileNo	Call Tags
^DIC(4 - [#4]	GET1^DIQ
^SC - [#44]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^DIC(42 - [#42]	FOOTER+4
^GMRD(120.51 - [#120.51]	EN5+5
^GMRD(120.52 - [#120.52]	EN5+3
^TMP($J	EN5+4!, EN5+7, EN5+9, Q3+2!

Name	Line Occurrences
DATE	DATE+6
Q3	EN5+7

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	DATE+4, EN5+2
%DT	DATE+1!, DATE+3!
%DT("A"	DATE+1, DATE+3
%DT("B"	DATE+1, DATE+3
DFN	EN3~
DT	DATE+4
DTIME	Q3+1
GBED	EN5+1*, Q3+2!
GMR1ST	EN5+2*, Q3+2!
GMRDAT	Q3+2!
>> GMRDATE	EN5+8, EN5+9
>> GMRDATE(0	EN5+2*
GMRDSH	EN5+2*, Q3+2!
GMRLN	Q3+2!
>> GMROUT	DATE+1, DATE+3, EN5+1, EN5+7, EN5+9, Q3+1*
GMRPDT	EN5+2*, Q3+2!
GMRPG	EN5+1*, Q3+3!
GMRQUAL	Q3+2!
GMRSITE	Q3+2!
GMRSP	Q3+2!
GMRVDA	Q3+2!
GMRVDATE	Q3+2!
>> GMRVDT(	EN5+9
GMRVFDT	DATE+7*, EN3~, Q3+3!
>> GMRVHLOC	FOOTER+4*, FOOTER+5
GMRVITY	EN5+5*, Q3+2!
GMRVOR	EN3+5*, Q3+1, Q3+2!
GMRVSDT	DATE+2*, DATE+6, EN3~, Q3+3!
GMRVTY	EN5+4*, EN5+5, Q3+2!
GMRVX	Q3+2!
GMRX	DATE+1, Q3+2!
GMRY	Q3+2!
GPEDIS	EN5+3~*
GWARD	EN5+1*, Q3+2!
GX	Q3+2!
IO	EN5+6
IOSL	Q3
IOST	Q3+1
>> OPSPNM	EN5+7
>> ORSPNM	EN5+7, Q3+3
VA	Q3+2!
>> VADM(1	FOOTER+1
>> VADM(2	FOOTER+1
>> VADM(3	FOOTER+1
>> VADM(4	FOOTER+1
>> VADM(5	FOOTER+2
>> VAIN(4	FOOTER+3, FOOTER+4, EN5+1
>> VAIN(5	FOOTER+3, EN5+1
>> X	DATE+3, Q3, Q3+1
>> Y	DATE+1, DATE+2, DATE+4, DATE+5, DATE+6, DATE+7, EN5+2*
>> ZTQUEUED	Q3+3
>> ZTREQ	Q3+3*

Customize PDF page

Package: General Medical Record - Vitals

Routine: GMRVSC0

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 7

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: