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 |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: IBARXMN

Package: Integrated Billing

Routine: IBARXMN


Information

IBARXMN ;LL/ELZ-PHARMCAY COPAY CAP RX PROCESSING ; 15 Jun 2021 11:46 AM

Source Information

Source file <IBARXMN.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 4 IX^DIC  FILE^DICN  ^DIE  (,IX)^DIK  
Integrated Billing 3 EN^IBARXCQR  ($$NEXTMO,$$PARENT,CAP,FLAG)^IBARXMC  ($$FAC,$$PRIORITY,$$SITE,$$TFL,ADD,UQUERY)^IBARXMU  
Kernel 1 $$NOW^XLFDT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 14

Package Total Caller Graph
Integrated Billing 14 IBARX  IBARX1  IBARXCRC  IBARXCRD  IBARXMB  IBARXMC  IBARXMI  IBARXMQ  
IBARXMR  IBARXPFS  IBECEA22  IBECEA3  IBECEA4  IBECEAU6  

Entry Points

Name Comments DBIA/ICR reference
TRACK(DFN) ; checks out patient if tracked already
QUERY(DFN,IBDT) ; if there are treating facilities, perform query
ACCT(DFN,IBB,IBU,IBDT,IBS) ; - update amount in patient account
; IBB = amount to be added to pt account (billed)
; IBU = amount to be added to pt account (not billable)
; IBDT = effective date for amount
; IBS = flag, if passed the amounts are totals not to be added to what is already there
UPCHG(IBX,IBU,IBC) ; update a charge (from one that is on hold only)
; IBX = ien in 354.71
; IBU = updated # of units
; IBC = updated charge amount
CLEAN(IBX) ; clean out transmission record
CANCEL(DFN,IBX,IBY,IBR) ; cancel a transaction (flags old one and creates a new one)
; IBX is the ien from 354.71, IBY is the error flag (y) passed by ref
; IBR is optional, it is the reason to cancel
CANQ
ADD(DFN,IBD,IBT,IBPFSS) ; adds a transaction to 354.71
; IBD = data in 354.71 format, if $p(IBD,"^")="" create new number
; IBT = action type pointer (optional, but needed for local site)
; returns ien in 354.71
; IBPFSS optional to indicate came from PFSS system
TRANF(DFN,IBA,IBD,IBT,IBPFSS) ; file transaction data in 354.71
; DFN = patient's dfn
; IBA = ien from file 354.71
; IBD = data in global file format for file 354.71
; piece 2 will be changed to dfn
; pieces 10 and 13 will be resolved
; pieces 14,15 will be created new if they don't exist
; pieces 16,17 will be created new
; piece 18 will be filled if not $g(IBT)=""

External References

Name Field # of Occurrence
IX^DIC TRANF+14
FILE^DICN ACCT+12, ADD+12, ADD+19
^DIE ACCT+19, UPCHG+11, CANCEL+16
^DIK CLEAN+2
IX^DIK TRANF+20
EN^IBARXCQR QUERY+13
$$NEXTMO^IBARXMC QUERY+16
$$PARENT^IBARXMC TRANF+13
CAP^IBARXMC QUERY+6
FLAG^IBARXMC ACCT+21
$$FAC^IBARXMU CANCEL+21
$$PRIORITY^IBARXMU QUERY+2
$$SITE^IBARXMU CANCEL+21, ADD+14
$$TFL^IBARXMU QUERY+5
ADD^IBARXMU QUERY+4, ADD+9
UQUERY^IBARXMU QUERY+17
$$NOW^XLFDT CANCEL+14, TRANF+16

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This patient has never had billing information tracked before",!,"Now querying other facilities..."
  • Line Location: QUERY+8
Function Call: WRITE
  • Prompt: !,"Now sending query to ",$P(IBT(IBX),"^",2)," ..."
  • Line Location: QUERY+9
Function Call: WRITE
  • Prompt: !,"Updating copay cap account records..."
  • Line Location: UPCHG+5
Function Call: WRITE
  • Prompt: !!,"Unable to update records, entry locked!!"
  • Line Location: UPCHG+10
Routine Call
  • DIC
  • Line Location:
    • TRANF+14
Routine Call
  • DIE
  • Line Location:
    • ACCT+19
    • UPCHG+11
    • CANCEL+16

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBAM(354.71 - [#354.71] Classic Fileman Calls
^DIC(4 - [#4] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBAM(354.7 - [#354.7] TRACK+2, ACCT+11, ACCT+15, ACCT+17, ACCT+19, CANCEL+11
^IBAM(354.71 - [#354.71] UPCHG+6, UPCHG+10, UPCHG+11, CLEAN+2, CANCEL+7, CANCEL+8, CANCEL+15, CANCEL+16, ADD+10, ADD+17
, ADD+18, ADD+19, ADD+20, TRANF+10, TRANF+16, TRANF+18*, TRANF+19*

Label References

Name Line Occurrences
$$ADD QUERY+23, CANCEL+22
ACCT UPCHG+14, ADD+13, ADD+22
CANQ CANCEL+7, CANCEL+15
CLEAN UPCHG+17, CANCEL+17
QUERY TRACK+2
TRANF ADD+13, ADD+22

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
D TRANF+10~, TRANF+14*
DA QUERY+1~, ACCT+6~, ACCT+11*, ACCT+12*, ACCT+15, UPCHG+4~, UPCHG+9*, UPCHG+10, UPCHG+11, CLEAN+1~
, CLEAN+2*, CANCEL+4~, CANCEL+14*, TRANF+10~, TRANF+20*
DA(1 ACCT+8*, CLEAN+2*
DFN TRACK~, TRACK+2, QUERY~, QUERY+2, QUERY+4, QUERY+5, QUERY+13, QUERY+17, QUERY+23, ACCT~
, ACCT+8, ACCT+11, ACCT+12, ACCT+15, ACCT+17, ACCT+18, ACCT+19, ACCT+21, CANCEL~, CANCEL+11
, CANCEL+22, ADD~, ADD+8, ADD+9, ADD+13, ADD+22, TRANF~, TRANF+18
DIC ACCT+6~, ACCT+12*, ADD+6~, ADD+12*, ADD+14*, TRANF+10~, TRANF+14*
DIC(0 ACCT+12*, ADD+12*, ADD+14*, TRANF+14*
DIE QUERY+1~, ACCT+6~, ACCT+18*, UPCHG+4~, UPCHG+9*, CANCEL+4~, CANCEL+14*
DIK CLEAN+1~, CLEAN+2*, TRANF+10~, TRANF+20*
DO ACCT+6~, ADD+14!
DR QUERY+1~, ACCT+6~, ACCT+18*, UPCHG+4~, UPCHG+9*, CANCEL+4~, CANCEL+14*
DT TRACK+2
DUZ CANCEL+14, TRANF+18
IBA QUERY+1~, QUERY+23*, ACCT+6~, ACCT+15*, ACCT+16, CLEAN+1~, CLEAN+2*, ADD+6~, ADD+10*, ADD+12*
, ADD+13, ADD+19*, ADD+22, ADD+25, TRANF~, TRANF+10, TRANF+16, TRANF+18, TRANF+19, TRANF+20
>> IBAMP CANCEL+8*
IBB QUERY+1~, QUERY+2*, QUERY+23*, ACCT~, ACCT+16*
IBC UPCHG~, UPCHG+14
>> IBCAP CANCEL+11*
>> IBCAP( CANCEL+25*
IBD QUERY+1~, QUERY+17, QUERY+20, QUERY+24!, CANCEL+4~, CANCEL+7*, CANCEL+8, CANCEL+11, CANCEL+21*, CANCEL+22
, CANCEL+25, ADD~, ADD+10, ADD+12, ADD+13, ADD+22, TRANF~, TRANF+12, TRANF+13*, TRANF+14
, TRANF+18, TRANF+19
IBD( QUERY+23
IBDT QUERY~, QUERY+6, QUERY+13, QUERY+16*, QUERY+17, ACCT~, ACCT+8*, ACCT+11, ACCT+12, ACCT+21
>> IBDUZ TRANF+18
IBFD QUERY+1~, QUERY+6, QUERY+7, QUERY+16
IBN CANCEL+4~, CANCEL+7*, CANCEL+15*, CANCEL+22*, CANQ, ADD+6~, ADD+17*, ADD+18*, ADD+19*, TRANF+10~
, TRANF+16*, TRANF+18
IBO UPCHG+4~, UPCHG+6*, UPCHG+14
IBP QUERY+1~, QUERY+2*, QUERY+4, QUERY+6
IBPAR TRANF+10~, TRANF+13*
IBPFSS ADD~, ADD+22, TRANF~
IBR CANCEL~, CANCEL+14
IBS QUERY+1~, ACCT~, ACCT+16, ADD+6~, ADD+14*, ADD+18, ADD+19, TRANF+15*, TRANF+18
IBT QUERY+1~, QUERY+5*, ADD~, ADD+13, ADD+22, TRANF~, TRANF+18
IBT( QUERY+9, QUERY+12, QUERY+23
IBTD QUERY+1~, QUERY+6, QUERY+7, QUERY+16
IBU ACCT~, ACCT+16*, UPCHG~, TRANF+10~, TRANF+16*, TRANF+18
IBX QUERY+1~, QUERY+9*, QUERY+12, QUERY+17, QUERY+23, UPCHG~, UPCHG+6, UPCHG+9, UPCHG+17, CLEAN~
, CLEAN+2, CANCEL~, CANCEL+7, CANCEL+14, CANCEL+15, CANCEL+16, CANCEL+17
IBY QUERY+1~, QUERY+6, UPCHG+4~, CANCEL~, CANCEL+15*, CANCEL+22*
IBZ QUERY+1~, QUERY+6, TRANF+10~
NEW ADD+6~, ADD+7*, ADD+12*, ADD+13
X QUERY+1~, QUERY+23*, ACCT+12*, CLEAN+1~, CANCEL+4~, ADD+6~, ADD+12*, ADD+19*, TRANF+10~, TRANF+14*
Y ACCT+6~, ACCT+12, CLEAN+1~, CANCEL+4~, ADD+12, ADD+19, TRANF+10~, TRANF+15
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All