Routine: PXRRPRSP

Package	Total	Call Graph
PCE Patient Care Encounter	4	$$OCCUP^PXBGPRV (CLASSNE,FACNE,HDR,OPRCRIT,PAGE,PTOTAL)^PXRRGPRT (EOR,EXIT)^PXRRGUT ($$ABBRV,$$MATCH)^PXRRPECU
Kernel	2	$$S^%ZTLOAD $$MAX^XLFMTH

Package

Total

Call Graph

PCE Patient Care Encounter

$$OCCUP^PXBGPRV (CLASSNE,FACNE,HDR,OPRCRIT,PAGE,PTOTAL)^PXRRGPRT (EOR,EXIT)^PXRRGUT ($$ABBRV,$$MATCH)^PXRRPECU

Kernel

$$S^%ZTLOAD $$MAX^XLFMTH

Package	Total	Caller Graph
PCE Patient Care Encounter	2	PXRRPRSE PXRRWLPR

Package

Total

Caller Graph

PCE Patient Care Encounter

PXRRPRSE PXRRWLPR

Entry Points

Name	Comments	DBIA/ICR reference
HEAD	;If necessary, write the header.
SET	;Set up print fields
END	;
LASTCHAR(STRING,CHAR,MAX)	;Return the position of the last character, CHAR, in
NVIEN
FINAL	;Print grand totals
HLO
PRV
NHLOC
SPRINT(PTOTAL)	;Print the provider total and return the total.
DATE	;
FAC
FMTPCL(PCL,START,END,PCL1,PCL2)	;Format the abbreviated Person Class, PCL so
NDAY
CLASS	;

External References

Name	Field # of Occurrence
$$S^%ZTLOAD	PRV+14
$$OCCUP^PXBGPRV	CLASS+6
CLASSNE^PXRRGPRT	PRV+9
FACNE^PXRRGPRT	FINAL+7
HDR^PXRRGPRT	PXRRPRSP+33
OPRCRIT^PXRRGPRT	PXRRPRSP+35
PAGE^PXRRGPRT	PRV+3, FINAL+3, HEAD+2, NDAY+4
PTOTAL^PXRRGPRT	PRV+7, FINAL+6
EOR^PXRRGUT	END+2
EXIT^PXRRGUT	PRV+14, END+1
$$ABBRV^PXRRPECU	NDAY+9
$$MATCH^PXRRPECU	CLASS+10
$$MAX^XLFMTH	PXRRPRSP+23, FMTPCL+12

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Criteria for Provider Encounter Summary Report" Line Location: PXRRPRSP+34
Function Call: WRITE	Prompt: !!,"Facility: ",FACPNAME Line Location: PRV+4
Function Call: WRITE	Prompt: ! Line Location: FINAL+4
Function Call: WRITE	Prompt: !!,"Facility: ",FACPNAME Line Location: HEAD+4
Function Call: WRITE	Prompt: !!,?(C1HS+20),"Person Class" Line Location: HEAD+5
Function Call: WRITE	Prompt: !,?C1HS,"Provider (Occupation+Specialty+Subspecialty)",?C3HS,"Encounters" Line Location: HEAD+6
Function Call: WRITE	Prompt: !,?C1HS,"--------------------------------------------",?C3HS,"----------" Line Location: HEAD+7
Function Call: WRITE	Prompt: !,?C1S,PPNAME,?C2HS,PCL1,?C3S,PTOTAL Line Location: NDAY+11
Function Call: WRITE	Prompt: !,?C2HS,PCL2 Line Location: NDAY+12

