Routine: ECRRPT1

Package	Total	Call Graph
Event Capture	11	PRINT^ECDSS3 START^ECGTP START^ECINCPT START^ECNTPCE START^ECRPCLS STRPT^ECRPRSN2 (DATECHK,QUEUE,REQCHK)^ECRRPT (ALLU,LOCARRY)^ECRUTL START^ECSCPT START^ECSUM STRTGUI^ECUNTRPT
Kernel	1	CLOSE^%ZISH
VA FileMan	1	^DIC

Entry Points

Name	Comments	DBIA/ICR reference
ECRPRSN	;Procedure Reason Report for RPC Call ; Variables passed in ; ECSD - Start Date or Report ; ECED - End Date or Report ; ECL0..n - Location to report (1,some or ALL) ; ECD0..n - DSS Unit to report (1,some or ALL) ; ECRY0..n - Procedure reason (some or ALL) ; ECPTYP - Where to send output (P)rinter, (D)evice or screen ; or (E)xport
PXREAS	;Procedure reason link
REALNK	;Reason link
ECRPERS	;Inactive Person Class Report for RPC Call ; Variables passed in ; ECSD - Start Date or Report ; ECED - End Date or Report ; ECSORT - Sort by Patient (P) or Provider (R) ; ECPTYP - Where to send output (P)rinter, (D)evice or screen ; or (E)xport
ECDSS1	;National/Local Procedure Reports for RPC Call ; Variables passed in ; ECRTN - Procedure Report (A-active or I-inactive) ; ECPTYP - Where to send output (P)rinter, (D)evice or screen ; or (E)xport ; If ECRTN=A, also ; ECRN - Preferred Report (N-ational, L-ocal or Both) ; ECRD - Sort Method (P-rocedure Name, N-ational Number)
ECDSS3	;Category Reports for RPC Call ; Variables passed in ; ECRTN - Category Procedure Report ; (A-active, I-inactive or B-oth) ; ECPTYP - Where to send output (P)rinter, (D)evice or screen ; or (E)xport
QUEDIP	;Queue when using DIP
ECSUM	;Print Category and Procedure Summary (Report) for RPC Call ; Variables passed in ; ECL - Location to report (1 or ALL) ; ECD0...n - DSS Unit to report (ECD0, first unit, ECD1, second ; unit, etc.) ; ECC - Category (defaults to ALL, even if sent) (optional) ; ECRTN - Event Code Screen (Active, Inactive or Both) ; ECPTYP - Where to send output (P)rinter, (D)evice or screen ; or (E)xport
PXRUN
ECNTPCE	;ECS Records Failing Transmission to PCE ; Variables passed in ; ECSD - Start Date or Report ; ECED - End Date or Report ; ECPTYP - Where to send output (P)rinter, (D)evice or screen ; or (E)xport ; ECL0..n - Location to report (1,some or ALL) ; ECD0..n - DSS unit to report (1,some or ALL) ; Variable return ; ^TMP($J,"ECRPT",n)=report output or to print device.
ECSCPT	;Event Code Screens with CPT Codes ; Variables passed in ; ECL - Location to report (1 or ALL) ; ECD - DSS Unit to report (1 or ALL), If ECD'="ALL" then ECC ; ECC - Category (1 or ALL) (optional) ; ECCPT - CPT Codes to Display (Active, Inactive or Both) ; ECPTYP - Where to send output (P)rinter, (D)evice or screen ; or (E)xport
CPTRUN
ECINCPT	;National/Local Procedure Codes with Inactive CPT Reports for RPC Call ; Variables passed in ; ECPTYP - Where to send output (P)rinter, (D)evice or screen ; or (E)xport ; 152 - Adding the next three variables ; ECRN - Preferred Report (N-ational, L-ocal or Both) ; ECSM - Sort Method (P-rocedure Name, N-ational Number,C-PT Code,D-Inactive Date) ; ECSORT - Sort Order "A"scending, "D"escending
ECGTP	;ECS Generic Table Printer ; Variables passed in ; ECOBHNDL - Handle to generic table print obj ; ECPTYP - Where to send output (P)rinter, (D)evice or screen
ECSTPCD	;DSS Units with Associated Stop Code Error REPORT ; EC2107 - added to GUI reports ; Variables passed in ; ECPTYP - Where to send output (P)rinter, (D)evice or screen ; or (E)xport

