Routine: ABMDRTX1

Package	Total	Call Graph
Third Party Billing	3	WHD^ABMDRHD (POUT,QUE)^ABMDRUTL $$EN^ABMVDF
Kernel	2	^%ZIS ^%ZISC
VA Fileman	1	^DIR

Entry Points

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"As specified in the 3P Site Parameters File FORCED QUEUEING is in effect!",! Line Location: ABMDRTX1+8
Function Call: WRITE	Prompt: " (cont)" Line Location: WRT+12
Function Call: WRITE	Prompt: " (cont)" Line Location: WRT+13
Function Call: WRITE	Prompt: !,$P(^ABMDVTYP($P(ABM("T"),U,2),0),U) Line Location: WRT+17
Function Call: WRITE	Prompt: !?34,"======",?70,"==========" Line Location: WRT+25
Function Call: WRITE	Prompt: !?10,"Total:",?34,$J($FN(ABM("CNT"),",",0),5),?68,$J($FN(ABM("TOT"),",",2),12) Line Location: WRT+26
Function Call: WRITE	Prompt: $$EN^ABMVDF("IOF") Line Location: WRT+27
Function Call: WRITE	Prompt: !?5,"""*"" following the bill number denotes a bill that has been cancelled" Line Location: HD+6
Function Call: WRITE	Prompt: !?35,"BILL",?75,"BILL" Line Location: HD+7
Function Call: WRITE	Prompt: !?11,"PATIENT",?34,"NUMBER",?46,"ACTIVE INSURER",?73,"AMOUNT" Line Location: HD+8
Function Call: WRITE	Prompt: !,"-------------------------------------------------------------------------------" Line Location: HD+9
Function Call: WRITE	Prompt: !!?15,"Visit Location: ",$P(ABM("T"),U) Line Location: LOC+1
Function Call: WRITE	Prompt: !?34,"------",?70,"----------" Line Location: SUB+2
Function Call: WRITE	Prompt: !?17,"Subtotal:",?34,$J($FN(ABM("SUBCNT"),",",0),5),?68,$J($FN(ABM("SUBTOT"),",",2),12),! Line Location: SUB+3
Routine Call	DIR Line Location: WRT+12
Routine Call	%ZIS Line Location: WRT+2

Name	Line Occurrences (* Changed, ! Killed)
^ABMDBILL(	PRQUE+13, DATA+1, DATA+2, WRT+19, WRT+20, WRT+21
^ABMDPARM(	ABMDRTX1+8
^ABMDVTYP - [#9002274.8]	WRT+17
^AUTNINS - [#9999999.18]	WRT+20
^DIC(4 - [#4]	DATA+7
^DPT - [#2]	DATA+7
^TMP("ABM-TX"	PRQUE+1!, DATA+7*, XIT+2!

Name	Field # of Occurrence
^(0	WRT+20
^(2	WRT+21

Name	Field # of Occurrence
>> ABM	PRQUE+5, PRQUE+6, PRQUE+7, PRQUE+8, PRQUE+12, PRQUE+13, DATA+1, DATA+2, DATA+7, WRT+9* , WRT+10, WRT+11*, WRT+14
>> ABM("A"	WRT+8*, WRT+9, WRT+11
>> ABM("CNT"	WRT+6, WRT+22, WRT+26
>> ABM("DFN"	PRQUE+6, PRQUE+10, PRQUE+11, PRQUE+13
>> ABM("HD"	PRQUE+2, PRQUE+3, PRQUE+7, PRQUE+8, PRQUE+9, HD+2, HD+3*
>> ABM("I"	PRQUE+6*, PRQUE+7
>> ABM("IOP"	WRT+1
>> ABM("L"	DATA+3, DATA+6, DATA+7, WRT+7, WRT+15, WRT+16*
>> ABM("P"	DATA+5*, DATA+6, DATA+7
>> ABM("PG"	PRQUE+4, HD+1, HD+4
>> ABM("SUBCNT"	WRT+6, WRT+23, SUB+3, SUB+4*
>> ABM("SUBTOT"	WRT+6, WRT+21, SUB+1, SUB+3, SUB+5*
>> ABM("T"	WRT+14*, WRT+15, WRT+16, WRT+17, WRT+18, WRT+19, WRT+20, WRT+21, LOC+1
>> ABM("TOT"	WRT+6, WRT+21, WRT+26
>> ABM("V"	DATA+4, DATA+6, DATA+7, WRT+7, WRT+17, WRT+18*
>> ABMBILL0	DATA+2*, DATA+3, DATA+4, DATA+5
DIR	WRT+12!
DIR(0	WRT+12*
>> DIROUT	WRT+11, WRT+12
>> DTOUT	ABMDRTX1+6, WRT+11, WRT+12
>> DUOUT	ABMDRTX1+6, WRT+11, WRT+12
DUZ(2	ABMDRTX1+8, PRQUE+13, DATA+1, DATA+2, WRT+19, WRT+20, WRT+21
IO	ABMDRTX1+8, WRT+4
IO("Q"	ABMDRTX1+7
IO("S"	ABMDRTX1+8, WRT+12
IO(0	ABMDRTX1+8
>> IOP	WRT+1*
IOSL	WRT+12, WRT+13
IOST	ABMDRTX1+8, WRT+12
>> POP	WRT+3
U	ABMDRTX1+8, DATA+3, DATA+4, DATA+5, DATA+7, WRT+15, WRT+16, WRT+17, WRT+18, WRT+19 , WRT+20, WRT+21, LOC+1
>> ZTDESC	QUE+2*
>> ZTRTN	QUE+1*