IBY568PO ;ALB/BAA - Post install routine for patch 568; 5-AUG-16
Source file <IBY568PO.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
START | ; CALL SECTIONS
|
|
RIDER | ; add Prostihetic Insurance Rider (355.6)
|
|
PLAN | ; add Prosthetics to Plan Coverage Limitations
|
|
ADDRT | ; Add Rate Types (399.3)
|
|
RTQ | ||
NEW(NAM,NUM,REC) | ; create new rate type
; see if entry exists |
|
ADDRS | ; Add Rate Schedules (363) for EMERGENCY/HUMANITARIAN REIMB. & INELIGIBLE HOSP. REIMB.
|
|
RSCS(IBFN,IBVDT,IBCOPY) | ; add existing Charge Sets to HR & IR
; copy the Charge Sets from the corresponding RI RS (v2) |
|
RSCSQ | ||
RSCSFILE(IBFN,IBCSNM,IBCSAA) | ; Add Charge Set to a Rate Schedule
|
|
RSCSFQ | ||
NEWIBER | ||
MCCRUTL(X,P) | ; returns IFN of item in 399.1 if Name is found and piece P is true
|
|
MSG(X) | ;
|
|
RSDT(PRE) | ;Copy the active RX charge schedule from RI to FR
|
|
NEWRT | ;Rate Type
|
|
RT19 | ;;HUMANITARIAN REIMB. INS.;HUMANITARIAN REIMB. INS.;0;HUM REIM;1;EMERGENCY/HUMANITARIAN REIMB.;i;1;0;1;28
|
|
RT20 | ;;INELIGIBLE REIMB. INS.;INELIGIBLE REIMB. INS.;0;INE REIM;1;INELIGIBLE HOSP. REIMB.;i;1;0;1;28
|
|
RT21 | ;;DENTAL REIMB. INS.;DENTAL REIMB. INS.;0;DEN REIM;1;EMERGENCY/HUMANITARIAN REIMB.;i;1;0;1;28
|
|
RSF | ;Rate Schedules (363) for EMERGENCY/HUMANITARIAN REIMB. & INELIGIBLE HOSP. REIMB.
|
FileNo | Call Tags |
---|---|
^IBE(350.8 - [#350.8] | Classic Fileman Calls |
^IBE(355.31 - [#355.31] | Classic Fileman Calls |
^IBE(355.6 - [#355.6] | Classic Fileman Calls |
^IBE(363 - [#363] | Classic Fileman Calls |
^DGCR(399.3 - [#399.3] | Classic Fileman Calls |