Name	Field # of Occurrence
CLOSE^%ZISH	ECDSS1+21, ECDSS3+17
^DIC	ECRPRSN+23, QUEDIP+3, ECNTPCE+22, ECSCPT+15, ECSCPT+18, ECSCPT+26
PRINT^ECDSS3	ECDSS3+12, ECDSS3+16, ECDSS3+19
START^ECGTP	ECGTP+13
START^ECINCPT	ECINCPT+18
START^ECNTPCE	ECNTPCE+32
START^ECRPCLS	ECRPERS+18
STRPT^ECRPRSN2	ECRPRSN+41
DATECHK^ECRRPT	ECRPRSN+35, ECRPERS+12, ECNTPCE+25
QUEUE^ECRRPT	ECRPRSN+40, ECRPERS+17, PXRUN+6, ECNTPCE+31, CPTRUN+5, ECINCPT+17, ECGTP+12, ECSTPCD+13
REQCHK^ECRRPT	ECRPRSN+14, ECRPERS+11, ECDSS1+13, ECDSS3+10, ECSUM+14, ECNTPCE+12, ECSCPT+12, ECSCPT+23, ECINCPT+12, ECGTP+8
ALLU^ECRUTL	ECRPRSN+21, ECNTPCE+20
LOCARRY^ECRUTL	ECRPRSN+16, ECSUM+16, ECNTPCE+15, ECSCPT+14
START^ECSCPT	CPTRUN+6
START^ECSUM	PXRUN+7
STRTGUI^ECUNTRPT	ECSTPCD+14

