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  | All
Print Page as PDF
Routine: IBTUTL1

Package: Integrated Billing

Routine: IBTUTL1


Information

IBTUTL1 ;ALB/AAS - CLAIMS TRACKING UTILITY ROUTINE ;21-JUN-93

Source Information

Source file <IBTUTL1.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA FileMan 6 DD^%DT  MSG^DIALOG  FIND^DIC  ^DIE  EN^DIQ1  ^DIR  
Integrated Billing 2 $$INSURED^IBCNS1  ($$EABD,$$FNDHCSR,ADDT,HCSRCPY)^IBTUTL  
Registration 1 PID^VADPT  

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

Package Total Caller Graph
Integrated Billing 16 IBCC1  IBJTRA  IBNCPDPU  IBTOBI4  IBTRC  IBTRC1  IBTRCD  IBTRD  
IBTRDD  IBTRE2  IBTRED01  IBTRKR3  IBTRKR41  IBTRKR5  IBTRV  IBTRVD  

Entry Points

Name Comments DBIA/ICR reference
OPT(DFN,IBETYP,IBTDT,ENCTR,IBRMARK,IBVSIT) ; -- add outpatient care entries
; -- input dfn := patient pointer to 2
; ibetyp := pointer to type entry in 356.6
; ibtdt := episode date
; enctr := pointer to opt. encounter file (optional)
; ibrmark := text of reason not billable (optional)
; ibvsit := pointer to visit file (optional)
OPTQ
REFILL(DFN,IBETYP,IBTDT,IBRXN,IBRXN1,IBRMARK,IBEABD,IBSCROI) ; -- add refill
; -- input dfn := patient pointer to 2
; ibetyp := pointer to type entry in 356.6
; ibtdt := episode date (refill date)
; ibrxn := pointer to 52
; ibrxn1 := refill multiple entry
; ibrmark := non billable reason if unsure
; ibeabd := optional, can specify an earliest auto bill date
; ibscroi := special consent roi
REFILLQ
PRO(DFN,IBTDT,IBPRO,IBRMARK) ; -- add prosthetic entries
; -- input dfn := patient pointer to 2
; ibetyp := pointer to type entry in 356.6
; ibtdt := episode date
PROQ
PT(DFN) ; -- format patient name - last 4 for output
PTQ
PRODATA(IBDA) ; -- return data from prosthetics file
DIQ
PRODAQ
OPTSCRN ; -- add outpatient care entries with user feedback
; called from OPT^IBTUTL1 which has following inputs
; -- input dfn := patient pointer to 2
; ibetyp := pointer to type entry in 356.6
; ibtdt := episode date
; enctr := pointer to opt. encounter file (optional)
; ibrmark := text of reason not billable (optional)
; ibvsit := pointer to visit file (optional)
OPTSCRNQ

External References

