DGPFHLT4 ;SHRPE/YMG - PRF HL7 QBP/RSP PROCESSING ; 05/02/18
Source file <DGPFHLT4.m>
| Package | Total | Call Graph |
|---|---|---|
| Health Level Seven | 1 | GENACK^HLMA1 |
| Registration | 1 | $$ENCHL7^DGPFHLUT |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SEND(MSGID,DGMERR) | ; entry point
; MSGID - HL7 message id to send ACK for ; DGMERR - error message to include in MSA segment |
|
| MSA() | ; create MSA segment
|
|
| SAVESEG(SEGCNT,SEG) | ; save created segment in ^TMP global
; SEGCNT - current segment count ; SEG - segment to save |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP("HLA" | SEND+5!, SEND+11!, SAVESEG+5* |
| Name | Line Occurrences |
|---|---|
| $$MSA | SEND+8 |
| $$SAVESEG | SEND+8 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DGHLRSLT | SEND+4~, SEND+10 |
| DGMERR | SEND~, MSA+2, MSA+4 |
| >> HL("EID" | SEND+10 |
| >> HL("EIDS" | SEND+10 |
| >> HLFS | MSA+2, MSA+3, MSA+4, MSA+5 |
| >> HLMTIENS | SEND+10 |
| MSGID | SEND~, MSA+3 |
| SEG | MSA+1~, MSA+2*, MSA+3*, MSA+4*, MSA+5*, MSA+6, SAVESEG~, SAVESEG+5 |
| SEGCNT | SEND+4~, SEND+7*, SEND+8*, SAVESEG~, SAVESEG+4*, SAVESEG+5, SAVESEG+6 |