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 |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: IBY137PO

Package: Integrated Billing

Routine: IBY137PO


Information

IBY137PO ;ALB/TMP - IB*2*137 POST-INSTALL ;23-AUG-2000

Source Information

Source file <IBY137PO.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 3 $$FMADD^XLFDT  $$UP^XLFSTR  ($$NEWCP,$$PARCP,$$UPCP,BMES,MES)^XPDUTL  
VA FileMan 3 FILE^DICN  ^DIE  EN1^DIK  
Integrated Billing 2 $$NOPUNCT^IBCEF  $$UPIN^IBCEP  

Entry Points

Name Comments DBIA/ICR reference
POST ;Set up check points for post-init
U3993
PID ; Use insurance co's TYPE OF COVERAGE field to default its perf prov
; id type ... Default TYPE OF COVERAGE, if none, is HEALTH INSURANCE
PTYPE ; Update the insurance co plans' electronic id type
U399 ; Change free text pointer to variable pointer in file 399.0222 - add
; entry in file 355.93 if needed
; Start on bills authorized 10-1-2000 or later
U36
NDCFMT ;
U3509 ; Update site parameters with EDI default data
DDFOR837(Y) ; Code to execute to decide if the data element definition
; should be sent with this patch ... either it exists in the list at
; line ENT5+2 or below or it is output only by the 837 output form (#8)
Q1
ERRMSG(TEXT) ; Report errors in array TEXT(error #)=text
ENT5 ; Changed and new entries from 364.5 (other than those only on the 837)
; that should be in the build
ENT7 ; Changed and new entries from 364.7 (other than those on the 837 form)
; that should be in the build
COMPLETE ;
END ;

External References

Name Field # of Occurrence
FILE^DICN U399+24
^DIE U3993+2, PID+12, PID+30, PTYPE+25, U399+22, U399+25, U399+30, U36+5, U3509+3
EN1^DIK NDCFMT+4
$$NOPUNCT^IBCEF U399+17
$$UPIN^IBCEP PID+12
$$FMADD^XLFDT U399+9
$$UP^XLFSTR U399+16, U399+21
$$NEWCP^XPDUTL POST+1, POST+2, POST+3, POST+4, POST+5, POST+6, POST+7, POST+8
$$PARCP^XPDUTL U399+5, U36+4, NDCFMT+4
$$UPCP^XPDUTL U399+22, U399+26, U399+31, U36+5, NDCFMT+4
BMES^XPDUTL U3993+1, PID+2, PTYPE+2, U399+4, U36+1, U36+2, NDCFMT+2, U3509+1, ERRMSG+4, ERRMSG+8
COMPLETE+1, END+1
MES^XPDUTL ERRMSG+5, ERRMSG+6, ERRMSG+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBE(350.9 - [#350.9] Classic Fileman Calls
^IBA(355.3 - [#355.3] Classic Fileman Calls
^IBA(355.93 - [#355.93] Classic Fileman Calls
^IBE(355.97 - [#355.97] Classic Fileman Calls
^DIC(36 - [#36] Classic Fileman Calls
^IBA(362.4 - [#362.4] Classic Fileman Calls
^DGCR(399.3 - [#399.3] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCR(399 - [#399] U399+10, U399+11
^DGCR(399.3 - [#399.3] U3993+2
^DIC(36 - [#36] PID+4, PID+9, PTYPE+22, U36+5
^IBA(355.3 - [#355.3] PTYPE+20, PTYPE+21, PTYPE+22, PTYPE+25
^IBA(355.93 - [#355.93] U399+21
^IBA(362.4 - [#362.4] NDCFMT+4
^IBA(364.6 - [#364.6] DDFOR837+7
^IBA(364.7 - [#364.7] DDFOR837+6, DDFOR837+7
^IBE(350.9 - [#350.9] U36+1, U3509+2
^IBE(355.1 - [#355.1] PTYPE+21
^IBE(355.2 - [#355.2] PID+5, PTYPE+22
^IBE(355.97 - [#355.97] PID+12
^XTMP("IB20_P137" U399+32!
^XTMP("IB20_P137_IBPRV" U399+9*, U399+19, U399+25*, U399+32!

Label References

Name Line Occurrences
COMPLETE U3993+3, PID+31, PTYPE+27, U399+33, U36+1, U36+6, NDCFMT+5, U3509+4
Q1 DDFOR837+4, DDFOR837+5, DDFOR837+6

Naked Globals

Name Field # of Occurrence
^( PID+4, U399+11
^(0 PID+4, NDCFMT+4
^(1 U3509+2
^(3 U36+5
^(4 PID+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % POST+1*, POST+2*, POST+3*, POST+4*, POST+5*, POST+6*, POST+7*, POST+8*, U399+22*, U399+26*
U399+31*, U36+5*, NDCFMT+4*
A U399+3~, U399+11*, U399+12, U399+16, U399+21, U399+24
CT U36~, U36+3*, U36+5*, NDCFMT+1~, NDCFMT+3*, NDCFMT+4*
DA U3993~, U3993+2*, PID+3~, PID+12*, PID+30*, PTYPE+19~, PTYPE+25*, U399+3~, U399+13*, U399+25*
U36+5*, NDCFMT+1~, NDCFMT+4*, U3509+3*
DA(1 U399+13*, U399+22, U399+25*, U399+30
DD U399+3~, U399+23!, U399+24!
DIC U399+3~, U399+24*
DIC("DR" U399+24*
DIC(0 U399+24*
DIE U3993~, U3993+2*, PID+3~, PID+12*, PID+30*, PTYPE+19~, PTYPE+25*, U399+3~, U399+22*, U399+25*
U399+30*, U36+5*, U3509+3*
DIK NDCFMT+1~, NDCFMT+4*
DIK(1 NDCFMT+4*
DLAYGO U399+3~, U399+24*!
DO U399+3~, U399+23!, U399+24!
DR U3993~, U3993+2*, PID+3~, PID+5*, PID+11, PID+12*, PID+13*, PID+14*, PID+16*, PID+18*
PID+20*, PID+22*, PID+24*, PID+26, PID+27*, PID+28*, PID+29*, PID+30, PTYPE+19~, PTYPE+25*
U399+3~, U399+22*, U399+25*, U399+30*, U36+5*, U3509+3*
DT U399+9
IB PID+3~
IB3 PID+3~, PID+9*, PID+13, PID+16, PID+18, PID+20, PID+22, PID+24, PID+28
IB4 PID+3~, PID+9*, PID+14, PID+20, PID+22, PID+24, PID+27
IBA U399+3~, U399+16*, U399+17, U399+24
IBA2 U399+3~, U399+17*, U399+19, U399+25
IBACT U36~, U36+4*
>> IBDA PTYPE+20*, PTYPE+21, PTYPE+22, PTYPE+25
IBINS PTYPE+19~, PTYPE+22*, PTYPE+24
IBLAST U399+3~, U399+5*, U399+6*, U399+7, U399+8
IBMATCH U399+3~, U399+17*, U399+19, U399+21*
IBOUT DDFOR837+3~, DDFOR837+4*, DDFOR837+5*, DDFOR837+6*, DDFOR837+7*, Q1
IBRESTRT U399+3~, U399+7*, U399+10*
IBUPIN PID+3~, PID+12*, PID+14
IBVAP U399+3~, U399+22*, U399+25*, U399+30*
IBZ PID+3~, PID+4*, PID+9, PID+30, PTYPE+19~, PTYPE+23*, PTYPE+24*, PTYPE+25, U399+3~, U399+8*
U399+10*, U399+22, U399+26, U399+31, U36~, U36+4*, U36+5*
IBZ0 PID+3~, PID+4*, PID+5, PID+6, PTYPE+19~, PTYPE+21*, PTYPE+23, U399+3~, U399+10*, U399+11
U399+13, U399+22, U399+25, U399+26, U399+31
IBZ02 PID+3~, PID+5*, PID+6*, PID+7, PID+8, PID+11, PID+16, PID+18, PID+20, PID+22
PID+24, PID+28
>> IBZ1 U399+11*, U399+13, U399+25
TEXT ERRMSG~
TEXT( ERRMSG+6
TEXT(0 ERRMSG+1
U U3993+2, PID+4, PID+5, PID+8, PID+12, PID+13, PID+14, PID+16, PID+18, PID+20
PID+22, PID+24, PID+27, PID+28, PTYPE+21, PTYPE+22, PTYPE+23, PTYPE+25, U399+7, U399+9
U399+11, U399+12, U399+16, U399+21, U399+22, U399+24, U399+26, U399+31, U36+5, NDCFMT+4
, DDFOR837+5
X U3993~, PID+3~, PTYPE+19~, U399+3~, U399+12*, U399+15, U399+24*, U399+30
X0 U399+3~, U399+19*, U399+20, U399+21, U399+22
Y U3993~, PID+3~, PTYPE+19~, U399+3~, U399+25, DDFOR837~, DDFOR837+4, DDFOR837+5, DDFOR837+6, DDFOR837+7
Z U3993~, U3993+2*, NDCFMT+1~, NDCFMT+4*, DDFOR837+3~, DDFOR837+7*, ERRMSG+2~, ERRMSG+6*
Z0 DDFOR837+3~, DDFOR837+7*, ERRMSG+2~, ERRMSG+3*, ERRMSG+5, ERRMSG+7

Marked Items

Name Field # of Occurrence
$T(ENT5+2 DDFOR837+5
$T(ENT5+3 DDFOR837+5
Info |  Source |  Call Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All