Routine: IBYP584

Information

IBYP584 ;ALB/CXW - IB*2.0*584 POST INIT: REASONABLE CHARGES V3.21 ;12-05-2016

Package	Total	Call Graph
Integrated Billing	2	($$VERSDT,$$VERSEND)^IBCRHBRV TYPE^IBYP584A
Kernel	1	MES^XPDUTL
VA FileMan	1	^DIE

Name	Comments	DBIA/ICR reference
POST	;
CHGINA(VERS)	; inactive charges from previous versions of Reasonable Charges ; VERS = version to begin inactivations with (1, 1.1, 1.2, ...) ; - Inactive date added is the first RC Version Inactive date after the effective date of the charge ; - if the charge already has an inactive date less than the Version Inactive Date then no change is made
MCCRUTL(X,P)	; returns IFN of item in 399.1 if Name is found and piece P is true

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

Name	Line Occurrences (* Changed, ! Killed)
^DGCR(399.1 - [#399.1]	MCCRUTL+2
^IBA(363.2 - [#363.2]	CHGINA+18, CHGINA+19, CHGINA+21, CHGINA+22
^IBE(363.1 - [#363.1]	CHGINA+13, CHGINA+14
^IBE(363.3 - [#363.3]	CHGINA+15

Name	Line Occurrences
CHGINA	POST+4

Name	Field # of Occurrence
DA	CHGINA+6~, CHGINA+30*!
DD	CHGINA+6~
DIC	CHGINA+6~, CHGINA+30!
DIE	CHGINA+6~, CHGINA+30*!
DLAYGO	CHGINA+6~
DO	CHGINA+6~
DR	CHGINA+6~, CHGINA+30*!
IBA	POST+1~, POST+2!, POST+8!, CHGINA+5~, CHGINA+8!, CHGINA+32!
IBA(1	POST+2, POST+8, CHGINA+8, CHGINA+32
IBA(2	POST+2, POST+8
IBA(3	POST+2, POST+8
IBBR0	CHGINA+5~, CHGINA+15*
IBCI	CHGINA+5~, CHGINA+21*, CHGINA+22, CHGINA+30
IBCI0	CHGINA+5~, CHGINA+22*, CHGINA+23
IBCIEF	CHGINA+5~, CHGINA+23*, CHGINA+25
IBCIIA	CHGINA+5~, CHGINA+23*, CHGINA+28
IBCNT	CHGINA+6~, CHGINA+30, CHGINA+32
IBCS	CHGINA+5~, CHGINA+13*, CHGINA+14, CHGINA+17
IBCS0	CHGINA+5~, CHGINA+14*, CHGINA+15
IBENDATE	CHGINA+5~, CHGINA+11*, CHGINA+25
IBI	CHGINA+5~, CHGINA+25*
IBITM	CHGINA+5~, CHGINA+18*, CHGINA+19, CHGINA+21
IBNEF	CHGINA+5~, CHGINA+19*, CHGINA+21
IBNEWIA	CHGINA+5~, CHGINA+23, CHGINA+25, CHGINA+27, CHGINA+28, CHGINA+30
IBSTART	CHGINA+5~, CHGINA+10*, CHGINA+19
IBX	CHGINA+5~, CHGINA+25, MCCRUTL+1~, MCCRUTL+2
IBXRF	CHGINA+5~, CHGINA+17*, CHGINA+18, CHGINA+19, CHGINA+21
IBY	MCCRUTL+1~, MCCRUTL+2, MCCRUTL+3
P	MCCRUTL~, MCCRUTL+2
U	CHGINA+15, CHGINA+23, MCCRUTL+2
VERS	CHGINA~, CHGINA+10
X	CHGINA+6~, CHGINA+30!, MCCRUTL~, MCCRUTL+2
Y	CHGINA+6~, CHGINA+30!