TIUPUTC1 ; SLC/JER,AJB - Document filer Cont'd - captioned header ;Jul 09, 2020@12:06:28
Source file <TIUPUTC1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETREC(HEADER,RECORD,TIUHDR) | ; ---- Look-up/create record (if LAYGO allowed)
|
|
| FAIL | ; Log Filing Error
; ---- If lookup fails, log 8925.4 error w/ hdr info. Create new ; 8925.2 buffer entry with hdr, text, & 8925.4 log #. ; Kill most of old buffer. Send file error alerts: |
|
| DICTDT(DATE) | ;TEST** -- Returns 1 if Discharge Summary's Dictation Date is in the future, 0 otherwise
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^TIU(8925 - [#8925] | CHK^DIE |