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

Package: Text Integration Utility

Routine: TIUPEVNT


Information

TIUPEVNT ; SLC/JER,AJB - Event logger for upload/filer ;Jul 09, 2020@12:07:14

Source Information

Source file <TIUPEVNT.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
Text Integration Utility 9 $$NOW^TIULC  $$FIXCODE^TIULC1  GETTIU^TIULD  SETPARM^TIULE  ($$DATE,$$NAME,$$STRIP)^TIULS  (FIELDS,WHOGETS)^TIUPEVN1  $$WHATITLE^TIUPUTU  $$READ^TIUU  
($$MAKEBUF,FILE)^TIUUPLD  
VA FileMan 3 ^DIC  (,CHK)^DIE  EN^DIWE  
Kernel 1 (DELETEA,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: 11

Package Total Caller Graph
Text Integration Utility 11 TIUCPFIX  TIUFIX1  TIUPEFIX  TIUPUTA  TIUPUTC  TIUPUTC1  TIUPUTD  TIUPUTS  
TIUPUTSX  TIURE  TIUTSK  

Entry Points

Name Comments DBIA/ICR reference
MAIN(BUFDA,ETYPE,ECODE,TIUTYPE,FDA,MSG) ; ---- Controls branching
LOG(BUFDA,ETYPE,ECODE,TIUTYPE,EVNTDA,FDA,MSG) ; ---- Register event in
; TIU UPLOAD LOG file
; (#8925.4)
ERRMSG(ETYPE,ECODE,TIUTYPE,FDA,MSG) ; ---- Set error messages
ERRMSX
ALERT(BUFDA,ERRMSG,EVNTDA) ; ---- Send alerts for filing errors
DISPLAY ; ---- Alert followup action for filing errors
DISPX
WRITEHDR(EVNTDA,TIUTYPE,TIUINQ) ; ---- Write header to screen
VALID(TIULINE,TIUFLD,TIUVALID) ;Is header missing valid Author or DDT?
ALERTDEL(DA) ; ---- Delete alerts associated with a given record
RESOLVE(EVNTDA,ECHO) ; ---- Indicate resolution of error
INQRHELP ; Help for Upload Error Inquire to Patient Record prompt

External References

Name Field # of Occurrence
^DIC LOG+6, LOG+38, ERRMSG+7
^DIE LOG+13, LOG+33, RESOLVE+10
CHK^DIE VALID+2
EN^DIWE DISPLAY+25
$$NOW^TIULC LOG+6, RESOLVE+3
$$FIXCODE^TIULC1 DISPLAY+14
GETTIU^TIULD ERRMSG+11
SETPARM^TIULE DISPLAY+3
$$DATE^TIULS ERRMSG+14
$$NAME^TIULS ERRMSG+12
$$STRIP^TIULS VALID+1
FIELDS^TIUPEVN1 MAIN+8
WHOGETS^TIUPEVN1 ALERT+8
$$WHATITLE^TIUPUTU ALERT+6
$$READ^TIUU DISPLAY+17, DISPLAY+24, DISPLAY+26
$$MAKEBUF^TIUUPLD LOG+21
FILE^TIUUPLD DISPLAY+32
DELETEA^XQALERT ALERTDEL+2
SETUP^XQALERT ALERT+21

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: DISPLAY+17
Function Call: WRITE
  • Prompt: !!,"Filing error resolution code could not be found for this document type.",!,"Please edit the buffered data directly and refile."
  • Line Location: DISPLAY+22
Function Call: WRITE
  • Prompt: !!,"You may now edit the buffered upload data in an attempt to resolve error:",!,$P(XQADATA,";",2),!
  • Line Location: DISPLAY+23
Function Call: WRITE
  • Prompt: !!,"The header of the original, failed record looks like this:",!
  • Line Location: WRITEHDR+7
Function Call: WRITE
  • Prompt: !,TIULINE
  • Line Location: WRITEHDR+9
Function Call: WRITE
  • Prompt: !,"Do you wish to be prompted for the data necessary to resolve the filing error?"
  • Line Location: INQRHELP+1
Function Call: WRITE
  • Prompt: !,"If not, answer NO to proceed and edit the buffered data directly without"
  • Line Location: INQRHELP+2
Function Call: WRITE
  • Prompt: !,"prompts, or enter '^' to come back and resolve the error later."
  • Line Location: INQRHELP+3
Routine Call
  • DIC
  • Line Location:
    • LOG+6
    • LOG+38
    • ERRMSG+7
Routine Call
  • DIE
  • Line Location:
    • LOG+13
    • LOG+33
    • RESOLVE+10
Routine Call
  • DIE
  • Line Location:
    • VALID+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^TIU(8925 - [#8925] CHK^DIE
^TIU(8925.4 - [#8925.4] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TIU(8925.2 - [#8925.2] LOG+5, LOG+18, LOG+24*, LOG+26*!, LOG+27, LOG+29*, LOG+30!, LOG+31*, LOG+35*, ALERT+3
^TIU(8925.4 - [#8925.4] LOG+16*, LOG+18*, LOG+19*, WRITEHDR+8, WRITEHDR+9, RESOLVE+7
^TIU(8925.99 - [#8925.99] ALERT+12, ALERT+13, ALERT+14
^VA(200 - [#200] ALERTDEL+2

Label References

Name Line Occurrences
$$ERRMSG LOG+10
ALERT LOG+42
ALERTDEL DISPLAY+30
DISPX DISPLAY+9, DISPLAY+24
ERRMSX ERRMSG+2, ERRMSG+6, ERRMSG+10
LOG MAIN+6
RESOLVE DISPLAY+21, DISPLAY+31
VALID WRITEHDR+13
WRITEHDR DISPLAY+13

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BUFDA MAIN~, MAIN+6, LOG~, LOG+5, LOG+18, LOG+26, LOG+27, LOG+29, LOG+30, ALERT~
, ALERT+3, ALERT+16, ALERT+19
BUFREC LOG+3~, LOG+5*, LOG+12, ALERT+1~, ALERT+3*
DA LOG+3~, LOG+10*, LOG+13!, LOG+33*, ERRMSG+1~, ERRMSG+11~*, ALERTDEL~, ALERTDEL+1, ALERTDEL+2, RESOLVE+1~
, RESOLVE+5*, RESOLVE+7
DA(1 LOG+36*
DIC LOG+3~, LOG+6*, LOG+10, LOG+36*, LOG+39!, ERRMSG+1~, ERRMSG+7*, DISPLAY+1~, DISPLAY+25*
DIC(0 LOG+6*, LOG+36*, ERRMSG+7*
DIE LOG+3~, LOG+10*, LOG+33*, ERRMSG+1~, RESOLVE+1~, RESOLVE+4*
>> DIRUT DISPLAY+18
DLAYGO LOG+3~, LOG+6*, LOG+35*, LOG+39!
DR LOG+3~, LOG+12*, LOG+33*, RESOLVE+1~, RESOLVE+9*
DT LOG+16, LOG+24
DUZ(2 LOG+12, ALERT+12
DWPK DISPLAY+1~, DISPLAY+25*
ECHO RESOLVE~, RESOLVE+2
ECODE MAIN~, MAIN+6, LOG~, LOG+10, ERRMSG~, ERRMSG+6, ERRMSG+7
ERRMSG LOG+3~, LOG+10*, LOG+12, LOG+41, LOG+43*, ALERT~, ALERT+17, ALERT+19
ETYPE MAIN~, MAIN+6, MAIN+8, LOG~, LOG+10, LOG+12, LOG+14, ERRMSG~, ERRMSG+2, ERRMSG+6
EVNTDA MAIN+1~, MAIN+7*, MAIN+8, LOG~, LOG+10*, LOG+16, LOG+18, LOG+19, LOG+33, LOG+37
, LOG+41, LOG+43*, ALERT~, ALERT+19, DISPLAY+1~, DISPLAY+5*, WRITEHDR~, WRITEHDR+8, WRITEHDR+9, RESOLVE~
, RESOLVE+5
FDA MAIN~, MAIN+2, MAIN+7*, LOG~, LOG+9, LOG+11*, ERRMSG~
FDA(8925 ERRMSG+11
INQUIRE DISPLAY+1~, DISPLAY+17*, DISPLAY+19
MSG MAIN~, MAIN+2, MAIN+9*, LOG~, LOG+9, LOG+11*, ERRMSG~
MSG("DIERR" ERRMSG+10, ERRMSG+16
NEWBUF LOG+3~, LOG+21*, LOG+22, LOG+24, LOG+26, LOG+29, LOG+31, LOG+33, LOG+35, LOG+36
, LOG+42
PRFILERR DISPLAY+2~, DISPLAY+28*
RESCODE DISPLAY+1!, DISPLAY+14*, DISPLAY+16, DISPLAY+19
RESTIME RESOLVE+1~, RESOLVE+3*, RESOLVE+9
RETRY DISPLAY+1~, DISPLAY+26*, DISPLAY+28, DISPLAY+30, DISPLAY+31, DISPLAY+32
TIU ERRMSG+11~, DISPLAY+1~
TIU("EDT" ERRMSG+14
TIU("PID" ERRMSG+14
TIU("PNM" ERRMSG+12
TIUBLIN LOG+23~
TIUBUF DISPLAY+2~, DISPLAY+8*, DISPLAY+25, DISPLAY+30, DISPLAY+32
TIUDAD ALERT+8~
TIUDONE DISPLAY+1!, DISPLAY+9, DISPLAY+21
TIUERMSG LOG+4~, LOG+41*, LOG+42, LOG+43
TIUEVNT DISPLAY+2~, DISPLAY+5*, DISPLAY+9, DISPLAY+13, DISPLAY+21, DISPLAY+31
TIUEVTDA MAIN+1~, MAIN+6, MAIN+7, LOG+4~, LOG+41*, LOG+42, LOG+43
TIUFDA MAIN+1~, MAIN+2*, MAIN+6, MAIN+7, LOG+4~, LOG+9*, LOG+10, LOG+11
TIUFLD WRITEHDR+4~, WRITEHDR+12*, WRITEHDR+13, VALID~, VALID+2
>> TIUFRST LOG+17, LOG+25
>> TIUHDR( ERRMSG+4
>> TIUHDR("TIUTITLE" ERRMSG+13, ALERT+6
>> TIUHSIG LOG+27
TIUI LOG+17, LOG+29*, ALERT+1~, ALERT+12*, ALERT+13, ALERT+14, WRITEHDR+4~, WRITEHDR+6*, WRITEHDR+8*, WRITEHDR+9
, RESOLVE+1~
TIUINQ DISPLAY+2~, DISPLAY+13*, WRITEHDR~, WRITEHDR+14*
>> TIUINST LOG+12
TIUJ LOG+23~, LOG+25*, LOG+26, LOG+27*, LOG+29, LOG+30
TIUK LOG+3~, LOG+17*, LOG+18
TIUL LOG+3~, LOG+17*, LOG+18*, LOG+19, LOG+23~, LOG+25*, LOG+26, LOG+28*, LOG+29, LOG+31
TIULINE WRITEHDR+4~, WRITEHDR+9*, WRITEHDR+10, WRITEHDR+12, WRITEHDR+13, VALID~, VALID+1*, VALID+2
TIUMSG MAIN+1~, MAIN+2*, MAIN+6, MAIN+8, MAIN+9, LOG+4~, LOG+9*, LOG+10, LOG+11
>> TIUPRM0 LOG+17, DISPLAY+3
>> TIUPRM1 DISPLAY+3
>> TIUREC("FILE" ERRMSG+4
>> TIUREC("TYPE" ALERT+7, ALERT+19
TIUSKIP DISPLAY+2~, DISPLAY+9, DISPLAY+18*
TIUSUB ALERT+1~, ALERT+13*, ALERT+14
>> TIUTITLE ERRMSG+3
TIUTYPE MAIN~, MAIN+6, LOG~, LOG+10, LOG+12, ERRMSG~, ERRMSG+3*, ERRMSG+4*, ERRMSG+8, ERRMSG+13*
, ERRMSG+14, DISPLAY+1!, DISPLAY+10*, DISPLAY+13, DISPLAY+14, WRITEHDR~, WRITEHDR+10
TIUVALID WRITEHDR+4~, WRITEHDR+5*, WRITEHDR+11, WRITEHDR+13, WRITEHDR+14, VALID~, VALID+2, VALID+3*
TIUXQA ALERT+2~, ALERT+8*
TYPE ALERT+1~, ALERT+6*, ALERT+7*, ALERT+8
U LOG+12, LOG+17, LOG+19, LOG+31, ERRMSG+8, RESOLVE+7
X LOG+3~, LOG+6*, LOG+37*, ERRMSG+1~, ERRMSG+7*, RESOLVE+1~
XQA ALERT+1~, ALERT+8*, ALERT+11, ALERT+15, ALERTDEL+1~
XQA( ALERT+14*
XQADATA ALERT+1~, ALERT+19*, DISPLAY+5, DISPLAY+8, DISPLAY+10, DISPLAY+23
XQAID ALERT+1~, ALERT+16*, ALERTDEL+1~*, ALERTDEL+2*
XQAKILL ALERT+1~, DISPLAY+1!, ALERTDEL+1~
XQAMSG ALERT+1~, ALERT+17*, ALERT+18
XQAROU ALERT+1~, ALERT+20*
XQX1 DISPX!
Y LOG+3~, LOG+7, LOG+10, ERRMSG+1~, ERRMSG+2*, ERRMSG+8*, ERRMSG+12*, ERRMSG+14*, ERRMSG+16*, ERRMSX
, RESOLVE+1~
Y(0 ERRMSG+8
>> ZTQUEUED ALERT+18
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