Routine: ABPAARHD

Package	Total	Call Graph
Uncategorized	1	^%AUCLS
VA Fileman	1	NOW^%DTC

Package	Total	Caller Graph
Third Party Tracking	2	ABPAADR2 ABPAAR1D

Entry Points

External References

Name	Field # of Occurrence
^%AUCLS	START
NOW^%DTC	WRITE+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: "RUN DATE: ",RUNDT Line Location: WRITE+6
Function Call: WRITE	Prompt: ?(66-(($L(X)/2))),X Line Location: WRITE+7
Function Call: WRITE	Prompt: ?(131-($L(PG))),PG,!,XX Line Location: WRITE+8
Function Call: WRITE	Prompt: !,"",?66-(($L(ABPA("HD",I))/2)),ABPA("HD",I),?130,"" Line Location: WRITE+9
Function Call: WRITE	Prompt: !,XX Line Location: WRITE+10
Function Call: WRITE	Prompt: !! Line Location: WRITE+10
Function Call: WRITE	Prompt: !!!?63,"CLAIMS ISSUED",!?33 Line Location: SUBHD+0
Function Call: WRITE	Prompt: "=" Line Location: SUBHD+0
Function Call: WRITE	Prompt: !?41,"INPATIENT",?68,"OUTPATIENT",?92,"TOTAL",?113,"COLLECTIONS",! Line Location: SUBHD+1
Function Call: WRITE	Prompt: !?34,"UNDUP DAYS/",?61,"UNDUP",?68,"VISITS/",?87,"UNDUP",?106,"DAYS/" Line Location: SUBHD+3
Function Call: WRITE	Prompt: ?113,"VISITS/",?123,"TOTAL",!?34,"PERS. DISCH DOLLARS " Line Location: SUBHD+4
Function Call: WRITE	Prompt: "PERS. CLAIMS DOLLARS PERS. DOLLARS DISCH CLAIMS DOLLARS" Line Location: SUBHD+5
Function Call: WRITE	Prompt: !,"FACILITY",?34,"SRVD. BILL. BILLED SRVD. " Line Location: L7+0
Function Call: WRITE	Prompt: "BILLED BILLED SRVD. BILLED COLL. COLL. COLLECTED",! Line Location: L7+1
Function Call: WRITE	Prompt: ! Line Location: L7+2
Function Call: WRITE	Prompt: !?102,"DOLLARS",!?20,"FACILITY",?102,"COLLECTED" Line Location: L7A+0
Function Call: WRITE	Prompt: !?20 Line Location: L7A+1
Function Call: WRITE	Prompt: "=" Line Location: L7A+1
Function Call: WRITE	Prompt: ?99 Line Location: L7A+2
Function Call: WRITE	Prompt: "=" Line Location: L7A+2
Function Call: WRITE	Prompt: ! Line Location: L7A+3
Function Call: WRITE	Prompt: "=" Line Location: SUBHD2+0
Function Call: WRITE	Prompt: " " Line Location: SUBHD2+1
Function Call: WRITE	Prompt: "=" Line Location: SUBHD2+1
Function Call: WRITE	Prompt: " " Line Location: SUBHD2+2
Function Call: WRITE	Prompt: "=" Line Location: SUBHD2+2
Function Call: WRITE	Prompt: " " Line Location: SUBHD2+3
Function Call: WRITE	Prompt: "=" Line Location: SUBHD2+3
Function Call: WRITE	Prompt: " " Line Location: SUBHD2+4
Function Call: WRITE	Prompt: "=" Line Location: SUBHD2+4

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	WRITE+3
>> %I(1	WRITE+4
>> %I(2	WRITE+4
>> %I(3	WRITE+4
>> ABPA("HD"	NXTX, MOVE, WRITE, WRITE+1, WRITE+9, L7+4!, L7+5
>> ABPAPG	WRITE+5*
>> AU("LINE"	WRITE*, WRITE+1, L7+3!
>> AU("MAX"	NXTX+1, MOVE, WRITE+1, WRITE+9, L7+3!
DUZ(2	START
I	MOVE, WRITE+9, SUBHD, L7+3!, L7+4, L7+5, L7A+1, L7A+2, SUBHD2, SUBHD2+1 , SUBHD2+2, SUBHD2+3, SUBHD2+4*
>> PART2	WRITE+10
PG	WRITE+5*, WRITE+8, L7+3!
RUNDT	WRITE+4*, WRITE+6, L7+3!
RUNTM	WRITE+3*, WRITE+4, L7+3!
SITENAME	START*, WRITE, L7+3!
X	START, NXTX, NXTX+1, WRITE+7*, L7+3!
XX	WRITE+2*, WRITE+8, WRITE+10, L7+3!
Y	WRITE+3*, L7+3!
>> ZTSK	WRITE+7

Customize PDF page

Package: Third Party Tracking

Routine: ABPAARHD

Information

Source Information

Call Graph

Call Graph Total: 2

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
QUIT
L7
SUBHD2
MOVE
SUBHD
WRITE
START
NXTX
L7A

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	WRITE+3
^DIC(4 - [#4]	START

Name	Line Occurrences
L7A	WRITE+10
MOVE	NXTX
NXTX	NXTX+1
SUBHD2	SUBHD+2, L7+2