Routine: GMRVVS2

Package	Total	Call Graph
General Medical Record - Vitals	1	SYNOARY^GMRVLGQU
Kernel	1	$$REPEAT^XLFSTR
Registration	1	INP^VADPT
VA Fileman	1	$$GET1^DIQ

Package	Total	Caller Graph
General Medical Record - Vitals	5	GMRVLBP0 GMRVLPO0 GMRVLWT1 GMRVSR1 GMRVVS1

Entry Points

Name	Comments	DBIA/ICR reference
DATES	;PRINT DATE/TIME COLUMNS FOR VITAL SIGNS-I/O SHEET
FOOTER	;PRINT VITAL SIGNS-I/O SHEET FOOTER
HEADER	;PRINT HEADER FOR VITAL SIGNS-I/O SHEET
BP	;
IO	;PRINT INTAKE/OUTPUT SECTION OF VITAL SIGNS-I/O SHEET
SETDATA	; FILL GMRLINE WITH I/O DATA AND WRITE GMRLINE

Name	Line Occurrences
Function Call: WRITE	Prompt: !,?15,"\|",?16,GMRX Line Location: IO+10
Function Call: WRITE	Prompt: !,"Intake(24 Hr)(cc)",?20,"\|",GMRX Line Location: IO+11
Function Call: WRITE	Prompt: !,?20,"\|",?21,GMRX Line Location: IO+12
Function Call: WRITE	Prompt: !,?10,"\|",?11,GMRX Line Location: IO+14
Function Call: WRITE	Prompt: !,"Output(24 Hr)(cc)",?20,"\|",GMRX Line Location: IO+15
Function Call: WRITE	Prompt: !,?20,"\|",?21,GMRX Line Location: IO+17
Function Call: WRITE	Prompt: " "_GMRBTH Condition for execution: SSN'="" " "_SSN W:GMRBTH'="" Line Location: FOOTER+1
Function Call: WRITE	Prompt: " "_GMRSEX Condition for execution: GMRAGE'="" " "_GMRAGE_" YRS" W:GMRSEX'="" Line Location: FOOTER+1
Function Call: WRITE	Prompt: ?95,"MEDICAL RECORD" Line Location: FOOTER+2
Function Call: WRITE	Prompt: !,"Unit: "_$S(GMRWARD(1)'="":GMRWARD(1),1:" ")," "_"Room: "_$S($P(VAIN(5),"^")'="":$P($P(VAIN(5),"^"),"-",1,2),1:" "),?95,"VITAL FLOW SHEET" Line Location: FOOTER+2
Function Call: WRITE	Prompt: !,"Division: "_$S(GMRVHLOC>0:$$GET1^DIQ(4,+$$GET1^DIQ(44,+GMRVHLOC,3,"I"),.01,"I"),1:""),?55,"Page "_GMRPGC,?95,"VAF 10-7987 VICE SF 511",! Line Location: FOOTER+4
Function Call: WRITE	Prompt: GSTRFIN Line Location: FOOTER+5
Function Call: WRITE	Prompt: ?17,"\|",?18,GMRLINE Line Location: DATES+3
Function Call: WRITE	Prompt: !,?116,"PAGE ",GMRPGC,! Line Location: HEADER+2

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

Name	Line Occurrences (* Changed, ! Killed)
^DIC(42 - [#42]	FOOTER+3
^GMRD(126.56 - [#126.56]	IO+13
^GMRD(126.58 - [#126.58]	IO+18
^TMP($J	IO+1!, IO+4, IO+5, IO+6, IO+7, IO+8, IO+9, SETDATA+1, SETDATA+2!, DATES+1 , DATES+2, BP+1, BP+3

Name	Field # of Occurrence
^(	BP+3

Name	Field # of Occurrence
>> GDATA	SETDATA+2*
>> GDT	IO+4, IO+5, IO+6, IO+7, IO+8, IO+9, SETDATA+2
>> GFLAG	HEADER+1*
>> GI	IO+16, IO+18, BP+4
>> GMR("B"	BP+1*, BP+2, BP+3, BP+5, BP+6
>> GMRAGE	FOOTER+1
>> GMRBTH	FOOTER+1
>> GMRDT	IO+4, IO+9, DATES+1, DATES+2, BP+1, BP+3
>> GMRI	IO+2, IO+3, IO+5, IO+6, IO+7, IO+8, IO+11, IO+12, IO+13, IO+14* , IO+17, SETDATA+1, SETDATA+2, DATES+1, DATES+2
>> GMRI(1	IO+12, IO+14, IO+17*
>> GMRINF	BP+3*
>> GMRJ	DATES+1, DATES+2
>> GMRLINE	DATES+1, DATES+2, DATES+3
>> GMRLINE(	IO+2!, IO+3!, IO+6, IO+8, IO+11, IO+13, IO+16, IO+18, SETDATA+2*
>> GMRLINE("B"	BP+2, BP+5
>> GMRLINE("B1"	BP+2, BP+6
>> GMRLINE("B2"	BP+2, BP+7
>> GMRNAM	FOOTER+1
>> GMRNM	IO+4, IO+9, SETDATA+2, BP+2, BP+5, BP+6, BP+7
>> GMRPGC	FOOTER+4, HEADER+1*, HEADER+2
>> GMRSEX	FOOTER+1
>> GMRSITE	BP+3*, BP+6, BP+7
>> GMRSITE(1	BP+3*, BP+4
>> GMRVHLOC	FOOTER+3*, FOOTER+4
>> GMRVJ	BP+3*
>> GMRWARD(1	FOOTER+2
>> GMRX	IO+10, IO+11, IO+12, IO+14, IO+15, IO+17
>> GMRX1	IO+6, IO+8, DATES+1, DATES+2
>> GMRY	SETDATA+1*, SETDATA+2
>> GMRYDT	IO+6, IO+8
>> GN(1	IO+2, IO+5, IO+11, IO+13
>> GN(2	IO+3, IO+7, IO+16, IO+18
>> GSTRFIN	FOOTER+5
IOF	HEADER+1
IOSL	IO+10, IO+12, IO+14, IO+17
IOST	HEADER+1
>> NN	IO+2, IO+3, IO+5, IO+6, IO+7, IO+8, IO+11, IO+13, IO+16, IO+18
>> SSN	FOOTER+1
>> VAIN(4	FOOTER+3
>> VAIN(5	FOOTER+2