Routine: ABMDRAP1

Information

ABMDRAP1 ; IHS/ASDST/DMJ - Approved Bills Summary Report ;

Source file <ABMDRAP1.m>

Package	Total	Call Graph
Third Party Billing	3	^ABMDRCHK WHD^ABMDRHD PAZ^ABMDRUTL
VA Fileman	1	^%DTC

Name	Comments	DBIA/ICR reference
PRINT	;EP for printing data
DATA
COMPUTE	;EP - Entry Point for setting up data
HDB
HD

Name	Line Occurrences
Function Call: WRITE	Prompt: !?35,"=====",?56,"===========" Line Location: PRINT+12
Function Call: WRITE	Prompt: !,?35,$J($FN($P(ABM("TOT"),U),",",0),4) Line Location: PRINT+13
Function Call: WRITE	Prompt: ?56,$J($FN($P(ABM("TOT"),U,2),",",2),10) Line Location: PRINT+14
Function Call: WRITE	Prompt: !?45,"Avg Days" Line Location: HDB+1
Function Call: WRITE	Prompt: !?35,"Number",?45,"Awaiting",?60,"Total" Line Location: HDB+2
Function Call: WRITE	Prompt: !?3,$S(ABMP("VAR")=2:"Insurer",1:"Export Mode"),?35,"Bills",?45," Export",?59,"Charges" Line Location: HDB+3
Function Call: WRITE	Prompt: !,"-------------------------------------------------------------------------------" Line Location: HDB+4

Name	Line Occurrences (* Changed, ! Killed)
^ABMDBILL(	COMPUTE+3, DATA+1, DATA+6
^ABMDEXP - [#9002274.08]	PRINT+7, PRINT+8
^AUTNINS - [#9999999.18]	PRINT+8

Name	Field # of Occurrence
^(0	DATA+1
^(1	DATA+1

Name	Field # of Occurrence
>> ABM	COMPUTE+2, COMPUTE+3, DATA+1, DATA+6
>> ABM("DT"	DATA+1*, DATA+4
>> ABM("F"	PRINT+3*, PRINT+5, PRINT+6, PRINT+7, PRINT+8, PRINT+9, PRINT+10, PRINT+11
>> ABM("I"	HDB*
>> ABM("PG"	PRINT+1, HDB
>> ABM("TOT"	PRINT+2, PRINT+5, PRINT+6*, PRINT+13, PRINT+14
>> ABM("VAR"	DATA+1*, DATA+2, DATA+3, DATA+5, DATA+6
>> ABMP("APP"	COMPUTE+1!, DATA+2, DATA+3, DATA+5, DATA+6, PRINT+3, PRINT+5, PRINT+6, PRINT+9, PRINT+10 , PRINT+11
>> ABMP("HIT"	DATA*
>> ABMP("VAR"	DATA+1, PRINT+8, HDB+3
>> DIROUT	PRINT+3, PRINT+4, HD
DT	DATA+4
>> DTOUT	PRINT+3, PRINT+4, HD
>> DUOUT	PRINT+3, PRINT+4, HD
DUZ(2	COMPUTE+3, DATA+1, DATA+6
IO	PRINT+1
IOSL	PRINT+4
U	DATA+1, DATA+3, DATA+5, DATA+6, PRINT+5, PRINT+6, PRINT+8, PRINT+9, PRINT+10, PRINT+11 , PRINT+13, PRINT+14
>> X	DATA+5
>> X1	DATA+4*
>> X2	DATA+4*