Routine: BGP4DPEE

Information

BGP4DPEE ; IHS/CMI/LAB - IHS gpra print ;

Package	Total	Call Graph
IHS Patient	1	$$HRN^AUPNPAT

Package	Total	Caller Graph
IHS GPRA Information System	1	BGP4DPED

Name	Comments	DBIA/ICR reference
LOC()	;EP - Return location name from file 4 based on DUZ(2).
CTR(X,Y)	;EP - Center X in a field Y wide.
H1	;
S(Y,F,P)	;set up array
START	;
USR()	;EP - Return name of current user from ^VA(200.
GO
CALC
PRINTL	;print one line

Name	Field # of Occurrence
$$HRN^AUPNPAT	PRINTL+3

Name	Line Occurrences (* Changed, ! Killed)
^BGPPEIJ - [#90552.15]	GO+3, GO+7, GO+8, GO+9, GO+10, GO+16, GO+17, GO+18, GO+19, GO+25 , GO+26, GO+27, GO+28, GO+29, GO+30, H1+5
^DIC(4 - [#4]	LOC+1
^DPT - [#2]	PRINTL+3
^TMP($J	S+2, S+3, S+4*
^VA(200 - [#200]	USR+1
^XTMP("BGP4PE"	CALC+1, CALC+2, CALC+3, CALC+4, PRINTL+4, PRINTL+5

Name	Line Occurrences
CALC	GO+5
GO	START+9, START+10
H1	CALC
PRINTL	CALC+4
S	START+3, GO+1, GO+2, GO+3, GO+4, GO+6, GO+10, GO+14, GO+15, GO+19 , GO+23, GO+26, GO+27, GO+28, GO+29, GO+30, CALC+8, CALC+9, CALC+10, PRINTL+3 , PRINTL+4, PRINTL+5, H1+2, H1+3, H1+4, H1+5, H1+6, H1+7, H1+8

Name	Field # of Occurrence
^(0	USR+1, LOC+1

Name	Field # of Occurrence
>> %	S+2*, S+3, S+4
>> BGPAGE	CALC+3*, CALC+4, PRINTL+3, PRINTL+4, PRINTL+5
>> BGPAREAA	START+1
>> BGPCNT	START+7, START+8, START+9, START+10, START+11*, PRINTL+1
>> BGPCOM	CALC+1*, CALC+2, CALC+3, CALC+4, PRINTL+3, PRINTL+4, PRINTL+5
>> BGPCOUNT	START+6, CALC+4, PRINTL+1
>> BGPDNT	GO+5
>> BGPEPROV	H1+2
>> BGPH	CALC+1, CALC+2, CALC+3, CALC+4, PRINTL+4, PRINTL+5
>> BGPJ	CALC+1, CALC+2, CALC+3, CALC+4, PRINTL+4, PRINTL+5
>> BGPL	START+5*, START+7, GO+3, GO+7, GO+8, GO+9, GO+10, GO+16, GO+17, GO+18 , GO+19, GO+25, GO+26, GO+27, GO+28, GO+29, GO+30, CALC+1, CALC+2, CALC+3 , CALC+4, PRINTL+4, PRINTL+5, H1+5
>> BGPLIST	START+2, START+9, H1+2
>> BGPLIST(	START+5, START+7
>> BGPLPROV	H1+2
>> BGPNODE	GO+24*, GO+25, GO+26
>> BGPPCNT	START+6, CALC+10, PRINTL+2
>> BGPSEX	CALC+2*, CALC+3, CALC+4, PRINTL+3, PRINTL+4, PRINTL+5
>> BGPX	GO+7, GO+8, GO+16, GO+17, GO+25, GO+26, GO+27, GO+28, GO+29*, GO+30
>> BGPY	GO+8, GO+9, GO+10, GO+17, GO+18, GO+19
>> BGPZ	GO+9, GO+10, GO+18, GO+19
>> DFN	CALC+4*, PRINTL+3, PRINTL+4, PRINTL+5
DUZ	USR+1
DUZ(2	PRINTL+3, LOC+1
F	S~, S+1*, S+2
IOM	CTR+1
P	S~, S+4
U	GO+3, PRINTL+3, PRINTL+4, PRINTL+5, S+2, S+4, USR+1, LOC+1
X	START+3, GO+1, GO+2, GO+3, GO+4, GO+6, GO+14, GO+15, GO+19, GO+23 , GO+26, GO+27, GO+28, GO+29, GO+30, CALC+8, CALC+9, CALC+10, PRINTL+3, PRINTL+4 , PRINTL+5, H1+2, H1+3, H1+4, H1+5, H1+6, H1+7, H1+8, CTR~, CTR+1
Y	GO+10, H1+5, S~, S+4, CTR~, CTR+1