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 |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: IBOCHK

Package: Integrated Billing

Routine: IBOCHK


Information

IBOCHK ;ALB/AAS - INTEGRATED BILLING - RX COPAY LINK CHECK ; 2-APR-91

Source Information

Source file <IBOCHK.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 4 (,HOME)^%ZIS  ^%ZISC  T1^%ZOSV  ^%ZTLOAD  
VA Fileman 2 ^DIC  D^DIQ  
Integrated Billing 1 PAUSE^IBOUTL  
Registration 1 PID^VADPT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Integrated Billing 1 IB OUTPUT VERIFY RX LINKS  

Entry Points

Name Comments DBIA/ICR reference
END ;
HDR ;
CHK
DEV
ST
TO
LINE ;
IBOERR ;error messages
DQ ; -entry point from queing

External References

Name Field # of Occurrence
^%ZIS DEV+1
HOME^%ZIS %+4
^%ZISC END+5
T1^%ZOSV END+2
^%ZTLOAD DEV+2
^DIC ST, TO
D^DIQ DQ+3
PAUSE^IBOUTL LINE+1
PID^VADPT LINE+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,?24,"Verify IB - Pharmacy Co-Pay links",!!
  • Line Location: IBOCHK+10
Function Call: WRITE
  • Prompt: *7,!!,"End must not be less than beginning number",!
  • Line Location: TO+1
Function Call: WRITE
  • Prompt: !
  • Line Location: DEV+2
Function Call: WRITE
  • Prompt: !,IBLINE
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: ?12,$E($P(^DPT(DFN,0),"^"),1,20),?34,VA("BID"),?40,$P($P(IBND,"^",8),"-"),?50,$P($P(IBSL,";",2),":",2),?58,IBSL,?80,$P(IBND,"^",11),?91,$P(IBND,"^",12)
  • Line Location: LINE+4
Routine Call
  • %ZIS
  • Line Location:
    • %+4
Routine Call
  • DIC
  • Line Location:
    • ST
    • TO
Routine Call
  • %ZIS
  • Line Location:
    • DEV+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IB - [#350] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] LINE+4
^IB - [#350] CHK+1, CHK+2, CHK+3
^IB("B" DQ+5
^PSRX - [#52] CHK+6, CHK+7, CHK+8, CHK+10, CHK+11, CHK+12

Label References

Name Line Occurrences
CHK DQ+5
END ST, TO, DEV+1, DEV+2, DQ+6
HDR DQ+3, LINE+1
LINE CHK+1, CHK+3, CHK+6, CHK+7, CHK+8, CHK+10, CHK+11, CHK+12
ST TO+1

Naked Globals

Name Field # of Occurrence
^("IB" CHK+8
^(0 CHK+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS DEV+1*
>> %ZIS("A" DEV+1*
>> DFN LINE+3*, LINE+4
DIC ST*!, TO*!
DIC("A" ST*, TO*
DIC("B" ST*, TO*
DIC(0 ST*, TO*
DT DQ+3
IBCNT DQ+3*, CHK*, END+4!
IBECNT DQ+3*, LINE+2*, END+4!
IBEND TO*, TO+1, DQ+5, HDR+4, END+4!
>> IBHDT DQ+3*, HDR+3
IBLINE HDR+6*!
IBN DQ+5*, CHK+1, CHK+2, CHK+3, END+4!
IBND CHK+1*, CHK+2*, LINE+3, LINE+4, END+4!
>> IBOERR CHK+1*, CHK+3*, CHK+6*, CHK+7*, CHK+8*, CHK+10*, CHK+11*, CHK+12*
IBPAG DQ+3*, HDR+1*, HDR+2, HDR+3, END+4!
IBQUIT DQ+3*, DQ+5, LINE+1, END+4!
IBRNUM DQ+4*, DQ+5*, END+4!
IBRXN CHK+5*, CHK+6, CHK+7, CHK+8, CHK+10, CHK+11, CHK+12, END+4!
IBRXN1 CHK+5*, CHK+9, CHK+10, CHK+11, CHK+12, END+4!
IBSL CHK+3*, CHK+4, CHK+5, LINE+4, END+4!
IBSTART ST*, TO+1, DQ+4, HDR+4, END+4!
IHDT END+4!
IO DEV+4
IO("Q" DEV+2!
IOF %+4, HDR+2
IOM HDR+3, HDR+6
IOSL LINE+1
IOST HDR+2
>> POP DEV+1
>> VA("BID" LINE+4
>> XRT0 END+2
>> XRTN END+2*
>> Y ST, TO, DQ+3*
>> ZTDESC DEV+2*
>> ZTQUEUED END+4
>> ZTRTN DEV+2*
>> ZTSAVE("IB*" DEV+2*

Marked Items

Name Field # of Occurrence
$T(IBOERR+IBOERR LINE+5
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 |  Naked Globals |  Local Variables |  Marked Items |  All