Routine: ABPADC01

Package	Total	Call Graph
Third Party Tracking	4	FILE^ABPAPD7 BEGIN^ABPAPD7A CURARAY^ABPAPD7C CRT^ABPAVAR
VA Fileman	1	YX^%DTC

Package	Total	Caller Graph
Third Party Tracking	1	ABPAPI01

Entry Points

Name	Comments	DBIA/ICR reference
HPARRAY	;
BEGIN	;ENTRY POINT
END	;
SETUP	;
KVARS	;
UPDATE	;
GETDAT	;
GETDATA	;

External References

Name	Field # of Occurrence
YX^%DTC	SETUP+6, END+2
FILE^ABPAPD7	GETDATA+19
BEGIN^ABPAPD7A	GETDATA+19
CURARAY^ABPAPD7C	GETDATA+19
CRT^ABPAVAR	SETUP+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"<<< NOT AN ENTRY POINT - JOB ABORTED >>>",!! Line Location: ABPADC01+2
Function Call: WRITE	Prompt: !!?3,"Converting your payment data to the v1.4 format:",!!?6,"You " Line Location: SETUP+4
Function Call: WRITE	Prompt: "have ",ABPA("PCNT")," patient(s) in your database to process." Line Location: SETUP+5
Function Call: WRITE	Prompt: !!?6,"Starting time: " Line Location: SETUP+6
Function Call: WRITE	Prompt: $P(Y,"@",2),!! Line Location: SETUP+6
Function Call: WRITE	Prompt: ?(40-($L(X)\2)),X,! Line Location: SETUP+7
Function Call: WRITE	Prompt: ?13,0 Line Location: SETUP+8
Function Call: WRITE	Prompt: ?($X+3) Line Location: SETUP+8
Function Call: WRITE	Prompt: " " Condition for execution: I=10 Line Location: SETUP+8
Function Call: WRITE	Prompt: I Line Location: SETUP+8
Function Call: WRITE	Prompt: !?13,"\|" Line Location: SETUP+9
Function Call: WRITE	Prompt: "----\|" Line Location: SETUP+9
Function Call: WRITE	Prompt: @IOBS Line Location: SETUP+10
Function Call: WRITE	Prompt: @ABPARON Condition for execution: I=14 Line Location: SETUP+10
Function Call: WRITE	Prompt: "\|" Condition for execution: ABPA("C%")=.02 Line Location: UPDATE+1
Function Call: WRITE	Prompt: "-" Line Location: UPDATE+1
Function Call: WRITE	Prompt: "\|" Line Location: UPDATE+2
Function Call: WRITE	Prompt: @ABPAROFF,!!?6,"Ending time: " Line Location: END+2
Function Call: WRITE	Prompt: $P(Y,"@",2),!! Line Location: END+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABPVAO - [#9002270.02]	GETDATA+2, GETDATA+4, GETDATA+9, GETDATA+10, GETDATA+14, GETDATA+16, GETDATA+17, GETDATA+18, GETDAT+1, HPARRAY+5 , HPARRAY+6
^ABPVAO("PD"	HPARRAY+3
^ABPVAO(0	SETUP+2

Label References

Name	Line Occurrences
END	BEGIN+1
GETDAT	GETDATA+18
GETDATA	BEGIN+1
HPARRAY	GETDAT+3
KVARS	GETDATA+5
SETUP	BEGIN+1
UPDATE	GETDATA+20, END+1

Naked Globals

Name	Field # of Occurrence
^(0	HPARRAY+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %H	SETUP+6, END+2
ABPA	END+3!
ABPA(	SETUP+3*, GETDATA+20
ABPA("$"	KVARS+5!
ABPA("%"	KVARS+5!
ABPA("C"	GETDAT+4*
ABPA("C%"	SETUP+1, GETDATA+20, UPDATE+1, UPDATE+3, END+1
ABPA("CONVERT"	SETUP+1*
ABPA("CP"	GETDAT+2*, GETDAT+3, KVARS+1!
ABPA("D$"	KVARS+4!
ABPA("DB"	KVARS+3!
ABPA("HP"	GETDAT+3, GETDAT+7, HPARRAY+11, HPARRAY+12, HPARRAY+13, HPARRAY+14*, KVARS+1!
ABPA("N$"	KVARS+4!
ABPA("NB"	KVARS+3!
ABPA("P$"	KVARS+4!
ABPA("PB"	KVARS+3!
ABPA("PCNT"	SETUP+2*, SETUP+3, SETUP+5
ABPA("PP"	KVARS+1!
ABPA("RCT"	GETDATA+1, GETDATA+3, GETDATA+20
ABPA("S$"	KVARS+4!
ABPA("SB"	KVARS+3!
ABPA("UP"	GETDATA+7, GETDATA+12, KVARS+1!
ABPA("Y"	GETDATA+19*
ABPAAPTR	GETDATA+8, GETDATA+9, GETDATA+10, KVARS+7!
>> ABPABAL	HPARRAY+10*, HPARRAY+11
ABPACAMT	GETDATA+5, GETDAT+5, KVARS+1!
ABPACCNT	GETDATA+5, GETDAT+4, KVARS+1!
ABPACDFN	KVARS+2!
ABPACTOB	KVARS+3!
ABPACURA	KVARS+7!
ABPACURB	KVARS+4!
ABPAD	KVARS+5!
ABPADATA	GETDAT+1*, GETDAT+5, HPARRAY+10, HPARRAY+14, KVARS+5!
ABPADDFN	GETDATA+3, GETDATA+4, GETDATA+9, GETDATA+10, GETDATA+14, GETDATA+16, GETDATA+17, END+3!
ABPADOS	GETDATA+16*, GETDAT+2, GETDAT+3, GETDAT+7, HPARRAY+11, HPARRAY+12, HPARRAY+13, HPARRAY+14, KVARS+3!
ABPADPTR	GETDATA+13, GETDATA+14, GETDATA+15, GETDATA+16, GETDATA+17, KVARS+7!
ABPAH2	KVARS+6!
ABPAH3	KVARS+6!
ABPAH4	KVARS+6!
ABPAH5	KVARS+7!
>> ABPAJ	HPARRAY+1, HPARRAY+12
>> ABPAL	HPARRAY+7*, HPARRAY+8
>> ABPAOBAL	GETDATA+5, HPARRAY+11
ABPAP1	KVARS+2!
ABPAP2	HPARRAY+9, KVARS+2!
ABPAP3	HPARRAY+9, KVARS+2!
ABPAP4	HPARRAY+9, KVARS+2!
ABPAP5	HPARRAY+9, KVARS+2!
ABPAP6	KVARS+2!
ABPAPCOD	GETDATA+11*, GETDATA+12, KVARS+7!
ABPAPTOT	HPARRAY+2, HPARRAY+9, HPARRAY+10, HPARRAY+13, KVARS+2!
ABPAPTR	GETDAT+1*, KVARS+7!
>> ABPARCD	HPARRAY+6*, HPARRAY+7, HPARRAY+8
>> ABPAROFF	SETUP+1, END+2
>> ABPARON	SETUP+10
ABPAT1	KVARS+6!
ABPAT2	KVARS+6!
ABPAT3	KVARS+6!
ABPAT4	KVARS+6!
ABPAT5	KVARS+6!
ABPAT6	KVARS+6!
>> ABPATA2	GETDATA+6*
>> ABPATA3	GETDATA+6*
>> ABPATA4	GETDATA+6*
>> ABPATA5	GETDATA+6*
>> ABPATA7	GETDATA+6*
ABPATBAL	KVARS+5!
ABPATCNT	KVARS+4!
ABPATDFN	GETDATA+1, GETDATA+2, GETDATA+4, GETDATA+9, GETDATA+10, GETDATA+14, GETDATA+16, GETDATA+17, GETDATA+18, GETDAT+1 , HPARRAY+3, HPARRAY+5, HPARRAY+6, END+3!
>> ABPATPD	GETDATA+5, HPARRAY+9
ABPAY	KVARS+2!, KVARS+5!
ABPAZ	HPARRAY+2, HPARRAY+3, HPARRAY+5, HPARRAY+6, KVARS+5!
ABPAZZ	HPARRAY+4, HPARRAY+5, HPARRAY+6, KVARS+5!
>> C	GETDATA+7*
DA	GETDATA+17*, GETDATA+18, GETDAT+1, GETDAT+2, GETDAT+3, GETDAT+4, GETDAT+7, HPARRAY+3, HPARRAY+7, HPARRAY+11 , HPARRAY+12, HPARRAY+13, HPARRAY+14, KVARS+7!
>> I	SETUP+3, SETUP+8, SETUP+9, SETUP+10
>> IOBS	SETUP+10
>> J	GETDAT+6*, GETDAT+7
X	SETUP+7, GETDATA+10, GETDATA+11, GETDATA+12, KVARS+7!
>> Y	SETUP+6, END+2

Customize PDF page

Package: Third Party Tracking

Routine: ABPADC01

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: