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 |  Caller 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: IB20PT5

Package: Integrated Billing

Routine: IB20PT5


Information

IB20PT5 ;ALB/CPM - IB V2.0 POST-INIT ONE-TIME ITEMS ; 03-SEP-93

Source Information

Source file <IB20PT5.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA Fileman 2 ^DIE  IXALL^DIK  
Integrated Billing 1 ^IB20PT51  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Integrated Billing 1 IB20PT  

Entry Points

Name Comments DBIA/ICR reference
STAT ; Set new entries into the IB ACTION STATUS (#350.21) file.
FT ; Update called routine for form type HCFA 1500
PSO ; Update the eligibility logic for PSO SC RX COPAY NEW
CRES ; Update the cancellation reason MT CHARGE EDITED in file #350.3
ABP ; Set auto biller parameters.
BASC ; Update the BASC start date to 10/1/99.
NEWCODE ;;S X=0,X1="",X2="" G:'$D(VAEL) 1^IBAERR I VAEL(4),+VAEL(3),'IBDOM S X=$S($P(VAEL(3),"^",2)<50:2,1:0) I X S:$$RXEXMT^IBARXEU0(DFN,DT) X=0 I X S X2=$P(^IBE(350.1,DA,0),"^",4) D COST^IBAUTL
CCMG ; Update the central collection mailgroup in file #350.9
ACHG ; Clean up any IB ACTION CHARGE (#350.2) nodes left hanging.
DEF ; Enter default billing form type.

External References

Name Field # of Occurrence
^DIE DEF+2, CCMG+3, CRES+3, FT+2, ABP+3, ABP+4
IXALL^DIK STAT+14
^IB20PT51 IB20PT5+13

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBE(350.21 - [#350.21] Classic Fileman Calls
^IBE(350.3 - [#350.3] Classic Fileman Calls
^IBE(350.9 - [#350.9] Classic Fileman Calls
^IBE(353 - [#353] Classic Fileman Calls
^IBE(356.6 - [#356.6] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBE(350.1 - [#350.1] PSO+3, PSO+4*
^IBE(350.2 - [#350.2] ACHG+2!
^IBE(350.21 - [#350.21] STAT+2!, STAT+3*, STAT+4*, STAT+5*, STAT+6*, STAT+7*, STAT+8*, STAT+9*, STAT+10*, STAT+11*
, STAT+12*, STAT+13*
^IBE(350.3 - [#350.3] CRES+2
^IBE(350.9 - [#350.9] DEF+2, BASC+2*
^IBE(353 - [#353] FT+2

Label References

Name Line Occurrences
ABP IB20PT5+12
ACHG IB20PT5+4
BASC IB20PT5+7
CCMG IB20PT5+10
CRES IB20PT5+9
DEF IB20PT5+5
FT IB20PT5+11
NEWCODE PSO+2
PSO IB20PT5+8
STAT IB20PT5+6

Naked Globals

Name Field # of Occurrence
^( ACHG+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA DEF+2*!, CCMG+3*!, CRES+2*, CRES+3!, FT+2*!, ABP+3*!, ABP+4*!
DIE DEF+2*!, CCMG+3*!, CRES+3*!, FT+2*!, ABP+3*!, ABP+4*!
DIK STAT+14*!
DR DEF+2*!, CCMG+3*!, CRES+3*!, FT+2*!, ABP+3*!, ABP+4*!
DT ABP+3
>> I ACHG+2*
>> IBAUTOBP ABP+1
IBDA PSO+3*, PSO+4, PSO+5!
IBFT FT+2*, FT+4!
IBFTI FT+2*, FT+4!
IBNEWSC PSO+2*, PSO+4, PSO+5!
IBX CCMG+2*, CCMG+3!, PSO+3*, PSO+5!
U DEF+2

Marked Items

Name Field # of Occurrence
$T(NEWCODE PSO+2
Info |  Source |  Call Graph |  Caller 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