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

Package: Integrated Billing

Routine: IBTOUR3


Information

IBTOUR3 ;ALB/AAS - CLAIMS TRACKING UR ACTIVITY REPORT PRINT ; 02-DEC-93

Source Information

Source file <IBTOUR3.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Integrated Billing 2 SITE^IBAUTL  (HSPEC,ISPEC)^IBTOUR  
Kernel 1 $$S^%ZTLOAD  
List Manager 1 PAUSE^VALM1  
VA FileMan 1 DT^DIQ  

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 IBTOUR  

Entry Points

Name Comments DBIA/ICR reference
INS ; -- print the report
HOSP
MAIN ; -- print main body of report
RNB ; -- print reasons not billable
HDR ; -- print report header
CHK ; -- check task man stop flag
CNT(N) ; -- see if enought room on page for list
HOSPRV ; -- Hospital Review Summary

External References

Name Field # of Occurrence
$$S^%ZTLOAD CHK+1
DT^DIQ HDR+6, HDR+7
SITE^IBAUTL HDR+4
HSPEC^IBTOUR HOSP+3
ISPEC^IBTOUR INS+5
PAUSE^VALM1 INS+6, HOSP+4, MAIN+10, CNT+3, HOSPRV+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: INS+6
Function Call: WRITE
  • Prompt: !
  • Line Location: HOSP+4
Function Call: WRITE
  • Prompt: !?((IOM/2+6)-16),"Total Admissions: ",$J(IBCNT(1),10)
  • Line Location: MAIN+1
Function Call: WRITE
  • Prompt: !?((IOM/2+6)-24),"Total Admissions to NHCU: ",$J(+$G(IBCNT(1,1)),10)
  • Line Location: MAIN+2
Function Call: WRITE
  • Prompt: !?((IOM/2+6)-31),"Total Admissions to Domiciliary: ",$J(+$G(IBCNT(1,2)),10)
  • Line Location: MAIN+3
Function Call: WRITE
  • Prompt: !?((IOM/2+6)-34),"Total Admissions Requiring Reviews: ",$J(IBCNT(4),10)
  • Line Location: MAIN+4
Function Call: WRITE
  • Prompt: !?((IOM/2+6)-33),"Number of Scheduled Adm. Reviewed: ",$J(IBCNT(11),10)
  • Line Location: MAIN+5
Function Call: WRITE
  • Prompt: !!?((IOM/2+6)-31),"Total Admissions with Insurance: ",$J(IBCNT(2),10)
  • Line Location: MAIN+7
Function Call: WRITE
  • Prompt: !?((IOM/2+6)-25),"Total Billable Admissions: ",$J(+$G(IBCNT(3,0)),10)
  • Line Location: MAIN+8
Function Call: WRITE
  • Prompt: !!?((IOM/2+6)-33),"Cases with Pre-Cert and Follow-up: ",$J(IBCNT(5),10)
  • Line Location: MAIN+12
Function Call: WRITE
  • Prompt: !?((IOM/2+6)-32),"Cases with Pre-Cert no Follow-up: ",$J(IBCNT(6),10)
  • Line Location: MAIN+13
Function Call: WRITE
  • Prompt: !?((IOM/2+6)-22),"Number of Closed Cases: ",$J(IBCNT(7),10)
  • Line Location: MAIN+15
Function Call: WRITE
  • Prompt: !?((IOM/2+6)-31),"Number of Billable Closed Cases: ",$J(IBCNT(7,0),10)
  • Line Location: MAIN+16
Function Call: WRITE
  • Prompt: !?((IOM/2+6)-33),"Number of Unbillable Closed Cases: ",$J(IBCNT(7,1),10)
  • Line Location: MAIN+17
Function Call: WRITE
  • Prompt: !!?((IOM/2+6)-30),"Number of New Cases Still Open: ",$J(IBCNT(8),10)
  • Line Location: MAIN+19
Function Call: WRITE
  • Prompt: !!?((IOM/2+6)-24),"Number of Previous Cases: ",$J(IBCNT(9),10)
  • Line Location: MAIN+20
Function Call: WRITE
  • Prompt: !?((IOM/2+6)-44),"Number of Previous Cases Closed and Billable: ",$J(IBCNT(9,0),10)
  • Line Location: MAIN+21
Function Call: WRITE
  • Prompt: !?((IOM/2+6)-45),"Number of Previous Cases Closed, not Billable: ",$J(IBCNT(9,1),10)
  • Line Location: MAIN+22
