Routine: GMVBP2

Package	Total	Caller Graph
General Medical Record - Vitals	11	GMVBP1 GMVBP3 GMVGR2 GMVGR3 GMVGR6 GMVGR7 GMVKPN1 GMVKPO2 GMVKPO3 GMVWT2 GMVWT3

Entry Points

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"!R! RES; DAM;" Line Location: EN1+1
Function Call: WRITE	Prompt: !,"MCRO BOX;" Line Location: BOX+0
Function Call: WRITE	Prompt: !,"UNIT C; SLM 3; STM 1; MAP 0,0; SPD 0.05; BOX 16,23; MAP -3,20; BOX 19,3;" Line Location: BOX+1
Function Call: WRITE	Prompt: !,"FONT 40; MAP -2,0.5; TEXT 'Date/Time'; MAP -2.5,1; TEXT 'Blood Pressure';" Line Location: BOX+2
Function Call: WRITE	Prompt: !,"SPD 0.01; MAP -0.8,2; TEXT '220'; MAP 0,1; DAP 16,1; MAP -0.8,3; TEXT '210'; MAP 0,2; DAP 16,2;" Line Location: BOX+3
Function Call: WRITE	Prompt: !,"MAP -0.8,4; TEXT '200'; MAP 0,3; DAP 16,3;" Line Location: BOX+4
Function Call: WRITE	Prompt: !,"MAP -0.8,5; TEXT '190'; MAP 0,4; DAP 16,4; MAP -0.8,6; TEXT '180'; MAP 0,5; DAP 16,5; MAP -0.8,7; TEXT '170'; MAP 0,6; DAP 16,6;" Line Location: BOX+6
Function Call: WRITE	Prompt: !,"MAP -0.8,8; TEXT '160'; MAP 0,7; DAP 16,7;" Line Location: BOX+7
Function Call: WRITE	Prompt: !,"MAP -0.8,9; TEXT '150'; MAP 0,8; DAP 16,8; MAP -0.8,10; TEXT '140'; MAP 0,9; DAP 16,9; MAP -0.8,11; TEXT '130'; MAP 0,10; DAP 16,10;" Line Location: BOX+8
Function Call: WRITE	Prompt: !,"MAP -0.8,12; TEXT '120'; MAP 0,11; DAP 16,11; MAP -0.8,13; TEXT '110'; MAP 0,12; DAP 16,12; MAP -0.8,14; TEXT '100'; MAP 0,13; DAP 16,13;" Line Location: BOX+9
Function Call: WRITE	Prompt: !,"MAP -0.7,15; TEXT '90'; MAP 0,14; DAP 16,14; MAP -0.7,16; TEXT '80'; MAP 0,15; DAP 16,15; MAP -0.7,17; TEXT '70'; MAP 0,16; DAP 16,16;" Line Location: BOX+10
Function Call: WRITE	Prompt: !,"MAP -0.7,18; TEXT '60'; MAP 0,17; DAP 16,17; MAP -0.7,19; TEXT '50'; MAP 0,18; DAP 16,18; MAP 0,19; DAP 16,19;" Line Location: BOX+11
Function Call: WRITE	Prompt: !,"FONT 57; MAP -3,20.4; TEXT 'Pulse'; SPD .03; MAP -3,20.5; DAP 16,20.5; MAP -3,21;DAP 16,21; MAP -3,21.4; TEXT 'Blood Pressure';" Line Location: BOX2+1
Function Call: WRITE	Prompt: !,"MAP -3,21.5; DAP 16,21.5; MAP 16,22; DAP -3,22; MAP -3,22.5; DAP 16,22.5; MAP -3,22.9; TEXT 'MAP';" Line Location: BOX2+2
Function Call: WRITE	Prompt: !,"SPD 0.03;" Line Location: VERT+0
Function Call: WRITE	Prompt: !,I(1) Line Location: VERT+1
Function Call: WRITE	Prompt: !,"FONT 57; MAP -3,23.4; TEXT 'S: Systolic B/P D: Diastolic B/P MAP: Mean Arterial Pressure * - Abnormal value ** - Abnormal value off of graph';" Line Location: VERT+2
Function Call: WRITE	Prompt: !,"MAP 12,25; FONT 56; TEXT 'MEDICAL RECORD'; MAP 12,25.4; TEXT 'B/P PLOTTING CHART'; MAP 12,25.8; TEXT 'VA STANDARD FORM 512-A';" Line Location: FORM+0
Function Call: WRITE	Prompt: !,"ENDM;" Line Location: FORM+1
Function Call: WRITE	Prompt: !,"MCRO DATE; FONT 56;" Line Location: DATE+0
Function Call: WRITE	Prompt: !,"ENDM;" Line Location: DATE+1
Function Call: WRITE	Prompt: !,"MCRO TIME;" Line Location: TIME+0
Function Call: WRITE	Prompt: !,"ENDM;" Line Location: TIME+1
Function Call: WRITE	Prompt: !,I(1) Line Location: WRTEXT+2
Function Call: WRITE	Prompt: !,I(1) Line Location: WRTEXT+4

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> GTNM	BOX+5
>> I	VERT, WRTEXT+1, WRTEXT+3*
>> I(1	VERT, VERT+1, WRTEXT+1, WRTEXT+2, WRTEXT+3*, WRTEXT+4
>> J	DATE, TIME, WRTEXT+1, WRTEXT+3

Customize PDF page

Package: General Medical Record - Vitals

Routine: GMVBP2

Information

Source Information

Caller Graph

Caller Graph Total: 11

Entry Points

Interaction Calls

Label References

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
BOX
VERT
FORM
EN1	;
TIME
DATE
WRTEXT	;
BOX2	;