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 |  Local Variables  | All
Print Page as PDF
Routine: IBAUTL9

Package: Integrated Billing

Routine: IBAUTL9


Information

IBAUTL9 ;ALB/MGD - DUPLICATE COPAY TRANSACTION UTILITIES - MESSAGING ; Sep 30, 2020@15:16:44

Source Information

Source file <IBAUTL9.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 3 DD^%DT  (C,NOW)^%DTC  $$GET1^DIQ  
Kernel 2 HOME^%ZIS  $$KSP^XUPARAM  
Integrated Billing 1 $$STANUM^IBAUTL9  
MailMan 1 SENDMSG^XMXAPI  

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: 6

Package Total Caller Graph
Integrated Billing 6 IBAMTC  IBAUTL8  IBAUTL8A  IBAUTL8B  IBAUTL8C  IBAUTL9  

Entry Points

Name Comments DBIA/ICR reference
STORE1(IBN,IBIEN,IBRSN) ;
; Input: IBN = IEN of charge in the INTEGRATED BILLING ACTION (#350) file
; that will be cancelled and NOT sent over to AR
; IBIEN = IEN of the existing charge which has a higher precedence
; IBRSN = Text describing why the charge was not passed from IB to AR
; Output: 7 lines of data will be added to ^XTMP("IB TRANS")
; The data will have the following format:
; PATIENT EVENT DATE
; CANCELLED CHARGE IN IB:
; BILL NO. TRANSACTION CHARGE TYPE TOTAL CHARGE
; EXISTING CHARGE IN AR:
; BILL NO. TRANSACTION CHARGE TYPE TOTAL CHARGE
; REASON - REASON WHY CHARGE WAS CANCELLED
; <blank line>
STORE2(IBN,IBIEN,IBRSN) ;
; Input: IBN = IEN of charge in the INTEGRATED BILLING ACTION (#350) file
; that will be sent over to AR
; IBIEN = IEN of the existing charge in AR which will be Cancelled
; IBRSN = Text describing why the charge in AR was Cancelled
; Output: 7 lines of data will be added to ^XTMP("IB TRANS")
; The data will have the following format:
; PATIENT EVENT DATE
; CANCELLED CHARGE IN AR:
; BILL NO. TRANSACTION CHARGE TYPE TOTAL CHARGE
; IB CHARGE PASSED TO AR:
; BILL NO. TRANSACTION CHARGE TYPE TOTAL CHARGE
; REASON - REASON WHY CHARGE WAS CANCELLED
; <blank line>
STORE3(IBPAT,IBDATE,IBCNT) ;
; Called from STORE1 or STORE2 so header and transaction data should already
; be stored.
; Input: IBPAT = Patient's name in external format
; IBDAT = Event Date in external format
; IBCNT = The IEN to store the data under
; Output: The contents of the stack and symbol table when the action was taken
; on the transaction(s).
INTRO(IBCNT) ;
; Input: IBCNT = IEN to store this header record
; Output: This API will set the 0 node in ^XTMP("IB TRANS") and will then store
; the introductory paragraph into ^XTMP("IB TRANS").
HEADER1(IBCNT) ;
; Input: IBCNT = IEN to store this header record
; Output: This API will set the header info for charges in IB that were NOT
; passed over to AR.
HEADER2(IBCNT) ;
; Input: IBCNT = IEN to store this header record
; Output: This API will set the header info for charges in IB that were
; passed over to AR.
HEADER3(IBCNT) ;
; Input: IBCNT = IEN to store this header record
; Output: This API will set the header info for charges in IB that were
; passed over to AR.
XMIT ; Transmit Duplicate Transaction Info
STANUM() ; Get Station Number
COUNTER() ; Determine index to use for storing a record in ^XTMP(""IB TRANS"")
; Get current IEN and increment by 1

External References

Name Field # of Occurrence
DD^%DT STORE3+14, XMIT+27
C^%DTC COUNTER+9
NOW^%DTC STORE3+13
HOME^%ZIS XMIT+36
$$GET1^DIQ STORE1+32, STORE1+33, STORE1+34, STORE1+35, STORE1+36, STORE1+37, STORE1+38, STORE1+47, STORE1+48, STORE1+49
, STORE1+50, STORE2+32, STORE2+33, STORE2+34, STORE2+35, STORE2+36, STORE2+37, STORE2+38, STORE2+47, STORE2+48
, STORE2+49, STORE2+50, STANUM+3
$$STANUM^IBAUTL9 XMIT+24
SENDMSG^XMXAPI XMIT+35
$$KSP^XUPARAM STANUM+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IB - [#350] GET1^DIQ
^DIC(4 - [#4] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^XTMP("IB TRANS" STORE1+28, STORE1+30, STORE1+61*, STORE1+63*, STORE1+67*, STORE1+69*, STORE1+73*, STORE1+76*, STORE1+78*, STORE2+28
, STORE2+30, STORE2+61*, STORE2+63*, STORE2+67*, STORE2+69*, STORE2+73*, STORE2+76*, STORE2+78*, STORE3+16, STORE3+18*
, STORE3+22*, STORE3+28*, INTRO+5*, INTRO+6*, INTRO+7*, INTRO+8*, INTRO+9*, HEADER1+6*, HEADER1+7*, HEADER1+8*
, HEADER1+9*, HEADER1+10*, HEADER1+11*, HEADER1+12*, HEADER1+13*, HEADER1+14*, HEADER1+15*, HEADER1+16*, HEADER1+17*, HEADER2+5*
, HEADER2+6*, HEADER2+7*, HEADER2+8*, HEADER2+9*, HEADER2+10*, HEADER2+11*, HEADER2+12*, HEADER2+13*, HEADER2+14*, HEADER2+15*
, HEADER2+16*, HEADER3+5*, HEADER3+6*, HEADER3+7*, HEADER3+8*, XMIT+4, XMIT+37!, COUNTER+3, COUNTER+10*, COUNTER+12*
^XTMP("IB TRANS1" XMIT+10*, XMIT+12*, XMIT+16*, XMIT+20*, XMIT+37!

Label References

Name Line Occurrences
$$COUNTER STORE1+26, STORE2+26, STORE3+15
HEADER1 STORE1+28, STORE1+30
HEADER2 STORE2+28, STORE2+30
HEADER3 STORE3+16
INTRO STORE1+28, STORE2+28

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% STORE3+12~, STORE3+13
DT STORE3+18, XMIT+26, COUNTER+8, COUNTER+10
DUZ STORE3+18, XMIT+31
IBATYP1 STORE1+24~, STORE1+33*, STORE1+41*, STORE1+66, STORE2+24~, STORE2+33*, STORE2+41*, STORE2+66
IBATYP2 STORE1+24~, STORE1+47*, STORE1+52*, STORE1+72, STORE2+24~, STORE2+47*, STORE2+52*, STORE2+72
IBBBA STORE3+12~, STORE3+20*, STORE3+22
IBBIL1 STORE1+24~, STORE1+35*, STORE1+43*, STORE1+65, STORE2+24~, STORE2+35*, STORE2+43*, STORE2+65
IBBIL2 STORE1+24~, STORE1+49*, STORE1+54*, STORE1+71, STORE2+24~, STORE2+49*, STORE2+54*, STORE2+71
IBCNT STORE1+24~, STORE1+26*, STORE1+28, STORE1+30, STORE1+60, STORE1+61, STORE1+63, STORE1+67, STORE1+69, STORE1+73
, STORE1+76, STORE1+78, STORE2+24~, STORE2+26*, STORE2+28, STORE2+30, STORE2+60, STORE2+61, STORE2+63, STORE2+67
, STORE2+69, STORE2+73, STORE2+76, STORE2+78, STORE3~, STORE3+15*, STORE3+16, STORE3+18, STORE3+22, STORE3+24
, STORE3+28, INTRO~, INTRO+5, INTRO+6, INTRO+7, INTRO+8, INTRO+9, HEADER1~, HEADER1+5, HEADER1+6
, HEADER1+7, HEADER1+8, HEADER1+9, HEADER1+10, HEADER1+11, HEADER1+12, HEADER1+13, HEADER1+14, HEADER1+15, HEADER1+16
, HEADER1+17, HEADER2~, HEADER2+5, HEADER2+6, HEADER2+7, HEADER2+8, HEADER2+9, HEADER2+10, HEADER2+11, HEADER2+12
, HEADER2+13, HEADER2+14, HEADER2+15, HEADER2+16, HEADER3~, HEADER3+5, HEADER3+6, HEADER3+7, HEADER3+8, XMIT+2~
XMIT+6*, XMIT+10, XMIT+12, XMIT+16, XMIT+20, XMIT+21*, COUNTER+2~, COUNTER+3*, COUNTER+5, COUNTER+10
, COUNTER+12, COUNTER+14
IBCNT1 STORE3+12~, STORE3+22*
IBCNT2 STORE3+12~, STORE3+22*
IBCT XMIT+2~, XMIT+9*
IBDATA XMIT+2~, XMIT+14*, XMIT+15*, XMIT+16, XMIT+18*, XMIT+19*, XMIT+20
IBDATE STORE1+24~, STORE1+37*, STORE1+38*, STORE1+45*, STORE1+60, STORE2+24~, STORE2+37*, STORE2+38*, STORE2+45*, STORE2+60
, STORE3~, STORE3+11, STORE3+14*, XMIT+22~, XMIT+28*, XMIT+30
IBIEN STORE1~, STORE1+21, STORE1+47, STORE1+48, STORE1+49, STORE1+50, STORE2~, STORE2+21, STORE2+32, STORE2+33
, STORE2+34, STORE2+35, STORE2+36, STORE2+37
IBN STORE1~, STORE1+21, STORE1+32, STORE1+33, STORE1+34, STORE1+35, STORE1+36, STORE1+37, STORE1+38, STORE2~
, STORE2+21, STORE2+38, STORE2+47, STORE2+48, STORE2+49, STORE2+50
IBPAT STORE1+24~, STORE1+32*, STORE1+40*, STORE1+60, STORE2+24~, STORE2+32*, STORE2+40*, STORE2+60, STORE3~, STORE3+10*
IBREF XMIT+2~, XMIT+6*, XMIT+8*, XMIT+9*, XMIT+10, XMIT+11, XMIT+12, XMIT+13, XMIT+14, XMIT+15
XMIT+17, XMIT+18, XMIT+19
IBRSN STORE1~, STORE1+23*, STORE1+57*, STORE1+75, STORE2~, STORE2+23*, STORE2+57*, STORE2+75
IBSTAT XMIT+22~, XMIT+24*, XMIT+30, STANUM+2*, STANUM+3*, STANUM+4
IBTCH1 STORE1+24~, STORE1+34*, STORE1+42*, STORE1+66, STORE2+24~, STORE2+34*, STORE2+42*, STORE2+66
IBTCH2 STORE1+24~, STORE1+48*, STORE1+53*, STORE1+72, STORE2+24~, STORE2+48*, STORE2+53*, STORE2+72
IBTEXT STORE1+24~, STORE1+60*, STORE1+61, STORE1+65*, STORE1+66*, STORE1+67, STORE1+71*, STORE1+72*, STORE1+73, STORE1+75*
, STORE1+76, STORE2+24~, STORE2+60*, STORE2+61, STORE2+65*, STORE2+66*, STORE2+67, STORE2+71*, STORE2+72*, STORE2+73
, STORE2+75*, STORE2+76
IBTRN1 STORE1+24~, STORE1+36*, STORE1+44*, STORE1+65, STORE2+24~, STORE2+36*, STORE2+44*, STORE2+65
IBTRN2 STORE1+24~, STORE1+50*, STORE1+55*, STORE1+71, STORE2+24~, STORE2+50*, STORE2+55*, STORE2+71
IBX STORE3+12~, STORE3+24*, STORE3+26
IBY STORE3+12~, STORE3+26*
U STORE3+18, COUNTER+3, COUNTER+10, COUNTER+12
X COUNTER+6~, COUNTER+10
X1 COUNTER+6~, COUNTER+8*
X2 COUNTER+6~, COUNTER+8*
XMBODY XMIT+22~, XMIT+33*, XMIT+35
XMDUZ XMIT+22~, XMIT+31*, XMIT+35
XMINSTR XMIT+22~, XMIT+35
XMINSTR("FLAGS" XMIT+34*
XMSUBJ XMIT+22~, XMIT+30*, XMIT+35
XMTO XMIT+22~, XMIT+35
XMTO("G.IB DU PLICATE TRANSACTIONS" , XMIT+32*
Y STORE3+12~, STORE3+13*, STORE3+14, XMIT+22~, XMIT+26*, XMIT+28
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All