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

Package: Integrated Billing

Routine: IBTRC4


Information

IBTRC4 ;ALB/AAS - CLAIMS TRACKING - PRINT REVIEW WORKSHEET ; 14-JUL-93

Source Information

Source file <IBTRC4.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 4 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  ($$FMTE,$$HTE)^XLFDT  
Integrated Billing 2 ALL^IBCNS1  PAT^IBCNSM  
List Manager 1 (FULL,PAUSE)^VALM1  
Registration 1 (INP,PID)^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: 5

Package Total Caller Graph
Integrated Billing 4 IBCNSP02  IBT OUTPUT REVIEW WORKSHEET  IBTRC PRINT REV WORKSHEET  IBTRPR1  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
RW ; -- print Review Worksheet from lm action from ibtre
RWQ
RWM ; -- print review worksheet from menu
RWM1 ;
; -- select patient
RWMQ
PRINT(DFN) ; -- print one worksheet
DQ1
DQ ; -- entry point from taskman
TOP
MID ;
BOT ;
PRINTQ
LINE(CHAR,LEN) ; -- return line of length len of character char
BLINE ; -- print line with bars
BLINE2 ; -- print line with bars
INS ; -- print insurance info
INSQ

External References

Name Field # of Occurrence
^%ZIS PRINT+4
HOME^%ZIS PRINT+5
^%ZISC PRINTQ+2
^%ZTLOAD PRINT+5
ALL^IBCNS1 INS+1
PAT^IBCNSM RWM1+2
INP^VADPT DQ+2
PID^VADPT DQ+2
FULL^VALM1 RW+1
PAUSE^VALM1 TOP+15, MID+6, BOT+8
$$FMTE^XLFDT TOP+6
$$HTE^XLFDT TOP

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Print Insurance Review Worksheet",!
  • Line Location: RWM+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: RWM1+5
Function Call: WRITE
  • Prompt: !!,?(IOM-26/2),"INSURANCE REVIEW WORKSHEET",!?(IOM-22),$$HTE^XLFDT($H)
  • Line Location: TOP+0
Function Call: WRITE
  • Prompt: !!?TAB," Specialty: ",$E($P($G(VAIN(3)),"^",2),1,23)
  • Line Location: TOP+1
Function Call: WRITE
  • Prompt: ?TAB2+8,"Ward: ",$P($G(VAIN(4)),"^",2)
  • Line Location: TOP+2
Function Call: WRITE
  • Prompt: !!?TAB," Name: ",$E($P($G(^DPT(DFN,0)),"^",1),1,23)
  • Line Location: TOP+3
Function Call: WRITE
  • Prompt: ?TAB2,"Insurance Co: ",$G(IBX(1))
  • Line Location: TOP+4
Function Call: WRITE
  • Prompt: !?TAB," Pt ID: ",VA("PID"),?(TAB2+14),$G(IBX(2))
  • Line Location: TOP+5
Function Call: WRITE
  • Prompt: !?TAB," DOB: ",$$FMTE^XLFDT($P($G(^DPT(DFN,0)),"^",3)),?(TAB2+14),$G(IBX(3))
  • Line Location: TOP+6
Function Call: WRITE
  • Prompt: !!?TAB,"Admission Date: ",$P($G(VAIN(7)),"^",2)
  • Line Location: TOP+7
Function Call: WRITE
  • Prompt: ?TAB2," DC Date: ________ LOS: _____"
  • Line Location: TOP+8
Function Call: WRITE
  • Prompt: !!?TAB," Attending MD: ",$E($P($G(VAIN(11)),"^",2),1,20)
  • Line Location: TOP+9
Function Call: WRITE
  • Prompt: ?TAB2," Primary MD: ",$E($P($G(VAIN(2)),"^",2),1,20)
  • Line Location: TOP+10
Function Call: WRITE
  • Prompt: !!?TAB,"Complaint/Hist: ",$$LINE("_",IOM-TAB-17)
  • Line Location: TOP+11
Function Call: WRITE
  • Prompt: !!?TAB," ",$$LINE("_",IOM-TAB-17)
  • Line Location: TOP+12
Function Call: WRITE
  • Prompt: !!?TAB," Treatment: ",$$LINE("_",IOM-TAB-17)
  • Line Location: TOP+13
Function Call: WRITE
  • Prompt: !!?TAB," ",$$LINE("_",IOM-TAB-17)
  • Line Location: TOP+14
Function Call: WRITE
  • Prompt: !!?TAB,$$LINE("=",IOM-TAB-1)
  • Line Location: MID+1
Function Call: WRITE
  • Prompt: !?TAB,"|Date",?12,"|Diagnosis",?37,"|Procedure",?64,"|DRG",?71,"|LOS |"
  • Line Location: MID+2
Function Call: WRITE
  • Prompt: "Notes",?130,"|"
  • Condition for execution: IOM>130
  • Line Location: MID+2
Function Call: WRITE
  • Prompt: $C(13)," ",$$LINE("_",IOM-TAB-1)
  • Line Location: MID+3
Function Call: WRITE
  • Prompt: !?TAB,$$LINE("=",IOM-TAB-1)
  • Line Location: MID+5
Function Call: WRITE
  • Prompt: !?TAB,"|Insurance Contact: ",$$LINE("_",26)," Phone: ",$$LINE("_",20),"|"
  • Line Location: BOT+1
Function Call: WRITE
  • Prompt: !?TAB,"|",$$LINE("_",IOM-TAB-3),"|"
  • Line Location: BOT+2
