Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
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>

Entry Points

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

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: !!,"*** Margin width of this output is 132 ***"
  • Line Location: DEV+0
Function Call: WRITE
  • Prompt: !
  • Line Location: DEV+1
Function Call: WRITE
  • Prompt: !
  • Line Location: DEV+2
Function Call: WRITE
  • Prompt: "Verify Integrated Billing links to Pharmacy",?IOM-22,IBHDT," Page:",IBPAG
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,"Verify IB Reference Number ",IBSTART," to ",IBEND
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,"REF. NO.",?12,"PATIENT",?34,"SSN",?40,"RX#",?50,"REFILL",?58,"IB LINK",?80,"CHARGE ID",?91,"TRANS",?97,"ERROR MESSAGE"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !,IBLINE
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !,$P(IBND,"^")
  • Line Location: LINE+3
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
Function Call: WRITE
  • Prompt: ?97,$P($T(IBOERR+IBOERR),";;",2,99)
  • Line Location: LINE+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IB - [#350] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call