Routine: ABMDEML

Package	Total	Call Graph
Third Party Billing	6	($$CPT,$$DX,$$ICDOP,$$IHSCAT,$$IHSCPT)^ABMCVAPI A^ABMDE8D (CONT,LAB,RX)^ABMDEMLB (DX,MOD,NARR,POSA,TOSA)^ABMDEMLC $$ONE^ABMFEAPI $$DINUM^ABMFOFS
VA Fileman	3	^DIC FILE^DICN ^DIE

Package	Total	Caller Graph
Third Party Billing	1	ABMDEMLE

Entry Points

Name	Comments	DBIA/ICR reference
39	;EP - dr string for anesthesia page
MILEAGE	;
DIAG	;CORRESPONDING DIAGNOSES
PROV	;
DIC	;
A1	;
STUFF	;FILE MULTIPLE
XIT	;
DUPCHK	;USED TO BE THE DUPLICATE CHECK LINE TAG
MOD	;

External References

Name	Field # of Occurrence
$$CPT^ABMCVAPI	DUPCHK+14, DUPCHK+15, MOD+50, MILEAGE+2, MILEAGE+7, MILEAGE+8
$$DX^ABMCVAPI	MOD+5, STUFF+16, STUFF+18, STUFF+19
$$ICDOP^ABMCVAPI	MOD+6, STUFF+21, STUFF+22, STUFF+23
$$IHSCAT^ABMCVAPI	DUPCHK+14, DUPCHK+15
$$IHSCPT^ABMCVAPI	DUPCHK+11
A^ABMDE8D	PROV+17
CONT^ABMDEMLB	MOD+28
LAB^ABMDEMLB	MOD+29
RX^ABMDEMLB	A1+29
DX^ABMDEMLC	DIAG+4
MOD^ABMDEMLC	MOD+1
NARR^ABMDEMLC	MOD+7
POSA^ABMDEMLC	MOD+45
TOSA^ABMDEMLC	MOD+47
$$ONE^ABMFEAPI	MOD+38
$$DINUM^ABMFOFS	MOD+33
^DIC	DIC+2, PROV+15
FILE^DICN	STUFF+29
^DIE	MILEAGE+9

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABMDCLM - [#9002274.3]	MOD+51, MOD+52, STUFF+27*, PROV+14, MILEAGE+5, MILEAGE+7, MILEAGE+8
^ABMDEXP - [#9002274.08]	MOD+41
^ABMDFEE - [#9002274.01]	MOD+33
^ABMDPARM(	MOD+8
^ABMNINS(	MOD+40, MOD+42, MOD+43, MOD+54, MOD+55, MOD+56
^ABMRLABS - [#9002274.35]	MOD+51
^AUTTADA - [#9999999.31]	DUPCHK+6
^DD(	A1+36, PROV+10
^DIC(81.1 - [#81.1]	MOD+60
^ICPT - [#81]	MOD+15, MOD+33, MOD+38, MOD+60

Label References

Name	Line Occurrences
@(	STUFF+3
DIAG	MOD+10, MOD+28, MOD+29
DIC	DIC+3
DUPCHK	A1+28
MILEAGE	PROV+16
MOD	DUPCHK+9, DUPCHK+11, DUPCHK+14
XIT	DIC+3, STUFF+6, PROV+18

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ABM	A1+24, A1+25*
>> ABMCNCK	MOD+42*, MOD+43
ABMDPRV	PROV+8, PROV+9!
>> ABMFLNM	PROV+7*, PROV+10
>> ABMIEN	MILEAGE+5*, MILEAGE+6, MILEAGE+7, MILEAGE+8
>> ABMIIEN	MOD+55*, MOD+56
>> ABMOIEN	STUFF+30*
>> ABMP("638"	MOD+34
>> ABMP("BTYP"	MOD+8
>> ABMP("CDFN"	MOD+51, MOD+52, STUFF+9, PROV+3, PROV+14, MILEAGE+4, MILEAGE+5, MILEAGE+7, MILEAGE+8
>> ABMP("EXP"	MOD+41, MOD+47, MOD+57, MOD+58, MOD+59, DIAG+3
>> ABMP("FEE"	MOD+33, MOD+38
>> ABMP("ICD10"	STUFF+16, STUFF+18, STUFF+21, STUFF+22
>> ABMP("INS"	MOD+40, MOD+42, MOD+43, MOD+54, MOD+55, MOD+56
>> ABMP("LDFN"	MOD+8, MOD+40, MOD+42, MOD+43, MOD+54, MOD+55, MOD+56
>> ABMP("VDT"	DUPCHK+11, DUPCHK+14, DUPCHK+15, MOD+5, MOD+6, MOD+38, MOD+50, STUFF+16, STUFF+18, STUFF+19 , STUFF+21, STUFF+22, STUFF+23, MILEAGE+2, MILEAGE+7, MILEAGE+8
>> ABMT	MOD+17*, MOD+18
>> ABMTF	MOD+16, MOD+18, MOD+19
ABMX	A1+26!, XIT+1!
ABMX("DIC"	MOD+11, MOD+12, MOD+21, MOD+23, MOD+24, MOD+25, MOD+26, MOD+27*, MOD+33, MOD+38
ABMX("DICB"	MOD+4, MOD+5, MOD+6*
ABMX("DICS"	A1+36*
ABMX("MODS"	MOD+51
ABMX("NEWY"	DUPCHK+7, MOD+30, MOD+33, MOD+38
ABMX("TST"	MOD+15*, MOD+17, MOD+18, MOD+20
ABMX("Y"	DUPCHK+1, DUPCHK+6, DUPCHK+11, DUPCHK+14, DUPCHK+15, MOD+4, MOD+5, MOD+6, MOD+15, MOD+20 , MOD+21, MOD+23, MOD+24, MOD+25, MOD+26, MOD+30, MOD+40, MOD+42, MOD+50, MOD+54 , MOD+55, MOD+60, STUFF+5, STUFF+30, MILEAGE+2, MILEAGE+5, MILEAGE+7, MILEAGE+8
>> ABMZ("ADD1"	PROV+18
>> ABMZ("ANTH"	MOD+27
>> ABMZ("CAT"	MOD+11, MOD+13, MOD+34
>> ABMZ("CHRG"	MOD+10, MOD+31
>> ABMZ("CONTRACT"	MOD+28
>> ABMZ("DIAG"	DIAG+2, DIAG+5
>> ABMZ("DIC"	A1+37, MOD+4, MOD+11
>> ABMZ("DICI"	A1+37
>> ABMZ("DICS"	A1+35
>> ABMZ("DICW"	A1+41
>> ABMZ("DR"	A1+24, A1+25, A1+32, DUPCHK+6, DUPCHK+11, DUPCHK+15, DUPCHK+16, MOD+8, MOD+9, MOD+31* , MOD+34, MOD+36, MOD+38, MOD+43, MOD+48, MOD+51, MOD+52, MOD+57, MOD+58, MOD+59 , MOD+60, DIAG+5, STUFF+2, STUFF+11, 39+2
>> ABMZ("DR2"	STUFF+16, STUFF+18, STUFF+21, STUFF+22, STUFF+25, PROV+19*
>> ABMZ("ITEM"	A1+40
>> ABMZ("MOD"	MOD+1
>> ABMZ("MODFEE"	MOD+35, MOD+36
>> ABMZ("NARR"	MOD+3, MOD+4, MOD+9
>> ABMZ("NUM"	STUFF+27
>> ABMZ("OUTLAB"	MOD+29
>> ABMZ("REVN"	DUPCHK+9, DUPCHK+11, DUPCHK+15, DUPCHK+16
>> ABMZ("RX"	A1+28
>> ABMZ("SUB"	A1+36, DIC+7, DUPCHK+5, MOD+5, MOD+6, MOD+8, MOD+34, MOD+48, MOD+50, MOD+53 , STUFF+3, STUFF+4, STUFF+10, STUFF+15, STUFF+20, STUFF+24, STUFF+27, PROV+1, PROV+5, PROV+7 , PROV+14, PROV+17, MILEAGE+2, MILEAGE+5, MILEAGE+7, MILEAGE+8
>> ABMZ("TITL"	A1+27
>> ABMZ("X"	STUFF+8
DA	STUFF+1!, PROV+2!, MILEAGE+4*
DA(1	STUFF+9, STUFF+10, STUFF+27, PROV+4, PROV+5, PROV+14
DA(2	PROV+3*, PROV+5
DD	STUFF+28!
DIC	A1+26!, A1+37, DIC+4!, STUFF+1!, STUFF+10, PROV+2!, PROV+5*, XIT+1!
DIC("A"	A1+40*
DIC("B"	PROV+8*
DIC("DR"	STUFF+11, STUFF+16, STUFF+18, STUFF+19, STUFF+21, STUFF+22, STUFF+23, STUFF+25, PROV+12, PROV+14
DIC("P"	PROV+10*
DIC("S"	A1+35*
DIC("W"	A1+41*
DIC(0	A1+39, STUFF+12, PROV+6*
DIE	PROV+2!, MILEAGE+3*
>> DIROUT	DIC+3
DO	STUFF+28!
DR	STUFF+1!, PROV+2!, MILEAGE+7, MILEAGE+8
>> DTOUT	DIC+3
>> DUOUT	DIC+3
DUZ(2	MOD+51, MOD+52, STUFF+27, PROV+14, MILEAGE+5, MILEAGE+7, MILEAGE+8
U	A1+31, A1+32, DIC+7, DUPCHK+6, DUPCHK+11, DUPCHK+14, DUPCHK+15, MOD+4, MOD+5, MOD+6 , MOD+8, MOD+9, MOD+15, MOD+33, MOD+38, MOD+41, MOD+43, MOD+50, MOD+51, MOD+52 , MOD+56, MOD+60, STUFF+16, STUFF+18, STUFF+19, STUFF+21, STUFF+22, STUFF+23, PROV+10, MILEAGE+2 , MILEAGE+7, MILEAGE+8
>> X	DIC+3, STUFF+7*, STUFF+8, STUFF+16, STUFF+18, STUFF+19, STUFF+21, STUFF+22, STUFF+23
>> Y	A1+28, A1+30, A1+31, DIC+3, DIC+7, DUPCHK+1, DUPCHK+7, MOD+9, MOD+12, MOD+28 , MOD+29, STUFF+5, STUFF+6, STUFF+7, PROV+4
>> Y(0	A1+31, A1+32, DIAG+4, DIAG+5

Marked Items

Name	Field # of Occurrence
$T(@ABMZ(1)	STUFF+3

Customize PDF page

Package: Third Party Billing

Routine: ABMDEML

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 1

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items