Routine: ABMDE0A

Package	Total	Call Graph
Third Party Billing	4	$$CPTCHK^ABMCPTCK (IDEN,INS,QUES)^ABMDE0B SUM^ABMDE1 ^ABMDERR
VA Fileman	1	^DIE

Package	Total	Caller Graph
Third Party Billing	1	ABMDE0

Entry Points

Name	Comments	DBIA/ICR reference
DISP	;EP - Entry Point from ABMDE0 for displaying claim summary
ACC	;;,"Accident Rel: ",ABM("ACC")
CNT
PRC	;
EMPL	;;,"Empl Related: ",ABM("EMPL")
PROG	;;,"Spcl Program: ",ABM("PROG")
PRV	;;,"__________ Pg-4 (Providers) ___________"
XIT	;
DX	;;,"__________ Pg-5A (Diagnosis) __________"
DUP	;check for duplicate claims
EMRG	;;,"Emrg Related: ",ABM("EMRG")

Name	Line Occurrences
Function Call: WRITE	Prompt: 7,!?5," Claim File ERRORS exist use the VIEW command to list them. *" Line Location: DUP+10
Function Call: WRITE	Prompt: !!,"THESE SERVICES MUST BE ITEMIZED AND BILLED SEPARATELY FROM THE ALL-INCLUSIVE RATE VISIT",! Line Location: DUP+14
Routine Call	DIE Line Location: PRC+20 PRC+27

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

Name	Line Occurrences (* Changed, ! Killed)
^ABMDCLM - [#9002274.3]	PRC+16, PRC+22, PRC+29, PRC+32, DUP+1, DUP+2, DUP+5, DUP+6, DUP+10
^AUTNINS - [#9999999.18]	DUP+14
^DIC(4 - [#4]	DUP+8

Name	Line Occurrences
CNT	DISP+19, DISP+22, DISP+28, DISP+36, PRC+3, PRC+7
PRC	DISP+31

Name	Field # of Occurrence
>> ABM	DISP+14, DISP+23, DISP+25, DISP+26
>> ABM("C"	DISP+9, DISP+11, DISP+16, DISP+18, DISP+21, DISP+24, DISP+25, DISP+27, DISP+29, DISP+32 , DISP+35, PRC+1, PRC+2, PRC+4, PRC+6, PRC+8, CNT
>> ABM("C2"	DISP+13, DISP+15, DISP+16, DISP+17, DISP+20
>> ABM("CNT1"	DISP+4, DISP+6*, DISP+9, DISP+11
>> ABM("CNT2"	DISP+4, DISP+5*, DISP+32, PRC+1
>> ABM("CNT3"	DISP+4, DISP+5, DISP+6, DISP+7*, DISP+24
>> ABM("D"	DISP+34
>> ABM("ERR"	PRC+19
>> ABM("I"	DISP+26, DISP+30, DISP+33, DISP+34, PRC+4, PRC+5, PRC+6, PRC+8, PRC+11*
>> ABM("OPRV"	DISP+23
>> ABM("P"	PRC+5, PRC+6, PRC+8
>> ABMCFLG	DUP+13*, DUP+14
ABMCLNM	DUP+6*, DUP+8, DUP+9!
>> ABMCPT	DUP+12*
>> ABME("CHK"	PRC+14*
>> ABME(0	PRC+13
ABMLIST	DUP+13, DUP+15!
ABMLIST(	DUP+12*
>> ABMP("CDFN"	PRC+16, PRC+18, PRC+22, PRC+25, PRC+29, PRC+32, DUP+1, DUP+10
>> ABMP("FLAT"	DISP+31, PRC+2
>> ABMP("INS"	DUP+14
>> ABMP("PX"	PRC+2
>> ABMP("VTYP"	DISP+31, PRC+2
ABMPV	DUP+1*, DUP+3, DUP+5, DUP+6, DUP+9!
>> ABMVDFN	DUP+13
>> ABMZ(	DISP+16, DISP+18, DISP+21, DISP+27, DISP+30, DISP+35, PRC+2, PRC+6, PRC+11
>> ABMZ("PG"	DISP+2*
>> ABMZ("TITL"	DISP+1*
>> ABMZ(13	PRC+8*
>> ABMZ(14	PRC+10*
>> DA	PRC+18, PRC+25
>> DIE	PRC+17, PRC+24
DR	PRC+19, PRC+21!, PRC+26, PRC+28!
DUZ(2	PRC+16, PRC+22, PRC+29, PRC+32, DUP+1, DUP+4, DUP+10
>> I	DUP+2*, DUP+4, DUP+5, DUP+6, DUP+8
U	PRC+16, PRC+22, PRC+29, PRC+32, DUP+8, DUP+10, DUP+14