Routine: ABMDE8B

Package	Total	Call Graph
Third Party Billing	7	$$CPT^ABMCVAPI (PAUSE,SUM)^ABMDE1 ^ABMDE8B1 (B,MODE)^ABMDE8X ^ABMDERR ($$GETREV,$$SDT)^ABMDUTL ^ABMDWRAP
VA Fileman	1	$$GET1^DIQ

Entry Points

External References

Name	Field # of Occurrence
$$CPT^ABMCVAPI	ICD+3
PAUSE^ABMDE1	DISP2+1, EOP
SUM^ABMDE1	DISP2+2
^ABMDE8B1	MS+16
B^ABMDE8X	MS+1
MODE^ABMDE8X	MS+12
^ABMDERR	XIT
$$GETREV^ABMDUTL	EOP+19
$$SDT^ABMDUTL	EOP+10, EOP+11
^ABMDWRAP	EOP+31
$$GET1^DIQ	EOP+24

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"BIL",?5,"SERV",?12,"REVN",?19,"CORR",?26,"CPT" Line Location: HD+1
Function Call: WRITE	Prompt: !,"SEQ",?5,"DATE",?12,"CODE",?19,"DIAG",?26,"CODE",?41,"PROVIDER'S NARRATIVE",?64,"UNITS",?72,"CHARGE" Line Location: HD+2
Function Call: WRITE	Prompt: !,"===",?5,"=====",?12,"====",?18,"======",?26,"===========================================",?71,"========" Line Location: HD+3
Function Call: WRITE	Prompt: !?70,"=========",!?68,$J(("$"_$FN(ABM("TOTL"),",",2)),11) Line Location: TOTL+0
Function Call: WRITE	Prompt: !,$J(ABM("I"),2) Line Location: EOP+9
Function Call: WRITE	Prompt: ?5,"CHARGE DATE: ",$$SDT^ABMDUTL($P(ABM("X0"),U,5)) Line Location: EOP+10
Function Call: WRITE	Prompt: "-",$$SDT^ABMDUTL($P(ABM("X0"),U,19)) Line Location: EOP+11
Function Call: WRITE	Prompt: !,?12,$$GETREV^ABMDUTL($P(ABM("X0"),U,3)) Line Location: EOP+19
Function Call: WRITE	Prompt: ?18,$P(ABM("X0"),U,4) Line Location: EOP+20
Function Call: WRITE	Prompt: ?26,$P(ABMZ(ABM("I")),U) Line Location: EOP+21
Function Call: WRITE	Prompt: ABMZ("MOD") Condition for execution: ABMZ("MOD")]"" Line Location: EOP+21

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
9002274.3021	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABMDCLM - [#9002274.3]	APRV+2, APRV+3, MS+4, MS+5, LOOP+1, MS1+2!, MS1+3, MS1+4, EOP+14, EOP+15 , EOP+16, EOP+18
^ABMDEXP - [#9002274.08]	MS+13, MS+14
^VA(200 - [#200]	APRV+3, EOP+13, EOP+18

Label References

Name	Line Occurrences
HD	MS+15, EOP
LOOP	MS+15
MS	APRV
MS1	LOOP+1
XIT	DISP2+1, TOTL+1

Naked Globals

Name	Field # of Occurrence
^(0	APRV+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ABM	LOOP, LOOP+1, MS1+2, EOP+14, EOP+15, EOP+16, EOP+18, XIT+1!
ABM("I"	LOOP+1*, ICD+3, EOP+9, EOP+21
ABM("ICD"	ICD+2*
ABM("ICD0"	ICD+1!
ABM("L"	LOOP+2*
ABM("LITMTOTAL"	EOP+4, EOP+5, EOP+6*, EOP+7, EOP+8, EOP+32
ABM("M"	EOP+2*, EOP+3
ABM("TOTL"	MS+10, TOTL, EOP+8
ABM("X"	LOOP+1*, MS1+2, MS1+3, MS1+4, ICD+3, EOP+23
ABM("X0"	MS1+3*, MS1+5, ICD+3, EOP+3, EOP+4, EOP+5, EOP+6, EOP+10, EOP+11, EOP+12 , EOP+13, EOP+19, EOP+20, EOP+24, EOP+28
ABM("X1"	MS1+4*, EOP+3
>> ABMDPRV	MS+4, MS+5
>> ABME("CONT"	XIT*!
>> ABME(0	XIT
ABMMODE	XIT+1!
ABMMODE(2	MS+13, MS+14
>> ABMP("CDFN"	APRV+2, APRV+3, MS+4, MS+5, LOOP+1, MS1+2, MS1+3, MS1+4, EOP+14, EOP+15 , EOP+16, EOP+18, EOP+23
>> ABMP("DDL"	DISP2+1
>> ABMP("VDT"	ICD+3
>> ABMP("VISTDT"	MS+2, MS+3
>> ABMP("VTYP"	MS+16
>> ABMP(638	APRV
>> ABMRPRV	EOP+14, EOP+15, EOP+16*, EOP+17, EOP+18
ABMU	EOP+7!
ABMU("2LM"	EOP+29*
ABMU("2RM"	EOP+30*
ABMU("2TXT"	EOP+28*
ABMU("LM"	EOP+25*
ABMU("RM"	EOP+26*
ABMU("TAB"	EOP+27*
ABMU("TXT"	EOP+24*
ABMU(1	EOP+7*
ABMZ	DISP2!
ABMZ(	ICD+3*, EOP+21
ABMZ("CAT"	MS+1*
ABMZ("CHRG"	MS+7*
ABMZ("CONTRACT"	APRV+3*
ABMZ("D"	APRV+2*, APRV+3
ABMZ("DIAG"	MS+14*
ABMZ("DIC"	MS+9*
ABMZ("DR"	MS+2, MS+3, MS+6, MS+13
ABMZ("DR2"	LOOP+2*
ABMZ("ITEM"	MS+8*
ABMZ("LNUM"	LOOP, LOOP+2, MS1+5
ABMZ("MOD"	LOOP+3, EOP+1, EOP+3*, EOP+5, EOP+21, EOP+25, EOP+27
ABMZ("NARR"	MS+11*
ABMZ("NUM"	LOOP, LOOP+1
ABMZ("PG"	DISP2*
ABMZ("SUB"	MS+1*
ABMZ("TITL"	DISP2*
ABMZ("X"	MS+10*
ABMZ(1	LOOP*
>> DIROUT	DISP2+1
>> DTOUT	DISP2+1
>> DUOUT	DISP2+1
DUZ(2	APRV+2, APRV+3, MS+4, MS+5, LOOP+1, MS1+2, MS1+3, MS1+4, EOP+14, EOP+15 , EOP+16, EOP+18
I	APRV+1~*, APRV+2
>> IENS	EOP+23*, EOP+24
IOSL	DISP2+1, EOP
U	APRV+3, MS+5, MS+11, LOOP+3, MS1+5, ICD+3, EOP+3, EOP+7, EOP+10, EOP+11 , EOP+12, EOP+13, EOP+18, EOP+19, EOP+20, EOP+21, EOP+24, EOP+28

Customize PDF page

Package: Third Party Billing

Routine: ABMDE8B

Information

Source Information

Call Graph

Call Graph Total: 8

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
EOP
ICD	;
MS1	; ; If no data in surgical multiple, kill the x-ref that brought us here
TOTL
APRV
XIT
HD	;
MS	; Surgical Procedures
DISP2
LOOP