TIUPEVNT ; SLC/JER,AJB - Event logger for upload/filer ;Sep 18, 2021@22:54:45
Source file <TIUPEVNT.m>
| 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
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^TIU(8925 - [#8925] | CHK^DIE |
| ^TIU(8925.4 - [#8925.4] | Classic Fileman Calls |