Routine: IBECEA33

Package	Total	Call Graph
Integrated Billing	6	TYPE^IBAUTL2 (CLDATA,DED)^IBAUTL3 ($$CNP,$$INPT)^IBECEAU CLSTR^IBECEAU1 (CTBB,NODED)^IBECEAU3 $$DAT1^IBOUTL
VA Fileman	2	IX^DIC ^DIR

Package	Total	Caller Graph
Integrated Billing	1	IBECEA3

Entry Points

Name	Comments	DBIA/ICR reference
OPT	; Check for a C&P exam and determine the outpatient copay rate.
CHTYP	; Ask for the Charge Type
NOCL	; Find the correct clock from the 'bill from' date.
NOCLQ
CHTYPQ
OPTQ
CLMSG	; Check the Medicare Deductible and Billing Clock
CLMSGQ

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"The Bill From date is prior to the start of the active clock..." Line Location: NOCL+2
Function Call: WRITE	Prompt: !!,"This patient has no clock which would cover this date. You should use the",!,"Clock Maintenance option to adjust this patient's clocks before proceeding." Line Location: NOCL+5
Function Call: WRITE	Prompt: !!?5,"This patient has been billed the full copayment under this billing clock!",!?5,"You cannot add another copay charge starting on this date." Line Location: NOCL+12
Function Call: WRITE	Prompt: !!,"No CHARGE TYPE entered - transaction cannot be completed." Line Location: CHTYP+2
Function Call: WRITE	Prompt: !!,"This patient does not have a Primary Eligibility of CHAMPVA.",! Line Location: CHTYP+7
Function Call: WRITE	Prompt: !!,"This patient has never been Category C...",!,"You may only select a Pharmacy copay charge type.",! Line Location: CHTYP+8
Function Call: WRITE	Prompt: !!,"Patient is Exempt from Medication Copayment",!,$P(IBEXSTAT,"^",4),! Line Location: CHTYP+9
Routine Call	DIR Line Location: OPT+6
Routine Call	DIC Line Location: CHTYP+2

FileNo	Call Tags
^IBE(350.1 - [#350.1]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DGCR(399.1 - [#399.1]	CHTYP+10
^IBE(350.1 - [#350.1]	NOCL+8

Name	Field # of Occurrence
>> D	CHTYP+1*
>> DFN	NOCL+3, OPT+1
DIC	CHTYP+1*, CHTYP+2!
DIC("A"	CHTYP+1*
DIC("S"	CHTYP+1*
DIC(0	CHTYP+1*
DIR	OPT+2~
DIR("?"	OPT+5*
DIR("A"	OPT+4*
DIR(0	OPT+4*
DIRUT	OPT+2~
DTOUT	OPT+2~
DUOUT	OPT+2~
IBALR	NOCL+1~, NOCL+2, NOCL+5
>> IBATYP	NOCL+8, CHTYP+2*, CHTYP+10
IBBS	OPT+8~, CHTYP+10*
>> IBCATC	CHTYP+8
>> IBCLDA	NOCL+2, NOCL+4, CLMSG+2
>> IBCLDAY	NOCL+8, NOCL+10, NOCL+11
>> IBCLDOL	NOCL+11, NOCL+12, CLMSG+2
>> IBCLDT	NOCL+10, CLMSG+1*, CLMSG+2
IBCLST	NOCL+1~, NOCL+11
>> IBCVAEL	CHTYP+7
IBDT	OPT+8~*
>> IBEVDA	OPT+8*
>> IBEXSTAT	CHTYP+9
>> IBFR	NOCL+3, OPT+1, OPT+8, CLMSG+1, CLMSG+2
>> IBMED	NOCL+8*, NOCL+12, CLMSG+1, CLMSG+2, CLMSG+3
>> IBNH	CHTYP+5*
>> IBSEQNO	CHTYP+5*, CHTYP+6
>> IBTO	OPT+8*
>> IBUNIT	OPT+8*
IBX	OPT+8~*
>> IBXA	NOCL+8, NOCL+12, CHTYP+5*, CHTYP+7, CHTYP+8, CHTYP+9, CHTYP+10, CLMSG+2
>> IBY	NOCL+5, NOCL+7, NOCL+12, OPT+1, OPT+6, OPT+9, CHTYP+2, CHTYP+6, CLMSG+1, CLMSG+2
Y	OPT+2~, OPT+6, CHTYP+2
Y(0	CHTYP+5