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

Package: Text Integration Utility

Routine: TIUSUPN


Information

TIUSUPN ;;SLC/TT - TIU SIGNED/UNSIGNED List Manager ; 04-FEB-2005

Source Information

Source file <TIUSUPN.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
List Manager 3 EN^VALM  ($$SETSTR,FULL)^VALM1  SET^VALM10  
VA FileMan 3 $$EXTERNAL^DILFD  $$GET1^DIQ  ^DIR  
Kernel 1 ($$FMTE,$$NOW)^XLFDT  
Text Integration Utility 1 $$READ^TIUU  

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

Package Total Caller Graph
Text Integration Utility 7 TIU SIGNED/UNSIGNED  TIU SIGNED/UNSIGNED BROWSE  TIU SIGNED/UNSIGNED DETAIL DISPLAY  TIU SIGNED/UNSIGNED MENU  TIU SIGNED/UNSIGNED PN  TIU SIGNED/UNSIGNED SELECT  TIU SIGNED/UNSIGNED UPDATE  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
EN ; -- main entry point for TIU SIGNED/UNSIGNED PN
HDR ; -- header code
INIT ; Create list
GETINFO(TIUDA1) ;GET SIGNED DOCUMENT BUT UNSIGNED STATUS
; Input -- TIUDA1 TIU Document file (#8925) IEN
HELP ; -- help code
ASKRNG(TIUBEGDT,TIUENDT) ;Prompt for date range
; Input -- None
; Output -- 1=Successful and 0=Failure
; BEGDT Begin Date
; ENDT End Date
ASKRNGQ
PATFMAT(TIUPAT) ; format patient as first letter of last name and last 4 SSN
EXIT ; -- exit code
XQORM ; default action for list manager
ACTIONS ; user selectable actions
SELECT(ACTION) ; selects document(s) and calls ACTION

External References

Name Field # of Occurrence
$$EXTERNAL^DILFD PATFMAT+3
$$GET1^DIQ INIT+13, INIT+16, INIT+18, PATFMAT+4
^DIR HELP+8, ACTIONS+17, SELECT+9
$$READ^TIUU ASKRNG+7, ASKRNG+9
EN^VALM EN+5
$$SETSTR^VALM1 HDR+4, HDR+5, INIT+12, INIT+13, INIT+14, INIT+15, INIT+16, INIT+17, INIT+18, INIT+25
FULL^VALM1 HELP+3, SELECT+2
SET^VALM10 INIT+19, INIT+23, INIT+26
$$FMTE^XLFDT HDR+2, INIT+17, INIT+28, INIT+29
$$NOW^XLFDT INIT+5, INIT+27

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !!,"Searching for the documents."
  • Line Location: INIT+4
Function Call: WRITE
  • Prompt: !!,"Report started: ",$P($$FMTE^XLFDT(TIUTM("STR")),"@",2)
  • Line Location: INIT+28
Function Call: WRITE
  • Prompt: !,"Report finished: ",$P($$FMTE^XLFDT(TIUTM("END")),"@",2)
  • Line Location: INIT+29
Function Call: WRITE
  • Prompt: !,"Total searched: ",TIUCNT
  • Line Location: INIT+30
Function Call: WRITE
  • Prompt: !!,"The following actions are available:"
  • Line Location: HELP+4
Function Call: WRITE
  • Prompt: !,"Browse Document - View selected documents (if authorized)"
  • Line Location: HELP+5
Function Call: WRITE
  • Prompt: !,"Detailed Display - View detailed display of selected documents (if authorized)"
  • Line Location: HELP+6
Function Call: WRITE
  • Prompt: !,"Update Document - Update the status of selected documents"
  • Line Location: HELP+7
Function Call: WRITE
  • Prompt: !,"Please specify a date range:",!
  • Line Location: ASKRNG+6
Function Call: WRITE
  • Prompt: !,"No documents to select."
  • Line Location: SELECT+3
Routine Call
  • DIR
  • Line Location:
    • HELP+8
    • ACTIONS+17
    • SELECT+9
Routine Call
  • VALM
  • Line Location:
    • EN+5

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ORD(101 - [#101] XQORM+1
^TIU(8925 - [#8925] INIT+6, INIT+7, INIT+14, INIT+17, GETINFO+5, GETINFO+6
^TMP("TIU180" EN+3!, HDR+3, INIT+20*, SELECT+3
^TMP("TIUPS180" EN+3!, INIT+10, GETINFO+8*
^TMP("TIUSEL" EN+3!, SELECT+14*
^TMP("VALMAR" EN+3!

Label References

Name Line Occurrences
$$ASKRNG EN+4
$$PATFMAT INIT+14
@( ACTIONS+20, SELECT+16
ASKRNGQ ASKRNG+8, ASKRNG+10
GETINFO INIT+7
XQORM HDR+6, EXIT+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACTION ACTIONS+1~, ACTIONS+18*, ACTIONS+19, ACTIONS+20, SELECT~, SELECT+16
DIR HELP+1~, ACTIONS+3~, SELECT+6~
DIR("?" ACTIONS+12*, ACTIONS+13*, ACTIONS+14*, ACTIONS+15*, ACTIONS+16*
DIR("A" HELP+2*, HELP+8, ACTIONS+5*, SELECT+7*
DIR("B" ACTIONS+6*
DIR("L" ACTIONS+7*, ACTIONS+8*, ACTIONS+9*, ACTIONS+10*, ACTIONS+11*
DIR(0 HELP+2*, ACTIONS+4*, SELECT+8*
DIRUT ASKRNG+5~, ASKRNG+8, ASKRNG+10, ACTIONS+3~, ACTIONS+17, SELECT+9
DTOUT ASKRNG+5~
DUOUT ASKRNG+5~
HDR1 HDR+1~, HDR+2*, HDR+4
HDR2 HDR+1~, HDR+3*, HDR+5
IOF EN+2
IOM HDR+4, HDR+5, INIT+25
POP ACTIONS+3~
TIUBEGDT ASKRNG~, ASKRNG+7*, ASKRNG+8, ASKRNG+9
TIUCNT INIT+1~, INIT+3*, INIT+7*, INIT+8, INIT+30, SELECT+1~, SELECT+4*, SELECT+12*, SELECT+14
TIUD0 GETINFO+3~, GETINFO+6*, GETINFO+7
TIUD15 GETINFO+3~, GETINFO+6*, GETINFO+7
TIUDA INIT+1~, INIT+10*, INIT+13, INIT+14, INIT+15, INIT+16, INIT+17, INIT+18, INIT+19, SELECT+1~
TIUDA1 GETINFO~, GETINFO+4, GETINFO+5, GETINFO+6, GETINFO+8
TIUDATE INIT+1~, INIT+3*, INIT+6*, INIT+7
TIUDOCS SELECT+1~, SELECT+15
TIUDOCS( SELECT+13*
TIUDP INIT+1~, INIT+12*, INIT+13*, INIT+14*, INIT+15*, INIT+16*, INIT+17*, INIT+18*, INIT+19
TIUEDT EN+1~, EN+4, HDR+2, INIT+2, INIT+6
TIUENDT ASKRNG~, ASKRNG+9*, ASKRNG+10
TIUIEN INIT+1~, INIT+7*
TIUINIT PATFMAT+1~, PATFMAT+5*, PATFMAT+6
TIULAST4 PATFMAT+1~, PATFMAT+4*, PATFMAT+6
TIUNO INIT+1~, INIT+24*, INIT+25*, INIT+26
TIUPAT PATFMAT~, PATFMAT+2, PATFMAT+3, PATFMAT+4
TIUPATN PATFMAT+1~, PATFMAT+3*, PATFMAT+5
TIUQUIT SELECT+1~, SELECT+5, SELECT+9*
TIUSDT EN+1~, EN+4, HDR+2, INIT+2, INIT+3
TIUSEL SELECT+1~, SELECT+4*, SELECT+5, SELECT+10*, SELECT+11, SELECT+13, SELECT+14
TIUTM INIT+1~
TIUTM("END" INIT+27*, INIT+29
TIUTM("STR" INIT+5*, INIT+28
TIUTOTAL INIT+1~, INIT+3*, INIT+11*, INIT+12, INIT+19, INIT+20, INIT+21
U HDR+3, INIT+14, INIT+17, GETINFO+7, XQORM+1, ACTIONS+18, SELECT+3, SELECT+9
>> VALMAR SELECT+13
>> VALMBCK HELP+9*, ACTIONS+21*, SELECT+15*
>> VALMBG SELECT+8
>> VALMCNT INIT+3*, INIT+20*, INIT+22*, XQORM+1
>> VALMHDR(1 HDR+4*
>> VALMHDR(2 HDR+5*
>> VALMLST SELECT+8
X HELP+2, ACTIONS+3~, SELECT+6~, SELECT+11*, SELECT+13, SELECT+14
>> XQORM("#" XQORM+1*
>> XQORNOD(0 SELECT+4
Y ASKRNG+5~, ASKRNG+11*, ASKRNGQ, ACTIONS+3~, ACTIONS+18, SELECT+6~, SELECT+9
Y(0 SELECT+10
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 |  Local Variables  | All