Function Call: WRITE
  • Prompt: !?TAB,"|Date |Comments (#day approved, next review date, etc.)",?IOM-2,"|"
  • Line Location: BOT+3
Function Call: WRITE
  • Prompt: $C(13)," ",$$LINE("_",IOM-TAB-1)
  • Line Location: BOT+4
Function Call: WRITE
  • Prompt: !?TAB,$$LINE("=",IOM-TAB-1)
  • Line Location: BOT+6
Function Call: WRITE
  • Prompt: !!?TAB,"Reviewer: _____________________________________ Date: ____________________"
  • Line Location: BOT+7
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINTQ+0
Function Call: WRITE
  • Prompt: !?TAB,"| | | | | |"
  • Line Location: BLINE+1
Function Call: WRITE
  • Prompt: " |"
  • Condition for execution: IOM>130
  • Line Location: BLINE+1
Function Call: WRITE
  • Prompt: !?TAB,"|________|________________________|__________________________|______|______|"
  • Line Location: BLINE+2
Function Call: WRITE
  • Prompt: "___________________________________________________|"
  • Condition for execution: IOM>130
  • Line Location: BLINE+2
Function Call: WRITE
  • Prompt: !?TAB,"| | "
  • Line Location: BLINE2+1
Function Call: WRITE
  • Prompt: "|"
  • Condition for execution: IOM<130
  • Line Location: BLINE2+1
Function Call: WRITE
  • Prompt: " |"
  • Condition for execution: IOM>130
  • Line Location: BLINE2+1
Function Call: WRITE
  • Prompt: !?TAB,"|________|_________________________________________________________________"
  • Line Location: BLINE2+2
Function Call: WRITE
  • Prompt: "|"
  • Condition for execution: IOM<130
  • Line Location: BLINE2+2
Function Call: WRITE
  • Prompt: "____________________________________________________|"
  • Condition for execution: IOM>130
  • Line Location: BLINE2+2
Routine Call
  • %ZIS
  • Line Location:
    • PRINT+4
Routine Call
  • %ZIS
  • Line Location:
    • PRINT+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(36 - [#36] INS+4
^DPT - [#2] TOP+3, TOP+6

Label References

Name Line Occurrences
$$LINE TOP+11, TOP+12, TOP+13, TOP+14, MID+1, MID+3, MID+5, BOT+1, BOT+2, BOT+4
, BOT+6
BLINE MID+4
BLINE2 BOT+5
DQ DQ1
INS DQ+2
INSQ INS+3
PRINT RW+2, RWM1+5
PRINTQ PRINT+4, PRINT+5, TOP+15, MID+6, BOT+8
RWM %
RWM1 RWM1+5
RWMQ RWM1+2, RWM1+5, DQ1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS PRINT+4*
CHAR LINE~, LINE+2*, LINE+3
DFN RW+2, RWM1+2, RWM1+5, RWMQ!, PRINT~, TOP+3, TOP+6, INS+1
DIC RWMQ!
>> DIRUT TOP+15, MID+6, BOT+8
DT INS+1
I RWMQ!, PRINT+2~, MID+4*, BOT+5*, INS+4*
IBCNT PRINT+2~, INS+4*
IBINS PRINT+2~
IBINS( INS+4
IBINS(0 INS+3
IBX PRINT+2~, INS+2!
IBX( INS+4*
IBX(1 TOP+4, INS+3*
IBX(2 TOP+5
IBX(3 TOP+6
IO PRINT+7
IO("Q" PRINT+5!
IOM DQ+1, TOP, TOP+11, TOP+12, TOP+13, TOP+14, MID+1, MID+2, MID+3, MID+5
, BOT+2, BOT+3, BOT+4, BOT+6, LINE+1, BLINE+1, BLINE+2, BLINE2+1, BLINE2+2
IOST TOP+15, MID+3, MID+6, BOT+4, BOT+8
J RWMQ!, PRINT+2~
LEN LINE~, LINE+1*, LINE+3
POP PRINT+2~, PRINT+4
TAB PRINT+2~, DQ+1*, TOP+1, TOP+3, TOP+5, TOP+6, TOP+7, TOP+9, TOP+11, TOP+12
, TOP+13, TOP+14, MID+1, MID+2, MID+3, MID+5, BOT+1, BOT+2, BOT+3, BOT+4
, BOT+6, BOT+7, BLINE+1, BLINE+2, BLINE2+1, BLINE2+2
TAB2 PRINT+2~, DQ+1*, TOP+2, TOP+4, TOP+5, TOP+6, TOP+8, TOP+10
VA PRINT+2~
VA("PID" TOP+5
VA200 PRINT+2~, DQ+1*
VAERR PRINT+2~
VAIN PRINT+2~
VAIN(11 TOP+9
VAIN(2 TOP+10
VAIN(3 TOP+1
VAIN(4 TOP+2
VAIN(7 TOP+7
VAIN(8 INS+1
>> VALMBCK RWQ*
VALMQUIT RWM1+2, RWMQ!
X RWMQ!, PRINT+2~
Y RWMQ!, PRINT+2~
>> ZTDESC PRINT+5*
>> ZTQUEUED PRINTQ+1
>> ZTREQ PRINTQ+1*
>> ZTRTN PRINT+5*
>> ZTSAVE("DFN" PRINT+5*
>> ZTSAVE("IB*" PRINT+5*
ZTSK PRINT+5!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All