Routine: ABPVTX2

Package	Total	Call Graph
Third Party Tracking	2	^ABPVVAR PAUSE^ABPVZMM
Uncategorized	1	^%AUCLS
Utilities	1	^AUGSAVE
VA Fileman	1	^DIE

Package	Total	Caller Graph
Third Party Tracking	2	ABPVTX0 ABPVTX1

Entry Points

Name	Comments	DBIA/ICR reference
HEADER
JOBABEND
S4A
S4B
S4C
ZEND
A0
ZENDA
WRITETP
S4START
S4END
SETZERA
S5START

External References

Name	Field # of Occurrence
^%AUCLS	S5START
^ABPVVAR	S4END
PAUSE^ABPVZMM	WRITETP+3
^AUGSAVE	WRITETP+1
^DIE	S4B+8, SETZERA

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"NOT AN ENTRY POINT" Line Location: A0+0
Function Call: WRITE	Prompt: !!,"Generating Private Insurance Claim Export Records: ",! Line Location: S4START+1
Function Call: WRITE	Prompt: $J((RCT/2),8) Line Location: S4B+9
Function Call: WRITE	Prompt: !!,*7,?10,"NO RECORDS AVAILABLE FOR EXPORT -- " Line Location: S4END+1
Function Call: WRITE	Prompt: ! Line Location: S4END+4
Function Call: WRITE	Prompt: @A("PRINT",10) Line Location: S4END+4
Function Call: WRITE	Prompt: @IOF Line Location: S5START+0
Function Call: WRITE	Prompt: @IOF Line Location: S5START+0
Function Call: WRITE	Prompt: *7,!!,?25,"ABNORMAL END OF PVT INS EXPORT" Line Location: JOBABEND+0
Function Call: WRITE	Prompt: !!?(40-($L(AUFLG(1))/2)),AUFLG(1),!! Line Location: JOBABEND+1
Function Call: WRITE	Prompt: !,"ENTER <RETURN> TO CONTINUE" Line Location: JOBABEND+2
Function Call: WRITE	Prompt: @IOF Line Location: ZEND+0
Function Call: WRITE	Prompt: "*" Line Location: HEADER+0
Function Call: WRITE	Prompt: !,"",?12,"PRIVATE INSURANCE BILLING CLAIM EXPORT REPORT",?69,"",! Line Location: HEADER+1
Function Call: WRITE	Prompt: "",?70-$L(X)/2,X,?69,"",! Line Location: HEADER+2
Function Call: WRITE	Prompt: "",?70-$L(Y)/2,Y,?69,"",! Line Location: HEADER+3
Function Call: WRITE	Prompt: "*" Line Location: HEADER+3
Function Call: WRITE	Prompt: !!?10,"FACILITY CODE = ",?40,$P(XX,"^",1) Line Location: HEADER+4
Function Call: WRITE	Prompt: !,?10,"DATE EXPORT CREATED = " Line Location: HEADER+5
Function Call: WRITE	Prompt: ?40,Y Line Location: HEADER+5
Function Call: WRITE	Prompt: !,?10,"BEGINNING CLAIM DATE = " Line Location: HEADER+6
Function Call: WRITE	Prompt: ?40,Y Line Location: HEADER+6
Function Call: WRITE	Prompt: !,?10,"ENDING CLAIM DATE = " Line Location: HEADER+7
Function Call: WRITE	Prompt: ?40,Y Line Location: HEADER+7
Function Call: WRITE	Prompt: !,?10,"NUMBER OF CLAIM RECORDS = ",?40,$P(XX,"^",7),!! Line Location: HEADER+8
Function Call: WRITE	Prompt: "*" Line Location: HEADER+9
Routine Call	DIE Line Location: S4B+8 SETZERA

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ABPVTXST - [#9002271]	Classic Fileman Calls
^ABMDTXST - [#9002274.6]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZIS("C"	S5START, ZEND
^ABMDBILL(	S4B+8
^ABMDBILL("B"	S4B+8
^ABPVDATA	S4START!, S4B+6, S4B+7
^ABPVDATA(0	S4END+3*, S4END+5
^ABPVFAC - [#9002273.02]	S4A, S4A+2, S4B+3*
^ABPVFAC("E"	S4B+4!, S4B+5*
^ABPVFAC("F"	S4B+5*
^ABPVTXST - [#9002271]	WRITETP+6, SETZERA+1, SETZERA+2
^ABPVTXST("B"	WRITETP+5, WRITETP+7*
^ABPVTXST(0	WRITETP+4, WRITETP+6, WRITETP+7
^AUTNINS - [#9999999.18]	S4C, S4A+8, S4A+9, S4B
^AUTTLOC - [#9999999.06]	S4A+2, S4END+3
^DD("DD"	HEADER+3, HEADER+5, HEADER+6, HEADER+7
^DIC(4 - [#4]	S4END+3, HEADER+2
^DPT - [#2]	S4A+1, S4B+2

Label References

Name	Line Occurrences
HEADER	S5START
JOBABEND	WRITETP+1
S4A	S4B+12
S4C	S4B
S4END	S4A
SETZERA	WRITETP+5
ZEND	S4END, SETZERA+3

Naked Globals

Name	Field # of Occurrence
^(1	S4B+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> A("PRINT"	S4END+4
ABPV	ZENDA+1!
ABPV("HD"	ZENDA+1!
ABPV("SITE"	S4END+3
ABPVMESS	WRITETP+2!*
ABPVMESS(2	WRITETP+3*
AUFLG	WRITETP+1, JOBABEND+1!
AUFLG(1	JOBABEND+1
>> AUGL	WRITETP*
>> AUTLE	WRITETP*
BRECNO	S4START+2, ZENDA!
>> DA	S4B+8, SETZERA
>> DIE	S4B+8, WRITETP+4
>> DR	S4B+8, SETZERA
>> DR(2	SETZERA*
DT	S4B+1, S4B+3, S4B+5, S4END+3, SETZERA, SETZERA+2, HEADER+3
DTIME	JOBABEND+2
DUZ(2	WRITETP+5, WRITETP+6, WRITETP+7, SETZERA, SETZERA+1, SETZERA+2, HEADER+2
EDATE	S4B+6, S4B+11, S4END+3, SETZERA+2, ZENDA!
EX1	S4A+1, S4A+2, S4A+3, S4A+4, S4A+5, S4A+6, S4A+7, S4A+8, S4A+9, S4B+1 , S4B+2*, S4B+6, ZENDA!
>> EX2	S4C, S4B, S4B+7
FDATE	S4B+6, S4B+10, S4END+3, SETZERA+2, ZENDA!
I	S4C, S4A+8, ZENDA!, HEADER, HEADER+3, HEADER+9*
IO	S4END+4, S5START, ZEND
IO(0	S4START+1, S4B+9, S4END+1, S4END+4, ZEND
IOF	S5START, ZEND
LEXDATE	ZENDA+1!
>> LRECNO	S4B+12*, S4END+3, SETZERA+2
>> NI	SETZERA+1*, SETZERA+2
PGNO	ZENDA!
R	S4START, S4START+2, S4A*, S4A+2, S4B+3, S4B+4, S4B+5, S4B+12, ZENDA!
RCT	S4START, S4B+6, S4B+7*, S4B+9, S4END, S4END+3, SETZERA+2, ZENDA!
RR	S4START*, ZENDA!
RRR	S4START*, ZENDA!
RSAVE	ZENDA!
X	S4C, S4A+8, S4A+9, S4B, JOBABEND+2, ZENDA!, HEADER+2*
>> XN	WRITETP+4*, WRITETP+7
>> XX	S4END+5*, HEADER+4, HEADER+5, HEADER+6, HEADER+7, HEADER+8
Y	ZENDA!, HEADER+3, HEADER+5, HEADER+6, HEADER+7
ZCLAMT	ZENDA!
ZCLCT	ZENDA!
ZINSCO	ZENDA+1!
ZINSERR	ZENDA+1!
ZNODE	ZENDA+1!
ZX	S4A*, S4A+1, S4A+3, S4A+4, S4A+5, S4A+6, S4A+7, S4A+8, S4B+1, S4B+2 , S4B+6, S4B+8, S4B+10, S4B+11, ZENDA+1!
ZY	S4C, S4B, ZENDA+1!

Customize PDF page

Package: Third Party Tracking

Routine: ABPVTX2

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: