IBY497PO ;ALB/TAZ/KML/YG - Post install routine for patch 497 ; 10 Feb 2013 14:44 PM
Source file <IBY497PO.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;Post Install Routine primary entry point
|
|
| FIXDD | ; delete field 365.26/1.01 if it exists
; this doesn't do anything for normal install and only affects target account that has field 365.26/1.01 already created ; by test version of the build. |
|
| RMSG | ; send site registration message to FSC
|
|
| RMSGX | ;
|
|
| NEWPARAM | ;
; set new IB site parameter to control length of eIV fields ; set IB site parameter DAILY MAILMAN MSG to YES ; set IB site parameter DAILY MSG TIME to 07:00 |
|
| REINDEX | ; run triggers on new eIV fields
|
|
| RMDEFSTC | ;Remove Default Service Type Codes except for Type 30
|
|
| RMSSSTC | ;Remove Default Service Type Codes except for Type 30
|
|
| UPDATE | ;Call option to update Insurance Type File
; Schedule through TaskMan to run at night? |
|
| UPDATE1 | ||
| PROC365 | ;Process entries in the IIV RESPONSE file (365)
; Tag FLDLST documents the specific fields that need to be converted |
|
| PROC2 | ; process entries in the ELIGIBILITY/BENEFIT multiple of the INSURANCE TYPE subfile (2.322)
; Tag FLDLST documents the specific fields that need to be converted |
|
| PROCFLDS(FILE,IEN,SIEN,DFN) | ; go through each of the affected flds and convert data
|
|
| 8(IEN,RSUPDT) | ; converts PT. RELATIONSHIP - HIPAA data at 365,8.01
; ^IBCN(365,D0,8)= (#8.01) PT. RELATIONSHIP - HIPAA [1P:365.037] ^ |
|
| 12(FILE,IEN,SIEN,DFN,IENS,RSUPDT) | ; procedure will convert AUTHORIZATION/CERTIFICATION and IN PLAN data at 365.02,.12, 365.02,.13, 2.322,.12, and 2.322,.13
; ^IBCN(365,D0,2,D1,0)= ^^^^^^^^^^^(#.12) AUTHORIZATION/CERTIFICATION [12P:365.033] ^ (#.13) IN PLAN [13P:365.033] ^ ; ^DPT(D0,.312,D1,6,D2,0)= ^^^^^^^^^^^(#.12) AUTHORIZATION/CERTIFICATION [12P:365.033] ^ (#.13) IN PLAN [13P:365.033] ^ |
|
| 101(FILE,IEN,SIEN,DFN,IENS,RSUPDT) | ; procedure will convert PROCEDURE CODING METHOD data at 365.02, 1.01 and 2.322,1.01
; ^IBCN(365,D0,2,D1,1)= (#1.01) PROCEDURE CODING METHOD [1P:365.035] ^ ; ^DPT(D0,.312,D1,6,D2,1)= (#1.01) PROCEDURE CODING METHOD [1P:365.035] ^ |
|
| 302(FILE,IEN,SIEN,DFN,IENS,RSUPDT) | ; procedure will convert ENTITY TYPE data at 365.02,3.02 and 2.322,3.02
; ^IBCN(365,D0,2,D1,3)= ^ (#3.02) ENTITY TYPE [2P:365.043] ; ^DPT(D0,.312,D1,6,D2,3)= ^ (#3.02) ENTITY TYPE [2P:365.043] |
|
| 408(FILE,IEN,SIEN,DFN,IENS,RSUPDT) | ; procedure will convert LOCATION QUALIFIER data at 365.02,4.08 and 2.322,4.08
; ^IBCN(365,D0,2,D1,4)= ^^^^^^^(#4.08) LOCATION QUALIFIER [8P:365.034] ; ^DPT(D0,.312,D1,6,D2,4)= ^^^^^^^(#4.08) LOCATION QUALIFIER [8P:365.034] |
|
| 503(FILE,IEN,SIEN,DFN,IENS,RSUPDT) | ; procedure will convert REFERENCE ID QUALIFIER data at 365.02,5.03 and 2.322,5.03
; ^IBCN(365,D0,2,D1,5)= ^^ (#5.03) REFERENCE ID QUALIFIER [3P:365.028] ; ^DPT(D0,.312,D1,6,D2,5)= ^^ (#5.03) REFERENCE ID QUALIFIER [3P:365.028] |
|
| 705(FILE,IEN,SIEN,DFN,IENS,RSUPDT) | ; procedure will convert UNITS OF MEASUREMENT and DELIVERY PATTERN data at 365.27,.05 and .09, 2.3227,.05, and .09
; ^IBCN(365,D0,2,D1,7,D2,0)= ^^^^(#.05) UNITS OF MEASUREMENT [5P:365.029]^^^^ (#.09) DELIVERY PATTERN [9P:365.036] ^ ; ^DPT(D0,.312,D1,6,D2,7,D3,0)= ^^^^(#.05) UNITS OF MEASUREMENT [5P:365.029]^^^^ (#.09) DELIVERY PATTERN [9P:365.036] ^ |
|
| MORE705 | ;
|
|
| 804(FILE,IEN,SIEN,DFN,IENS,RSUPDT) | ; procedure will convert DATE FORMAT data at 365.28,.04 and 2.3228,.04
; ^IBCN(365,D0,2,D1,8,D2,0)= ^^^ (#.04) DATE FORMAT [4P:365.032] ; ^DPT(D0,.312,D1,6,D2,8,D3,0)= ^^^ (#.04) DATE FORMAT [4P:365.032] |
|
| MORE804 | ;
|
|
| 904(FILE,IEN,SIEN,DFN,IENS,RSUPDT) | ; procedure will convert QUALIFIER data at 365.29,.04 and 2.3229,.04
; ^IBCN(365,D0,2,D1,9,D2,0)= ^^^(#.04) QUALIFIER [4P:365.044] ; ^DPT(D0,.312,D1,6,D2,9,D3,0)= ^^^(#.04) QUALIFIER [4P:365.044] |
|
| MORE904 | ;
|
|
| FLDLST | ; these are the DD fields that were modified from a set of codes to a Pointer to a file
|
| FileNo | Call Tags |
|---|---|
| ^IBE(350.9 - [#350.9] | GET1^DIQ |