Function Call: WRITE
  • Prompt: !?((IOM/2+6)-35),"Number of Previous Cases still Open: ",$J(IBCNT(9,2),10)
  • Line Location: MAIN+23
Function Call: WRITE
  • Prompt: !!?((IOM/2+6)-35),"Number of Outpatient Cases Reviewed: ",$J(IBCNT(10),10)
  • Line Location: MAIN+25
Function Call: WRITE
  • Prompt: !!!?((IOM/2+6)-26),"Reason Not Billable Report: Reason Count"
  • Line Location: RNB+2
Function Call: WRITE
  • Prompt: !?((IOM/2+6)-26),"--------------------------- ------------------------------"
  • Line Location: RNB+3
Function Call: WRITE
  • Prompt: !?((IOM-22)/2),"UR ACTIVITY SUMMARY REPORT"
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !?((IOM-18)/2),"for "_$S($D(IBHDRL):IBHDRL_" Reviews")
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !?((IOM-($L(IBSNM)+6))/2),IBSNM_" ("_IBSITE_")"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !!?(IOM-18/2),"From: "
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !?((IOM-16)/2),"To: "
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !!?(IOM-26/2),"Date Printed: ",IBHDT
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: !?(IOM-8/2),"Page: ",IBPAG
  • Line Location: HDR+9
Function Call: WRITE
  • Prompt: !?(IOM-26/2),"--------------------------",!!
  • Line Location: HDR+10
Function Call: WRITE
  • Prompt: !!,"....task stopped at user request."
  • Line Location: CHK+1
Function Call: WRITE
  • Prompt: !?((IOM/2+6)-16),"Total Admissions: ",$J(IBCNT(1),10)
  • Line Location: HOSPRV+1
Function Call: WRITE
  • Prompt: !?((IOM/2+6)-24),"Total Admissions to NHCU: ",$J(+$G(IBCNT(1,1)),10)
  • Line Location: HOSPRV+2
Function Call: WRITE
  • Prompt: !?((IOM/2+6)-31),"Total Admissions to Domiciliary: ",$J(+$G(IBCNT(1,2)),10)
  • Line Location: HOSPRV+3
Function Call: WRITE
  • Prompt: !!?((IOM/2+6)-20),"Total Cases Reviewed: ",$J(+$G(IBCNT(40)),10)
  • Line Location: HOSPRV+4
Function Call: WRITE
  • Prompt: !?((IOM/2+6)-29),"Number of New Case Still Open: ",$J(IBCNT(41),10)
  • Line Location: HOSPRV+5
Function Call: WRITE
  • Prompt: !?((IOM/2+6)-24),"Number of Previous Cases: ",$J(IBCNT(42),10)
  • Line Location: HOSPRV+6
Function Call: WRITE
  • Prompt: !?((IOM/2+6)-35),"Number of Previous Cases still Open: ",$J(IBCNT(43),10)
  • Line Location: HOSPRV+7
Function Call: WRITE
  • Prompt: !!?((IOM/2+6)-25),"Total Random Sample Cases: ",$J(IBCNT(44),10)
  • Line Location: HOSPRV+11
Function Call: WRITE
  • Prompt: !?((IOM/2+6)-29),"Total Special Condition Cases: ",$J(+$G(IBCNT(45)),10)
  • Line Location: HOSPRV+12
Function Call: WRITE
  • Prompt: !?((IOM/2+6)-4),"COPD: ",$J(+$G(IBCNT(45,2)),10)
  • Line Location: HOSPRV+13
Function Call: WRITE
  • Prompt: !?((IOM/2+6)-4)," CVD: ",$J(+$G(IBCNT(45,3)),10)
  • Line Location: HOSPRV+14
Function Call: WRITE
  • Prompt: !?((IOM/2+6)-4),"TURP: ",$J(+$G(IBCNT(45,1)),10)
  • Line Location: HOSPRV+15
Function Call: WRITE
  • Prompt: !?((IOM/2+6)-25),"Total Locally Added Cases: ",$J(IBCNT(46),10)
  • Line Location: HOSPRV+16
Function Call: WRITE
  • Prompt: !!?((IOM/2+6)-36),"Total Cases Meeting Criteria on Adm.: ",$J(+$G(IBCNT(47)),10)
  • Line Location: HOSPRV+18
Function Call: WRITE
  • Prompt: !,?((IOM/2+6)-37),"Total Cases Not Meeting Crit. on Adm.: ",$J(+$G(IBCNT(51)),10)
  • Line Location: HOSPRV+19
