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

Package: Text Integration Utility

Routine: TIULA


Information

TIULA ; SLC/JER - Interactive Library functions ;04/23/10 09:00

Source Information

Source file <TIULA.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 3 EN^DDIOL  ^DIC  ^DIR  
Registration 2 ($$PRIM,$$SITE)^VASITE  DIVISION^VAUTOMA  
Text Integration Utility 2 ($$ASKSUBJ,$$TYPMATCH)^TIULA1  $$READ^TIUU  
Kernel 1 (,EN)^XQORM  

Caller Graph

Caller Graph Total: 31

Package Total Caller Graph
Text Integration Utility 30 TIUAPIOK  TIUASRPT  TIUCHLP  TIUCNFIX  TIUEDIT  TIUEDITR  TIUELST  TIULA2  
TIUMLIST  TIUMOVE  TIUPFFIX  TIUPNAPI  TIUPNFIX  TIUPUTA  TIUPUTCP  TIUPUTS  
TIUPUTSX  TIUPXAP2  TIUR  TIUR3  TIURD1  TIURD3  TIURDIV  TIURM  
TIUROR  TIURPTTL  TIURTITL  TIURVBC  TIUVISIT  TIUVSIT  
Order Entry Results Reporting 1 ORUTL  

Entry Points

Name Comments DBIA/ICR reference
PATIENT(TIUSSN) ; Select a patient
SELSTAT(Y,PARM,DEF) ; Select Signature status
ONE(TIUI,VAUTD) ; Input - TIUI Medical Center Division file (#40.8) IEN
SELTYP(DA,RETURN,PARM,DFLT,TYPE,MODE,DCLASS,PICK) ; Select Document Types
STATX
SELPAR(DEF) ; Select an author or patient or...
CATEGORY() ; Select Service Category
SELSVCQ
ASKSVC(TIUSVCS,TIUCNT,TIUSVCI) ;Ask Service
; Input -- TIUSVCS Service Selection Array
; TIUCNT Number of Services Selected
; Output -- 1=Successful and 0=Failure
; TIUSVCI Service/Section file (#49) IEN
SELDIV ; Get document division(s)
LDATE(PRMPT,STATUS,DFLT) ; Get late date
SELSCRN(DEF) ; Select Review Screen
EDATE(PRMPT,STATUS,DFLT) ; Get early date
SELSVC(TIUSVCS) ;Select Services
; Input -- None
; Output -- 1=Successful and 0=Failure
; TIUSVCS Service Selection Array
CHKSVC(TIUSVCS,TIUSVCI) ;Check Selected Service
; Input -- TIUSVCS Service Selection Array
; TIUSVCI Service file (#49) IEN
; Output -- 1=Successful and 0=Failure
SELPARX

External References

Name Field # of Occurrence
EN^DDIOL CHKSVC+7
^DIC PATIENT+2, SELSCRN+2, SELPAR+7
^DIR ASKSVC+10, CATEGORY+3
$$ASKSUBJ^TIULA1 SELPAR+2
$$TYPMATCH^TIULA1 SELTYP+28
$$READ^TIUU EDATE+5, LDATE+5
$$PRIM^VASITE SELDIV+23
$$SITE^VASITE ONE+2
DIVISION^VAUTOMA SELDIV+18
^XQORM SELSTAT+6, SELSCRN+6
EN^XQORM SELTYP+20

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKSVC+9
Function Call: WRITE
  • Prompt: !,"Status selection unavailable."
  • Line Location: SELSTAT+3
Function Call: WRITE
  • Prompt: !,"^^-jumps not allowed from this prompt."
  • Line Location: SELSCRN+10
Function Call: WRITE
  • Prompt: !,"No entries for ",$P(Y,U,2)
  • Line Location: SELPAR+8
Function Call: WRITE
  • Prompt: !!,"The Document Class ",$P(^TIU(8925.1,+J,0),U)," has no active titles at present..."
  • Line Location: SELTYP+27
Routine Call
  • DIC
  • Line Location:
    • PATIENT+2
    • SELSCRN+2
    • SELPAR+7
Routine Call
  • DIR
  • Line Location:
    • ASKSVC+10
    • CATEGORY+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(43 - [#43] SELDIV+17
^DISV( SELTYP+8, SELTYP+9
^ORD(101 - [#101] SELSTAT+2
^TIU(8925 - [#8925] SELPAR+8
^TIU(8925.1 - [#8925.1] SELTYP+12, SELTYP+16, SELTYP+25, SELTYP+27, SELTYP+31
^TMP("TIUTYP" SELTYP+2

Label References

Name Line Occurrences
$$ASKSVC SELSVC+6
$$SELPAR SELSCRN+11
ONE SELDIV+21, SELDIV+23
SELPARX SELPAR+2
SELSVCQ SELSVC+10
SELTYP SELTYP+31
STATX SELSTAT+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BADDIV SELDIV+15!, ONE+5*
CURTYP SELTYP+1~, SELTYP+25*, SELTYP+26, SELTYP+28, SELTYP+31
DA SELTYP~, SELTYP+8, SELTYP+9, SELTYP+12, SELTYP+16
DCLASS SELTYP~, SELTYP+26*, SELTYP+31
DCLASS( SELTYP+26*
DEF SELSTAT~, SELSTAT+5, SELSTAT+6, SELSCRN~, SELSCRN+6, SELPAR~, SELPAR+2, SELPAR+3, SELPAR+5, SELPAR+6
, SELPAR+8
DFLT EDATE~, EDATE+4, LDATE~, LDATE+4, SELTYP~, SELTYP+7, SELTYP+8*, SELTYP+9*, SELTYP+14, SELTYP+15
DIC PATIENT+1~, PATIENT+2*, SELSCRN+1~, SELSCRN+2*, SELPAR+1~, SELPAR+3*
DIC("A" SELPAR+5*
DIC("S" SELPAR+6*, SELPAR+7!
DIC(0 PATIENT+2*, SELSCRN+2*, SELPAR+4*
DIR ASKSVC+5~, CATEGORY+1~
DIR("?" ASKSVC+9*
DIR("A" ASKSVC+8*, CATEGORY+2*
DIR("PRE" ASKSVC+7*
DIR(0 ASKSVC+6*, CATEGORY+2*
DTOUT ASKSVC+5~, ASKSVC+12
DUOUT ASKSVC+5~, ASKSVC+12
DUZ SELTYP+8, SELTYP+9
I SELSTAT+1~, SELTYP+1~, SELTYP+23*, SELTYP+25, SELTYP+30
J SELTYP+1~, SELTYP+25*, SELTYP+26, SELTYP+27, SELTYP+31
MODE SELTYP~, SELTYP+11*, SELTYP+31
PARM SELSTAT~, SELSTAT+4, SELSTAT+5, SELTYP~, SELTYP+12, SELTYP+22, SELTYP+27, SELTYP+31
PICK SELTYP~, SELTYP+22*, SELTYP+31
PRMPT EDATE~, EDATE+3, LDATE~, LDATE+3
RETURN SELTYP~, SELTYP+2*, SELTYP+21, SELTYP+22, SELTYP+30, SELTYP+31
SELDIV SELDIV+15!, SELDIV+19*, SELDIV+20*, ONE+3*, ONE+5*
STATUS EDATE~, EDATE+2, LDATE~, LDATE+2
TIUCNT SELSVC+4~, SELSVC+5*, SELSVC+6, SELSVC+8*, ASKSVC~, ASKSVC+8, ASKSVC+9
TIUDFLT EDATE+1~, EDATE+4*, EDATE+5, LDATE+1~, LDATE+4*, LDATE+5
TIUDI SELDIV+15!
TIUDI( ONE+3*
TIUI SELDIV+14~, SELDIV+21*, SELDIV+23*, ONE~, ONE+2, ONE+3, ONE+5
TIUIFP ONE+1~, ONE+2*, ONE+3
TIUK SELTYP+6~*, SELTYP+30*
TIUPRMT EDATE+1~, EDATE+3*, EDATE+5, LDATE+1~, LDATE+3*, LDATE+5
TIUSSN PATIENT~, PATIENT+1, PATIENT+2
TIUSVCI SELSVC+4~, SELSVC+6, SELSVC+7, SELSVC+9*, SELSVC+10, SELSVC+11, ASKSVC~, ASKSVC+11*, ASKSVC+12*, ASKSVC+13
, CHKSVC~, CHKSVC+7
TIUSVCS SELSVC~, SELSVC+6, SELSVC+11*, ASKSVC~, CHKSVC~
TIUSVCS( SELSVC+7*, CHKSVC+7
TIUY SELSTAT+1~, SELSTAT+3*, SELSTAT+7*, STATX
TYPE SELTYP~, SELTYP+10*, SELTYP+27, SELTYP+28, SELTYP+31
TYPMATCH SELTYP+24~, SELTYP+28*, SELTYP+29, SELTYP+31
U SELDIV+17, ONE+2, SELSCRN+11, SELSCRN+12, SELPAR+8, CATEGORY+4, SELTYP+12, SELTYP+16, SELTYP+25, SELTYP+27
VAUTD SELDIV+14~, SELDIV+20, SELDIV+21, SELDIV+23, ONE~
VAUTD( SELDIV+21, ONE+5
X PATIENT+1~*, ASKSVC+5~, SELSTAT+1~, SELSTAT+5*, SELSCRN+1~, SELSCRN+2*, SELSCRN+9, SELPAR+1~, EDATE+1~, LDATE+1~
, CATEGORY+1~, SELTYP+1~, SELTYP+14*
XQORM SELSTAT+1~, SELSTAT+2*, SELSTAT+3, SELSCRN+1~, SELSCRN+4*, SELTYP+1~, SELTYP+12*
XQORM("A" SELSTAT+4*, SELSCRN+4*, SELTYP+16*
XQORM("B" SELSTAT+6*, SELSCRN+6*, SELTYP+15*
XQORM("H" SELTYP+13*
XQORM("S" SELSCRN+5*
XQORM(0 SELSTAT+4*, SELSCRN+4*, SELTYP+12*, SELTYP+13, SELTYP+14, SELTYP+16
Y PATIENT+1~, PATIENT+3, SELDIV+14~, SELDIV+19, SELSVC+4~, SELSVC+10*, SELSVC+12*, SELSVCQ, ASKSVC+5~, ASKSVC+11
, CHKSVC+4~, CHKSVC+5*, CHKSVC+7*, CHKSVC+8, SELSTAT~, SELSTAT+7, SELSTAT+8*, SELSCRN+1~, SELSCRN+3, SELSCRN+4
, SELSCRN+7, SELSCRN+8*, SELSCRN+10*, SELSCRN+11*, SELSCRN+12*, SELSCRN+13, SELPAR+1~, SELPAR+2*, SELPAR+7, SELPAR+8*
, SELPARX, EDATE+1~, EDATE+2*, EDATE+5*, EDATE+6, LDATE+1~, LDATE+2*, LDATE+5*, LDATE+6, CATEGORY+1~
, CATEGORY+4, SELTYP+1~, SELTYP+21, SELTYP+22
Y( SELTYP+23, SELTYP+25, SELTYP+30
Y(0 CATEGORY+4
Y(1 SELSTAT+8, SELSCRN+8, SELSCRN+9
Y(2 SELSTAT+8*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All