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

Package: Integrated Billing

Routine: IBOA31


Information

IBOA31 ;ALB/AAS - PRINT ALL BILLS FOR A PATIENT ; 04/18/90

Source Information

Source file <IBOA31.m>

Call Graph

Call Graph Total: 13

Package Total Call Graph
Integrated Billing 6 UTIL^IBCA3  GVAR^IBCBB  END^IBCBB1  $$PT^IBEFUNC  UTIL^IBOA32  $$DAT1^IBOUTL  
Kernel 3 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  
VA Fileman 3 NOW^%DTC  ^DIC  ^DIR  
IFCAP 1 $$TPR^PRCAFN  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Integrated Billing 2 IB LIST ALL BILLS FOR PAT.  IBOA32  

Entry Points

Name Comments DBIA/ICR reference
EN ;
END
HDR
HDR1
ONE
ENQ
PAUSE
DQ ;

External References

Name Field # of Occurrence
NOW^%DTC DQ+3
^%ZIS EN+11
HOME^%ZIS EN+14
^%ZISC END+6
^%ZTLOAD EN+14
^DIC EN+4
^DIR EN+9
UTIL^IBCA3 DQ+4
GVAR^IBCBB ONE
END^IBCBB1 END+4
$$PT^IBEFUNC DQ+4
UTIL^IBOA32 DQ+4
$$DAT1^IBOUTL ONE+2, ONE+4, ONE+11
$$TPR^PRCAFN ONE+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"No Bills On File for ",$P(IBN,"^")," SSN: ",$P(IBN,"^",2),"."
  • Line Location: DQ+5
Function Call: WRITE
  • Prompt: $S(I]"":$$DAT1^IBOUTL(I)_" ",1:" ")
  • Line Location: ONE+4
Function Call: WRITE
  • Prompt: $J($S(X<0:0,1:X),8,2)
  • Line Location: ONE+5
Function Call: WRITE
  • Prompt: !?54,$$DAT1^IBOUTL(IBOPD)
  • Line Location: ONE+11
Routine Call
  • %ZIS
  • Line Location:
    • EN+14
Routine Call
  • DIC
  • Line Location:
    • EN+4
Routine Call
  • DIR
  • Line Location:
    • EN+9
Routine Call
  • %ZIS
  • Line Location:
    • EN+11

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" DQ+3
^DGCR(399 - [#399] ONE+4, ONE+9, ONE+10
^DGCR(399.3 - [#399.3] ONE+2
^UTILITY($J DQ+5, DQ+8, DQ+9, END!

Label References

Name Line Occurrences
@( DQ+9
EN END+6
END EN+9, ENQ
ENQ EN+11, EN+12, DQ+5
HDR ONE+1, ONE+11
HDR1 DQ+6
PAUSE DQ+10, HDR

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % DQ+3
>> %ZIS EN+11*
DFN EN+4*, DQ+4, END+5!
DIC EN+4*!
DIC(0 EN+4*
DIR EN+9!
DIR("?" EN+6*, EN+7*, EN+8*
DIR("A" EN+5*
DIR("B" EN+5*
DIR(0 EN+5*
DIRUT EN+9, END+5!
DTIME PAUSE
DTOUT END+5!
DUOUT END+5!
>> I ONE+4*
>> IBAT ONE+2
>> IBBNO ONE+2
>> IBCL ONE+3, ONE+4
IBCNT END+5!
IBDT DQ+6*, DQ+8*, DQ+9, END+5!
>> IBEVDT ONE+4
>> IBFDT ONE+4
IBIBRX EN+9*, END+5!
IBIFN DQ+6*, DQ+9*, ONE+4, ONE+5, ONE+9, ONE+10, END+5!
IBIFN1 END+5!
IBLINE DQ+3*, HDR1+4, END+5!
IBN DQ+4*, DQ+5, HDR1+1, END+5!
>> IBNDS ONE+2
IBNOW DQ+3*, HDR1+1, END+5!
IBOPD ONE+9*, ONE+10*, ONE+11, END+5!
IBPAG DQ+3*, HDR1*, HDR1+1, END+5!
IBQUIT DQ+4*, DQ+8, DQ+9, DQ+10, ONE+1, ONE+10, ONE+11, HDR, PAUSE*, END+5!
>> IBST ONE+6
>> IBTDT ONE+4
>> IBTF ONE+7
IBX1 PAUSE*, END+5!
IO DQ+3
IO("Q" EN+12!
IOF HDR1
IOM DQ+3, HDR1+1
IOSL ONE+1, ONE+11
IOST HDR, HDR1, PAUSE
>> POP EN+11
X ONE+5*, END+5!
Y EN+4, EN+9, DQ+3*, END+5!
>> ZTDESC EN+13*
>> ZTQUEUED END+3
>> ZTREQ END+3*
>> ZTRTN EN+13*
>> ZTSAVE("DFN" EN+13*
>> ZTSAVE("IB*" EN+13*
ZTSK EN+14!
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