FileNo	Call Tags
^%ZIS(1 - [#3.5]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	QUEDIP+5
^ECD - [#724]	ECSCPT+19, ECSCPT+20
^ECJ - [#720.3]	ECRPRSN+32
^ECJ("B"	PXREAS+5, PXREAS+6
^ECL - [#720.5]	ECRPRSN+32, ECRPRSN+34, REALNK+4
^ECL("AD"	REALNK+2, REALNK+3
^ECL("B"	ECRPRSN+31
^TMP("ECMSG"	ECRPRSN+15, ECRPRSN+18, ECSUM+15, ECNTPCE+14, ECNTPCE+17, ECSCPT+13, ECSCPT+16, ECSCPT+24
^XUSEC("ECALLU"	ECRPRSN+21, ECNTPCE+20

Name	Line Occurrences
@(	ECDSS1+15, ECDSS1+20, ECDSS1+23
CPTRUN	ECSCPT+22
PXREAS	ECRPRSN+26
PXRUN	ECSUM+20
QUEDIP	ECDSS1+20, ECDSS3+16
REALNK	PXREAS+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %ZIS("HFSMODE"	ECDSS1+22, ECDSS3+18
>> %ZIS("HFSNAME"	ECDSS1+22, ECDSS3+18
DIC	ECRPRSN+13~, ECRPRSN+23!, QUEDIP+1~, QUEDIP+3, ECSUM+12~, ECNTPCE+22!, ECSCPT+11~, ECSCPT+15, ECSCPT+18!, ECSCPT+26!
DIC(0	ECRPRSN+23, QUEDIP+3, ECNTPCE+22, ECSCPT+15, ECSCPT+18, ECSCPT+26
DQTIME	ECDSS1+11~, ECDSS1+14, ECDSS3+9~, ECDSS3+11, QUEDIP+5*, ECINCPT+11~, ECSTPCD+8~
ECALL	ECSUM+12~, ECSUM+14, ECSUM+18, ECSUM+20, PXRUN+4, ECSCPT+11~, ECSCPT+12, ECSCPT+17, ECSCPT+22, CPTRUN+3
ECBEGIN	ECRPERS+10~, ECRPERS+13*
>> ECC	ECSCPT+21*, ECSCPT+25, ECSCPT+26
ECCN	ECSUM+12~, ECSCPT+11~, ECSCPT+21, ECSCPT+27
>> ECD	ECSUM+18*, ECSCPT+17, ECSCPT+18, ECSCPT+19, ECSCPT+20
>> ECD0	ECRPRSN+19, ECNTPCE+18
ECDATE	ECRPRSN+12~, ECRPERS+10~, ECNTPCE+10~
ECDESC	ECRPRSN+13~, ECRPRSN+39, ECRPERS+10~, ECRPERS+16, ECDSS1+11~, ECDSS1+18, ECDSS3+15, ECSUM+12~, PXRUN+5, ECNTPCE+10~ , ECNTPCE+30, ECSCPT+11~, CPTRUN+4, ECINCPT+11~, ECINCPT+16, ECGTP+7~, ECGTP+11, ECSTPCD+8~, ECSTPCD+12
>> ECDEV	QUEDIP+3
ECDIP	ECDSS1+18*, ECDSS3+9~
>> ECDIRY	ECDSS1+21, ECDSS1+22, ECDSS3+17, ECDSS3+18
ECDN	ECRPRSN+12~, ECSUM+12~, ECSCPT+11~, ECSCPT+19*
ECDSSU	ECRPRSN+12~, ECRPRSN+18, ECNTPCE+11~, ECNTPCE+17
ECDSSU(	ECRPRSN+24, ECRPRSN+29, PXREAS+3, ECNTPCE+23
>> ECDUZ	ECRPRSN+20, ECRPRSN+21, ECNTPCE+19, ECNTPCE+20
>> ECED	ECRPRSN+35, ECRPERS+12, ECRPERS+13, ECNTPCE+25, ECNTPCE+26
ECEND	ECRPERS+10~, ECRPERS+13*
>> ECERR	ECRPRSN+14, ECRPERS+11, ECDSS1+13, ECDSS3+10, QUEDIP+2, ECSUM+14, ECNTPCE+12, ECSCPT+12, ECSCPT+16, ECSCPT+18 , ECSCPT+23, ECSCPT+24, ECSCPT+26*, ECINCPT+12, ECGTP+8
>> ECFILER	ECDSS1+21, ECDSS1+22, ECDSS3+17, ECDSS3+18
ECI	ECRPRSN+12~, ECRPRSN+22, ECRPRSN+28, ECRPRSN+29, ECRPRSN+30, ECNTPCE+11~, ECNTPCE+21*
ECJ	ECRPRSN+13~, ECRPRSN+32*, ECRPRSN+33
ECJLP	ECSUM+12~, ECSUM+14, ECSCPT+11~, ECSCPT+12, ECSCPT+20*, ECSCPT+21
ECKEY	ECRPRSN+12~, ECRPRSN+21, ECNTPCE+11~, ECNTPCE+20
ECL	ECSUM+16, ECSUM+17, ECSCPT+14, ECSCPT+15, ECINCPT+11~, ECSTPCD+8~, ECSTPCD+11*
>> ECL0	ECRPRSN+16, ECNTPCE+15
ECLINK	ECRPRSN+12~
ECLINK(	ECRPRSN+34, REALNK+4
ECLOC	ECRPRSN+12~, ECRPRSN+15, ECRPRSN+17!, ECSUM+12~, ECSUM+15, ECSUM+17!, ECNTPCE+11~, ECNTPCE+14, ECNTPCE+16!, ECSCPT+11~ , ECSCPT+13
ECLOC(	ECRPRSN+17, ECRPRSN+28, PXREAS+2, PXREAS+3, ECNTPCE+16
ECLOC(1	ECSUM+17, ECSCPT+15
ECLOC1	ECNTPCE+11~
ECLOC1(	ECRPRSN+17, ECSUM+17, ECNTPCE+16
ECNT	ECRPRSN+12~, ECRPRSN+22, ECRPRSN+24, ECNTPCE+11~, ECNTPCE+21, ECNTPCE+23
ECNUM	ECSUM+13~, ECSUM+19*
ECPG	ECINCPT+11~, ECINCPT+13, ECSTPCD+8~, ECSTPCD+9
>> ECPTYP	ECRPRSN+36, ECRPERS+14, ECDSS1+15, ECDSS1+16, ECDSS3+12, ECDSS3+13, PXRUN, ECNTPCE+27, CPTRUN, ECINCPT+14 , ECGTP+9, ECSTPCD+10
>> ECQDT	ECDSS1+14, ECDSS3+11, QUEDIP+5
ECROU	ECRPRSN+13~, ECRPRSN+37, ECRPERS+10~, ECRPERS+15, ECDSS1+11~, ECDSS1+17, ECDSS3+14, ECSUM+12~, PXRUN+1, ECNTPCE+10~ , ECNTPCE+28, ECSCPT+11~, CPTRUN+1, ECINCPT+11~, ECINCPT+15, ECGTP+7~, ECGTP+10, ECSTPCD+8~, ECSTPCD+11
>> ECRTN	ECDSS1+12, ECDSS1+15, ECDSS1+17, ECDSS1+20, ECDSS1+23, ECSUM+18
>> ECRY0	ECRPRSN+26
ECS	ECSUM+12~, ECSCPT+11~
ECSAVE	ECRPRSN+13~, ECSUM+12~, ECSCPT+11~
ECSAVE("ECDSSU("	ECRPRSN+38, ECNTPCE+29
ECSAVE("ECLINK("	ECRPRSN+38*
ECSAVE("ECLOC("	ECRPRSN+38, PXRUN+2, ECNTPCE+29, CPTRUN+2
ECSAVE("ECUNITS("	PXRUN+3*
ECSCN	ECSUM+13~, ECSUM+18*
>> ECSD	ECRPRSN+35, ECRPERS+12, ECRPERS+13, ECNTPCE+25, ECNTPCE+26
ECSN	ECSUM+12~
ECUN	ECRPRSN+12~
ECUNITS	ECSUM+13~
ECUNITS(	ECSUM+19*
ECV	ECRPRSN+12~, ECRPRSN+14, ECRPRSN+37, PXREAS+1~, PXREAS+3, PXREAS+4, PXREAS+5, ECRPERS+10~, ECRPERS+11, ECRPERS+15* , ECDSS1+11~, ECDSS1+12, ECDSS1+13, ECDSS1+17, ECDSS3+9~, ECDSS3+10, ECDSS3+14, ECSUM+12~, ECSUM+14, PXRUN+1 , PXRUN+4, ECNTPCE+10~, ECNTPCE+12, ECNTPCE+28, ECSCPT+11~, ECSCPT+12, ECSCPT+23, CPTRUN+1, CPTRUN+3, ECINCPT+11~ , ECINCPT+12, ECINCPT+15, ECGTP+7~, ECGTP+8, ECGTP+10, ECSTPCD+8~, ECSTPCD+11
ECW	ECRPRSN+13~, ECRPRSN+31, ECRPRSN+32, ECRPRSN+34, PXREAS+6, REALNK+2, REALNK+3
ECX	ECRPRSN+12~, ECRPRSN+22, ECRPRSN+23, ECRPRSN+25, PXREAS+1~, PXREAS+2, PXREAS+3, ECNTPCE+11~, ECNTPCE+21, ECNTPCE+22
ECY	ECRPRSN+27~, ECRPRSN+32, PXREAS+1~, PXREAS+2, PXREAS+3*
ECZ	ECRPRSN+12~, ECRPRSN+30, ECRPRSN+31, PXREAS+1~, PXREAS+4, PXREAS+5*, PXREAS+6
I	ECRPRSN+13~, ECRPRSN+17, ECNTPCE+11~, ECNTPCE+16
IO	PXRUN+7, CPTRUN+6, ECINCPT+18, ECSTPCD+14
>> IOP	ECDSS1+22, ECDSS3+18, QUEDIP+4*
LIEN	ECRPRSN+13~, ECRPRSN+17, ECNTPCE+11~, ECNTPCE+16
TDSS	ECRPRSN+27~
TDSS(	ECRPRSN+29*, ECRPRSN+33
TLOC	ECRPRSN+27~
TLOC(	ECRPRSN+28*, ECRPRSN+33
U	ECRPRSN+32, ECRPRSN+34, QUEDIP+4, ECSCPT+15, ECSCPT+19, ECSCPT+27
X	ECRPRSN+13~, ECRPRSN+23, QUEDIP+1~, QUEDIP+3, ECSUM+12~, ECNTPCE+11~, ECNTPCE+22, ECSCPT+11~, ECSCPT+15, ECSCPT+18* , ECSCPT+26*
XX	REALNK+1~, REALNK+2*, REALNK+3, REALNK+4
Y	ECRPRSN+13~, ECRPRSN+23, ECRPRSN+24, QUEDIP+1~, QUEDIP+2, QUEDIP+4, QUEDIP+5*, ECSUM+12~, ECNTPCE+11~, ECNTPCE+22 , ECNTPCE+23, ECSCPT+11~, ECSCPT+15, ECSCPT+18, ECSCPT+19, ECSCPT+26, ECSCPT+27
YY	REALNK+1~, REALNK+2, REALNK+3, REALNK+4
ZZ	REALNK+1~

Customize PDF page

Package: Event Capture

Routine: ECRRPT1

Information

Source Information

Call Graph

Call Graph Total: 13

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: