IBY752PO ;AITC/DTG - Post-Installation for IB patch 752; JAN 18, 2023
Source file <IBY752PO.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| POST | ; POST-INSTALL
|
|
| OPTR(IBXPD) | ; Remove options IB OUTPATIENT VET REPORT and IB INPATIENT VET REPORT from IBCN INS RPTS
|
|
| OPTRQ | ; option remove end point
|
|
| FLDINIT(IBXPD) | ; Initialize new FSC CONTROLLED (#file,.05) field to 0 (zero)
|
|
| FLDINITQ | ;
|
|
| TASK(IBXPD) | ; Report X12 entries that are not controlled by FSC
|
|
| TASKQ | ;
|
|
| X12ENTRIES | ; Build a delimited list of entries where the FSC CONTROLLED
; field is equal to 0 (zero). Send email to eBiz eInsurance with the info. |
|
| MESSAGE | ; build and send message to eInsurance
|
|
| STATUPD(IBXPD) | ; Update the CORRECTIVE ACTION field for 2 entries in the IIV STATUS TABLE FILE (#365.15)
|
|
| SITEREG(IBXPD,SITENUM) | ; send site registration message to FSC
|
|
| SITEREGQ | ;
|
| FileNo | Call Tags |
|---|---|
| ^IBE(365.15 - [#365.15] | FIND1^DIC |
