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

Package: Text Integration Utility

Routine: TIURVBC


Information

TIURVBC ;ISL/JER - Visible Black Character Line Count Report ;05/20/10 12:43

Source Information

Source file <TIURVBC.m>

Call Graph

Call Graph Total: 15

Package Total Call Graph
Kernel 6 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  ($$FMADD,$$FMTE,$$NOW)^XLFDT  $$LEAP^XLFDT3  ($$LOW,$$UP)^XLFSTR  
Text Integration Utility 4 ($$EDATE,$$LDATE,SELDIV)^TIULA  ($$PERSNAME,$$PNAME,$$PTNAME)^TIULC1  ($$CENTER,$$DATE,$$NAME)^TIULS  ($$READ,$$STOP,$$TITLE,JUSTIFY)^TIUU  
VA Fileman 2 $$EXTERNAL^DILFD  $$GET1^DIQ  
Authorization Subscription 1 $$ISA^USRLM  
Registration 1 ($$NAME,$$SITE)^VASITE  
Toolkit 1 $$GET^XPAR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Text Integration Utility 1 TIU VBC LINE COUNT REPORT  

Entry Points

Name Comments DBIA/ICR reference
GATHER(TIUDI,TIUA,TIUEDT,TIULDT,TIUTR) ; Gather records that satisfy criteria
INITIALS(TIUX) ; Get Person's initials from file 200
DFLTDT(EORL) ; Compute default early or late date
REPORT(TIUA,TIUEDT,TIULDT,TIUSONLY) ; Generate report
HEADER(DIVISION,TIURTM,TIUEDT,TIULDT,TIUPG) ; Write Report Header
LDOM(MON,YR) ; Calculate last day of month MON
NOQUE ; Call report directly
TRNSEL(TIUY) ; Select Transcriptionists
ENTRY ; Build & Print Report
DEVICE ; Device handling
; Call with: ZTRTN
QUE ; Queue output
MAIN ; Main subroutine
CONTX
CONTINUE(TIUDIV,TIURTM,TIUEDT,TIULDT,TIUPG) ; Evaluate relative page position

External References

Name Field # of Occurrence
^%ZIS DEVICE+3
HOME^%ZIS QUE+7
^%ZISC ENTRY+7
^%ZTLOAD QUE+5
$$EXTERNAL^DILFD GATHER+22, GATHER+23
$$GET1^DIQ GATHER+27, INITIALS+1
$$EDATE^TIULA MAIN+24
$$LDATE^TIULA MAIN+27
SELDIV^TIULA MAIN+4
$$PERSNAME^TIULC1 INITIALS+2
$$PNAME^TIULC1 GATHER+25
$$PTNAME^TIULC1 GATHER+28
$$CENTER^TIULS MAIN+3
$$DATE^TIULS REPORT+30, HEADER+1, HEADER+7
$$NAME^TIULS GATHER+28, INITIALS+2
$$READ^TIUU MAIN+9, MAIN+17, MAIN+21, TRNSEL+9, CONTINUE+3
$$STOP^TIUU REPORT+10, REPORT+38, REPORT+48
$$TITLE^TIUU HEADER+4
JUSTIFY^TIUU HEADER+3, HEADER+4, HEADER+5
$$ISA^USRLM GATHER+21
$$NAME^VASITE REPORT+5
$$SITE^VASITE REPORT+5
$$FMADD^XLFDT GATHER+3
$$FMTE^XLFDT DFLTDT+11
$$NOW^XLFDT REPORT+5
$$LEAP^XLFDT3 LDOM+1
$$LOW^XLFSTR GATHER+24
$$UP^XLFSTR GATHER+26
$$GET^XPAR TRNSEL+3, GATHER+19

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$$CENTER^TIULS("--- Transcription Billing Verification Report ---"),!
  • Line Location: MAIN+3
Function Call: WRITE
  • Prompt: !!,"Inconsistencies found between the MEDICAL CENTER DIVISION FILE, the INSTITUTION"
  • Line Location: MAIN+6
Function Call: WRITE
  • Prompt: !,"FILE and/or STATION NUMBER (TIME SENSITIVE) FILE for the:",!!,$S($G(BADDIV)]"":BADDIV_" division"_$S($L(BADDIV,",")>1:"s",1:""),1:"a division you selected"),"."
  • Line Location: MAIN+7
Function Call: WRITE
  • Prompt: !!,"Please contact the National Support team."
  • Line Location: MAIN+8
Function Call: WRITE
  • Prompt: !
  • Line Location: MAIN+16
