DGPFHLT3 ;SHRPE/YMG - PRF HL7 QBP/RSP PROCESSING ; 05/02/18
Source file <DGPFHLT3.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; entry point
; called from EN^DGPFHLT1, uses ^TMP("DGPFHLT1,$J") work global created there. |
|
| ENX | ; exit point
|
|
| FNDLOG(REQID) | ; find log entry (file 26.22) for a given query id
; REQID - query id to look for ; Returns ien in file 26.22 on success, 0 otherwise |
|
| SENDERR(MSGID,SNDFAC,DGECODE,DGERR) | ; send Mailman notification for an error
|
|
| UPDLOG(IENS,DGERR,DATA,DGFERR) | ; update log entry in file 26.22
; only updates fields .05,.06,.07,and 1 |
|
| NORESPDT(DFN,FLAG,RDT) | ; update review date/time of "NO RESPONSE" entries in file 26.22
; DFN - patient DFN ; FLAG - flag ien in file 26.15 ; RDT - review date/time to use in internal FM format |
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | FIND1^DIC |
| ^DGPF(26.15 - [#26.15] | FIND1^DIC |
| ^DGPF(26.22 - [#26.22] | GETS^DIQ |
