TIUPEVN1 ; SLC/JER - Event logger Cont'd ;05/20/10 14:09
Source file <TIUPEVN1.m>
Package | Total | Caller Graph |
---|---|---|
Text Integration Utility | 4 | TIUPEVN1 TIUPEVNT TIURE TIUSRVE |
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 |
|
FIXX | ||
FLDISP | ; ---- Alert follow-up action for missing field errors
|
|
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! |
|
FIXED(DIC,DA,DR) | ; ---- Evaluate whether the field has been filled in
; TIU*1*81 moved from TIUPEVNT |
|
FLDRSLV(ERRDA) | ; ---- Evaluate missing field errors; mark resolved
; TIU*1*81 moved from TIUPEVNT |
|
RECDISP(DIC,DA) | ; ---- Call DIQ to display the existing record
; TIU*1*81 moved from TIUPEVNT |
|
FLDALRT(EVNTDA,EVNTDA1,ERRMSG) | ; ---- Send alerts for missing field errors
; TIU*1*81 moved from TIUPEVNT |
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 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
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 |
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 |
Name | Field # of Occurrence |
---|---|
^(13 | FLDISP+30 |
>> | 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 |