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

Package: Integrated Billing

Routine: IBUCMM1


Information

IBUCMM1 ;WOIFO/AAT-IBUC VISIT SUMMARY/DETAIL REPORT;30-JUL-02

Source Information

Source file <IBUCMM1.m>

Entry Points

Name Comments DBIA/ICR reference
REPORT ;
GETDATA(IBBDT,IBEDT) ;Gather the data for the report
PRSUM ; Print report from the temp. global
PRDET(IBYR,IBMON) ; Print the details of the summary
TOTALS ; Print the totals.
FORMAT(IBNUM,IBDIG,IBFRM) ; Comma format the number
CHKSTOP
HDR ; Print header.
EXHDR ; Print Excel version of the header.
STAT() ; Display bill number or status
HLD(STAT) ; Return an 'on hold' status string
PAUSE(IBEND) ;
DAT(IBDT) ; Convert FM date to (mm/dd/yy) format.
MON(IBMON)

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"No Urgent Care Visits found within the specified period"
  • Line Location: PRSUM+7
Function Call: WRITE
  • Prompt: !,$$MON($E(IBMON,4,5))_" "_(1700+$E(IBMON,1,3)),U,+$P(IBY,U,1),U,+$P(IBY,U,2),U,+$P(IBY,U,3),U,+$P(IBY,U,4),U,+$P(IBY,U,5),U,+$P(IBY,U,6)
  • Line Location: PRSUM+17
Function Call: WRITE
  • Prompt: !,$$MON($E(IBMON,4,5)),?10,1700+$E(IBMON,1,3)
  • Line Location: PRSUM+21
Function Call: WRITE
  • Prompt: ?34,$J(+$P(IBY,U,1),5)
  • Line Location: PRSUM+22
Function Call: WRITE
  • Prompt: ?43,$J(+$P(IBY,U,2),5)
  • Line Location: PRSUM+23
Function Call: WRITE
  • Prompt: ?52,$J(+$P(IBY,U,3),5)
  • Line Location: PRSUM+24
Function Call: WRITE
  • Prompt: ?62,$J(+$P(IBY,U,4),5)
  • Line Location: PRSUM+25
Function Call: WRITE
  • Prompt: ?72,$J(+$P(IBY,U,5),5)
  • Line Location: PRSUM+26
Function Call: WRITE
  • Prompt: ?83,$J(+$P(IBY,U,6),5)
  • Line Location: PRSUM+27
Function Call: WRITE
  • Prompt: !!,"*The total unique patient number only counts a patient once for the period",!,"of the report."
  • Line Location: PRSUM+34
Function Call: WRITE
  • Prompt: !,$$GET1^DIQ(2,IBDFN_",",.01,"E"),U,+$P(IBDATA,U,1),U,+$P(IBDATA,U,2),U,+$P(IBDATA,U,3),U,+$P(IBDATA,U,4),U,+$P(IBDATA,U,5)
  • Line Location: PRDET+12
Function Call: WRITE
  • Prompt: !?3,$$GET1^DIQ(2,IBDFN_",",.01,"E")
  • Line Location: PRDET+15
Function Call: WRITE
  • Prompt: ?34,$J(+$P(IBDATA,U,1),5)
  • Line Location: PRDET+16
Function Call: WRITE
  • Prompt: ?43,$J(+$P(IBDATA,U,2),5)
  • Line Location: PRDET+17
Function Call: WRITE
  • Prompt: ?52,$J(+$P(IBDATA,U,3),5)
  • Line Location: PRDET+18
Function Call: WRITE
  • Prompt: ?62,$J(+$P(IBDATA,U,4),5)
  • Line Location: PRDET+19
Function Call: WRITE
  • Prompt: ?72,$J(+$P(IBDATA,U,5),5)
  • Line Location: PRDET+20
Function Call: WRITE
  • Prompt: !,"REPORT TOTALS",U,IBTOT,U,IBTOTF,U,IBTOTC,U,IBTOTN,U,IBTOTV,U,$G(^TMP($J,"IBUCMMNM"))
  • Line Location: TOTALS+5
Function Call: WRITE
  • Prompt: !
  • Line Location: TOTALS+8
Function Call: WRITE
  • Prompt: "-"
  • Line Location: TOTALS+8
Function Call: WRITE
  • Prompt: !,"REPORT TOTALS",?34,$J(IBTOT,5),?43,$J(IBTOTF,5),?52,$J(IBTOTC,5),?62,$J(IBTOTN,5),?72,$J(IBTOTV,5),?82,$J($G(^TMP($J,"IBUCMMNM")),6)
  • Line Location: TOTALS+9
Function Call: WRITE
  • Prompt: @IOF,*13
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: ?(122-$L(IBH)\2),IBH
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !,?(122-$L(IBH1)\2),IBH1
  • Line Location: HDR+10
Function Call: WRITE
  • Prompt: !,?(122-$L(IBH2)\2),IBH2
  • Line Location: HDR+12
Function Call: WRITE
  • Prompt: ?IOM-36,IBDTH,?IOM-9,"Page: ",IBPAG
  • Line Location: HDR+13
Function Call: WRITE
  • Prompt: !!,?33,"TOTAL",?60,"REMOVED",?71,"VISITS",?80,"UNIQUE"
  • Line Location: HDR+14
Function Call: WRITE
  • Prompt: !," MONTH",?10,"YEAR",?33,"VISITS",?44,"FREE",?51,"BILLED",?60,"VISITS",?71,"ONLY",?80,"PATIENTS"
  • Line Location: HDR+15
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+16
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HDR+16
Function Call: WRITE
  • Prompt: !,"MONTH/YEAR",U,"TOTAL VISITS",U,"FREE",U,"BILLED",U,"REMOVED VISITS",U,"VISITS ONLY",U,"UNIQUE PATIENTS"
  • Line Location: EXHDR+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: PAUSE+3
Function Call: WRITE
  • Prompt: !
  • Line Location: PAUSE+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PAUSE+6
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PAUSE+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^DIC(4 - [#4] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call