Routine: IB20P539

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(X,P)	; returns IFN of item 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	; 66 Charge Items (363.2): Bedsection ^ Charge Set ^Effective Date ^ Revenue Code ^ Charge
TORT	;; 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
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+14, 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
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
P	MCCRUTL~, MCCRUTL+2
RVCD	RVCD~, RVCD+2
U	POST+1~*, SETCI+2, SETCI+3, SETCI+4, SETCI+5, SETCI+6, SETCI+9, SETCI+10, MCCRUTL+2, RVCD+2
X	ADDCI+1~, SETCI+13*, SETCI+14!, SETCI+18!, MCCRUTL~, MCCRUTL+2
Y	ADDCI+1~, SETCI+14!, SETCI+15, SETCI+18!

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