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

Package: Text Integration Utility

Routine: TIUPEVN1


Information

TIUPEVN1 ; SLC/JER - Event logger Cont'd ;05/20/10 14:09

Source Information

Source file <TIUPEVN1.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
Text Integration Utility 7 SEND^TIUALRT  $$NOW^TIULC  ($$ISADDNDM,$$POSTFILE,$$REASSIGN)^TIULC1  WHOGETS^TIUPEVN1  $$DADTYPE^TIUPUTC  LINES^TIUSRVPT  $$READ^TIUU  
VA FileMan 4 ^DIC  ^DIE  EN^DIQ  EN^DIQ1  
Kernel 1 SETUP^XQALERT  

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

Package Total Caller Graph
Text Integration Utility 4 TIUPEVN1  TIUPEVNT  TIURE  TIUSRVE  

Entry Points

Name Comments DBIA/ICR reference
FIELDS(EVNTDA,MSG) ; ---- Log missing/incorrect field errors for
; specific fields in UPLOAD LOG file (#8925.4),
; in multiple fl. TIU*1*81 moved from TIUPEVNT
FLDALRT(EVNTDA,EVNTDA1,ERRMSG) ; ---- Send alerts for missing field errors
; TIU*1*81 moved from TIUPEVNT
FLDISP ; ---- Alert follow-up action for missing field errors
RECDISP(DIC,DA) ; ---- Call DIQ to display the existing record
; TIU*1*81 moved from TIUPEVNT
FIXED(DIC,DA,DR) ; ---- Evaluate whether the field has been filled in
; TIU*1*81 moved from TIUPEVNT
FIXX
FLDRSLV(ERRDA) ; ---- Evaluate missing field errors; mark resolved
; TIU*1*81 moved from TIUPEVNT
WHOGETS(TIUY,TIUTYP) ; ---- Who gets filing error/missing field alerts;
; Get 8925.95 (document parameter) recipients.
; ---- TIUTYP is title IFN in 8925.1 if valid title was uploaded, else
; is IFN of entry from $HDR line: e.g. PROGRESS NOTES
; Starts at initial TIUTYP; goes up hierarchy til it finds entry.
; ---- TIU*1*81 Don't new TIUDAD HERE!

External References

Name Field # of Occurrence
^DIC FIELDS+9
^DIE FIELDS+12, FLDISP+21, FLDRSLV+11
EN^DIQ RECDISP+5
EN^DIQ1 FIXED+4, FLDRSLV+7
SEND^TIUALRT FLDISP+33
$$NOW^TIULC FLDRSLV+11
$$ISADDNDM^TIULC1 FLDALRT+9, FLDISP+25
$$POSTFILE^TIULC1 FLDISP+26
$$REASSIGN^TIULC1 FLDISP+19
WHOGETS^TIUPEVN1 FLDALRT+12
$$DADTYPE^TIUPUTC FLDALRT+9
LINES^TIUSRVPT FLDISP+32
$$READ^TIUU RECDISP+3
SETUP^XQALERT FLDALRT+24

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !," Nothing left to resolve."
  • Line Location: FLDISP+11
Function Call: WRITE
  • Prompt: !!,"You may now enter the correct information:",!
  • Line Location: FLDISP+13
Function Call: WRITE
  • Prompt: !,$P(XQADATA,";"),!
  • Line Location: FLDISP+14
Function Call: WRITE
  • Prompt: !
  • Line Location: RECDISP+4
Routine Call
  • DIC
  • Line Location:
    • FIELDS+9
Routine Call
  • DIE
  • Line Location:
    • FIELDS+12
    • FLDISP+21
    • FLDRSLV+11

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC - [#1] RECDISP+4
^TIU(8925 - [#8925] FLDALRT+7, FLDISP+19, FLDISP+25, FLDISP+30, FIXED+3
^TIU(8925.1 - [#8925.1] WHOGETS+20
^TIU(8925.4 - [#8925.4] FIELDS+7*, FIELDS+12, FLDALRT+5, FLDISP+4, FLDRSLV+5
^TIU(8925.95 - [#8925.95] WHOGETS+10, WHOGETS+15, WHOGETS+17
^TIU(8925.99 - [#8925.99] FLDALRT+15, FLDALRT+16, FLDALRT+17

Label References

Name Line Occurrences
$$FIXED FLDISP+7, FLDISP+34, FLDRSLV+8
FIXX FIXED+3
FLDALRT FIELDS+12
FLDRSLV FLDISP+12, FLDISP+38
RECDISP FLDISP+15
WHOGETS WHOGETS+21

Naked Globals

Name Field # of Occurrence
^(13 FLDISP+30

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA FIELDS+5~, FIELDS+10*, FIELDS+12, FLDISP+2~, FLDISP+5*, FLDISP+7, FLDISP+10, FLDISP+15, FLDISP+18, FLDISP+25
FLDISP+27, FLDISP+30, FLDISP+32, FLDISP+33, FLDISP+34, RECDISP~, FIXED~, FIXED+3, FLDRSLV+6~*, FLDRSLV+8
, FLDRSLV+11*
DA(1 FIELDS+7*, FIELDS+10*
DIC FIELDS+5~*, FIELDS+10, RECDISP~, RECDISP+4*, FIXED~, FLDRSLV+6~*
DIC(0 FIELDS+5*
DIE FIELDS+5~, FIELDS+10*, FLDISP+2~, FLDISP+5*, FLDISP+7, FLDISP+15, FLDISP+16, FLDISP+23, FLDISP+24~, FLDISP+34
, FLDRSLV+10~, FLDRSLV+11*
DIQ RECDISP+2~, FIXED+2~*, FLDRSLV+6~, FLDRSLV+7*
DIQ(0 FIXED+2*
DLAYGO FIELDS+5~, FIELDS+8*
DR FIELDS+5~, FIELDS+11*, FLDISP+2~, FLDISP+6*, FLDISP+7, FLDISP+16, FLDISP+24~, FLDISP+34, RECDISP+2~, FIXED~
, FLDRSLV+6~, FLDRSLV+7*, FLDRSLV+10~, FLDRSLV+11*
DUZ(2 FLDALRT+15
ERRDA FLDRSLV~, FLDRSLV+5, FLDRSLV+6, FLDRSLV+11
ERRMSG FLDALRT~, FLDALRT+20, FLDALRT+22
EVNTDA FIELDS~, FIELDS+5, FIELDS+7, FIELDS+10, FIELDS+12, FLDALRT~, FLDALRT+5, FLDALRT+19, FLDALRT+22, FLDISP+2~
FLDISP+3*, FLDISP+4, FLDISP+12, FLDISP+38
EVNTDA1 FLDALRT~, FLDALRT+5, FLDALRT+19, FLDALRT+22, FLDISP+2~, FLDISP+3*, FLDISP+4
EVNTDA10 FLDALRT+2~, FLDALRT+5*, FLDALRT+6, FLDALRT+7
EVNTREC FLDISP+2~, FLDISP+4*, FLDISP+5, FLDISP+6
MSG FIELDS~
MSG("DIERR" FIELDS+4, FIELDS+6, FIELDS+8, FIELDS+11
NOTE0 FLDALRT+3~, FLDALRT+7*
NOTEDA FLDALRT+3~, FLDALRT+7*, FLDALRT+9
RSLVED FLDRSLV+2~, FLDRSLV+3*, FLDRSLV+5, FLDRSLV+8*, FLDRSLV+9
TIUAU FLDISP+24~, FLDISP+31*, FLDISP+32
TIUD12 FLDISP+24~, FLDISP+30*, FLDISP+31
TIUD13 FLDISP+24~, FLDISP+30*, FLDISP+31
TIUDA FLDISP+17~, FLDISP+18*, FLDISP+19
>> TIUDAD WHOGETS+20*, WHOGETS+21
TIUDUZ WHOGETS+16~, WHOGETS+17*, WHOGETS+18
TIUEBY FLDISP+24~, FLDISP+31*, FLDISP+32
TIUEC FLDISP+24~, FLDISP+31*, FLDISP+32
TIUFIX FLDISP+2~*, FLDISP+7*, FLDISP+8, FLDISP+9, FLDISP+10, FLDISP+34*, FLDISP+35, FIXED+2~, FIXED+4
TIUFLD FLDRSLV+2~, FLDRSLV+7
TIUFLD( FLDRSLV+8
TIUI FIELDS+3~*, FIELDS+4*, FIELDS+6, FIELDS+8, FIELDS+11, FLDALRT+2~, FLDALRT+15*, FLDALRT+16, FLDALRT+17, WHOGETS+6~
, WHOGETS+10*, WHOGETS+13, WHOGETS+15, WHOGETS+17
TIUJ WHOGETS+6~, WHOGETS+14*, WHOGETS+15*, WHOGETS+17
TIUK FLDRSLV+2~, FLDRSLV+3*, FLDRSLV+5*, FLDRSLV+6
TIULINK FLDISP+2~, FLDISP+20*, FLDISP+21
TIUPOST FLDISP+24~, FLDISP+26*, FLDISP+28
TIUREASX FLDISP+17~, FLDISP+19*, FLDISP+20
TIUREC FLDISP+24~
TIUREC("#" FLDISP+27*
TIUREC("TYPE" FLDALRT+11
TIUSUB FLDALRT+2~, FLDALRT+16*, FLDALRT+17
TIUTYP WHOGETS~, WHOGETS+9, WHOGETS+10, WHOGETS+20
TIUY FIXED+2~*, FIXED+3*, FIXED+4*, FIXX, WHOGETS~, WHOGETS+21
TIUY( WHOGETS+18*
TYPE FLDALRT+2~, FLDALRT+7*, FLDALRT+9*, FLDALRT+11*, FLDALRT+12, FLDISP+24~, FLDISP+25*, FLDISP+26
U FIELDS+12, FLDALRT+6, FLDALRT+7, FLDISP+5, FLDISP+6, FLDISP+25, FLDISP+31
X FIELDS+5~, FIELDS+8*, RECDISP+2~, FIXED+2~
XQA FLDALRT+2~, FLDALRT+12, FLDALRT+14, FLDALRT+18
XQA( FLDALRT+17*
XQADATA FLDALRT+2~, FLDALRT+22*, FLDISP+3, FLDISP+14
XQAID FLDALRT+2~, FLDALRT+19*
XQAKILL FLDALRT+2~, FLDISP+12*, FLDISP+35!, FLDISP+36*
XQAMSG FLDALRT+2~, FLDALRT+20*, FLDALRT+21
XQAROU FLDALRT+2~, FLDALRT+23*
Y FIELDS+5~, FIELDS+9, FIELDS+10, RECDISP+2~, FIXED+2~
>> ZTQUEUED FLDALRT+21
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All