Routine: ABMDEMLC

Package	Total	Call Graph
Third Party Billing	4	$$DX^ABMCVAPI RES^ABMDEMLA $$ONE^ABMFEAPI $$DINUM^ABMFOFS
VA Fileman	3	^DIC ^DIE ^DIR
Kernel	1	$$VERSION^XPDUTL

Package	Total	Caller Graph
Third Party Billing	5	ABMDE6 ABMDE8D ABMDE8J ABMDEML ABMDEMLE

Entry Points

Name	Comments	DBIA/ICR reference
MOD2	;EP for editing Modifiers
MOD3	;EP ;abm2.621 IHS/SD/SDR HEAT168435 added line tag
POS	; figure place of service ; set place of service ; 21 if visit type is inpatient ; 24 if visit type is ambulatory surgery ; 23 if clinic is emergency medicine (code 30) ; 11 for all other cases
TOSA	; EP - add type of service ; 7/9/04 - Call to this tag have been commented out. This is marked as NOT USED ; in 837 implementation guide. If it is determined that it really is needed tags ; can be restored in ABMDEML and ABMDEMLE
SELMOD	;
DX1	;LIST DX'S
NARR	;EP for entering Provider's Narrative
DX	;EP for selecting Corresponding Diagnosis
POSA	; EP - place of service
MOD	;EP for adding a Modifier

External References

