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

Package: Integrated Billing

Routine: IBTOTR


Information

IBTOTR ;ALB/AAS - CLAIMS TRACKING INQUIRY ; 27-OCT-93

Source Information

Source file <IBTOTR.m>

Entry Points

Name Comments DBIA/ICR reference
PAT ; -- Select patient
VSIT ;
; -- get claims tracking visit entry
DEV ; -- select device, run option
END ; -- Clean up
DQ ; -- entry print from task man
ONE ; -- print one billing report from ct
HDR ; -- Print header for billing report
CLIN ; -- output clinical information
DIAG ; -- print diagnosis information
PROC ; -- print procedure information
PROV ; -- print provider information

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Claims Tracking Inquiry"
  • Line Location: IBTOTR+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: PAT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: DEV+1
Function Call: WRITE
  • Prompt: !
  • Line Location: ONE+7
Function Call: WRITE
  • Prompt: !!," Insurance Review Information "
  • Line Location: ONE+10
Function Call: WRITE
  • Prompt: !,$E($G(IBD(IBJ,1)),1,39),?40,$E($G(IBD(IBJ,2)),1,39)
  • Line Location: ONE+18
Function Call: WRITE
  • Prompt: !,"None on file.",!
  • Line Location: ONE+21
Function Call: WRITE
  • Prompt: !," Hospital Review Information "
  • Line Location: ONE+24
Function Call: WRITE
  • Prompt: !,$E($G(IBD(IBJ,1)),1,40),?40,$E($G(IBD(IBJ,2)),1,39)
  • Line Location: ONE+34
Function Call: WRITE
  • Prompt: !,"None on file.",!
  • Line Location: ONE+37
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,"Claim Tracking Inquiry",?(IOM-33),"Page ",IBPAG," ",IBHDT
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !,$E($P($G(^DPT(DFN,0)),"^"),1,25),?28,VA("PID"),?50,"DOB: ",$$FMTE^XLFDT($P($G(^DPT(DFN,0)),"^",3),1)
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !,$$EXPAND^IBTRE(356,.18,$P(IBTRND,"^",18))," on ",$$FMTE^XLFDT($P(IBTRND,"^",6),1)
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !,$TR($J(" ",IOM)," ","-")
  • Line Location: HDR+8

FileMan Files Accessed Via FileMan Db Call

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