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
Print Page as PDF
Routine: IBOVOP2

Package: Integrated Billing

Routine: IBOVOP2


Information

IBOVOP2 ;ALB/CPM-Opt/Reg Events Report Print Utilities ; 30-AUG-93

Source Information

Source file <IBOVOP2.m>

Entry Points

Name Comments DBIA/ICR reference
PRINT ; Retrieve data for printing.
CHRGS ; Find OP charges for day, if any. Build string for print.
HDR ; Print header.
CLSF(IBOE) ; Display classification results.
; Input: IBOE -- Pointer to Outpatient Encounter in file #409.68
CLSFQ

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"No Outpatient activity recorded for MT/LTC copay patients on ",$$DAT1^IBOUTL(IBDATE),"."
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !,IBFLD1
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !,"Veteran has CV status until "_$$DAT1^IBOUTL($P(IBCOMBAT,"^",2))
  • Line Location: PRINT+8
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+10
Function Call: WRITE
  • Prompt: !,IBFLD1
  • Line Location: PRINT+12
Function Call: WRITE
  • Prompt: !?5,IBFLD2
  • Line Location: PRINT+12
Function Call: WRITE
  • Prompt: !,IBFLD1,!?5,IBFLD2
  • Line Location: PRINT+13
Function Call: WRITE
  • Prompt: !,IBFLD1
  • Line Location: CHRGS+7
Function Call: WRITE
  • Prompt: !?26,"Stop Code: ",$P(IBSTDATA,"^",4),?58,"#",$P(IBSTDATA,"^"),?63,$$TYPE^IBEMTSCR(+$P(IBSTDATA,"^",3))
  • Line Location: CHRGS+14
Function Call: WRITE
  • Prompt: @IOF,*13
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: ?(80-$L(IBTITLE))\2,IBTITLE
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !?(80-$L(IBTITLE))\2,IBTITLE,?70,"Page: "_IBPAGE
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !!,"Patient/Event",?20,"Time",?26,"Clinic/Stop",?44,"Appt.Type",?63,"(Status)",!
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: " "
  • Condition for execution: IBF
  • Line Location: CLSF+4
Function Call: WRITE
  • Prompt: "Care related to ",$S(I=1:"AO",I=2:"IR",I=3:"SC",I=4:"SWA",I=5:"MST",I=6:"HNC",I=7:"CV",I=8:"SHAD",1:"??"),"? ",$S(IBCLS:"YES",1:"NO")
  • Line Location: CLSF+4
Info |  Source |  Entry Points |  Interaction Calls