Function Call: WRITE
  • Prompt: !
  • Line Location: MAIN+20
Function Call: WRITE
  • Prompt: !
  • Line Location: MAIN+23
Function Call: WRITE
  • Prompt: !
  • Line Location: MAIN+25
Function Call: WRITE
  • Prompt: !
  • Line Location: MAIN+28
Function Call: WRITE
  • Prompt: !,$S($D(ZTSK):"Request Queued!",1:"Request Cancelled!")
  • Line Location: QUE+5
Function Call: WRITE
  • Prompt: !!,"Select Transcriptionist(s):",!
  • Line Location: TRNSEL+6
Function Call: WRITE
  • Prompt: !
  • Line Location: TRNSEL+12
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: TIULINE,!
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+6
Function Call: WRITE
  • Prompt: "for Documents Transcribed: ",TIUDTR,?55,"Printed: ",$$DATE^TIULS(TIURTM,"MM/DD/CCYY HR:MIN"),!
  • Line Location: HEADER+7
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+8
Function Call: WRITE
  • Prompt: "Tran",?5,"Date",?14,"Title",?39,"Patient",?66,"Aut",?71,"VBC Lines",!
  • Line Location: HEADER+9
Function Call: WRITE
  • Prompt: TIULINE,!
  • Line Location: HEADER+10
Function Call: WRITE
  • Prompt: "Category",?48,"Documents",?71,"VBC Lines",!,TIULINE
  • Line Location: HEADER+11
