Routine: BGP1CPU

Package	Total	Call Graph
IHS GPRA Information System	3	(HDR,L1H)^BGP1CP GETTXT^BGP1CPU4 $$DATE^BGP1UTL
DRG Grouper	1	$$ICDDX^ICDCODE
IHS Patient	1	$$DOD^AUPNPAT
IHS VA Utilities	1	($$VAL,$$VALI)^XBDIQ1
Kernel	1	$$UP^XLFSTR
Patient Care Component Reports	1	$$PRIMPOV^APCLV
VA Fileman	1	^DIR

Package	Total	Caller Graph
IHS GPRA Information System	7	BGP1CP1 BGP1CP11 BGP1CP2 BGP1CP3 BGP1CP4 BGP1CP5 BGP1CP6

Name	Comments	DBIA/ICR reference
WPPDPOV(V)	;EP
WIVUD	;EP - write out all allergies from problem list
WADM(I)	;EP
WLASTAP	;EP - write out last rx
USR()	;EP - Return name of current user from ^VA(200.
WADM92(I)	;EP
WCESS	;EP write out CESSATION DATA
WINS(V,P)	;EP
WALLALGT	;EP - write out all allergies from allergy tracking
WCOMFORT(X)	;EP - write out comfort message
WBETAAL	;EP - write out BETA allergy
WASAALEG	;EP - write out asa allergy
WDT(V)	;EP - write discharge type at column 3
WTT(V)	;EP - write transferred to
WNMIASP	;EP - write out nmi aspirin
WNMIBETA	;EP - write out nmi BETA BLOCKER
WLASTASP	;EP - write out last rx
WRACE(P)	;EP
WDOD(V)	;EP - write dod
OTHDPOVS(V)	;EP write out other discharge povs
WDXS	;EP write out DX
WNMIACE(X)	;EP - write out nmi ACE/ARB
WZIP(P)	;EP
WSMOKER	;EP write out smoking data
WAORTIC	;EP write out DX
WADMS92(I)	;EP
WLASTACE	;EP - write out ace/arb
WLVSD	;EP write out lsvd/cef
WACEALEG	;EP - write out asa allergy
WASPCPT(X)	;EP
WLASTBB	;EP write out beta blocker status
WALLALG	;EP - write out all allergies from problem list
WCESSMED	;EP write out CESSATION DATA
EOP	;EP - End of page.
WDOB(P)	;EP
CTR(X,Y)	;EP - Center X in a field Y wide.
WWARRX	;EP - write out all warfarin rxs
WDSGS92(I)	;EP

Name	Field # of Occurrence
$$PRIMPOV^APCLV	WPPDPOV+2
$$DOD^AUPNPAT	WDOD+2, WDOD+3
HDR^BGP1CP	WDOB+1, WRACE+1, WZIP+1, WADM+1, WADM92+1, WADMS92+1, WDSGS92+1, WINS+2, WINS+11, WINS+24 , WINS+51, WBETAAL+1, WLASTBB+1, WLASTBB+7, WNMIBETA+2, WNMIBETA+4, WNMIBETA+7, WNMIBETA+9, WCESSMED+2, WCESS+2 , WSMOKER+2, WAORTIC+2, WLASTACE+1, WNMIACE+2, WNMIACE+4, WACEALEG+1, WDXS+2, WLVSD+2, WIVUD+2, WIVUD+8 , WWARRX+2, WASAALEG+1, WALLALG+2, WALLALG+6, WALLALGT+2, WALLALGT+6, WLASTAP+1, WLASTAP+10, WLASTASP+1, WLASTASP+10 , WASPCPT+2, WNMIASP+2, WNMIASP+4, WNMIASP+8, WCOMFORT+2, WCOMFORT+4, WDOD+1, WDT+1, WTT+1, WPPDPOV+1 , OTHDPOVS+7
L1H^BGP1CP	WDOB+1, WRACE+1, WZIP+1, WADM+1, WADM92+1, WADMS92+1, WDSGS92+1, WINS+2, WINS+11, WINS+24 , WINS+51, WBETAAL+1, WLASTBB+1, WNMIBETA+2, WNMIBETA+4, WNMIBETA+7, WNMIBETA+9, WCESSMED+2, WCESS+2, WSMOKER+2 , WAORTIC+2, WLASTACE+1, WNMIACE+2, WNMIACE+4, WACEALEG+1, WDXS+2, WLVSD+2, WIVUD+2, WWARRX+2, WASAALEG+1 , WALLALG+2, WALLALG+6, WALLALGT+2, WALLALGT+6, WLASTAP+1, WLASTASP+1, WASPCPT+2, WNMIASP+2, WNMIASP+4, WNMIASP+8 , WCOMFORT+2, WCOMFORT+4, WDOD+1, WDT+1, WTT+1, WPPDPOV+1, OTHDPOVS+7
GETTXT^BGP1CPU4	WLASTBB+5, WIVUD+6, WLASTAP+8, WLASTASP+8
$$DATE^BGP1UTL	WDOB+2, WINS+12, WINS+25, WINS+44, WINS+52, WCESSMED+5, WCESS+5, WIVUD+3, WDOD+3
^DIR	EOP+5
$$ICDDX^ICDCODE	OTHDPOVS+13
$$VAL^XBDIQ1	WRACE+2, WZIP+2, WADM+2, WADM92+2, WADMS92+2, WDSGS92+3, WINS+25, WINS+42, WDT+2, WTT+2 , OTHDPOVS+14
$$VALI^XBDIQ1	WDSGS92+3
$$UP^XLFSTR	OTHDPOVS+14

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !?2,"Date of Birth: ",$$DATE^BGP1UTL($P(^DPT(P,0),U,3)) Line Location: WDOB+2
Function Call: WRITE	Prompt: !!?2,"Race: ",$$VAL^XBDIQ1(2,DFN,.06) Line Location: WRACE+2
Function Call: WRITE	Prompt: !?2,"Postal Code: ",$$VAL^XBDIQ1(2,P,.116) Line Location: WZIP+2
Function Call: WRITE	Prompt: !?2,"Admission Type: ",$$VAL^XBDIQ1(9000010.02,I,.07) Line Location: WADM+2
Function Call: WRITE	Prompt: !?2,"Admission Type-UB92: ",$$VAL^XBDIQ1(9000010.02,I,6101) Line Location: WADM92+2
Function Call: WRITE	Prompt: !?2,"Admission Source-UB92: ",$$VAL^XBDIQ1(9000010.02,I,6102) Line Location: WADMS92+2
Function Call: WRITE	Prompt: !?2,"Discharge Status-UB92: " Line Location: WDSGS92+3
Function Call: WRITE	Prompt: $$VAL^XBDIQ1(99999.04,T,.02) Line Location: WDSGS92+3
Function Call: WRITE	Prompt: !?2,"Insurance Status: " Line Location: WINS+3
Function Call: WRITE	Prompt: !?3,"Medicare Coverage Type: ",$P(^AUPNMCR(P,11,I,0),U,3)," Policy #: ",$P(^AUPNMCR(P,0),U,3)," Effective Date: ",$$DATE^BGP1UTL($P(^AUPNMCR(P,11,I,0),U)) Line Location: WINS+12
Function Call: WRITE	Prompt: !?3,"Private ",$P(^AUTNINS(X,0),U) Line Location: WINS+38
Function Call: WRITE	Prompt: " Coverage Type: ",C,!?10," Policy #: ",N," Effective Date: ",$$DATE^BGP1UTL($P(^AUPNPRVT(P,11,I,0),U,6)) Line Location: WINS+44
Function Call: WRITE	Prompt: !?3,"Railroad Coverage Type: ",$P(^AUPNRRE(P,11,I,0),U,3)," Policy #: ",$P(^AUPNRRE(P,0),U,4)," Effective Date: ",$$DATE^BGP1UTL($P(^AUPNRRE(P,11,I,0),U)) Line Location: WINS+52
Function Call: WRITE	Prompt: "No Insurance per Patient Registration" Line Location: WINS+55
Function Call: WRITE	Prompt: ! Line Location: WINS+56
Function Call: WRITE	Prompt: !!?2,$S(BGPPEX[8:"*",1:""),"Beta Blocker Allergy? " Line Location: WBETAAL+2
Function Call: WRITE	Prompt: "No, None Recorded" Line Location: WBETAAL+3
Function Call: WRITE	Prompt: !?4,X Line Location: WBETAAL+4
Function Call: WRITE	Prompt: !!?2,"Beta Blocker Rx Status? " Line Location: WLASTBB+2
Function Call: WRITE	Prompt: "No Rxs documented" Line Location: WLASTBB+3
Function Call: WRITE	Prompt: !?4,BGPLETXT(BGPZZ) Line Location: WLASTBB+7
Function Call: WRITE	Prompt: !?4,Z Line Location: WLASTBB+9
Function Call: WRITE	Prompt: !!?2,"NMI Refusal: Yes" Line Location: WNMIBETA+5
Function Call: WRITE	Prompt: !?4,Z Line Location: WNMIBETA+10
Function Call: WRITE	Prompt: !,"NOTE: The patient's chart needs to be reviewed to determine if this was" Line Location: WNMIBETA+11
Function Call: WRITE	Prompt: !,"documented by a physician/APN/PA before it is used to exclude patients" Line Location: WNMIBETA+12
Function Call: WRITE	Prompt: !,"from the denominator." Line Location: WNMIBETA+13
Function Call: WRITE	Prompt: !!?2,"Smoking Cessation Medication Rx Status? " Line Location: WCESSMED+3
Function Call: WRITE	Prompt: "No Rxs documented" Line Location: WCESSMED+4
Function Call: WRITE	Prompt: !?4,$$DATE^BGP1UTL($P(BGPDATA(X),U))," ",$P(BGPDATA(X),U,2) Line Location: WCESSMED+5
Function Call: WRITE	Prompt: !,"NOTE: Per the CMS Data Abstraction Guidelines, a prescription of a smoking " Line Location: WCESSMED+6
Function Call: WRITE	Prompt: !,"cessation aid during hospital stay or at discharge meets the numerator " Line Location: WCESSMED+7
Function Call: WRITE	Prompt: !,"requirements." Line Location: WCESSMED+8
Function Call: WRITE	Prompt: !!?2,"Smoking Cessation Advice/Counseling: " Line Location: WCESS+3
Function Call: WRITE	Prompt: "Nothing recorded" Line Location: WCESS+4
Function Call: WRITE	Prompt: !?4,$$DATE^BGP1UTL($P(BGPDATA(BGPXX),U))," ",$P(BGPDATA(BGPXX),U,2) Line Location: WCESS+5
Function Call: WRITE	Prompt: !!?2,"Smoking Data: " Line Location: WSMOKER+3
Function Call: WRITE	Prompt: "Nothing recorded" Line Location: WSMOKER+4
Function Call: WRITE	Prompt: !?4,BGPDATA(X) Line Location: WSMOKER+5
Function Call: WRITE	Prompt: !!?2,$S(BGPPEX[7:"*",1:""),"Moderate or Severe Aortic Stenosis? " Line Location: WAORTIC+3
Function Call: WRITE	Prompt: "No Recorded Dxs" Line Location: WAORTIC+4
Function Call: WRITE	Prompt: !?4,BGPDATA(X) Line Location: WAORTIC+5
Function Call: WRITE	Prompt: !!?2,"ACEI or ARB Rx Status? " Line Location: WLASTACE+2
Function Call: WRITE	Prompt: "No Rxs" Line Location: WLASTACE+3
Function Call: WRITE	Prompt: !?4,X Line Location: WLASTACE+4
Function Call: WRITE	Prompt: !?4,Z Line Location: WLASTACE+5
Function Call: WRITE	Prompt: !!?2,"NMI Refusal: Yes" Line Location: WNMIACE+5
Function Call: WRITE	Prompt: !?4,X(Y) Line Location: WNMIACE+6
Function Call: WRITE	Prompt: !,"NOTE: The patient's chart needs to be reviewed to determine if this was" Line Location: WNMIACE+7
Function Call: WRITE	Prompt: !,"documented by a physician/APN/PA before it is used to exclude patients" Line Location: WNMIACE+8
Function Call: WRITE	Prompt: !,"from the denominator." Line Location: WNMIACE+9
Function Call: WRITE	Prompt: !!?2,$S(BGPPEX[6:"*",1:""),"ACEI and/or ARB Allergy? " Line Location: WACEALEG+2
Function Call: WRITE	Prompt: "No, None Recorded" Line Location: WACEALEG+3
Function Call: WRITE	Prompt: !?4,"ACEI: Yes ",$P(X,U,2) Line Location: WACEALEG+4
Function Call: WRITE	Prompt: !?4,"ARB: Yes ",$P(Z,U,2) Line Location: WACEALEG+5
Function Call: WRITE	Prompt: !!?2,"Angioedema, Hyperkalemia, Hypotension, Renal Artery Stenosis, or Worsening" Line Location: WDXS+3
Function Call: WRITE	Prompt: !,"Renal Function/Renal Disease/Dysfunction? " Line Location: WDXS+4
Function Call: WRITE	Prompt: !?4,"None Recorded" Line Location: WDXS+5
Function Call: WRITE	Prompt: !?4,BGPDX(X) Line Location: WDXS+6
Function Call: WRITE	Prompt: !,"NOTE: The patient's chart needs to be reviewed to determine if this" Line Location: WDXS+7
Function Call: WRITE	Prompt: !,"was documented by a physician/APN/PA before it is used to exclude " Line Location: WDXS+8
Function Call: WRITE	Prompt: !,"patients from the denominator." Line Location: WDXS+9
Function Call: WRITE	Prompt: "None Recorded" Line Location: WLVSD+3
Function Call: WRITE	Prompt: !?4,BGPDATA(X) Line Location: WLVSD+4
Function Call: WRITE	Prompt: !,"NOTE: The patient's chart still needs to be reviewed to determine if the" Line Location: WLVSD+5
Function Call: WRITE	Prompt: !,"LVEF is <40% or the LVS narrative indicates moderate or severe systolic" Line Location: WLVSD+6
Function Call: WRITE	Prompt: !,"dysfunction. Refer to CMS Specification Manual for National Hospital" Line Location: WLVSD+7
Function Call: WRITE	Prompt: !,"Quality Measures, Appendix H, Table 1.5 (LVSD Notes Table) for information" Line Location: WLVSD+8
Function Call: WRITE	Prompt: !,"on determining if patient meets CMS LVSD criteria." Line Location: WLVSD+9
Function Call: WRITE	Prompt: !!?2,"ALL Unit Dose/IV Meds during Hospital Stay: ",$$DATE^BGP1UTL($P($P(^AUPNVSIT(BGPVSIT,0),U),"."))," - ",$$DATE^BGP1UTL($P($P(^AUPNVINP(BGPVINP,0),U),".")) Line Location: WIVUD+3
Function Call: WRITE	Prompt: !?4,BGPLETXT(BGPZZ) Line Location: WIVUD+8
Function Call: WRITE	Prompt: !!?2,$S(BGPPEX[4:"*",1:""),"Warfarin/Coumadin Contraindication?: " Line Location: WWARRX+3
Function Call: WRITE	Prompt: "No, None Recorded" Line Location: WWARRX+4
Function Call: WRITE	Prompt: !?4,BGPDATA(X) Line Location: WWARRX+5
Function Call: WRITE	Prompt: !!?2,$S(BGPPEX[3:"*",1:""),"Aspirin Allergy? " Line Location: WASAALEG+2
Function Call: WRITE	Prompt: "No, None Recorded" Line Location: WASAALEG+3
Function Call: WRITE	Prompt: !?4,"Yes ",X Line Location: WASAALEG+4
Function Call: WRITE	Prompt: !!?2,"ALL Allergies from Problem List: " Line Location: WALLALG+3
Function Call: WRITE	Prompt: !?4,BGPDATA(X) Line Location: WALLALG+4
Function Call: WRITE	Prompt: !!?2,"ALL Allergies from Allergy Tracking: " Line Location: WALLALGT+3
Function Call: WRITE	Prompt: !?4,BGPDATA(X) Line Location: WALLALGT+4
Function Call: WRITE	Prompt: !!?2,"Other Anti-Platelet Rx Status? " Line Location: WLASTAP+2
Function Call: WRITE	Prompt: "" Line Location: WLASTAP+3
Function Call: WRITE	Prompt: !?4,X Line Location: WLASTAP+4
Function Call: WRITE	Prompt: !?4,"UNIT DOSE/IV During Hospital Stay: " Line Location: WLASTAP+5
Function Call: WRITE	Prompt: !?6,BGPLETXT(BGPZZ) Line Location: WLASTAP+10
Function Call: WRITE	Prompt: !!?2,"Aspirin Rx Status? " Line Location: WLASTASP+2
Function Call: WRITE	Prompt: "" Line Location: WLASTASP+3
Function Call: WRITE	Prompt: !?4,X Line Location: WLASTASP+4
Function Call: WRITE	Prompt: !?4,"UNIT DOSE/IV During Hospital Stay: " Line Location: WLASTASP+5
Function Call: WRITE	Prompt: !?6,BGPLETXT(BGPZZ) Line Location: WLASTASP+10
Function Call: WRITE	Prompt: !?6,BGPUD(Y) Line Location: WLASTASP+14
Function Call: WRITE	Prompt: !?4,"CPT: ",X Line Location: WASPCPT+3
Function Call: WRITE	Prompt: !!?2,"NMI Refusal: Yes" Line Location: WNMIASP+5
Function Call: WRITE	Prompt: !,"NOTE: The patient's chart needs to be reviewed to determine if this was" Line Location: WNMIASP+11
Function Call: WRITE	Prompt: !,"documented by a physician/APN/PA before it is used to exclude patients" Line Location: WNMIASP+12
Function Call: WRITE	Prompt: !,"from the denominator." Line Location: WNMIASP+13
Function Call: WRITE	Prompt: !!?2,"Comfort Measures? ",X Line Location: WCOMFORT+5
Function Call: WRITE	Prompt: !,"NOTE: The patient's chart needs to be reviewed to determine if" Line Location: WCOMFORT+6
Function Call: WRITE	Prompt: !,"this was documented by a physician/APN/PA before it is used" Line Location: WCOMFORT+7
Function Call: WRITE	Prompt: !,"to exclude patients from the denominator. " Line Location: WCOMFORT+8
Function Call: WRITE	Prompt: !?2,$S(BGPPEX[1!(BGPPEX[5):"*",1:""),"Discharge Type: ",$$VAL^XBDIQ1(9000010.02,V,.06) Line Location: WDT+2
Function Call: WRITE	Prompt: !?2,"Transferred to: ",$$VAL^XBDIQ1(9000010.02,V,.09) Line Location: WTT+2
Function Call: WRITE	Prompt: !?2,"Primary Discharge POV: "_$$PRIMPOV^APCLV(V,"C")," ",$$PRIMPOV^APCLV(V,"N") Line Location: WPPDPOV+2
Function Call: WRITE	Prompt: !?2,"Other Discharge POVs for this visit:",$S(C=0:" None",1:"") Line Location: OTHDPOVS+8
Routine Call	DIR Line Location: EOP+5

Name	Line Occurrences (* Changed, ! Killed)
^AUPN3PPH - [#9000003.1]	WINS+40
^AUPNMCD - [#9000004]	WINS+19, WINS+20, WINS+22, WINS+25
^AUPNMCD("B"	WINS+18
^AUPNMCR - [#9000003]	WINS+8, WINS+9, WINS+10, WINS+12
^AUPNPRVT - [#9000006]	WINS+31, WINS+32, WINS+33, WINS+35, WINS+36, WINS+39, WINS+41, WINS+43, WINS+44
^AUPNRRE - [#9000005]	WINS+48, WINS+49, WINS+50, WINS+52
^AUPNVINP - [#9000010.02]	WIVUD+3
^AUPNVPOV - [#9000010.07]	OTHDPOVS+3, OTHDPOVS+4, OTHDPOVS+10, OTHDPOVS+11, OTHDPOVS+13
^AUPNVPOV("AD"	OTHDPOVS+2, OTHDPOVS+9
^AUPNVSIT - [#9000010]	WINS+6, WIVUD+3
^AUTNINS - [#9999999.18]	WINS+34, WINS+38
^AUTTPIC - [#9999999.65]	WINS+43
^DPT - [#2]	WDOB+2
^VA(200 - [#200]	USR+1

Name	Field # of Occurrence
^(0	WINS+10, WINS+22, WINS+36, WINS+50, USR+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> BGPDATA	WNMIBETA+1, WCESSMED+4, WCESS+4, WSMOKER+4, WAORTIC+4, WLVSD+3, WWARRX+4, WNMIASP+1
>> BGPDATA(	WNMIBETA+6, WNMIBETA+8, WCESSMED+1, WCESSMED+5, WCESS+1, WCESS+5, WSMOKER+1, WSMOKER+5, WAORTIC+1, WAORTIC+5 , WLVSD+1, WLVSD+4, WIVUD+1, WIVUD+4, WIVUD+5, WWARRX+1, WWARRX+5, WALLALG+1, WALLALG+5, WALLALG+7 , WALLALGT+1, WALLALGT+5, WALLALGT+7, WNMIASP+6, WNMIASP+7, WNMIASP+9
>> BGPDX	WDXS+5
>> BGPDX(	WDXS+1, WDXS+6
>> BGPIOSL	WDOB+1, WRACE+1, WZIP+1, WADM+1, WADM92+1, WADMS92+1, WDSGS92+1, WINS+2, WINS+11, WINS+24 , WINS+51, WBETAAL+1, WLASTBB+1, WLASTBB+7, WNMIBETA+2, WNMIBETA+4, WNMIBETA+7, WNMIBETA+9, WCESSMED+2, WCESS+2 , WSMOKER+2, WAORTIC+2, WLASTACE+1, WNMIACE+2, WNMIACE+4, WACEALEG+1, WDXS+2, WLVSD+2, WIVUD+2, WIVUD+8 , WWARRX+2, WASAALEG+1, WALLALG+2, WALLALG+6, WALLALGT+2, WALLALGT+6, WLASTAP+1, WLASTAP+10, WLASTASP+1, WLASTASP+10 , WASPCPT+2, WNMIASP+2, WNMIASP+4, WNMIASP+8, WCOMFORT+2, WCOMFORT+4, WDOD+1, WDT+1, WTT+1, WPPDPOV+1 , OTHDPOVS+7
>> BGPLEC	WLASTBB+4, WIVUD+5, WLASTAP+7, WLASTASP+7
>> BGPLETP("ICL"	WLASTBB+4, WIVUD+5, WLASTAP+7, WLASTASP+7
>> BGPLETP("LGTH"	WLASTBB+4, WIVUD+5, WLASTAP+7, WLASTASP+7
>> BGPLETP("NRQ"	WLASTBB+4, WIVUD+5, WLASTAP+7, WLASTASP+7
>> BGPLETP("TXT"	WLASTBB+4, WIVUD+5, WLASTAP+7, WLASTASP+7
BGPLETXT	WLASTBB+4!, WIVUD+5!, WLASTAP+7!, WLASTASP+7!
BGPLETXT(	WLASTBB+6, WLASTBB+7, WIVUD+7, WIVUD+8, WLASTAP+9, WLASTAP+10, WLASTASP+9, WLASTASP+10
>> BGPNOBA	WDT+2, WTT+2, WPPDPOV+2, OTHDPOVS+8
>> BGPPEX	WBETAAL+2, WAORTIC+3, WACEALEG+2, WWARRX+3, WASAALEG+2, WDOD+3, WDT+2
>> BGPQUIT	WDOB+1, WRACE+1, WZIP+1, WADM+1, WADM92+1, WADMS92+1, WDSGS92+1, WINS+2, WINS+8, WINS+11 , WINS+16, WINS+18, WINS+20, WINS+24, WINS+29, WINS+31, WINS+46, WINS+48, WINS+51, WBETAAL+1 , WLASTBB+1, WLASTBB+6, WLASTBB+7, WNMIBETA+2, WNMIBETA+4, WNMIBETA+7, WNMIBETA+9, WCESSMED+2, WCESS+2, WSMOKER+2 , WAORTIC+2, WLASTACE+1, WNMIACE+2, WNMIACE+4, WACEALEG+1, WDXS+2, WLVSD+2, WIVUD+2, WIVUD+4, WIVUD+7 , WIVUD+8, WWARRX+2, WASAALEG+1, WALLALG+2, WALLALG+5, WALLALG+6, WALLALGT+2, WALLALGT+5, WALLALGT+6, WLASTAP+1 , WLASTAP+6, WLASTAP+9, WLASTAP+10, WLASTASP+1, WLASTASP+6, WLASTASP+9, WLASTASP+10, WASPCPT+2, WNMIASP+2, WNMIASP+4 , WNMIASP+8, WCOMFORT+2, WCOMFORT+4, WDOD+1, WDT+1, WTT+1, WPPDPOV+1, OTHDPOVS+7
>> BGPUD	WLASTAP+5, WLASTASP+5
>> BGPUD(	WLASTAP+6, WLASTAP+7, WLASTASP+6, WLASTASP+7
>> BGPVINP	WIVUD+3
>> BGPVSIT	WIVUD+3, OTHDPOVS+2, OTHDPOVS+9
>> BGPXX	WNMIBETA+6, WNMIBETA+8, WCESS+5, WIVUD+4, WIVUD+5, WALLALG+5, WALLALG+7, WALLALGT+5, WALLALGT+7, WLASTAP+6 , WLASTAP+7, WLASTASP+6, WLASTASP+7, WNMIASP+7, WNMIASP+9
>> BGPZZ	WLASTBB+6, WLASTBB+7, WIVUD+7, WIVUD+8, WLASTAP+9, WLASTAP+10, WLASTASP+9, WLASTASP+10
C	WINS+4~, WINS+42, WINS+43, WINS+44, WCESSMED+1~, WCESSMED+2, WCESS+1~, WCESS+2, WSMOKER+1~, WSMOKER+2 , WAORTIC+1~, WAORTIC+2, WDXS+1~, WDXS+2, WLVSD+1~, WLVSD+2, WIVUD+1~, WWARRX+1~, WWARRX+2, WALLALG+1~* , WALLALGT+1~, OTHDPOVS+1~, OTHDPOVS+2, OTHDPOVS+5, OTHDPOVS+7, OTHDPOVS+8, OTHDPOVS+9, OTHDPOVS+12*
D	WINS+4~, WINS+6*, WINS+9, WINS+10, WINS+21, WINS+22, WINS+35, WINS+36, WINS+49, WINS+50
>> DFN	WRACE+2
DFOUT	EOP+4!
DIR	EOP+3~
DIR(0	EOP+5*
DIRUT	EOP+4!
DLOUT	EOP+4!
DTOUT	EOP+4!
DUOUT	EOP+4!
DUZ	USR+1
I	WADM~, WADM+2, WADM92~, WADM92+2, WADMS92~, WADMS92+2, WDSGS92~, WDSGS92+3, WINS+4~, WINS+7* , WINS+8, WINS+9, WINS+10, WINS+12, WINS+18, WINS+19, WINS+20, WINS+22, WINS+25, WINS+30* , WINS+31, WINS+32, WINS+33, WINS+35, WINS+36, WINS+39, WINS+41, WINS+43, WINS+44, WINS+47 , WINS+48, WINS+49, WINS+50, WINS+52, OTHDPOVS+13, OTHDPOVS+15
IO("S"	EOP+2
IOST	EOP+1
>> IOT	EOP+2
J	WINS+4~, WINS+20*, WINS+21, WINS+22, WINS+25
MCD	WINS+4~, WINS+5, WINS+23, WINS+55
MCR	WINS+4~, WINS+5, WINS+13, WINS+53*, WINS+55
N	WINS+4~, WINS+40, WINS+41, WINS+44, OTHDPOVS+14*, OTHDPOVS+15
P	WDOB~, WDOB+2, WRACE~, WZIP~, WZIP+2, WINS~, WINS+8, WINS+9, WINS+10, WINS+12 , WINS+18, WINS+31, WINS+32, WINS+33, WINS+35, WINS+36, WINS+39, WINS+41, WINS+43, WINS+44 , WINS+48, WINS+49, WINS+50, WINS+52
PI	WINS+4~, WINS+5, WINS+37, WINS+55
Q	WINS+4~, WINS+39*, WINS+40, WINS+41, WINS+42, WINS+43
RR	WINS+4~, WINS+5*, WINS+55
T	WDSGS92+2~, WDSGS92+3*
U	WDOB+2, WINS+6, WINS+9, WINS+10, WINS+12, WINS+22, WINS+25, WINS+32, WINS+33, WINS+34 , WINS+35, WINS+36, WINS+38, WINS+39, WINS+40, WINS+41, WINS+43, WINS+44, WINS+49, WINS+50 , WINS+52, WCESSMED+5, WCESS+5, WACEALEG+4, WACEALEG+5, WIVUD+3, OTHDPOVS+4, OTHDPOVS+11, OTHDPOVS+13, USR+1
V	WINS~, WINS+6, WDOD~, WDOD+2, WDOD+3, WDT~, WDT+2, WTT~, WTT+2, WPPDPOV~ , WPPDPOV+2, OTHDPOVS~
X	WINS+4~, WINS+33, WINS+34, WINS+38, WBETAAL+3, WBETAAL+4, WLASTBB+3, WLASTBB+4, WCESSMED+1~, WCESSMED+5* , WCESS+1~, WSMOKER+1~, WSMOKER+5, WAORTIC+1~, WAORTIC+5, WLASTACE+3, WLASTACE+4, WNMIACE~, WNMIACE+1, WACEALEG+3 , WACEALEG+4, WDXS+1~, WDXS+6, WLVSD+1~, WLVSD+4, WIVUD+1~, WWARRX+1~, WWARRX+5, WASAALEG+3, WASAALEG+4 , WALLALG+1~, WALLALGT+1~, WLASTAP+4, WLASTASP+4, WASPCPT~, WASPCPT+1, WASPCPT+3, WCOMFORT~, WCOMFORT+1, WCOMFORT+5 , OTHDPOVS+1~, OTHDPOVS+2, OTHDPOVS+3, OTHDPOVS+4, OTHDPOVS+9, OTHDPOVS+10, OTHDPOVS+11, OTHDPOVS+13, OTHDPOVS+14, CTR~ , CTR+1
X(	WNMIACE+6
Y	WINS+4~, WINS+17, WNMIACE+6~, WNMIASP+6~*, CTR~, CTR+1
>> Z	WLASTBB+9, WNMIBETA+10, WLASTACE+3, WLASTACE+5, WACEALEG+3, WACEALEG+5
>> ZTQUEUED	EOP+2

Customize PDF page

Package: IHS GPRA Information System

Routine: BGP1CPU

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 7

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Naked Globals

Local Variables

Legend: