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 |  Local Variables  | All
Print Page as PDF
Routine: IBTUBO3

Package: Integrated Billing

Routine: IBTUBO3


Information

IBTUBO3 ;ALB/RB - UNBILLED AMOUNTS - GENERATE UNBILLED REPORTS ;03 Aug 2004 9:12 AM

Source Information

Source file <IBTUBO3.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Integrated Billing 3 ALL^IBCNS1  $$DAT2^IBOUTL  BULL^IBTUBUL  
Kernel 2 $$S^%ZTLOAD  $$HTE^XLFDT  
Registration 2 $$BIL^DGMTUB  (DEM,ELIG,KVA,KVAR)^VADPT  
VA FileMan 2 $$GET1^DIQ  ^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 IBTUBOA  

Entry Points

Name Comments DBIA/ICR reference
REPORT ; - Prepare report if requested, send summary bulletin.
REPRT1 ;
REPRT1Q ;
REPRTQ
SUMPG ;IB*2.0*547/TAZ - Summary page to show which Division has blank pages for selected reports.
REPRT2 ;Print Detail lines
HDR ; - Output header.
HDRQ
CPTS ; - Outpatient Only (CPTs and Rates)
LINE ; - Print detail line.
LINQ
SSN(DFN) ; - Return last 4 of patient's SSN.
ELIG(DFN) ; - Return patient's primary eligibility (1st 10 characters).
DTE(D) ; - Format date (MM/DD/YY or MM/YY).
INS(P,D,C) ; - Return patient's insurance carrier(s).
; Input: P=patient IEN, D=event date, C=Size of the Ins.Carrier column
; Output: List of Providers
NIM ; - Print 'no info' message.
PAUSE ; - Page break.

External References

Name Field # of Occurrence
$$S^%ZTLOAD HDR+35
$$BIL^DGMTUB LINE+3
$$GET1^DIQ SUMPG+18, HDR+7
^DIR PAUSE+5
ALL^IBCNS1 INS+8
$$DAT2^IBOUTL HDR+17
BULL^IBTUBUL REPORT+3
DEM^VADPT SSN+2
ELIG^VADPT ELIG+2
KVA^VADPT SSN+2
KVAR^VADPT ELIG+2
$$HTE^XLFDT REPORT+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: SUMPG+9
Function Call: WRITE
  • Prompt: !,"Unbilled Amounts Report"
  • Line Location: SUMPG+10
Function Call: WRITE
  • Prompt: ?60,"Run Date: ",IBRUN,?124,"Page ",$J(IBPAG,3)
  • Line Location: SUMPG+11
Function Call: WRITE
  • Prompt: !,"No data for the following Divisions for the selected reports:"
  • Line Location: SUMPG+12
Function Call: WRITE
  • Prompt: !,$S(X0=2:"Outpatient:",X0=3:"Prescriptions:",1:"Inpatient:")
  • Line Location: SUMPG+14
Function Call: WRITE
  • Prompt: !
  • Line Location: SUMPG+15
Function Call: WRITE
  • Prompt: !,$S(X0=2:"Outpatient:",X0=3:"Prescriptions:",1:"Inpatient:")," Cont'd",!
  • Line Location: SUMPG+17
Function Call: WRITE
  • Prompt: $$GET1^DIQ(40.8,IBDIV_",",.01),!
  • Line Location: SUMPG+18
Function Call: WRITE
  • Prompt: !
  • Line Location: SUMPG+19
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: @IOF,*13
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,"Unbilled Amounts Report"
  • Line Location: HDR+9
Function Call: WRITE
  • Prompt: ?60,"Run Date: ",IBRUN,?124,"Page ",$J(IBPAG,3)
  • Line Location: HDR+10
Function Call: WRITE
  • Prompt: !,$E(X,1,132)
  • Line Location: HDR+26
Function Call: WRITE
  • Prompt: !,$TR($J(" ",IOM)," ","-"),!
  • Line Location: HDR+28
Function Call: WRITE
  • Prompt: !!?29,"Last Prim. Claims"
  • Line Location: HDR+29
Function Call: WRITE
  • Prompt: ?52,"Fill",?123,"Original"
  • Condition for execution: X0=3
  • Line Location: HDR+29
Function Call: WRITE
  • Prompt: !,"Name",?29,"4SSN Elig. Track.ID#"
  • Line Location: HDR+30
Function Call: WRITE
  • Prompt: ?52,"Admission CF Insurance Carrier(s)",?98,"I/P",?102,"MRA"
  • Line Location: HDR+31
Function Call: WRITE
  • Prompt: ?52,"Care Dt. CF Insurance Carrier(s)",?98,"I/P",?102,"MRA",?106,"CPT I. Rate P. Rate"
  • Line Location: HDR+32
Function Call: WRITE
  • Prompt: ?52,"Date CF Ins. Carrier(s) MRA Drug Name Physician",?123,"Fill Dt."
  • Line Location: HDR+33
Function Call: WRITE
  • Prompt: !,$TR($J(" ",IOM)," ","-"),!
  • Line Location: HDR+34
Function Call: WRITE
  • Prompt: !!,"...Task stoped at user request"
  • Line Location: HDR+36
Function Call: WRITE
  • Prompt: !
  • Line Location: CPTS+2
Function Call: WRITE
  • Prompt: ?124,$J($P(IBN1,U,2),8,2),!
  • Line Location: CPTS+7
Function Call: WRITE
  • Prompt: $E($P(PT,"@@"),1,26)
  • Line Location: LINE+3
Function Call: WRITE
  • Prompt: " *"
  • Line Location: LINE+3
Function Call: WRITE
  • Prompt: ?29,$$SSN(DFN),?34,$E($$ELIG(DFN),1,5)
  • Line Location: LINE+4
Function Call: WRITE
  • Prompt: ?39,$J(IBX,11)
  • Line Location: LINE+6
Function Call: WRITE
  • Prompt: ?52,$$DTE(+DTE)
  • Line Location: LINE+9
Function Call: WRITE
  • Prompt: $S($P(IBN,U,5):"H",1:"")
  • Condition for execution: X1["INPT"
  • Line Location: LINE+9
Function Call: WRITE
  • Prompt: ?62,$J($P(IBN,U),2),?65,$$INS(DFN,+DTE,34)
  • Line Location: LINE+10
Function Call: WRITE
  • Prompt: ?98,$E($P(IBN,U,2),1,3),!
  • Line Location: LINE+12
Function Call: WRITE
  • Prompt: ?98,$E($P(^TMP($J,"IBTUB",IBDIV,X1_"_MRA",PT,DTE,IBX),U,2),1,3),?103,"M",!
  • Line Location: LINE+14
Function Call: WRITE
  • Prompt: ?88,$E($P(IBN,U,6),1,15),?105,$E($P(IBN,U,2),1,14)
  • Line Location: LINE+19
Function Call: WRITE
  • Prompt: ?123,$$DTE($P(IBN,U,3))
  • Line Location: LINE+20
Function Call: WRITE
  • Prompt: "$"
  • Condition for execution: $P(IBN,"^",5)
  • Line Location: LINE+20
Function Call: WRITE
  • Prompt: !
  • Line Location: LINE+20
Function Call: WRITE
  • Prompt: !?3,"No information available for the period specified."
  • Line Location: NIM+1
Function Call: WRITE
  • Prompt: !
  • Line Location: PAUSE+4
Routine Call
  • DIR
  • Line Location:
    • PAUSE+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DG(40.8 - [#40.8] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] SUMPG+3
^DIC(36 - [#36] INS+11
^TMP($J REPRT1+3, REPRT1+6, REPRT1+7, REPRT1+8, SUMPG+4, SUMPG+7, REPRT2+3, REPRT2+4, REPRT2+5, REPRT2+7
REPRT2+8, REPRT2+9, HDR+6, CPTS+2, CPTS+3, CPTS+4, CPTS+6, LINE+13, LINE+14, LINE+18

Label References

Name Line Occurrences
$$DTE HDR+16, LINE+9, LINE+18, LINE+20
$$ELIG LINE+4
$$INS LINE+10, LINE+18
$$SSN LINE+4
CPTS REPRT2+9
HDR REPRT1+3, SUMPG+17, REPRT2+4, CPTS+5, LINE+1
HDRQ HDR+2, HDR+28
LINE REPRT2+9, CPTS+5
LINQ LINE+1, LINE+17
NIM REPRT1+3, REPRT2+4
PAUSE REPRT1+3, REPRT1Q+1, HDR+2
REPRT1Q REPRT1+6
REPRT2 REPRT1+7, REPRT1+8
REPRTQ REPORT+3, REPRT1+3
SUMPG REPRT1+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
C INS~, INS+12, INS+17, INS+18, INS+19
CPT CPTS+1~, CPTS+3*, CPTS+4, CPTS+6
D DTE~, DTE+1, INS~, INS+4, INS+8
DFN REPORT+1~, REPRT2+6*, LINE+3, LINE+4, LINE+10, LINE+18, SSN~, ELIG~
DIR PAUSE+3~
DIR(0 PAUSE+5*
DIROUT PAUSE+3~
DIRUT PAUSE+3~, PAUSE+5
DTE REPORT+1~, REPRT2+7*, REPRT2+8, REPRT2+9, CPTS+2, CPTS+3, CPTS+4, CPTS+6, LINE+3, LINE+9
LINE+10, LINE+13, LINE+14, LINE+18
DTOUT PAUSE+3~
DUOUT PAUSE+3~, PAUSE+5
ELIG ELIG+1~, ELIG+2*, ELIG+3
FL REPORT+1~, REPRT2+7*, CPTS+5*, LINE+1*, LINE+2, LINE+4*
I HDR+1~, HDR+26*
>> IBBDT HDR+16
>> IBCOMP HDR+17
>> IBDET REPORT+3
IBDIV REPORT+1~, REPRT1+3*, REPRT1+5*, REPRT1+7*, REPRT1+8*, SUMPG+2*, SUMPG+3*, SUMPG+4, SUMPG+7, SUMPG+15*
SUMPG+16*, SUMPG+18, REPRT2+3, REPRT2+4, REPRT2+5, REPRT2+7, REPRT2+8, REPRT2+9, HDR+6, HDR+7
CPTS+2, CPTS+3, CPTS+4, CPTS+6, LINE+13, LINE+14
IBDIVHDR HDR+1~, HDR+5*, HDR+6*, HDR+7*, HDR+16
>> IBEDT HDR+16
IBI PAUSE+3~, PAUSE+4*
>> IBINMRA CPTS+2, CPTS+6, LINE+13, LINE+18
>> IBMCCF HDR+14
IBN REPORT+1~, REPRT2+9*, LINE+9, LINE+10, LINE+12, LINE+13, LINE+18, LINE+19, LINE+20
IBN1 CPTS+1~, CPTS+4*, CPTS+6, CPTS+7
IBND SUMPG+1~, SUMPG+8
IBND( SUMPG+7*, SUMPG+16
IBPAG REPORT+1~, REPRT1+1*, SUMPG+9*, SUMPG+11, HDR+2, HDR+3, HDR+4, HDR+8*, HDR+10
IBQ REPORT+1~, REPRT1+1*, REPRT1+3, REPRT1Q+1, SUMPG+5, SUMPG+13, SUMPG+16, SUMPG+17, REPRT2+1, REPRT2+4
REPRT2+5, REPRT2+7, REPRT2+8, REPRT2+9, HDR+2, HDR+37*, CPTS+3, CPTS+5, LINE+1, PAUSE+5*
IBRUN REPORT+1~, REPORT+2*, SUMPG+11, HDR+10
>> IBSBD REPRT1+4, REPRT2+3, HDR+6
>> IBSEL SUMPG+5, SUMPG+13, REPRT2+1
>> IBTIMON HDR+17
>> IBX REPRT2+8*, REPRT2+9, CPTS+2, CPTS+3, CPTS+4, CPTS+6, LINE+6, LINE+13, LINE+14, LINE+18
INSC INS+6~, INS+10*, INS+11, INS+14
INSL INS+6~, INS+8*, INS+13*, INS+16*, INS+17, INS+18*, INS+19*, INS+21
INSN INS+6~, INS+11*, INS+12*, INS+13
IOF HDR+4
IOM HDR+28, HDR+34
IOSL SUMPG+17, CPTS+5, LINE+1, PAUSE+2, PAUSE+4
IOST HDR+2, HDR+4, PAUSE+1
LST INS+6~
LST( INS+9, INS+10
LST(0 INS+12
P INS~, INS+4, INS+8
PT REPORT+1~, REPRT2+5*, REPRT2+6, REPRT2+7, REPRT2+8, REPRT2+9, CPTS+2, CPTS+3, CPTS+4, CPTS+6
LINE+3, LINE+13, LINE+14, LINE+18
SSN SSN+1~, SSN+2*, SSN+3
TMP INS+6~
TMP( INS+10, INS+14*
U CPTS+6, CPTS+7, LINE+9, LINE+10, LINE+12, LINE+13, LINE+14, LINE+18, LINE+19, LINE+20
, INS+11
VADM SSN+1~
VADM(2 SSN+2
VAEL ELIG+1~
VAEL(1 ELIG+2
X HDR+1~, HDR+14*, HDR+15*, HDR+16*, HDR+17*, HDR+18*, HDR+19*, HDR+20*, HDR+21*, HDR+23*
HDR+24*, HDR+26*, INS+6~, INS+9*, INS+10, PAUSE+3~
X0 REPORT+1~, REPRT1+3*, SUMPG+5*, SUMPG+6, SUMPG+7, SUMPG+13*, SUMPG+14, SUMPG+16, SUMPG+17, REPRT2+1*
REPRT2+2, HDR+11, HDR+12, HDR+14, HDR+19, HDR+20, HDR+22, HDR+28, HDR+29, HDR+31
HDR+32, HDR+33
X1 REPORT+1~, SUMPG+6*, SUMPG+7, REPRT2+2*, REPRT2+3, REPRT2+4, REPRT2+5, REPRT2+7, REPRT2+8, REPRT2+9
CPTS+2, CPTS+3, CPTS+4, CPTS+6, LINE+8, LINE+9, LINE+11, LINE+13, LINE+14, LINE+17
LINE+18
XTP HDR+1~, HDR+11*, HDR+12*, HDR+15
Y PAUSE+3~
>> ZTQUEUED HDR+35
>> ZTSTOP HDR+37*
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 |  Local Variables  | All