Name Field # of Occurrence
DD^%DT OPTSCRN+17
MSG^DIALOG OPTSCRN+37, OPTSCRN+69
FIND^DIC OPTSCRN+53
^DIE OPT+25, REFILL+20, PRO+15, OPTSCRN+87
EN^DIQ1 DIQ+2
^DIR OPTSCRN+42, OPTSCRN+74
$$INSURED^IBCNS1 OPT+23, REFILL+17, PRO+13, OPTSCRN+85
$$EABD^IBTUTL OPT+23, REFILL+17, PRO+13, OPTSCRN+85
$$FNDHCSR^IBTUTL OPT+27
ADDT^IBTUTL OPT+19, REFILL+13, PRO+9, OPTSCRN+81
HCSRCPY^IBTUTL OPT+27
PID^VADPT PT+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBT(356 - [#356] Classic Fileman Calls
^SCE - [#409.68] FIND^DIC
^RMPR(660 - [#660] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] PT+3, OPTSCRN+28
^IBE(356.6 - [#356.6] OPT+15, PRO+7, OPTSCRN+13, OPTSCRN+31
^IBT(356 - [#356] OPT+16, OPT+18, OPT+22, OPT+26, REFILL+12, REFILL+16, REFILL+21, PRO+8, PRO+12, PRO+16
OPTSCRN+12, OPTSCRN+15, OPTSCRN+25, OPTSCRN+26, OPTSCRN+78, OPTSCRN+84, OPTSCRN+88
^RMPR(660 - [#660] PRODATA+4

Label References

Name Line Occurrences
OPTQ OPT+16, OPT+18, OPT+21, OPT+22
OPTSCRN OPT+11
OPTSCRNQ OPTSCRN+15, OPTSCRN+80, OPTSCRN+83, OPTSCRN+84
PRODAQ PRODATA+3, PRODATA+5
PROQ PRO+8, PRO+10, PRO+12
PTQ PT+1
REFILLQ REFILL+12, REFILL+14, REFILL+16

Naked Globals

Name Field # of Occurrence
^(0 PT+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CNT OPTSCRN+9~, OPTSCRN+16*, OPTSCRN+32, OPTSCRN+33*, OPTSCRN+35, OPTSCRN+36, OPTSCRN+38, OPTSCRN+41, OPTSCRN+47~, OPTSCRN+55*
OPTSCRN+70, OPTSCRN+73
DA OPT+8~, OPT+20*, OPT+25!, REFILL+10~, REFILL+15*, REFILL+20!, PRO+5~, PRO+11*, PRO+15!, PRODATA+1~
DIQ+1*, OPTSCRN+82*, OPTSCRN+87!
DFN OPT~, OPT+16, OPT+18, OPT+23, OPT+27, REFILL~, REFILL+17, PRO~, PRO+13, PT~
, PT+1, PT+3, OPTSCRN+12, OPTSCRN+15, OPTSCRN+25, OPTSCRN+28, OPTSCRN+50, OPTSCRN+78, OPTSCRN+85
DIC OPT+8~, REFILL+10~, PRO+5~, PRODATA+1~, DIQ*
DIE OPT+8~, OPT+20*, OPT+25!, REFILL+10~, REFILL+15*, REFILL+20!, PRO+5~, PRO+11*, PRO+15!, PRODATA+1~
OPTSCRN+82*, OPTSCRN+87!
DIOUT OPTSCRN+48~
>> DIQ DIQ+1*
>> DIQ(0 DIQ+1*
DIR OPTSCRN+9~, OPTSCRN+47~
DIR("?" OPTSCRN+40*, OPTSCRN+41*, OPTSCRN+72*, OPTSCRN+73*
DIR("A" OPTSCRN+39*, OPTSCRN+71*
DIR(0 OPTSCRN+38*, OPTSCRN+70*
DIROUT OPTSCRN+9~, OPTSCRN+43, OPTSCRN+48~, OPTSCRN+75
DIRUT OPTSCRN+9~, OPTSCRN+43, OPTSCRN+75
DR OPT+8~, OPT+23*, OPT+24*, OPT+25!, REFILL+10~, REFILL+17*, REFILL+18*, REFILL+19*, REFILL+20!, PRO+5~
, PRO+13*, PRO+14*, PRO+15!, PRODATA+1~, DIQ*, OPTSCRN+85*, OPTSCRN+86*, OPTSCRN+87!
DTOUT OPTSCRN+9~, OPTSCRN+43, OPTSCRN+48~, OPTSCRN+75
DUOUT OPTSCRN+9~, OPTSCRN+43, OPTSCRN+48~, OPTSCRN+75
DUZ OPT+23, REFILL+17, PRO+13, OPTSCRN+85
ENCTR OPT~, OPT+18, OPT+23, OPTSCRN+12*, OPTSCRN+44*, OPTSCRN+46, OPTSCRN+54*, OPTSCRN+77*, OPTSCRN+78, OPTSCRN+85
>> HCSRIEN OPT+27*
IB3560 OPTSCRN+9~, OPTSCRN+26*, OPTSCRN+27, OPTSCRN+29, OPTSCRN+30
IBACT OPTSCRN+9~, OPTSCRN+30*, OPTSCRN+32
IBDA PRODATA~, PRODATA+3, PRODATA+4, DIQ+1
IBDA0 PRODATA+1~, PRODATA+4*, PRODATA+5
IBDATA OPTSCRN+47~, OPTSCRN+66*, OPTSCRN+67
IBDATA1 OPTSCRN+47~, OPTSCRN+64*, OPTSCRN+66
IBDATA2 OPTSCRN+47~, OPTSCRN+65*, OPTSCRN+66
IBDATE OPTSCRN+9~, OPTSCRN+17*, OPTSCRN+32
>> IBDUZ REFILL+17
IBEABD REFILL~, REFILL+17
IBENC OPTSCRN+9~, OPTSCRN+29*, OPTSCRN+32, OPTSCRN+33
IBERR OPTSCRN+47~, OPTSCRN+52*, OPTSCRN+53
IBETYP OPT~, OPT+15*, OPT+16, OPT+23, OPT+27, REFILL~, REFILL+17, PRO+5~, PRO+7*, PRO+13
OPTSCRN+13*, OPTSCRN+15, OPTSCRN+25, OPTSCRN+31, OPTSCRN+85
IBETYPNM OPTSCRN+9~, OPTSCRN+31*, OPTSCRN+32
IBID OPTSCRN+10~, OPTSCRN+27*, OPTSCRN+32
IBMSG OPTSCRN+47~, OPTSCRN+51*, OPTSCRN+53
IBPATNM OPTSCRN+10~, OPTSCRN+28*, OPTSCRN+32
IBPRO PRO~, PRO+8, PRO+13
IBQUIT OPTSCRN+10~, OPTSCRN+14*, OPTSCRN+43*, OPTSCRN+45, OPTSCRN+75*, OPTSCRN+79
IBRMARK OPT~, OPT+24, REFILL~, REFILL+18, PRO~, PRO+14, OPTSCRN+86
IBRMPR PRODATA+2!
IBRXN REFILL~, REFILL+12, REFILL+17
IBRXN1 REFILL~, REFILL+12, REFILL+17
IBSCRN OPT+8~, OPT+9*, OPT+11, OPT+14*, OPTSCRN+47~, OPTSCRN+50*, OPTSCRN+53
IBSCROI REFILL~, REFILL+19
>> IBTALK OPT+12
IBTDT OPT~, OPT+13, OPT+16, OPT+23, OPT+27, REFILL~, REFILL+17, PRO~, PRO+13, OPTSCRN+15
OPTSCRN+17, OPTSCRN+25, OPTSCRN+49, OPTSCRN+64, OPTSCRN+65, OPTSCRN+85
IBTMP OPTSCRN+47~
IBTMP("ENC" OPTSCRN+54, OPTSCRN+55, OPTSCRN+62, OPTSCRN+64, OPTSCRN+65, OPTSCRN+68, OPTSCRN+77
>> IBTRN OPT+16*, OPT+18*, OPT+20, OPT+21, OPT+22, OPT+26, OPT+27, REFILL+12*, REFILL+14, REFILL+15
, REFILL+16, REFILL+21, PRO+8*, PRO+10, PRO+11, PRO+12, PRO+16, OPTSCRN+15*, OPTSCRN+78*, OPTSCRN+80
OPTSCRN+82, OPTSCRN+83, OPTSCRN+84, OPTSCRN+88
IBVSIT OPT~, OPT+23, OPTSCRN+85
LINE OPTSCRN+10~, OPTSCRN+16*, OPTSCRN+18*, OPTSCRN+19*, OPTSCRN+20*, OPTSCRN+21*, OPTSCRN+22*, OPTSCRN+23*, OPTSCRN+24*, OPTSCRN+32
OPTSCRN+34*, OPTSCRN+36, OPTSCRN+47~, OPTSCRN+56*, OPTSCRN+57*, OPTSCRN+58*, OPTSCRN+59*, OPTSCRN+60*, OPTSCRN+61*, OPTSCRN+63*
OPTSCRN+67, OPTSCRN+68
TEMP OPTSCRN+10~, OPTSCRN+16*
TEMP( OPTSCRN+33*, OPTSCRN+44
TMP OPTSCRN+10~, OPTSCRN+16*, OPTSCRN+47~
TMP("DIMSG" OPTSCRN+18*, OPTSCRN+19*, OPTSCRN+20*, OPTSCRN+21*, OPTSCRN+22*, OPTSCRN+23*, OPTSCRN+24*, OPTSCRN+32*, OPTSCRN+36*, OPTSCRN+57*
OPTSCRN+58*, OPTSCRN+59*, OPTSCRN+60*, OPTSCRN+61*, OPTSCRN+67*, OPTSCRN+68*
U OPTSCRN+27, OPTSCRN+28, OPTSCRN+29, OPTSCRN+30, OPTSCRN+31, OPTSCRN+44
>> VA("BID" PT+3
>> VA("PID" PT+2
X OPT+8~, OPT+16*, REFILL+10~, REFILL+12*, PRO+5~, PRO+8*, OPTSCRN+15, OPTSCRN+16*, OPTSCRN+25*, OPTSCRN+26
OPTSCRN+33, OPTSCRN+44*, OPTSCRN+47~, OPTSCRN+53, OPTSCRN+56*, OPTSCRN+62*, OPTSCRN+64, OPTSCRN+65, OPTSCRN+67
X(1 OPTSCRN+49*
Y OPT+8~, REFILL+10~, PRO+5~, PT+1*, PT+3*, PTQOPTSCRN+17*, OPTSCRN+44, OPTSCRN+76, OPTSCRN+77
>> ZTQUEUED OPT+11
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  | All