Routine Call
  • %ZIS
  • Line Location:
    • QUE+7
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^VA(200 - [#200] GET1^DIQ
^TIU(8925 - [#8925] EXTERNAL^DILFD

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TIU(8925 - [#8925] GATHER+6, GATHER+8, GATHER+10, GATHER+12
^TMP("TIURVBC" ENTRY+2

Label References

Name Line Occurrences
$$CONTINUE REPORT+8, REPORT+9, REPORT+19, REPORT+30, REPORT+32, REPORT+33, REPORT+34, REPORT+36, REPORT+37, REPORT+44
, REPORT+47
$$DFLTDT MAIN+24, MAIN+27
$$INITIALS GATHER+24, GATHER+26
$$LDOM DFLTDT+6
@( NOQUE+1
CONTX CONTINUE+2, CONTINUE+3
GATHER ENTRY+4
HEADER REPORT+7, REPORT+14, REPORT+42, CONTINUE+4
QUE DEVICE+4
REPORT ENTRY+5
TRNSEL MAIN+19

Naked Globals

Name Field # of Occurrence
^(12 GATHER+12
^(13 GATHER+12
^(14 GATHER+12

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% QUE+1~, QUE+3*
%I MAIN+1~
%T MAIN+1~
%Y MAIN+1~
%ZIS DEVICE+2~, DEVICE+3*
BADDIV MAIN+1~, MAIN+7
DFLTDT DFLTDT+1~, DFLTDT+10*, DFLTDT+11*, DFLTDT+12
DIC MAIN+1~
>> DIROUT MAIN+19
DIRUT MAIN+1~, MAIN+9*, MAIN+18, MAIN+22, TRNSEL+1~, REPORT+1~, REPORT+10*, REPORT+12, REPORT+15, REPORT+20
, REPORT+22, REPORT+31, REPORT+35, REPORT+38*, REPORT+39, REPORT+43, REPORT+48*, CONTINUE+3
DIVISION HEADER~, HEADER+5, HEADER+9
DOM DFLTDT+1~, DFLTDT+2*, DFLTDT+3, DFLTDT+6*, DFLTDT+7, DFLTDT+9*
DT DFLTDT+2
DTOUT REPORT+1~
DUZ(2 TRNSEL+3
EORL DFLTDT~, DFLTDT+6, DFLTDT+7, DFLTDT+9
EQLN REPORT+2~*, REPORT+32, REPORT+36
FMDT DFLTDT+1~, DFLTDT+7*, DFLTDT+9*, DFLTDT+11
IO ENTRY+3, REPORT+4
IO("Q" DEVICE+4, QUE+3!
IOF HEADER+3
ION QUE+4
IOSL REPORT+10, REPORT+38, REPORT+48, CONTINUE+2
IOST REPORT+10, REPORT+38, REPORT+48, CONTINUE+3
LDOMS LDOM+1~, LDOM+2*, LDOM+3
LEAP LDOM+1~*, LDOM+2
MON DFLTDT+1~, DFLTDT+2*, DFLTDT+4*, DFLTDT+5*, DFLTDT+6, DFLTDT+7, DFLTDT+9, LDOM~, LDOM+3
POP MAIN+1~, DEVICE+3
SELDIV MAIN+1~, MAIN+4, MAIN+5
TIU1TR MAIN+1~, MAIN+17*, MAIN+19
TIUA ENTRY+1~, ENTRY+2*, ENTRY+4, ENTRY+5, ENTRY+6, GATHER~, GATHER+29, REPORT~, REPORT+6, REPORT+12
, REPORT+15, REPORT+17, REPORT+18, REPORT+20, REPORT+22, REPORT+24, REPORT+26, REPORT+27, REPORT+28, REPORT+39
, REPORT+43, REPORT+45, REPORT+46
TIUAUTH GATHER+11~, GATHER+13*, GATHER+15, GATHER+26*, GATHER+29, REPORT+23~, REPORT+25*, REPORT+30
TIUCAT REPORT+1~, REPORT+41*, REPORT+43*, REPORT+44, REPORT+45, REPORT+46
TIUD REPORT+23~, REPORT+24*, REPORT+25
TIUD0 GATHER+11~, GATHER+12*, GATHER+25, GATHER+27, GATHER+28
TIUD12 GATHER+11~, GATHER+12*, GATHER+13
TIUD13 GATHER+11~, GATHER+12*, GATHER+13
TIUD14 GATHER+11~, GATHER+12*, GATHER+14
TIUDA GATHER+9~*, GATHER+10*, GATHER+12, GATHER+29, REPORT+21~*, REPORT+22*, REPORT+24
TIUDCNT REPORT+1~, REPORT+13*, REPORT+26*
TIUDI MAIN+1~, MAIN+5, MAIN+9, MAIN+10, ENTRY+4, GATHER~
TIUDI( MAIN+12, MAIN+13
TIUDI("ENTRIES" MAIN+14*, MAIN+15*, GATHER+17
TIUDI("INST" MAIN+13*, GATHER+17
TIUDIV GATHER+11~, GATHER+13*, GATHER+17, GATHER+19, GATHER+23*, GATHER+29, REPORT+1~, REPORT+11*, REPORT+12*, REPORT+14
, REPORT+15, REPORT+19, REPORT+20, REPORT+22, REPORT+24, REPORT+26, REPORT+30, REPORT+32, REPORT+33, REPORT+34
, REPORT+36, REPORT+37, CONTINUE~, CONTINUE+4
TIUDTR HEADER+1~*, HEADER+7
TIUDTVBC REPORT+13~, REPORT+16*, REPORT+29*, REPORT+33
TIUDVBC REPORT+1~, REPORT+13*, REPORT+26*, REPORT+37
TIUEBCNT REPORT+13~, REPORT+17*, REPORT+27*
TIUEBVBC REPORT+13~, REPORT+18*, REPORT+27*
TIUEBY GATHER+11~, GATHER+13*, GATHER+15, GATHER+16, GATHER+21, GATHER+24*, GATHER+29, REPORT+13~*, REPORT+15*, REPORT+17
, REPORT+18, REPORT+19, REPORT+20, REPORT+22, REPORT+24, REPORT+27, REPORT+33
TIUEDT MAIN+1~, MAIN+24*, MAIN+26, ENTRY+4, ENTRY+5, GATHER~, GATHER+3, REPORT~, REPORT+7, REPORT+8
, REPORT+9, REPORT+14, REPORT+19, REPORT+30, REPORT+32, REPORT+33, REPORT+34, REPORT+36, REPORT+37, REPORT+42
, REPORT+44, REPORT+47, CONTINUE~, CONTINUE+4, HEADER~, HEADER+1
TIUHLP TRNSEL+1~, TRNSEL+4*, TRNSEL+9
TIUI TRNSEL+1~*, TRNSEL+8*, TRNSEL+11, REPORT+1~, REPORT+45*, REPORT+46, REPORT+47
TIUK MAIN+11~, MAIN+12*, MAIN+13, MAIN+14
TIULDT MAIN+1~, MAIN+27*, MAIN+29, ENTRY+4, ENTRY+5, GATHER~, GATHER+5*, GATHER+6, REPORT~, REPORT+7
, REPORT+8, REPORT+9, REPORT+14, REPORT+19, REPORT+30, REPORT+32, REPORT+33, REPORT+34, REPORT+36, REPORT+37
, REPORT+42, REPORT+44, REPORT+47, CONTINUE~, CONTINUE+4, HEADER~, HEADER+1
TIULINE HEADER+1~*, HEADER+4, HEADER+10, HEADER+11
TIUPG REPORT+1~, REPORT+2*, REPORT+7, REPORT+8, REPORT+9, REPORT+14, REPORT+19, REPORT+30, REPORT+32, REPORT+33
, REPORT+34, REPORT+36, REPORT+37, REPORT+42, REPORT+44, REPORT+47, CONTINUE~, CONTINUE+4, HEADER~, HEADER+2*
, HEADER+3
TIUPRMT TRNSEL+1~, TRNSEL+8*, TRNSEL+9
TIUPRSN TRNSEL+1~, TRNSEL+9*, TRNSEL+10, TRNSEL+11
TIUPTL4 GATHER+11~, GATHER+27*, GATHER+28
TIUPTNM GATHER+11~, GATHER+28*, GATHER+29, REPORT+23~, REPORT+25*, REPORT+30
TIUQUIT TRNSEL+1~*, TRNSEL+7, TRNSEL+10*
TIUR REPORT+46~*, REPORT+47
TIURTM REPORT+1~, REPORT+5*, REPORT+7, REPORT+8, REPORT+9, REPORT+14, REPORT+19, REPORT+30, REPORT+32, REPORT+33
, REPORT+34, REPORT+36, REPORT+37, REPORT+42, REPORT+44, REPORT+47, CONTINUE~, CONTINUE+4, HEADER~, HEADER+7
TIUSCNT REPORT+1~, REPORT+11*, REPORT+28*
TIUSCRN TRNSEL+1~, TRNSEL+5*, TRNSEL+9
TIUSHDR REPORT+2~, REPORT+41*, REPORT+42, REPORT+44, REPORT+47
TIUSITE REPORT+1~, REPORT+5*, REPORT+28, REPORT+41
TIUSONLY MAIN+1~, MAIN+21*, ENTRY+5, REPORT~, REPORT+2*, REPORT+14, REPORT+19, REPORT+30, REPORT+32, REPORT+33
, REPORT+34, REPORT+36, REPORT+37, REPORT+38
TIUSVBC REPORT+1~, REPORT+11*, REPORT+28*
TIUSVC GATHER+11~, GATHER+14*, GATHER+22*, GATHER+29, REPORT+23~, REPORT+25*
TIUTDT GATHER+1~, GATHER+3*, GATHER+6*, GATHER+8, GATHER+10, GATHER+29, REPORT+16~*, REPORT+20*, REPORT+22, REPORT+24
, REPORT+30
TIUTITLE GATHER+11~, GATHER+25*, GATHER+29, REPORT+23~, REPORT+25*, REPORT+30
TIUTR MAIN+1~, MAIN+2*, MAIN+19, ENTRY+4, GATHER~, GATHER+16
TIUTR("I" GATHER+16
TIUVBC GATHER+7~*, GATHER+8*, GATHER+10, GATHER+29, REPORT+23~, REPORT+25*, REPORT+26, REPORT+27, REPORT+28, REPORT+29
, REPORT+30
TIUVBCUC TRNSEL+1~, TRNSEL+3*, TRNSEL+4, TRNSEL+5, GATHER+1~, GATHER+19*, GATHER+21
TIUX INITIALS~, INITIALS+1, INITIALS+2
TIUY TRNSEL~, TRNSEL+1*, TRNSEL+11*, INITIALS+1~*, INITIALS+2, CONTINUE+1~*, CONTINUE+3*, CONTX
TIUY( TRNSEL+11*
TIUY("I" TRNSEL+11*
U LDOM+3, GATHER+13, GATHER+14, GATHER+25, GATHER+27, GATHER+28, GATHER+29, REPORT+5, REPORT+17, REPORT+18
, REPORT+25, REPORT+26, REPORT+27, REPORT+28, REPORT+47
VAUTD MAIN+1~
YR DFLTDT+1~, DFLTDT+2*, DFLTDT+4*, DFLTDT+6, DFLTDT+7, DFLTDT+9, LDOM~, LDOM+1*
ZTDESC QUE+4*, QUE+6!
ZTDTH QUE+1~, QUE+6!
ZTIO QUE+1~, QUE+4*, QUE+6!
>> ZTQUEUED REPORT+3
>> ZTREQ REPORT+3*
ZTRTN MAIN+1~, MAIN+30*, NOQUE+1, QUE+2, QUE+6!
ZTSAVE QUE+1~, QUE+6!
ZTSAVE( QUE+3*
ZTSK QUE+1~, QUE+5, QUE+6!
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 |  Naked Globals |  Local Variables |  All