Function Call: WRITE
  • Prompt: !!?((IOM/2+6)-19),"Total Days Reviewed: ",$J(+$G(IBCNT(48)),10)
  • Line Location: HOSPRV+21
Function Call: WRITE
  • Prompt: !?((IOM/2+6)-27),"Total Days Meeting Criteria: ",$J(IBCNT(49),10)
  • Line Location: HOSPRV+22
Function Call: WRITE
  • Prompt: !?((IOM/2+6)-31),"Total Days Not Meeting Criteria: ",$J(+$G(IBCNT(50)),10)
  • Line Location: HOSPRV+23

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] HDR+4
^IBE(356.8 - [#356.8] RNB+5
^TMP($J INS+5, HOSP+3

Label References

Name Line Occurrences
CNT RNB+1
HDR INS+2, HOSP+1, CHK+1, CNT+4
HOSPRV HOSP+1
MAIN INS+2
RNB INS+4

Naked Globals

Name Field # of Occurrence
^(0 HDR+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DIRUT INS+6, HOSP+4, MAIN+10, CNT+3, HOSPRV+9
>> I RNB+4*, RNB+5, RNB+6, CNT+2*
>> IBBDT HDR+6
>> IBC CNT+2*, CNT+3, CNT+4
>> IBCNT( CNT+2
>> IBCNT(1 MAIN+1, MAIN+2, MAIN+3, HOSPRV+1, HOSPRV+2, HOSPRV+3
>> IBCNT(10 MAIN+25
>> IBCNT(11 MAIN+5
>> IBCNT(2 MAIN+7
>> IBCNT(3 INS+4, MAIN+8, RNB+4, RNB+6
>> IBCNT(4 MAIN+4
>> IBCNT(40 HOSPRV+4
>> IBCNT(41 HOSPRV+5
>> IBCNT(42 HOSPRV+6
>> IBCNT(43 HOSPRV+7
>> IBCNT(44 HOSPRV+11
>> IBCNT(45 HOSPRV+12, HOSPRV+13, HOSPRV+14, HOSPRV+15
>> IBCNT(46 HOSPRV+16
>> IBCNT(47 HOSPRV+18
>> IBCNT(48 HOSPRV+21
>> IBCNT(49 HOSPRV+22
>> IBCNT(5 MAIN+12
>> IBCNT(50 HOSPRV+23
>> IBCNT(51 HOSPRV+19
>> IBCNT(6 MAIN+13
>> IBCNT(7 MAIN+15, MAIN+16, MAIN+17
>> IBCNT(8 MAIN+19
>> IBCNT(9 MAIN+20, MAIN+21, MAIN+22, MAIN+23
>> IBEDT HDR+7
>> IBFAC HDR+4
>> IBHDRL HDR+3
>> IBHDT HDR+8
>> IBPAG HDR+1, HDR+9*
>> IBQUIT INS+1, INS+3, INS+4, INS+5, INS+6, HOSP, HOSP+2, HOSP+3, HOSP+4, MAIN+10*
, CNT+3*, HOSPRV+9*
>> IBSITE HDR+5
>> IBSNM HDR+4*, HDR+5
IOF MAIN+10, HDR+1, CNT+3, HOSPRV+9
IOM MAIN+1, MAIN+2, MAIN+3, MAIN+4, MAIN+5, MAIN+7, MAIN+8, MAIN+12, MAIN+13, MAIN+15
, MAIN+16, MAIN+17, MAIN+19, MAIN+20, MAIN+21, MAIN+22, MAIN+23, MAIN+25, RNB+2, RNB+3
, RNB+5, RNB+6, HDR+2, HDR+3, HDR+5, HDR+6, HDR+7, HDR+8, HDR+9, HDR+10
, HOSPRV+1, HOSPRV+2, HOSPRV+3, HOSPRV+4, HOSPRV+5, HOSPRV+6, HOSPRV+7, HOSPRV+11, HOSPRV+12, HOSPRV+13
, HOSPRV+14, HOSPRV+15, HOSPRV+16, HOSPRV+18, HOSPRV+19, HOSPRV+21, HOSPRV+22, HOSPRV+23
IOSL CNT+3, CNT+4
IOST INS+6, HOSP+4, MAIN+10, HDR+1, CNT+3, HOSPRV+9
N CNT~, CNT+1, CNT+2
>> Y HDR+6*, HDR+7*
>> ZTQUEUED CHK+1
>> ZTSTOP CHK+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All