Routine: ABMDRCO1

Package	Total	Caller Graph
Third Party Billing	1	ABMDRCO

Name	Comments	DBIA/ICR reference
VST1
CALC	;find patients and their visits
VST
INIT	;EP - initialize variables
PAT	;must have hrcn at your facility
MAIN	;

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"CODE 03 NOT IN BENEFICIARY FILE" Line Location: INIT+3
Function Call: WRITE	Prompt: !!,"CODE 04 NOT IN BENEFICIARY FILE" Line Location: INIT+4
Function Call: WRITE	Prompt: !!,"CODE 30 NOT IN BENEFICIARY FILE" Line Location: INIT+5
Function Call: WRITE	Prompt: !!,"CODE 31 NOT IN BENEFICIARY FILE" Line Location: INIT+6

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPAT - [#9000001]	PAT+2
^AUPNPAT("AD"	PAT+1
^AUPNVINP - [#9000010.02]	VST1+13
^AUPNVINP("AD"	VST1+12
^AUPNVSIT - [#9000010]	VST1+1
^AUPNVSIT("AA"	VST, VST1
^AUTTBEN("C"	INIT+1, INIT+2
^DIC(40.7 - [#40.7]	INIT+7
^DPT - [#2]	PAT+3
^TMP("ABMDRCO"	VST1+8, VST1+10, VST1+14*

Name	Field # of Occurrence
^(	PAT+2
^(0	PAT+3, VST1+1

Name	Field # of Occurrence
>> ABMD("$J"	VST1+8, VST1+10, VST1+14
>> ABMD("BDT"	INIT+8
>> ABMD("CO"	INIT+1*, INIT+3, MAIN+1
>> ABMD("DEN"	INIT+7*, VST1+8
>> ABMD("DEP"	INIT+1*, INIT+4, MAIN+2
>> ABMD("DFN"	CALC+1, PAT+1, PAT+2, PAT+3, VST, VST1, VST1+8, VST1+10, VST1+14
>> ABMD("DSCH"	VST1+13*, VST1+14
>> ABMD("EDT"	PAT+5
>> ABMD("HRCN"	PAT+2*, VST1+8, VST1+10, VST1+14
>> ABMD("IDFN"	VST1+12*, VST1+13
>> ABMD("II"	MAIN+1, MAIN+2, MAIN+3, MAIN+4, PAT+1, VST1+8, VST1+10, VST1+14
>> ABMD("NAME"	PAT+3*, VST1+8, VST1+10, VST1+14
>> ABMD("RBDT"	INIT+8*, VST
>> ABMD("REDT"	PAT+5, VST, VST1
>> ABMD("RET"	INIT+2*, INIT+5, MAIN+3
>> ABMD("RTD"	INIT+2*, INIT+6, MAIN+4
>> ABMD("STR"	VST1+1*, VST1+2, VST1+3, VST1+5, VST1+8
>> ABMD("TDEN"	VST1+8
>> ABMD("TIP"	VST1+12
>> ABMD("TOP"	VST1+10
>> ABMD("VDFN"	VST, VST1, VST1+1, VST1+8, VST1+10, VST1+12, VST1+14
>> ABMD("VDT"	VST1+5*, VST1+8, VST1+10, VST1+14
DUZ(2	PAT+2, VST1+3
>> X	VST1+5*, VST1+6, VST1+10

Information