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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: IBTOUR

Package: Integrated Billing

Routine: IBTOUR


Information

IBTOUR ;ALB/AAS - CLAIMS TRACKING UR/ACTIVITY REPORT ; 27-OCT-93

Source Information

Source file <IBTOUR.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
Integrated Billing 5 ($$DAT1,DATE)^IBOUTL  SORT^IBTOLR  BLD^IBTOUR1  (HOSP,INS)^IBTOUR3  (HOSP,INS)^IBTOUR4  
Kernel 4 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  $$HTE^XLFDT  
VA FileMan 3 COMMA^%DTC  DT^DICRW  ^DIR  
List Manager 1 PAUSE^VALM1  
Registration 1 KVAR^VADPT  

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

Package Total Caller Graph
Integrated Billing 2 IBT OUTPUT UR ACTIVITY REPORT  IBTOUR3  

Entry Points

Name Comments DBIA/ICR reference
SUM
DATE ; -- select date
DEV ; -- select device, run option
END ; -- Clean up
DQ ; -- print one billing report from ct
PRINT ; -- print report
HOW ; -- if not summary only ask how list is to be sorted
HDR1 ; -- specialty report header
HSPEC ; -- Hospital Review specialty report
IHDR ; -- specialty report header
ISPEC ; -- Insurance Review specialty report

External References

Name Field # of Occurrence
COMMA^%DTC ISPEC+8, ISPEC+9, ISPEC+14, ISPEC+15
^%ZIS DEV+2
HOME^%ZIS DEV+3
^%ZISC END+3
^%ZTLOAD DEV+3
DT^DICRW %
^DIR SUM+1, HOW+9
$$DAT1^IBOUTL HDR1+5, IHDR+5
DATE^IBOUTL DATE+1
SORT^IBTOLR %+5
BLD^IBTOUR1 DQ+5
HOSP^IBTOUR3 PRINT+9
INS^IBTOUR3 PRINT+4
HOSP^IBTOUR4 PRINT+7
INS^IBTOUR4 PRINT+2
KVAR^VADPT END+6
PAUSE^VALM1 HDR1+1, IHDR+1
$$HTE^XLFDT DQ+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"UR Activity Report",!!
  • Line Location: IBTOUR+4
Function Call: WRITE
  • Prompt: !
  • Line Location: SUM+5
Function Call: WRITE
  • Prompt: !
  • Line Location: DATE+1
Function Call: WRITE
  • Prompt: !!,"You will need a 132 column printer for this report!",!
  • Line Location: DEV+1
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR1+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR1+2
Function Call: WRITE
  • Prompt: !,"HOSPITAL REVIEW SPECIALTY SUMMARY REPORT",?IOM-32,IBHDT," Page ",IBPAG
  • Line Location: HDR1+4
Function Call: WRITE
  • Prompt: !!,"For Hospital Reviews Dated ",$$DAT1^IBOUTL(IBBDT)," to ",$$DAT1^IBOUTL(IBEDT)
  • Line Location: HDR1+5
Function Call: WRITE
  • Prompt: !,?24,"Admissions",?40,"Admissions",?56,"Days",?71,"Days Not"
  • Line Location: HDR1+6
Function Call: WRITE
  • Prompt: !,"Specialty",?24,"Met Criteria",?40,"Not Met Crit.",?56,"Met Criteria",?71,"Met Crit."
  • Line Location: HDR1+7
Function Call: WRITE
  • Prompt: !,$TR($J(" ",IOM)," ","-")
  • Line Location: HDR1+8
Function Call: WRITE
  • Prompt: !,$TR($J(" ",IOM)," ","-")
  • Line Location: HSPEC+11
Function Call: WRITE
  • Prompt: !,?23,$J(IBP1,8),?40,$J(IBP2,8)
  • Line Location: HSPEC+12
Function Call: WRITE
  • Prompt: ?52,$J(IBP3,12)
  • Line Location: HSPEC+13
Function Call: WRITE
  • Prompt: ?68,$J(IBP4,12)
  • Line Location: HSPEC+14
Function Call: WRITE
  • Prompt: !
  • Line Location: IHDR+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: IHDR+2
Function Call: WRITE
  • Prompt: !,"INSURANCE REVIEW SPECIALTY SUMMARY REPORT",?IOM-32,IBHDT," Page ",IBPAG
  • Line Location: IHDR+4
Function Call: WRITE
  • Prompt: !,"For Insurance Reviews Dated ",$$DAT1^IBOUTL(IBBDT)," to ",$$DAT1^IBOUTL(IBEDT)
  • Line Location: IHDR+5
Function Call: WRITE
  • Prompt: !!,?25,"Days",?42,"Days",?56,"Amount",?73,"Amount"
  • Line Location: IHDR+6
Function Call: WRITE
  • Prompt: !,"Specialty",?25,"Approved",?42,"Denied",?56,"Approved",?73,"Denied"
  • Line Location: IHDR+7
Function Call: WRITE
  • Prompt: !,$TR($J(" ",IOM)," ","-")
  • Line Location: IHDR+8
Function Call: WRITE
  • Prompt: ?50,X
  • Line Location: ISPEC+8
Function Call: WRITE
  • Prompt: ?67,X
  • Line Location: ISPEC+9
Function Call: WRITE
  • Prompt: !,$TR($J(" ",IOM)," ","-")
  • Line Location: ISPEC+12
Function Call: WRITE
  • Prompt: !,?23,$J(IBP1,8),?38,$J(IBP2,8)
  • Line Location: ISPEC+13
Function Call: WRITE
  • Prompt: ?50,X
  • Line Location: ISPEC+14
Function Call: WRITE
  • Prompt: ?67,X
  • Line Location: ISPEC+15
Routine Call
  • DIR
  • Line Location:
    • SUM+1
    • HOW+9
Routine Call
  • %ZIS
  • Line Location:
    • DEV+2
Routine Call
  • %ZIS
  • Line Location:
    • DEV+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP($J END+1!, DQ+1!, DQ+4!, HSPEC+3, ISPEC+3

Label References

Name Line Occurrences
DQ DEV+6
END %+5, SUM+2, SUM+5, DATE+2, DEV+2, DEV+3, DEV+6, PRINT+10
HDR1 HSPEC+1
HOW SUM+5
IHDR ISPEC+1

Naked Globals

Name Field # of Occurrence
^( HSPEC+3, ISPEC+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS DEV+2*, END+4!
DFN END+4!
DGPM END+5!
DIR %+3~, SUM+1!, HOW+1~, HOW+9!
DIR("?" SUM*, HOW+5*, HOW+6*, HOW+7*, HOW+8*
DIR("A" SUM+1*, HOW+3*
DIR("B" SUM+1*, HOW+4*
DIR(0 SUM+1*, HOW+2*
DIRUT SUM+2, END+4!, HOW+10, HDR1+1, IHDR+1
DT %
DTOUT END+4!
DUOUT END+4!
I END+4!
IBADM END+5!
IBAPL END+5!
IBBDT DATE+2, END+4!, HDR1+5, IHDR+5
IBBEG END+5!
IBC END+4!
IBCCODE END+4!
IBCDT END+5!
IBCLOSE END+5!
IBCNT END+4!, DQ+4!
IBDA END+5!
IBDATA END+5!, HSPEC+3*, HSPEC+4, HSPEC+6, HSPEC+7, HSPEC+8, HSPEC+9, ISPEC+3*, ISPEC+4, ISPEC+6
, ISPEC+7, ISPEC+8, ISPEC+9, ISPEC+10
IBDAYN END+5!
IBDAYS END+5!
IBDIF END+5!
IBDISDT END+4!
IBDT END+4!
IBEDT DATE+2, END+4!, HDR1+5, IHDR+5
IBETYP END+4!
IBFAC END+5!
IBFOL END+4!
IBH END+5!
IBHDRL END+5!, PRINT+1*, PRINT+5*
IBHDT END+4!, DQ+2*, HDR1+4, IHDR+4
IBHOW END+5!, DQ+3*, HOW+10*
IBI END+5!
IBINS END+4!
IBJ END+5!
IBP1 END+5!, HSPEC+2*, HSPEC+9*, HSPEC+12, ISPEC+2*, ISPEC+10*, ISPEC+13
IBP2 END+5!, HSPEC+2*, HSPEC+9*, HSPEC+12, ISPEC+2*, ISPEC+10*, ISPEC+13
IBP3 END+5!, HSPEC+2*, HSPEC+9*, HSPEC+13, ISPEC+2*, ISPEC+10*, ISPEC+14
IBP4 END+5!, HSPEC+2*, HSPEC+9*, HSPEC+14, ISPEC+2*, ISPEC+10*, ISPEC+15
IBPAG END+4!, DQ+2*, HDR1+3*, HDR1+4, IHDR+3*, IHDR+4
IBPCODE END+4!
IBPREV END+5!
IBQUIT %+4*, %+5, SUM+5, END+4!, DQ+2*, HOW+10*, HDR1+1*, HSPEC+1, IHDR+1*, ISPEC+1
IBSITE END+5!
IBSNM END+5!
IBSORT END+5!, PRINT+1, PRINT+5
IBSPEC END+5!, HSPEC+3*, HSPEC+5, ISPEC+3*, ISPEC+5
IBSUM SUM+3*, SUM+5, DEV+1, END+4!, PRINT+2, PRINT+7
IBTAG END+4!
IBTNOD END+5!
IBTRC END+4!
IBTRCD END+4!
IBTRN END+4!
IBTRND END+4!
IBTRND1 END+4!
IBTRV END+5!
IBTRVD END+5!
IO DEV+5
IO("Q" DEV+3!
IOF HDR1+2, IHDR+2
IOM HDR1+4, HDR1+8, HSPEC+11, IHDR+4, IHDR+8, ISPEC+12
IOST HDR1+1, IHDR+1
J END+4!
MET END+4!
>> POP DEV+2
TYPE END+4!
VA END+4!
X END+4!, ISPEC+8*, ISPEC+9*, ISPEC+14*, ISPEC+15*
X2 END+5!, ISPEC+8*, ISPEC+9*, ISPEC+14*, ISPEC+15*
Y SUM+3, END+4!, HOW+10
>> ZTDESC DEV+3*
>> ZTQUEUED END+2, PRINT+10
>> ZTREQ END+2*
>> ZTRTN DEV+3*
>> ZTSAVE("DFN" DEV+3*
>> ZTSAVE("IB*" DEV+3*
ZTSK DEV+3!
>> ZTSTOP DQ+6, PRINT+3, PRINT+6, PRINT+8
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All