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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: IBOA32

Package: Integrated Billing

Routine: IBOA32


Information

IBOA32 ;ALB/CPM - PRINT ALL BILLS FOR A PATIENT (CON'T) ;28-JAN-92

Source Information

Source file <IBOA32.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Integrated Billing 5 $$APPT^IBCU3  $$IBEEOBCK^IBJDF41  HDR^IBOA31  $$DAT1^IBOUTL  ($$FILE,$$SUBFILE)^IBRXUTL  

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

Package Total Caller Graph
Integrated Billing 1 IBOA31  

Entry Points

Name Comments DBIA/ICR reference
UTIL ; Gather all IB Actions for a patient.
GETATYPE(IBIEN) ; Patch IB*2.0*645 - added community care - action types

External References

Name Field # of Occurrence
$$APPT^IBCU3 IBOA32+13
$$IBEEOBCK^IBJDF41 IBOA32+15
HDR^IBOA31 IBOA32+7
$$DAT1^IBOUTL IBOA32+18, IBOA32+19, IBOA32+28, IBOA32+29, IBOA32+30, IBOA32+36, IBOA32+37, IBOA32+38
$$FILE^IBRXUTL IBOA32+13
$$SUBFILE^IBRXUTL IBOA32+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,IBPFLAG,$S($P(IBND,"^",11)]"":$P($P(IBND,"^",11),"-",2),$P(IBND,"^",5)=99:"",$P(IBND,"^",5)=10:"",1:"Pending")
  • Line Location: IBOA32+16
Function Call: WRITE
  • Prompt: ?19,IBTYPE
  • Line Location: IBOA32+25
