Routine: IB20P632

Entry Points

Name	Comments	DBIA/ICR reference
POST	; ; Update pharmacy administrative fee for CY19 in Rate Schedule file 363
TRXAF	; Rate Schedule
DENT(IBRSIN,IBDRX)	; return 1 if initial cs added for dental reim. ins.
RSEXIST(IBEFFDT,IBRSIN)	; return RS IFN if Rate Schedule exists for Effective Date
MSG(IBA)	;
RSF	; Rate type^dispensing fee^adjustment

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

Name	Line Occurrences (* Changed, ! Killed)
^DGCR(399.3 - [#399.3]	TRXAF+7, TRXAF+10, TRXAF+11
^IBE(363 - [#363]	TRXAF+13, RSEXIST+2, RSEXIST+3
^IBE(363.1 - [#363.1]	DENT+3

Name	Line Occurrences
$$DENT	TRXAF+13
$$RSEXIST	TRXAF+12, TRXAF+19
MSG	POST+3, POST+5, TRXAF+2, TRXAF+3, TRXAF+8, TRXAF+11, TRXAF+12, TRXAF+13, TRXAF+19, TRXAF+20 , TRXAF+21, TRXAF+22, TRXAF+23
TRXAF	POST+4

Name	Field # of Occurrence
DA	DENT+1~, DENT+6*, DENT+8
DA(1	DENT+8*
DIC	DENT+1~, DENT+4, DENT+8
DIC("DR"	DENT+8*
DIC("P"	DENT+8*
DIC(0	DENT+4, DENT+8
DIE	DENT+1~, DENT+4*
DLAYGO	DENT+1~, DENT+4*
DR	DENT+1~, DENT+6*
IBA	POST+2~, MSG~, MSG+1
IBADFE	TRXAF+1~, TRXAF+4*, TRXAF+17
IBADJUST	TRXAF+1~, TRXAF+15*, TRXAF+17
IBCS	DENT+1~, DENT+2*, DENT+3, DENT+8
IBCT	TRXAF+1~, TRXAF+4, TRXAF+20, TRXAF+22
IBDISP	TRXAF+1~, TRXAF+14*, TRXAF+17
IBDRX	TRXAF+4*, TRXAF+13, DENT~, DENT+4
IBEFFDT	TRXAF+1~, TRXAF+4*, TRXAF+12, TRXAF+17, TRXAF+19, RSEXIST~, RSEXIST+4
IBI	TRXAF+1~
IBRATY	TRXAF+1~, TRXAF+6*, TRXAF+7, TRXAF+8, TRXAF+10, TRXAF+11, TRXAF+12, TRXAF+13, TRXAF+17, TRXAF+19 , TRXAF+20
IBRS	TRXAF+1~
IBRS0	RSEXIST+1~, RSEXIST+3*, RSEXIST+4
IBRSFN	RSEXIST+1~, RSEXIST+2*, RSEXIST+3, RSEXIST+4
IBRSIN	TRXAF+1~, TRXAF+7, TRXAF+8, TRXAF+10, TRXAF+11, TRXAF+12, TRXAF+13, TRXAF+19, DENT~, DENT+6 , RSEXIST~, RSEXIST+4
IBT	TRXAF+1~, TRXAF+5*, TRXAF+6, TRXAF+14, TRXAF+15
IBX	TRXAF+1~, TRXAF+5, RSEXIST+1~, RSEXIST+2, RSEXIST+4*, RSEXIST+5
U	POST+2~*, TRXAF+6, TRXAF+11, TRXAF+14, TRXAF+15, RSEXIST+4
X	DENT+1~, DENT+4, DENT+8
Y	DENT+1~, DENT+5, DENT+6

Name	Field # of Occurrence
$T(RSF+IBX	TRXAF+5