Routine: ABMDRFE2

Package	Total	Call Graph
Kernel	3	^%ZIS ^%ZISC ^%ZTLOAD
Third Party Billing	2	($$CPT,$$ICDOP,IHSCPTD)^ABMCVAPI ^ABMDBAN
VA Fileman	2	^DIC ^DIR

Entry Points

External References

Name	Field # of Occurrence
^%ZIS	W1
^%ZISC	XIT+2
^%ZTLOAD	QUE+1
$$CPT^ABMCVAPI	PRQUE+4
$$ICDOP^ABMCVAPI	PRQUE+21
IHSCPTD^ABMCVAPI	PRQUE+13
^ABMDBAN	ABMDRFE2+5
^DIC	LOW, HIGH
^DIR	XIT+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"As specified in the 3P Site Parameters File FORCED QUEUEING is in effect!",! Line Location: W1+2
Function Call: WRITE	Prompt: ! Line Location: XIT+1
Function Call: WRITE	Prompt: ! Line Location: PRTTXT+1
Function Call: WRITE	Prompt: ?ABMU("LM"),ABMU("F") Line Location: PRTTXT3+1
Function Call: WRITE	Prompt: ?ABMU("2LM"),ABMU("2F") Line Location: PRTTXT3+1
Function Call: WRITE	Prompt: @$P(ABMU(ABMU("I")),U),$P(ABMU(ABMU("I")),U,2) Line Location: PRTTXT3+2
Function Call: WRITE	Prompt: @IOF Line Location: HD+0
Function Call: WRITE	Prompt: "CPT",?70,"ICD CORRESPONDING",?126,"FEE" Line Location: HD+1
Function Call: WRITE	Prompt: !,"CODE - CPT DESCRIPTION",?70,"CODE - ICD DESCRIPTION",?124,"AMOUNT" Line Location: HD+2
Function Call: WRITE	Prompt: !,ABM("H") Line Location: HD+3
Routine Call	DIC Line Location: LOW HIGH
Routine Call	DIR Line Location: XIT+1
Routine Call	%ZIS Line Location: W1

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ICPT - [#81]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABMDFEE(1	PRQUE+7, PRQUE+8, PRQUE+9, PRQUE+10
^ABMDFEE(11	PRQUE+6
^ABMDPARM(1 - [#9002274.5]	W1+2
^ICD0 - [#80.1]	PRQUE+21
^ICPT - [#81]	PRQUE+3, PRQUE+21

Label References

Name	Line Occurrences
2	PRTTXT3
HD	PRQUE+2, PRQUE+5
HIGH	HIGH+1
LOW	LOW+1
PRTTXT	PRQUE+25
PRTTXT2	PRTTXT+4
PRTTXT3	PRTTXT2
QUE	W1+1, W1+2
XIT	LOW+1, HIGH+1, W1, QUE+2

Naked Globals

Name	Field # of Occurrence
^(0	PRQUE+6, PRQUE+7, PRQUE+8, PRQUE+9, PRQUE+10

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %ZIS	W1*
>> %ZIS("A"	W1*
>> %ZIS("B"	W1*
ABM	PRQUE+3, PRQUE+4, PRQUE+6, PRQUE+7, PRQUE+8, PRQUE+9, PRQUE+10, PRQUE+18, PRQUE+21, XIT! , QUE
ABM("H"	HD+3*
ABM("IOP"	W1+1*
ABM("X0"	PRQUE+13
ABM(1	LOW+1*, PRQUE+3
ABM(2	HIGH+1*, PRQUE+3
ABM(3	PRQUE+20, PRQUE+21
>> ABMM("SUB"	ABMDRFE2+5*
ABMU	ABMDRFE2+5!, QIT!
ABMU(	PRTTXT3+2
ABMU("2F"	PRTTXT3+1, 2*
ABMU("2LM"	PRQUE+23, PRTTXT+3, PRTTXT3+1, PRTTXT3+4
ABMU("2LNG"	PRTTXT+3, PRTTXT3+4
ABMU("2RM"	PRQUE+23*, PRTTXT+3
ABMU("2TAB"	PRQUE+23, PRTTXT+3, PRTTXT3+4*
ABMU("2TXT"	PRQUE+21, PRQUE+23, PRTTXT+3, PRTTXT+4, PRTTXT3, PRTTXT3+1, PRTTXT3+4, 2, 2+1!
ABMU("C"	PRTTXT2+1*, PRTTXT2+2
ABMU("CP"	PRQUE+14, PRQUE+15, PRQUE+16
ABMU("F"	PRTTXT2, PRTTXT2+2, PRTTXT3+1
ABMU("FLG"	PRTTXT2!, PRTTXT2+1, PRTTXT2+3!, PRTTXT3+3, 2
ABMU("I"	PRTTXT3+2*
ABMU("L"	PRTTXT2+1*
ABMU("LM"	PRQUE+24, PRTTXT+2, PRTTXT3+1, PRTTXT3+3
ABMU("LNG"	PRTTXT+2, PRTTXT2, PRTTXT2+1, PRTTXT3+3
ABMU("Q"	PRTTXT+4*, PRTTXT3+2, 2
ABMU("RM"	PRQUE+24*, PRTTXT+2
ABMU("TAB"	PRQUE+24, PRTTXT+2, PRTTXT3+3*
ABMU("TXT"	PRQUE+12, PRQUE+16, PRQUE+18, PRTTXT+4, PRTTXT2, PRTTXT2+1, PRTTXT2+2*, PRTTXT2+3
ABMU(1	PRQUE+6, PRQUE+7, PRQUE+8, PRQUE+9, PRQUE+10*
>> ABMZCPTD	PRQUE+13
>> ABMZCPTD(	PRQUE+15, PRQUE+16
>> DIC	LOW, HIGH
>> DIC("A"	LOW, HIGH
>> DIC(0	LOW, HIGH
DIR	ABMDRFE2+5!
DIR("A"	XIT+1*
DIR(0	XIT+1*
>> DIROUT	XIT+1
>> DTOUT	LOW+1, HIGH+1, XIT+1
>> DUOUT	LOW+1, HIGH+1
>> I	PRQUE+21*
IO	W1, W1+2, PRQUE+1
IO("Q"	W1+1, QUE!
IO("S"	W1+2, XIT+1
IO(0	W1+2
IOF	HD
ION	W1+1
IOSL	PRQUE+5
IOST	W1+2, XIT+1
>> POP	W1
U	W1+2, PRQUE+4, PRQUE+6, PRQUE+7, PRQUE+8, PRQUE+9, PRQUE+10, PRQUE+13, PRQUE+21, PRTTXT3+2
>> X	LOW+1, HIGH+1
>> Y	LOW+1, HIGH+1
>> ZTDESC	QUE*
>> ZTRTN	QUE*
>> ZTSAVE(	QUE*
>> ZTSK	QUE+1

Customize PDF page

Package: Third Party Billing

Routine: ABMDRFE2

Information

Source Information

Call Graph

Call Graph Total: 7

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
PRQUE	;EP - Entry Point for Taskman
PRTTXT	; UTIL FOR WRAP-AROUND
QUE
HD
HIGH
2
XIT
LOW
W1
QIT
PRTTXT3
PRTTXT2