Function Call: WRITE
  • Prompt: ?38,$E($S($P(IBND,"^",4)["350:":$E($P(IBND,"^",8),1,14),$P(IBND,"^",3)<7:"Rx:"_IBRX_$S(IBRF>0:"("_IBRF_")",1:""),$P(IBND1,"^",5):"CHAMPVA SUBSIST",1:"AUT MEANS TEST"),1,14)
  • Line Location: IBOA32+26
Function Call: WRITE
  • Prompt: ?55,$$DAT1^IBOUTL(-IBDT)
  • Line Location: IBOA32+28
Function Call: WRITE
  • Prompt: ?65,$$DAT1^IBOUTL($S(IBRXN>0:IBRDT,$P(IBND,"^",14):$P(IBND,"^",14),1:$P(IBND1,"^",2)\1))
  • Line Location: IBOA32+29
Function Call: WRITE
  • Prompt: ?75,$$DAT1^IBOUTL($S($P(IBND,"^",15):$P(IBND,"^",15),1:$P(IBND1,"^",2)\1))
  • Line Location: IBOA32+30
Function Call: WRITE
  • Prompt: ?90,"N/A",?95,$E($P($G(^IBE(350.21,+$P(IBND,"^",5),0)),"^",2),1,17)
  • Line Location: IBOA32+31
Function Call: WRITE
  • Prompt: U,IBTYPE
  • Line Location: IBOA32+33
Function Call: WRITE
  • Prompt: U,$E($S($P(IBND,"^",4)["350:":$E($P(IBND,"^",8),1,14),$P(IBND,"^",3)<7:"Rx:"_IBRX_$S(IBRF>0:"("_IBRF_")",1:""),$P(IBND1,"^",5):"CHAMPVA SUBSIST",1:"AUT MEANS TEST"),1,14),U
  • Line Location: IBOA32+34
Function Call: WRITE
  • Prompt: $$DAT1^IBOUTL(-IBDT)
  • Line Location: IBOA32+36
Function Call: WRITE
  • Prompt: U,$$DAT1^IBOUTL($S(IBRXN>0:IBRDT,$P(IBND,"^",14):$P(IBND,"^",14),1:$P(IBND1,"^",2)\1))
  • Line Location: IBOA32+37
Function Call: WRITE
  • Prompt: U,$$DAT1^IBOUTL($S($P(IBND,"^",15):$P(IBND,"^",15),1:$P(IBND1,"^",2)\1))
  • Line Location: IBOA32+38
Function Call: WRITE
  • Prompt: U,"N/A",U,$E($P($G(^IBE(350.21,+$P(IBND,"^",5),0)),"^",2),1,17)
  • Line Location: IBOA32+39

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IB - [#350] IBOA32+9, UTIL+2, UTIL+7, UTIL+13, UTIL+18, UTIL+19, UTIL+20
^IB("APDT" UTIL+5, UTIL+6, UTIL+9
^IB("C" UTIL+2
^IBE(350.1 - [#350.1] IBOA32+21, UTIL+3, UTIL+8, GETATYPE+1
^IBE(350.21 - [#350.21] IBOA32+31, IBOA32+39
^UTILITY($J UTIL+21*

Label References

Name Line Occurrences
$$GETATYPE IBOA32+23

Naked Globals

Name Field # of Occurrence
^(1 IBOA32+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A UTIL+1~, UTIL+8*, UTIL+9, UTIL+11, UTIL+12, UTIL+15
B UTIL+1~
C UTIL+1~, UTIL+6*, UTIL+9
D UTIL+1~, UTIL+6*, UTIL+7, UTIL+9
DATE UTIL+1~, UTIL+18*, UTIL+19*, UTIL+20*, UTIL+21
>> DFN IBOA32+13, IBOA32+15, UTIL+2, UTIL+13
E UTIL+1~, UTIL+7*, UTIL+8
>> IBDT IBOA32+28, IBOA32+36
>> IBEXCEL IBOA32+18, IBOA32+19, IBOA32+24
>> IBIBRX UTIL+3
IBIEN IBOA32+8~, IBOA32+21*, IBOA32+22*, IBOA32+23, GETATYPE~, GETATYPE+1
>> IBIFN IBOA32+9
IBN UTIL+1~, UTIL+2*, UTIL+5, UTIL+6, UTIL+9
IBND IBOA32+8~, IBOA32+9*, IBOA32+11, IBOA32+15, IBOA32+16, IBOA32+18, IBOA32+19, IBOA32+21, IBOA32+22, IBOA32+26
, IBOA32+29, IBOA32+30, IBOA32+31, IBOA32+34, IBOA32+37, IBOA32+38, IBOA32+39
IBND1 IBOA32+8~, IBOA32+9*, IBOA32+18, IBOA32+19, IBOA32+26, IBOA32+29, IBOA32+30, IBOA32+34, IBOA32+37, IBOA32+38
IBNIEN UTIL+1~, UTIL+11*, UTIL+12*, UTIL+13
IBNX UTIL+1~, UTIL+9*, UTIL+11, UTIL+12, UTIL+16*, UTIL+17*, UTIL+19, UTIL+20, UTIL+21
IBPFLAG IBOA32+8~, IBOA32+15*, IBOA32+16
>> IBQUIT IBOA32+7
IBRDT IBOA32+8~, IBOA32+10*, IBOA32+12*, IBOA32+13*, IBOA32+29, IBOA32+37
IBRF IBOA32+8~, IBOA32+10*, IBOA32+11*, IBOA32+12, IBOA32+26, IBOA32+34
IBRX IBOA32+8~, IBOA32+10*, IBOA32+11*, IBOA32+26, IBOA32+34
IBRXN IBOA32+8~, IBOA32+10*, IBOA32+11*, IBOA32+12, IBOA32+13, IBOA32+29, IBOA32+37
IBTYPE IBOA32+8~, IBOA32+23*, IBOA32+25, IBOA32+33, GETATYPE+1*, GETATYPE+2, GETATYPE+3
IBX IBOA32+8~, IBOA32+10*, IBOA32+13*, IBOA32+27, IBOA32+35
IENS IBOA32+8~
IOSL IBOA32+7
U IBOA32+19, IBOA32+33, IBOA32+34, IBOA32+37, IBOA32+38, IBOA32+39, UTIL+7, UTIL+8, UTIL+13
X IBOA32+8~, UTIL+1~, UTIL+2*, UTIL+3, UTIL+4, UTIL+18
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All