Name	Field # of Occurrence
$$DX^ABMCVAPI	DX1+1
RES^ABMDEMLA	DX+10
$$ONE^ABMFEAPI	MOD2+4, MOD+5
$$DINUM^ABMFOFS	MOD+5
^DIC	DX+36, NARR+6, SELMOD+2
^DIE	MOD3+29, MOD3+41, MOD3+42, MOD3+44, MOD3+45
^DIR	DX+31, MOD3+15, MOD3+22, MOD3+34, MOD+15
$$VERSION^XPDUTL	MOD3+12, MOD+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"There are no Diagnosis entered to select from." Line Location: DX+1
Function Call: WRITE	Prompt: !!,?21,"DIAGNOSES" Line Location: DX+3
Function Call: WRITE	Prompt: !,?7,"Seq",?14,"ICD" Line Location: DX+5
Function Call: WRITE	Prompt: !,?7,"Num",?14,"Code",?33,"Diagnosis Description" Line Location: DX+7
Function Call: WRITE	Prompt: !,?7,"===",?12,"========",?22,"============================================" Line Location: DX+9
Function Call: WRITE	Prompt: ! Line Location: DX+21
Function Call: WRITE	Prompt: !,?8,ABMX("I"),?12,$P(ABMX("X0"),U,2),?22,$P(ABMX("X0"),U,4) Line Location: DX1+4
Function Call: WRITE	Prompt: ! Line Location: NARR+1
Function Call: WRITE	Prompt: 7,!!," Modifier has already been entered! *" Line Location: MOD+12
Function Call: WRITE	Prompt: ! Line Location: SELMOD+1
Routine Call	DIE Line Location: MOD3+29 MOD3+41 MOD3+42 MOD3+44 MOD3+45
Routine Call	DIC Line Location: DX+36 NARR+6 SELMOD+2
Routine Call	DIR Line Location: DX+31 MOD3+15 MOD3+22 MOD3+34 MOD+15

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ABMDCLM - [#9002274.3]	Classic Fileman Calls
^AUTNPOV - [#9999999.27]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABMDCLM - [#9002274.3]	DX+1, DX+12, DX1+1, MOD2+5, MOD3+5, MOD3+6, MOD3+38
^ABMDCODE - [#9002274.03]	POS+12, POS+13
^ABMDMOD - [#9002274.07]	MOD3+30, MOD+17
^ABMDPARM(	MOD2+1, MOD+2, POS+10, POS+11
^DIC(40.7 - [#40.7]	POS+14, POS+16
^ICPT - [#81]	MOD+5
^ICPT("BA"	MOD2+2

Label References

Name	Line Occurrences
DX1	DX+12
POS	POSA+3
SELMOD	MOD+11

Naked Globals

Name	Field # of Occurrence
^(0	MOD3+30, MOD+17

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ABMBFY	DX+23*, DX+33, DX+34
>> ABMBFY0	DX+24*, DX+33, DX+34
>> ABMDFLT	POSA+4, POSA+5, POS+6, POS+9, POS+13, POS+15, POS+17, TOSA+5, TOSA+6, TOSA+7* , TOSA+8, TOSA+9, TOSA+10, TOSA+11, TOSA+12, TOSA+13, TOSA+14*, TOSA+15, TOSA+16
ABMNY	DX+20!, DX+21, DX+22, DX+34*
>> ABMP("BTYP"	POS+6
>> ABMP("CDFN"	DX+1, DX+12, DX1+1, MOD2+5, MOD3+1, MOD3+5, MOD3+6, MOD3+38
>> ABMP("CLN"	POS+14, POS+16
>> ABMP("EXP"	DX+12, DX+22, DX+35, POSA+2, TOSA+4
>> ABMP("FEE"	MOD2+4, MOD+5
>> ABMP("LDFN"	POS+10
>> ABMP("SB"	TOSA+6, TOSA+7, TOSA+8, TOSA+9, TOSA+10, TOSA+11, TOSA+12, TOSA+13, TOSA+14
>> ABMP("VDT"	DX1+1, MOD2+4, MOD+5
>> ABMP("VTYP"	POS+6
>> ABMPTR	POS+10, POS+11, POS+12, POS+13
>> ABMX	DX+2, DX+12, DX1+1
>> ABMX(	DX+39, DX+41, DX1+1*
>> ABMX("ANS"	MOD3+16, MOD3+17, MOD3+18, MOD3+23, MOD3+24, MOD3+25, MOD3+26, MOD3+27!
>> ABMX("DICB"	NARR+3, NARR+7
>> ABMX("EDIT"	DX1+2
>> ABMX("I"	DX+12, DX+13, DX1+1, DX1+2, DX1+4, MOD3+3, MOD3+4, MOD3+5, MOD3+6, MOD3+7* , MOD3+8, MOD3+13, MOD3+14, MOD3+21, MOD3+23, MOD3+26, MOD3+36, MOD3+37, MOD3+38, MOD3+39 , MOD3+40, MOD3+41, MOD3+42, MOD3+43, MOD3+44, MOD3+45, MOD+9, MOD+10, MOD+12*, MOD+14
>> ABMX("M"	MOD3+2, MOD3+3, MOD3+5, MOD3+6, MOD3+7, MOD3+14, MOD3+21, MOD3+23, MOD3+35, MOD3+36 , MOD3+38, MOD3+40, MOD3+41, MOD3+42, MOD3+43, MOD3+44, MOD3+45, MOD+8*, MOD+9
>> ABMX("MC"	MOD2+6, MOD3+30, MOD3+33
>> ABMX("MODS"	MOD+1!, MOD+12, MOD+13*
>> ABMX("S"	MOD3+8, MOD+10, SELMOD+1
>> ABMX("X"	DX1+1*, DX1+2
>> ABMX("X0"	DX1+1*, DX1+4
>> ABMX("Y"	DX1+2, MOD2+2, MOD2+5, MOD3+1, MOD3+5, MOD3+6, MOD3+38, MOD+5
>> ABMX(1	DX+15*
>> ABMZ(	DX1+2, MOD2+2, MOD2+5, MOD3+1, MOD3+5, MOD3+6, MOD3+38
>> ABMZ("CAT"	MOD2+4, MOD+5
>> ABMZ("CHARGE"	MOD2+4, MOD2+6, MOD3+30, MOD+5, MOD+15, MOD+17
>> ABMZ("CHRG"	MOD2+5
>> ABMZ("DR"	MOD+14, POSA+4, POSA+5, TOSA+15, TOSA+16*
>> ABMZ("MOD"	MOD3+2, MOD3+4, MOD3+26, MOD3+37, MOD+8, MOD+14, SELMOD+1
>> ABMZ("MODFEE"	MOD2+5, MOD3+33, MOD+2, MOD+15, MOD+16, MOD+17
>> ABMZ("RCHARGE"	MOD3+30, MOD3+32!, MOD3+34*
>> ABMZ("SUB"	MOD2+5, MOD3+1, MOD3+5, MOD3+6, MOD3+38
>> ABMZIEN	MOD2+2*, MOD2+4
>> DA	MOD3+1*
DIC	DX+17!, DX+18, DX+43!, NARR+1!, NARR+6!, MOD+6*
DIC("A"	DX+19, DX+37, SELMOD+1*
DIC("B"	NARR+3, NARR+4, NARR+5
DIC("S"	DX+35*
DIC(0	DX+18, NARR+1, MOD+7*
>> DIE	MOD3+1*
DIR	DX+2!, DX+32!, MOD3+11!, MOD3+19!, MOD3+22!, MOD3+27!, MOD3+33!, MOD3+34!, MOD+15!
DIR("A"	DX+25, DX+26, DX+27, DX+28, MOD3+13, MOD3+21, MOD3+33, MOD+15
DIR("B"	DX+29, DX1+2, MOD3+14, MOD3+33, MOD+15*
DIR(0	DX+30, MOD3+12, MOD3+20, MOD3+21, MOD3+33, MOD+15
DLAYGO	NARR+2*, NARR+6!
>> DR	MOD3+4, MOD3+5, MOD3+6, MOD3+26, MOD3+37, MOD3+38, MOD3+41, MOD3+42, MOD3+44, MOD3+45*
>> DUOUT	MOD3+7, MOD3+29*
DUZ(2	DX+1, DX+12, DX1+1, MOD2+1, MOD2+5, MOD3+5, MOD3+6, MOD3+38, MOD+2, POS+11
U	DX1+2, DX1+4, NARR+3, NARR+7, MOD2+1, MOD2+2, MOD2+4, MOD2+5, MOD3+1, MOD3+2 , MOD3+4, MOD3+5, MOD3+6, MOD3+17, MOD3+26, MOD3+30, MOD3+37, MOD3+38, MOD3+40, MOD3+41 , MOD3+42, MOD3+43, MOD3+44, MOD3+45, MOD+2, MOD+5, MOD+8, MOD+14, MOD+17, SELMOD+1 , POS+13
X	DX+15*, MOD3+7, MOD3+11!, MOD3+16, MOD3+19!, MOD3+27!, MOD3+29, MOD3+30, MOD3+31
Y	DX+21, DX+23, DX+33, DX+34, DX+36, DX+39, DX+41, NARR+7*, MOD3+11!, MOD3+17 , MOD3+19!, MOD3+23, MOD3+24, MOD3+27!, MOD3+29, MOD3+34, MOD+9, MOD+11, MOD+12, MOD+13 , MOD+14, MOD+15, MOD+17
Y(0	DX+14, DX+16, DX+22, DX+24, DX+33, DX+34, DX+38, DX+39, DX+40, DX+41* , DX+42

Customize PDF page

Package: Third Party Billing

Routine: ABMDEMLC

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 5

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: