Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: IBY497PO

Package: Integrated Billing

Routine: IBY497PO


Information

IBY497PO ;ALB/TAZ/KML/YG - Post install routine for patch 497 ; 10 Feb 2013 14:44 PM

Source Information

Source file <IBY497PO.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 3 ($$FMADD,$$FMTE,$$NOW)^XLFDT  ($$INSTALDT,$$NEWCP,BMES,MES)^XPDUTL  $$PROD^XUPROD  
VA FileMan 3 (,FILE)^DIE  (,ENALL)^DIK  $$GET1^DIQ  
Integrated Billing 2 ^IBCNEHLM  $$TASK^IBCNUPD  

Entry Points

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

External References

Name Field # of Occurrence
^DIE NEWPARAM+7, RMDEFSTC+12, RMDEFSTC+17, RMSSSTC+11
FILE^DIE PROC365+13, PROC2+11
^DIK FIXDD+4
ENALL^DIK REINDEX+6, REINDEX+11, REINDEX+16, REINDEX+22, REINDEX+23, REINDEX+28, REINDEX+34, REINDEX+35, REINDEX+38, REINDEX+39
$$GET1^DIQ RMDEFSTC+14, RMSSSTC+8
^IBCNEHLM RMSG+3
$$TASK^IBCNUPD UPDATE1
$$FMADD^XLFDT PROC365+8, PROC2+7
$$FMTE^XLFDT PROC365+4, PROC2+4
$$NOW^XLFDT PROC365+4, PROC2+4
$$INSTALDT^XPDUTL EN+2
$$NEWCP^XPDUTL EN+5
BMES^XPDUTL EN+2, EN+6, UPDATE1+3, PROC365+3, PROC365+4, PROC365+17, PROC365+18, PROC2+3, PROC2+4, PROC2+15
PROC2+16
MES^XPDUTL RMSG+1, RMSG+2, NEWPARAM+4, REINDEX+1, REINDEX+2, RMDEFSTC+7, RMSSSTC+5, UPDATE+3, UPDATE1+1
$$PROD^XUPROD RMSG+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBE(350.9 - [#350.9] GET1^DIQ
^IBA(355.3 - [#355.3] Classic Fileman Calls
^IBA(355.33 - [#355.33] Classic Fileman Calls
^IBCN(365 - [#365] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] REINDEX+20, REINDEX+24, REINDEX+25, PROC2+9, PROC2+10, 12+5, 101+4, 302+4, 408+4, 503+4
, 705+4, 804+4, 904+4
^IBCN(365 - [#365] REINDEX+8, REINDEX+13, PROC365+10, PROC365+12, 8+2, 12+4, 101+3, 302+3, 408+3, 503+3
, 705+3, 804+3, 904+3
^IBE( MORE705+1
^IBE(350.9 - [#350.9] RMDEFSTC+10, RMSSSTC+7
^IBE(365.013 - [#365.013] RMDEFSTC+8
^IBE(365.028 - [#365.028] 503+5
^IBE(365.032 - [#365.032] MORE804+1
^IBE(365.033 - [#365.033] 12+6
^IBE(365.034 - [#365.034] 408+5
^IBE(365.035 - [#365.035] 101+5
^IBE(365.037 - [#365.037] 8+3
^IBE(365.043 - [#365.043] 302+5
^IBE(365.044 - [#365.044] MORE904+1
^XTMP("IBY497PO" PROC365+8*, PROC365+9, PROC365+16*, PROC2+7*, PROC2+8, PROC2+14*

Label References

Name Line Occurrences
101 PROCFLDS+14
12 PROCFLDS+13
302 PROCFLDS+15
408 PROCFLDS+16
503 PROCFLDS+17
705 PROCFLDS+18
8 PROC365+11
804 PROCFLDS+19
904 PROCFLDS+20
FIXDD EN+1
MORE705 705+3, 705+4
MORE804 804+3, 804+4
MORE904 904+3, 904+4
PROCFLDS PROC365+12, PROC2+10
RMSGX RMSG+2
UPDATE1 UPDATE1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CNT PROC365+5~, PROC365+6*, PROC365+15*, PROC365+17, PROC365+18, PROC2+5~, PROC2+6*, PROC2+13*, PROC2+15, PROC2+16
DA FIXDD+3~, FIXDD+4*, NEWPARAM+5~, NEWPARAM+6*, REINDEX+3~, RMDEFSTC+5~, RMDEFSTC+6*, RMDEFSTC+10*, RMDEFSTC+14, RMSSSTC+3~
RMSSSTC+4*, RMSSSTC+7*, RMSSSTC+8
DA(1 FIXDD+4*, REINDEX+10*, REINDEX+15*, REINDEX+21*, REINDEX+27*
DA(2 REINDEX+15*, REINDEX+27*
DA(3 REINDEX+27*
DFN PROC2+5~, PROC2+8*, PROC2+9*, PROC2+10, PROC2+14, PROCFLDS~, PROCFLDS+11, PROCFLDS+13, PROCFLDS+14, PROCFLDS+15
, PROCFLDS+16, PROCFLDS+17, PROCFLDS+18, PROCFLDS+19, PROCFLDS+20, 12~, 12+5, 101~, 101+4, 302~
, 302+4, 408~, 408+4, 503~, 503+4, 705~, 705+4, 804~, 804+4, 904~
, 904+4
DIE NEWPARAM+5~, NEWPARAM+6*, RMDEFSTC+5~, RMDEFSTC+6*, RMSSSTC+3~, RMSSSTC+4*
DIK FIXDD+3~, FIXDD+4*, REINDEX+3~, REINDEX+5*, REINDEX+10*, REINDEX+15*, REINDEX+21*, REINDEX+27*, REINDEX+33*, REINDEX+37*
DIK(1 REINDEX+6*, REINDEX+11*, REINDEX+16*, REINDEX+22*, REINDEX+23*, REINDEX+28*, REINDEX+34*, REINDEX+35*, REINDEX+38*, REINDEX+39*
DR NEWPARAM+5~, NEWPARAM+6*, RMDEFSTC+5~, RMDEFSTC+12*, RMDEFSTC+16*, RMSSSTC+3~, RMSSSTC+10*
DT PROC365+8, PROC2+7
FIELD RMDEFSTC+5~, RMDEFSTC+12*, RMDEFSTC+14*, RMDEFSTC+16, RMSSSTC+3~, RMSSSTC+8*, RMSSSTC+10
FILE PROC365+5~, PROC2+5~, PROCFLDS~, PROCFLDS+12*, PROCFLDS+13, PROCFLDS+14, PROCFLDS+15, PROCFLDS+16, PROCFLDS+17, PROCFLDS+18
, PROCFLDS+19, PROCFLDS+20, 12~, 12+4, 12+6, 101~, 101+3, 101+5, 302~, 302+3
, 302+5, 408~, 408+3, 408+5, 503~, 503+3, 503+5, 705~, 705+3, 705+4
, 804~, 804+3, 804+4, 904~, 904+3, 904+4
FLD REINDEX+3~, REINDEX+6*, REINDEX+11*, REINDEX+38*, PROC365+5~, PROC2+5~, 12+3*, 12+4, 12+5, 12+6
, 705+3*, 705+4*, MORE705+1
IBY EN+3~, EN+4*, EN+5, EN+6
IEN REINDEX+3~, REINDEX+8*, REINDEX+10, REINDEX+13, REINDEX+15, REINDEX+20*, REINDEX+21, REINDEX+24, REINDEX+25, REINDEX+27
PROC365+5~, PROC365+9*, PROC365+10*, PROC365+11, PROC365+12, PROC365+16, PROC2+5~, PROC2+10*, PROCFLDS~, PROCFLDS+11
, PROCFLDS+13, PROCFLDS+14, PROCFLDS+15, PROCFLDS+16, PROCFLDS+17, PROCFLDS+18, PROCFLDS+19, PROCFLDS+20, 8~, 8+2
, 8+3, 12~, 12+4, 12+5, 101~, 101+3, 101+4, 302~, 302+3, 302+4
, 408~, 408+3, 408+4, 503~, 503+3, 503+4, 705~, 705+3, 705+4, 804~
, 804+3, 804+4, 904~, 904+3, 904+4
IEN1 REINDEX+3~, REINDEX+13*, REINDEX+15, REINDEX+24*, REINDEX+25, REINDEX+27
IEN2 REINDEX+3~, REINDEX+25*, REINDEX+27
IEN30 RMDEFSTC+5~, RMDEFSTC+8*
IENS PROC365+5~, PROC2+5~, PROCFLDS+11*, PROCFLDS+13, PROCFLDS+14, PROCFLDS+15, PROCFLDS+16, PROCFLDS+17, PROCFLDS+18, PROCFLDS+19
, PROCFLDS+20, 12~, 12+6, 101~, 101+5, 302~, 302+5, 408~, 408+5, 503~
, 503+5, 705~, MORE705+1, 804~, MORE804+1, 904~, MORE904+1
IO UPDATE1+2
IO(0 UPDATE+4
MSG UPDATE+2~, UPDATE1*, UPDATE1+1*, UPDATE1+3
RSUPDT PROC365+5~, PROC365+11, PROC365+14!, PROC2+5~, PROC2+12!, PROCFLDS+13, PROCFLDS+14, PROCFLDS+15, PROCFLDS+16, PROCFLDS+17
, PROCFLDS+18, PROCFLDS+19, PROCFLDS+20, 8~, 12~, 101~, 302~, 408~, 503~, 705~
, 804~, 904~
RSUPDT( 12+6*, 101+5*, 302+5*, 408+5*, 503+5*, MORE705+1*, MORE804+1*, MORE904+1*
RSUPDT(365 8+3*
SFILE PROC365+5~, PROC2+5~, 705+3*, 705+4*, MORE705+1, 804+3*, 804+4*, MORE804+1, 904+3*, 904+4*
MORE904+1
SIEN PROC365+5~, PROC365+12*, PROC2+5~, PROC2+10*, PROCFLDS~, PROCFLDS+11, PROCFLDS+13, PROCFLDS+14, PROCFLDS+15, PROCFLDS+16
, PROCFLDS+17, PROCFLDS+18, PROCFLDS+19, PROCFLDS+20, 12~, 12+4, 12+5, 101~, 101+3, 101+4
, 302~, 302+3, 302+4, 408~, 408+3, 408+4, 503~, 503+3, 503+4, 705~
, 705+3, 705+4, 804~, 804+3, 804+4, 904~, 904+3, 904+4
SSIEN PROC365+5~, PROC2+5~, 705+3*, 705+4*, MORE705+1, 804+3*, 804+4*, MORE804+1, 904+3*, 904+4*
MORE904+1
STC RMDEFSTC+5~, RMDEFSTC+14*, RMDEFSTC+15, RMSSSTC+3~, RMSSSTC+8*, RMSSSTC+9
U 8+2, 12+4, 12+5, 101+3, 101+4, 302+3, 302+4, 408+3, 408+4, 503+3
, 503+4, 705+3, 705+4, 804+3, 804+4, 904+3, 904+4
VALUE PROC365+5~, PROC2+5~, 8+2*, 8+3, 12+4*, 12+5*, 12+6, 101+3*, 101+4*, 101+5
, 302+3*, 302+4*, 302+5, 408+3*, 408+4*, 408+5, 503+3*, 503+4*, 503+5, 705+3*
, 705+4*, MORE705+1, 804+3*, 804+4*, MORE804+1, 904+3*, 904+4*, MORE904+1
X NEWPARAM+5~
Y EN+3~, EN+5*, EN+6, NEWPARAM+5~
>> ZTQUEUED UPDATE1
Info |  Source |  Call Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All