Name	Line Occurrences (* Changed, ! Killed)
^TMP(	CLASS+4!, HLO+7*, NDAY, NHLOC, NVIEN
^XTMP(	PXRRPRSP+16, PXRRPRSP+17, FAC, PRV, CLASS+2, DATE+2, HLO, HLO+6

Name	Line Occurrences
$$LASTCHAR	FMTPCL+10, FMTPCL+11
CLASS	DATE+3
DATE	HLO+1
END	PRV+10, CLASS+1, DATE+7
FAC	PRV+1
FINAL	FAC+1
FMTPCL	NDAY+10
HEAD	FAC+8, NDAY+5
HLO	HLO+9
NDAY	NHLOC+1
NHLOC	NVIEN+1
NVIEN	NVIEN+3
PRV	CLASS+3
SPRINT	DATE+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BMARG	PXRRPRSP+3~, PXRRPRSP+31*, PRV+2, FINAL+2, HEAD+2, NDAY+3
C1HS	PXRRPRSP+3~, PXRRPRSP+19*, PXRRPRSP+23, HEAD+5, HEAD+6, HEAD+7
C1S	PXRRPRSP+3~, PXRRPRSP+20*, PXRRPRSP+21, NDAY+11
C2HS	PXRRPRSP+3~, PXRRPRSP+21*, PXRRPRSP+22, PXRRPRSP+24, NDAY+10, NDAY+11, NDAY+12
C3HS	PXRRPRSP+3~, PXRRPRSP+22, PXRRPRSP+23, PXRRPRSP+26*, PXRRPRSP+28, HEAD+6, HEAD+7
C3HSMAX	PXRRPRSP+3~, PXRRPRSP+24*, PXRRPRSP+26, NDAY+10
C3S	PXRRPRSP+3~, NDAY+7*, NDAY+11
CHAR	LASTCHAR~, LASTCHAR+4, LASTCHAR+6
CLASSNAM	PXRRPRSP+5~, PRV+16, CLASS+2, CLASS+3, CLASS+5, DATE+2, HLO, HLO+6, NDAY+8
DATE	PXRRPRSP+5~, CLASS+11, DATE+2, DATE+3, HLO, HLO+4, HLO+6
DAY	PXRRPRSP+5~, HLO+4, HLO+7, SPRINT+1~, SPRINT+3, NDAY*, NDAY+1, NHLOC, NVIEN
DONE	PXRRPRSP+3~, PXRRPRSP+14*, PRV+4, PRV+5, PRV+10, CLASS+1, DATE+7, FINAL+4, FINAL+5, HEAD+3 , NDAY+6, NDAY+13
DTOTAL	PXRRPRSP+5~, DATE+1*
END	FMTPCL~, FMTPCL+4, SPRINT+1~
FACILITY	PXRRPRSP+6~, SET+1, FAC, FAC+1, FAC+4, FAC+6, PRV, CLASS+2, DATE+2, HLO , HLO+6
FACPNAME	PXRRPRSP+6~, FAC+6*, PRV+4, HEAD+4
FTOTAL	PXRRPRSP+6~, FAC+2, PRV+7, PRV+8, DATE+6
GTOTAL	PXRRPRSP+5~, PXRRPRSP+32, PRV+8, FINAL+6
HEAD	PXRRPRSP+3~, PXRRPRSP+30, FAC+7, HEAD+1, HEAD+8*
HLOC	PXRRPRSP+5~, DATE+9, HLO, HLO+1, HLO+6, HLO+7, SPRINT+1~, NDAY+15, NHLOC, NHLOC+1 , NVIEN
>> IC	FAC+4*, FAC+5
IC0	LASTCHAR+3~, LASTCHAR+4, LASTCHAR+5, LASTCHAR+6, LASTCHAR+7, LASTCHAR+8
IC1	LASTCHAR+3~, LASTCHAR+6*, LASTCHAR+7
INDENT	PXRRPRSP+4~, PXRRPRSP+18*, PXRRPRSP+19, PXRRPRSP+20, PRV+9, FINAL+7
IO	PXRRPRSP+13
IOSL	PRV+2, FINAL+2, HEAD+2, NDAY+3
LBC	FMTPCL+3~, FMTPCL+12*, FMTPCL+13, FMTPCL+14
LEN	FMTPCL+3~, FMTPCL+5*, FMTPCL+6, FMTPCL+14
LPLUS	FMTPCL+3~, FMTPCL+11*, FMTPCL+12
LSPACE	FMTPCL+3~, FMTPCL+10*, FMTPCL+12
MAX	LASTCHAR~, LASTCHAR+6
MAXLEN	FMTPCL+3~, FMTPCL+4*, FMTPCL+6, FMTPCL+10, FMTPCL+11
MEWPAGE	PXRRPRSP+4~
MID	PXRRPRSP+4~, PXRRPRSP+28*, PRV+7, FINAL+6, NDAY+7
>> NFAC	FAC+4
PAGE	PXRRPRSP+4~, PXRRPRSP+30*, PXRRPRSP+33
PCL	FMTPCL~, FMTPCL+5, FMTPCL+7, FMTPCL+10, FMTPCL+11, FMTPCL+13, FMTPCL+14
PCL1	FMTPCL~, FMTPCL+7, FMTPCL+13, SPRINT+1~, NDAY+10, NDAY+11
PCL2	FMTPCL~, FMTPCL+14*, SPRINT+1~, NDAY+10, NDAY+12
PCLASS	PXRRPRSP+7~, CLASS+6, CLASS+7, CLASS+10
PCLMAX	PXRRPRSP+4~, PXRRPRSP+16*, PXRRPRSP+22
PNAME	PXRRPRSP+7~, FAC+10, PRV, PRV+1, PRV+11, CLASS+2, CLASS+4, DATE+2, HLO, HLO+6 , HLO+7, NDAY, NHLOC, NVIEN
PNMAX	PXRRPRSP+4~, PXRRPRSP+17*, PXRRPRSP+21
PPNAME	PXRRPRSP+7~, PRV+11*, NDAY+11
PTOTAL	PXRRPRSP+7~, DATE+5, DATE+6, SPRINT~, SPRINT+2, NDAY+7, NDAY+11, NVIEN+2
>> PXRRFAC(	FAC+4, FAC+5*
>> PXRRFACN(	FAC+6
>> PXRRPECL	PRV+9, CLASS+10
>> PXRRXTMP	PXRRPRSP+16, PXRRPRSP+17, FAC, PRV, CLASS+2, CLASS+4, DATE+2, HLO, HLO+6, HLO+7 , NDAY, NHLOC, NVIEN
START	FMTPCL~, FMTPCL+4
STRING	LASTCHAR~, LASTCHAR+4, LASTCHAR+6
TEMP	PXRRPRSP+8~, PRV+6, PRV+7, CLASS+10, FINAL+1, FINAL+6, SPRINT+1~, NDAY+9, NDAY+10
U	FAC+4, FAC+5, FAC+6, PRV+11, CLASS+5, NDAY+8
VACODE	PXRRPRSP+8~, CLASS+5, CLASS+6, SPRINT+1~, NDAY+8, NDAY+9
VIEN	PXRRPRSP+8~, HLO+5, HLO+6, HLO+7, SPRINT+1~, NHLOC+3, NVIEN, NVIEN+1
>> ZTREQ	PXRRPRSP+11*
>> ZTSTOP	PRV+14*

Customize PDF page

Package: PCE Patient Care Encounter

Routine: PXRRPRSP

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: