Routine: IB20P603

Package	Total	Call Graph
VA FileMan	2	FILE^DICN ^DIE
Kernel	1	MES^XPDUTL

Entry Points

Name	Comments	DBIA/ICR reference
POST	;
ADDCI(IBEFFDT)	; Add Charge Items (363.2) needs Charge Sets, pass in the effective date of the new charges
CIQ
SETCI	; set Charge Item (duplicates based on item, CS, eff dt, rev cd)
MCCRUTL(IBC,IBPE)	; returns IEN in 399.1 if Name is found and piece P is true
RVCD(RVCD)	; returns IFN if revenue code is valid and active
MSG(IBA)	;
CIF	; 68 Charge Items (363.2): Bedsection ^ Charge Set ^Effective Date ^ Revenue Code ^ Charge
TORT	;; Cost Based (Tortiously Liable) - All Inclusive
IA	;; Interagency

FileNo	Call Tags
^IBA(363.2 - [#363.2]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DGCR(399.1 - [#399.1]	MCCRUTL+2
^DGCR(399.2 - [#399.2]	RVCD+2
^IBA(363.2 - [#363.2]	SETCI+9
^IBE(363.1 - [#363.1]	SETCI+2

Name	Line Occurrences
$$MCCRUTL	SETCI+3
$$RVCD	SETCI+5
ADDCI	POST+4
CIQ	ADDCI+5
MSG	POST+2, POST+5, ADDCI+3, ADDCI+5, ADDCI+9, CIQ, CIQ+1, SETCI+2, SETCI+3, SETCI+10 , SETCI+14
SETCI	ADDCI+7

Name	Field # of Occurrence
DA	ADDCI+1~, SETCI+18*!
DD	ADDCI+1~, SETCI+13!
DIC	ADDCI+1~, SETCI+13*!
DIC(0	SETCI+13*
DIE	ADDCI+1~, SETCI+18*!
DLAYGO	ADDCI+1~, SETCI+13*
DO	ADDCI+1~, SETCI+13!
DR	ADDCI+1~, SETCI+17*, SETCI+18!
IBA	POST+1~, MSG~, MSG+1
IBC	ADDCI+1~, MCCRUTL~, MCCRUTL+2
IBCHG	ADDCI+1~, SETCI+6*, SETCI+10, SETCI+14, SETCI+17
IBCI	ADDCI+1~, SETCI+3, SETCI+9, SETCI+10, SETCI+11, SETCI+13
IBCNT	ADDCI+1~, ADDCI+4, CIQ, SETCI+15
IBCNT1	ADDCI+1~, ADDCI+4, ADDCI+9, SETCI+10
IBCS	ADDCI+1~, SETCI+2*, SETCI+7, SETCI+17
IBDFLTDT	ADDCI+1~, ADDCI+4*, ADDCI+5, SETCI+4
IBDT	ADDCI+1~, SETCI+4*, SETCI+9, SETCI+17
IBEFFDT	POST+1~, POST+3*, POST+4, ADDCI~, ADDCI+4
IBFN	ADDCI+1~, SETCI+15*, SETCI+18
IBI	ADDCI+1~, ADDCI+7*
IBLN	ADDCI+1~, ADDCI+7*, SETCI+2, SETCI+3, SETCI+4, SETCI+5, SETCI+6, SETCI+10, SETCI+14
IBPE	ADDCI+1~, MCCRUTL~, MCCRUTL+2
IBRVCD	ADDCI+1~, SETCI+5*, SETCI+9, SETCI+17
IBX	ADDCI+1~, SETCI+9, MCCRUTL+1~, MCCRUTL+2, RVCD+1~, RVCD+2*
IBXRF	ADDCI+1~, SETCI+7*, SETCI+9
IBY	MCCRUTL+1~, MCCRUTL+2, MCCRUTL+3, RVCD+1~, RVCD+2, RVCD+3
IBZ	ADDCI+1~, SETCI+9*, SETCI+10
RVCD	RVCD~, RVCD+2
U	POST+1~*, SETCI+2, SETCI+3, SETCI+4, SETCI+5, SETCI+6, SETCI+9, SETCI+10, SETCI+14, MCCRUTL+2 , RVCD+2
X	ADDCI+1~, SETCI+13*, SETCI+14!, SETCI+18!
Y	ADDCI+1~, SETCI+14!, SETCI+15, SETCI+18!

Name	Field # of Occurrence
$T(CIF+IBI	ADDCI+7