Routine: ECRRPT

Package	Total	Call Graph
Event Capture	8	START^ECOSSUM SUM^ECPAT SUM^ECPCER START^ECPROV2 EN^ECPRSUM1 STRPT^ECRDSSA STRPT^ECRDSSU (ALLU,LOCARRY)^ECRUTL
Kernel	4	(,HOME)^%ZIS ^%ZISC ^%ZTLOAD ($$FMTE,$$FMTH)^XLFDT
VA FileMan	2	^%DT ^DIC

Package	Total	Caller Graph
Event Capture	2	ECRRPT1 ECRRPT2

Entry Points

Name	Comments	DBIA/ICR reference
REQCHK(ECV)	;Required data check
DATECHK(ECSD,ECED)	;Check human format date and converts to FileMan format ; Input ECSD - Start Date (ex. 10/9/01) ; ECED - End Date
QUEUE	;Queues report to printer
ECPAT	;Patient Summary Report for RPC Call ; Variables passed in ; ECDFN - Patient IEN for file #2 ; ECSD - Start Date or Report ; ECED - End Date or Report ; ECRY - Print Procedure Reason (optional) ; ECPTYP - Where to send output (P)rinter, (D)evice or screen ; or (E)xport
ECRDSSU	;DSS Unit Workload Summary Report ; Variables passed in ; ECL - Location to report (1 or ALL) ; ECD - DSS Unit to report (1, some or ALL) ; ECSD - Start Date or Report ; ECED - End Date or Report ; ECDUZ - User IEN from file (#200) ; ECPTYP - Where to send output (P)rinter, (D)evice or screen ; or (E)xport
PROSUM	;Provider (1-7) Summary Report for RPC Call 119-Updated comment to reflect 7 instead of 3 ; Variables passed in ; ECU - Provider IEN for file #200 ; ECL0 - All, 1, or many locations ; ECD0 - All, 1, or many DSS units ; ECSD - Start Date or Report ; ECED - End Date or Report ; ECRY - Print Procedure Reason (optional) ; ECPTYP - Where to send output (P)rinter, (D)evice or screen ; or (E)xport
ECPROV	;Provider Summary Report for RPC Call ; Variables passed in ; ECL - Location to report (1 or ALL) ; ECD - DSS Unit to report (1 or ALL) ; ECSD - Start Date or Report ; ECED - End Date or Report ; ECRY - Print Procedure Reason (optional) ; ECDUZ - User DUZ (ien in #200) ; ECPTYP - Where to send output (P)rinter, (D)evice or screen ; or (E)xport
ECOSSUM	;Ordering Section Summary Report for RPC Call ; Variables passed in ; ECOS - Ordering Section ; ECSD - Start Date or Report ; ECED - End Date or Report ; ECL - Location to report (1 or ALL) ; ECD - DSS Unit to report (1, some or ALL) ; ECDUZ - User ien (#200) ; ECPTYP - Where to send output (P)rinter, (D)evice or screen ; or (E)xport
ECPCER	;PCE Data Summary Report for RPC Call ; Variables passed in ; ECDFN - Patient IEN for file #2 ; ECSD - Start Date or Report ; ECED - End Date or Report ; ECPTYP - Where to send output (P)rinter, (D)evice or screen ; or (E)xport
ECRDSSA	;DSS Unit Activity Report ; Variables passed in ; ECL - Location to report (1 or ALL) ; ECD0 - DSS Unit to report (1, some or ALL) ; ECSORT - Sort type(P,S or R) ; ECSD - Start Date or Report ; ECED - End Date or Report ; ECDUZ - User IEN from file (#200) ; ECPTYP - Where to send output (P)rinter, (D)evice or screen ; or (E)xport

Name	Field # of Occurrence
^%DT	DATECHK+4
^%ZIS	QUEUE+2
HOME^%ZIS	QUEUE+9
^%ZISC	QUEUE+9
^%ZTLOAD	QUEUE+9
^DIC	ECPAT+13, ECRDSSU+17, ECRDSSU+22, PROSUM+15, ECPROV+17, ECPROV+20, ECOSSUM+15, ECOSSUM+19, ECOSSUM+24, ECPCER+12 , ECRDSSA+18, ECRDSSA+23
START^ECOSSUM	ECOSSUM+33
SUM^ECPAT	ECPAT+23
SUM^ECPCER	ECPCER+20
START^ECPROV2	ECPROV+36
EN^ECPRSUM1	PROSUM+28
STRPT^ECRDSSA	ECRDSSA+32
STRPT^ECRDSSU	ECRDSSU+31
ALLU^ECRUTL	ECRDSSU+20, ECOSSUM+22, ECRDSSA+21
LOCARRY^ECRUTL	ECRDSSU+16, ECOSSUM+18, ECRDSSA+17
$$FMTE^XLFDT	DATECHK+6
$$FMTH^XLFDT	QUEUE+5

Name	Line Occurrences (* Changed, ! Killed)
^ECD - [#724]	ECPROV+26
^TMP("ECMSG"	REQCHK+4, QUEUE+3, QUEUE+10, QUEUE+11, ECRDSSU+15, ECRDSSU+18, PROSUM+16, ECPROV+18, ECPROV+21, ECOSSUM+16 , ECOSSUM+17, ECOSSUM+20, ECPCER+13, ECRDSSA+16, ECRDSSA+19*
^VA(200 - [#200]	ECPROV+24, ECPROV+25
^XUSEC("ECALLU"	ECRDSSU+20, ECPROV+22, ECOSSUM+22, ECRDSSA+21

Name	Line Occurrences
DATECHK	ECPAT+16, ECRDSSU+24, PROSUM+17, ECPROV+29, ECOSSUM+26, ECPCER+14, ECRDSSA+25
QUEUE	ECPAT+22, ECRDSSU+30, PROSUM+27, ECPROV+35, ECOSSUM+32, ECPCER+19, ECRDSSA+31
REQCHK	ECPAT+12, ECRDSSU+14, PROSUM+14, ECPROV+14, ECOSSUM+14, ECPCER+11, ECRDSSA+15

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %DT	DATECHK+4*
%ZIS	QUEUE+1~, QUEUE+2*
C	REQCHK+1~, REQCHK+2, REQCHK+4, REQCHK+5
CNT	ECPROV+13~, ECPROV+23, ECPROV+25, ECPROV+26
DIC	ECPAT+11~, ECPAT+13, ECRDSSU+13~, ECRDSSU+17, ECRDSSU+22!, PROSUM+13~, PROSUM+15, ECPROV+13~, ECPROV+17, ECPROV+19! , ECPROV+20, ECOSSUM+13~, ECOSSUM+15, ECOSSUM+18!, ECOSSUM+19, ECOSSUM+24!, ECPCER+10~, ECPCER+12, ECRDSSA+14~, ECRDSSA+18* , ECRDSSA+23!*
DIC(0	ECPAT+13, ECRDSSU+17, ECRDSSU+22, PROSUM+15, ECPROV+17, ECPROV+20, ECOSSUM+15, ECOSSUM+19, ECOSSUM+24, ECPCER+12 , ECRDSSA+18, ECRDSSA+23
DT	DATECHK+5
>> ECD	ECPROV+19, ECPROV+20, ECPROV+22, ECPROV+23*
>> ECD0	ECRDSSU+19, PROSUM+20, PROSUM+21, ECOSSUM+21, ECRDSSA+20
ECDATE	DATECHK+6*, ECPAT+11~, ECRDSSU+13~, PROSUM+13~, ECPROV+13~, ECOSSUM+13~, ECPCER+10~, ECRDSSA+14~
ECDESC	QUEUE+4, ECPAT+11~, ECPAT+21, ECRDSSU+12~, ECRDSSU+29, PROSUM+13~, PROSUM+26, ECPROV+13~, ECPROV+34, ECOSSUM+13~ , ECOSSUM+31, ECPCER+10~, ECPCER+18, ECRDSSA+13~, ECRDSSA+30*
>> ECDEV	QUEUE+2
>> ECDFN	ECPAT+13, ECPCER+12
ECDN	ECPROV+13~, ECPROV+14, ECPROV+20, ECPROV+23*
ECDSSU	ECRDSSU+12~, ECRDSSU+18, ECOSSUM+13~, ECOSSUM+20, ECRDSSA+13~, ECRDSSA+19
ECDSSU(	ECRDSSU+23, ECOSSUM+25, ECRDSSA+24*
>> ECDUZ	ECRDSSU+20, ECPROV+22, ECPROV+24, ECPROV+25, ECOSSUM+22, ECRDSSA+21
ECED	DATECHK~, DATECHK+5, DATECHK+6, ECPAT+15, ECPAT+16, ECPAT+17, ECRDSSU+24, ECRDSSU+25, PROSUM+17, ECPROV+29 , ECPROV+30, ECOSSUM+26, ECOSSUM+27, ECPCER+14, ECPCER+15, ECRDSSA+25, ECRDSSA+26
ECENDDT	ECRDSSU+12~, ECRDSSU+25, ECRDSSA+13~, ECRDSSA+26
>> ECERR	REQCHK+5, ECPAT+12, ECRDSSU+14, PROSUM+14, ECPROV+14, ECPROV+15, ECPROV+18, ECPROV+19, ECPROV+21, ECOSSUM+14 , ECOSSUM+16, ECOSSUM+17*, ECPCER+11, ECRDSSA+15
ECI	DATECHK+3~, DATECHK+4, ECRDSSU+12~, ECRDSSU+21, ECOSSUM+13~, ECOSSUM+23, ECRDSSA+13~, ECRDSSA+22
ECKEY	ECRDSSU+12~, ECRDSSU+20, ECOSSUM+22, ECRDSSA+13~, ECRDSSA+21*
>> ECL	ECRDSSU+16, ECRDSSU+17, ECPROV+15, ECPROV+17, ECOSSUM+18, ECOSSUM+19, ECRDSSA+17, ECRDSSA+18
>> ECL0	PROSUM+18, PROSUM+19
ECLN	ECPROV+13~, ECPROV+17*
ECLOC	ECRDSSU+12~, ECRDSSU+15, ECOSSUM+13~, ECOSSUM+17, ECRDSSA+13~, ECRDSSA+16
ECLOC(1	ECRDSSU+17, ECOSSUM+19, ECRDSSA+18*
ECNT	ECRDSSU+12~, ECRDSSU+21, ECRDSSU+23, ECOSSUM+13~, ECOSSUM+23, ECOSSUM+25, ECRDSSA+13~, ECRDSSA+22, ECRDSSA+24
>> ECOS	ECOSSUM+15
ECOSN	ECOSSUM+13~, ECOSSUM+15*
ECPAT	ECPAT+11~, ECPAT+13, ECPCER+10~, ECPCER+12
>> ECPTYP	ECPAT+19, ECRDSSU+26, PROSUM+23, ECPROV+31, ECOSSUM+28, ECPCER+16, ECRDSSA+27
>> ECQDT	QUEUE+5
ECROU	QUEUE+4, ECPAT+11~, ECPAT+20, ECRDSSU+12~, ECRDSSU+27, PROSUM+13~, PROSUM+26, ECPROV+13~, ECPROV+32, ECOSSUM+13~ , ECOSSUM+29, ECPCER+10~, ECPCER+17, ECRDSSA+13~, ECRDSSA+28*
ECRY	ECPAT+18!, PROSUM+22!, ECPROV+28*
ECSAVE	QUEUE+8, ECRDSSU+12~, PROSUM+13~, ECPROV+13~, ECOSSUM+13~, ECRDSSA+13~
ECSAVE("ECD*"	ECPROV+33*
ECSAVE("ECDSSU("	ECRDSSU+28, ECOSSUM+30, ECRDSSA+29*
ECSAVE("ECL*"	ECPROV+33*
ECSAVE("ECLOC("	ECRDSSU+28, ECOSSUM+30, ECRDSSA+29*
ECSAVE("ECSLOC*"	PROSUM+25*
ECSAVE("ECSUNIT*"	PROSUM+25*
ECSAVE("UNIT*"	ECPROV+33*
ECSD	DATECHK~, DATECHK+5, DATECHK+6, ECPAT+15, ECPAT+16, ECPAT+17, ECRDSSU+24, ECRDSSU+25, PROSUM+17, ECPROV+29 , ECPROV+30, ECOSSUM+26, ECOSSUM+27, ECPCER+14, ECPCER+15, ECRDSSA+25, ECRDSSA+26
ECSLOC	PROSUM+13~, PROSUM+18*
ECSLOC(	PROSUM+19*
ECSTDT	ECRDSSU+12~, ECRDSSU+25, ECRDSSA+13~, ECRDSSA+26
ECSUNIT	PROSUM+13~, PROSUM+20*
ECSUNIT(	PROSUM+21*
>> ECU	PROSUM+15
ECUN	PROSUM+13~, PROSUM+15*
ECV	REQCHK~, REQCHK+3, REQCHK+4, QUEUE+7, ECPAT+11~, ECPAT+12, ECPAT+20, ECRDSSU+12~, ECRDSSU+14, ECRDSSU+27 , PROSUM+13~, PROSUM+14, PROSUM+24, ECPROV+13~, ECPROV+14, ECPROV+32, ECOSSUM+13~, ECOSSUM+14, ECOSSUM+29, ECPCER+10~ , ECPCER+11, ECPCER+17, ECRDSSA+13~, ECRDSSA+15, ECRDSSA+28
ECX	ECRDSSU+13~, ECRDSSU+21, ECRDSSU+22, ECOSSUM+23, ECOSSUM+24, ECRDSSA+14~, ECRDSSA+22*, ECRDSSA+23
I	REQCHK+1~, REQCHK+3, REQCHK+4, QUEUE+1~, QUEUE+7
IO	ECPROV+36
ION	QUEUE+4
IOP	QUEUE+1~, QUEUE+2*
NUM	PROSUM+13~, PROSUM+19, PROSUM+21
POP	QUEUE+1~, QUEUE+2
U	REQCHK+3, REQCHK+4, QUEUE+7, ECPAT+13, ECRDSSU+17, PROSUM+15, ECPROV+17, ECPROV+20, ECOSSUM+15, ECOSSUM+19 , ECPCER+12, ECRDSSA+18
UNIT	ECPROV+13~, ECPROV+25, ECPROV+26, ECPROV+30
UNIT(	ECPROV+26*
X	DATECHK+3~, DATECHK+4, ECPAT+11~, ECPAT+13, ECRDSSU+13~, ECRDSSU+17, ECRDSSU+22, PROSUM+13~, PROSUM+15, ECPROV+13~ , ECPROV+17, ECPROV+20, ECPROV+23, ECPROV+24, ECPROV+25, ECOSSUM+13~, ECOSSUM+15, ECOSSUM+19, ECOSSUM+24, ECPCER+10~ , ECPCER+12, ECRDSSA+14~, ECRDSSA+18, ECRDSSA+23*
Y	DATECHK+3~, DATECHK+4, ECPAT+11~, ECPAT+13, ECRDSSU+13~, ECRDSSU+17, ECRDSSU+22, ECRDSSU+23, PROSUM+13~, PROSUM+15 , ECPROV+13~, ECPROV+17, ECPROV+20, ECOSSUM+13~, ECOSSUM+15, ECOSSUM+19, ECOSSUM+24, ECOSSUM+25, ECPCER+10~, ECPCER+12 , ECRDSSA+14~, ECRDSSA+18, ECRDSSA+23, ECRDSSA+24
ZTDESC	QUEUE+1~, QUEUE+4*
ZTDTH	QUEUE+1~, QUEUE+5*
ZTIO	QUEUE+1~, QUEUE+4*
ZTRTN	QUEUE+1~, QUEUE+4*
ZTSAVE	QUEUE+1~, QUEUE+8*
ZTSAVE(	QUEUE+7*
>> ZTSK	QUEUE+10

Customize PDF page

Package: Event Capture

Routine: ECRRPT

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 2

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: