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

Package: Integrated Billing

Routine: IBCOMD1


Information

IBCOMD1 ;ALB/CMS - GENERATE INSURANCE COMPANY LISTINGS ;03-AUG-98

Source Information

Source file <IBCOMD1.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Integrated Billing 2 $$STATE^IBCF2  $$EXPAND^IBTRE  
Kernel 2 ^%ZISC  ($$FMTE,$$NOW)^XLFDT  
VA FileMan 1 ^DIR  

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 IBCOMD  

Entry Points

Name Comments DBIA/ICR reference
BEG ; Queued entry point.
; Input variables:
QUEQ
HD ; Write Heading
WRT ; Write data lines
ASK ; Ask to Continue with display
; Returns IBQUIT=1 if user Timed out or entered ^

External References

Name Field # of Occurrence
^%ZISC QUEQ+2
^DIR ASK+4
$$STATE^IBCF2 BEG+59
$$EXPAND^IBTRE BEG+57
$$FMTE^XLFDT HD+4, HD+21
$$NOW^XLFDT HD+4, HD+21

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"** NO RECORDS FOUND **"
  • Line Location: BEG+63
Function Call: WRITE
  • Prompt: !
  • Line Location: QUEQ+2
Function Call: WRITE
  • Prompt: "^where"
  • Line Location: HD+8
Function Call: WRITE
  • Prompt: "^and"
  • Line Location: HD+11
Function Call: WRITE
  • Prompt: "^"_IBFLD(I)
  • Line Location: HD+12
Function Call: WRITE
  • Prompt: "^and ",$S($P(IBCASE(I),"^",3)="zzzzzz":"^'LAST'",1:$P(IBCASE(I),"^",3))
  • Line Location: HD+15
Function Call: WRITE
  • Prompt: !
  • Condition for execution: ($E(IOST,1,2)["C-")
  • Line Location: HD+20
Function Call: WRITE
  • Prompt: "Active/Inactive^Insurance Name^Reimburse?^Street Address 1^Street Address 2^Street Address 3^City^State^ZIP^Phone Number"
  • Line Location: HD+20
Function Call: WRITE
  • Prompt: @IOF,"Generate Insurance Company Listings",?50,$$FMTE^XLFDT($$NOW^XLFDT,"Z"),?70," Page ",IBPAGE
  • Line Location: HD+21
Function Call: WRITE
  • Prompt: !,"List of ",$S(IBAIB=1:"Active",IBAIB=2:"Inactive",1:"All")," Insurance Companies"
  • Line Location: HD+22
Function Call: WRITE
  • Prompt: ", where"
  • Line Location: HD+25
Function Call: WRITE
  • Prompt: ?3,"and"
  • Line Location: HD+28
Function Call: WRITE
  • Prompt: ?8,IBFLD(I)," "
  • Line Location: HD+29
Function Call: WRITE
  • Prompt: " and ",$S($P(IBCASE(I),"^",3)="zzzzzz":"'LAST'",1:$P(IBCASE(I),"^",3))
  • Line Location: HD+32
Function Call: WRITE
  • Prompt: !,"Insurance Name/Address",?33,"Reimburse?",?56,"Phone Number"
  • Line Location: HD+34
Function Call: WRITE
  • Prompt: !
  • Line Location: HD+35
Function Call: WRITE
  • Prompt: "="
  • Line Location: HD+35
Function Call: WRITE
  • Prompt: !,$S(IBA=1:"Inactive Companies",1:"Active Companies"),!
  • Line Location: WRT+7
Function Call: WRITE
  • Prompt: !,IBACT_U_IBTMP
  • Line Location: WRT+17
Function Call: WRITE
  • Prompt: !,$P(IBTMP,U,3)
  • Line Location: WRT+20
Function Call: WRITE
  • Prompt: !,$P(IBTMP,U,4)
  • Line Location: WRT+21
Function Call: WRITE
  • Prompt: ", "
  • Condition for execution: $P(IBTMP,U,4)]""&($P(IBTMP,U,5)]"")
  • Line Location: WRT+21
Function Call: WRITE
  • Prompt: $P(IBTMP,U,5)
  • Line Location: WRT+21
Function Call: WRITE
  • Prompt: ", "
  • Condition for execution: $P(IBTMP,U,6)]""&($P(IBTMP,U,7)]"")
  • Line Location: WRT+22
Function Call: WRITE
  • Prompt: $P(IBTMP,U,7)," ",$P(IBTMP,U,8)
  • Line Location: WRT+22
Routine Call
  • DIR
  • Line Location:
    • ASK+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(36 - [#36] BEG+26, BEG+32
^DIC(5 - [#5] HD+14, HD+31
^TMP("IBCOMD" BEG+23!, BEG+61*, BEG+63, QUEQ!, WRT+2, WRT+8, WRT+9, WRT+10, WRT+15

Label References

Name Line Occurrences
ASK BEG+63, WRT+3, WRT+13, WRT+23
HD BEG+63, BEG+64, WRT+7, WRT+14
QUEQ BEG+63
WRT BEG+64

Naked Globals

Name Field # of Occurrence
^( BEG+26, BEG+32

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIR ASK+3~
DIR(0 ASK+4*
DIROUT ASK+3~
DIRUT ASK+3~, ASK+5
DTOUT ASK+3~
DUOUT ASK+3~, ASK+5
H HD+9~, HD+10*, HD+11, HD+12*, HD+26~, HD+27*, HD+28, HD+29*
I HD+9~, HD+10*, HD+12, HD+13, HD+14, HD+15, HD+26~, HD+27*, HD+29, HD+30
, HD+31, HD+32
IBA WRT+1~, WRT+2*, WRT+5, WRT+7, WRT+8, WRT+9, WRT+10, WRT+15
IBACT WRT+1~, WRT+5*, WRT+17
IBAIB BEG+29, BEG+30, QUEQ!, HD+5, HD+22
IBCASE QUEQ!, HD+8, HD+25
IBCASE( BEG+35, BEG+36, HD+10, HD+13, HD+14, HD+15, HD+27, HD+30, HD+31, HD+32
IBD BEG+36~*, BEG+39, BEG+45, BEG+49, BEG+50
IBDA BEG+20~, BEG+26*, BEG+32, BEG+61, WRT+9*, WRT+10, WRT+15
IBDA0 BEG+20~, BEG+26*, BEG+29, BEG+30, BEG+42, BEG+56, BEG+57, BEG+61
IBDA11 BEG+20~, BEG+32*, BEG+39, BEG+42, BEG+58
IBDA13 BEG+20~, BEG+32*, BEG+60
IBFLD QUEQ!
IBFLD( HD+12, HD+29
IBI BEG+20~, ASK+3~
IBJ BEG+20~, BEG+35*, BEG+36, BEG+39, BEG+42
IBNA WRT+1~, WRT+8*, WRT+9, WRT+10, WRT+15
IBNOT BEG+20~, BEG+35*, BEG+39*, BEG+45*, BEG+48*, BEG+49*, BEG+50*, BEG+52
IBOFF WRT+1~, WRT+11*, WRT+12
IBOUT BEG+22*, BEG+64, QUEQ!, HD+3, HD+20, WRT+3, WRT+5, WRT+7, WRT+12, WRT+17
IBPAGE BEG+20~, BEG+23*, HD+1*, HD+21, WRT+3
IBQUIT QUEQ!, WRT+1*, WRT+2, WRT+3, WRT+8, WRT+9, WRT+12, WRT+13, WRT+23, ASK+5*
IBTMP BEG+20~, BEG+56*, BEG+57*, BEG+58*, BEG+59*, BEG+60*, BEG+61, WRT+10*, WRT+11, WRT+15*
, WRT+17, WRT+19, WRT+20, WRT+21, WRT+22
IBX BEG+20~, BEG+57*, BEG+58*, BEG+59*, HD+35*
IOF HD+21
IOSL WRT+12
IOST HD+20, ASK+2
U BEG+22, BEG+29, BEG+30, BEG+56, BEG+57, BEG+58, BEG+59, BEG+60, BEG+61, WRT+11
, WRT+17, WRT+19, WRT+20, WRT+21, WRT+22
VAL BEG+36~, BEG+42*, BEG+45, BEG+48, BEG+49, BEG+50
X BEG+20~, WRT+1~, ASK+3~
Y BEG+20~, WRT+1~, ASK+3~
>> ZTQUEUED QUEQ+1
>> ZTREQ QUEQ+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All