DGPFHLT2 ;SHRPE/YMG - PRF HL7 QBP/RSP PROCESSING ; 05/02/18
Source file <DGPFHLT2.m>
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 |
Package | Total | Caller Graph |
---|---|---|
Registration | 2 | DGPFHLT1 DGPFTR1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
SEND(DGMERR,DATA) | ; entry point
; DATA - Array of values to file (see tag EN^DGPFHLT1) ; DGMERR - error message to include in MSA segment |
|
QAK() | ; create QAK segment
|
|
QPD() | ; create QPD segment
|
|
NTE() | ; create NTE segment
|
FileNo | Call Tags |
---|---|
^DGPF(26.15 - [#26.15] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGPF(26.22 - [#26.22] | SEND+22 |
^TMP("HLS" | SEND+6!, SEND+41! |
Name | Line Occurrences |
---|---|
$$NTE | SEND+16 |
$$QAK | SEND+14 |
$$QPD | SEND+15 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DATA | SEND~ |
DATA("DFN" | SEND+40 |
DATA("FLAG" | SEND+40, QPD+5 |
DATA("ICN" | QPD+4 |
DATA("MSGID" | SEND+28 |
DATA("ORIGOWN" | NTE+6 |
DATA("QOK" | QAK+3 |
DATA("REQDTM" | SEND+22 |
DATA("REQID" | QAK+2, QPD+3 |
DATA("REVBY" | QPD+7 |
DATA("REVCMT" | NTE+3 |
DATA("REVDTM" | SEND+40, QPD+8 |
DATA("REVRES" | NTE+3 |
DATA("SENDTO" | SEND+8 |
DGERR | SEND+4~, SEND+31 |
DGERR("DIERR" | SEND+34, SEND+35 |
DGFDA | SEND+4~ |
DGFDA( | SEND+23*, SEND+24* |
DGHLRSLT | SEND+4~, SEND+18, SEND+19, SEND+24, SEND+29, SEND+30, SEND+37 |
DGMERR | SEND~ |
ERTXT | SEND+4~, SEND+37 |
ERTXT(1 | SEND+27* |
ERTXT(2 | SEND+28* |
ERTXT(3 | SEND+29* |
ERTXT(4 | SEND+30* |
ERTXT(5 | SEND+32* |
ERTXT(6 | SEND+33* |
ERTXT(7 | SEND+34* |
ERTXT(8 | SEND+35* |
HL | SEND+5~, SEND+10 |
HL("ECH" | SEND+11 |
HL("FS" | SEND+11 |
HLCMP | SEND+5~, SEND+11*, QAK+4, QPD+2, NTE+6 |
HLECH | SEND+5~, SEND+11* |
HLFS | SEND+5~, SEND+11*, QAK+2, QAK+3, QAK+4, QAK+5, QPD+2, QPD+3, QPD+4, QPD+6 , QPD+7, QPD+8, QPD+9, NTE+2, NTE+4, NTE+5, NTE+7, NTE+8 |
HLL | SEND+5~ |
HLL("LINKS" | SEND+8* |
HLREP | SEND+5~, SEND+11*, NTE+3 |
HLSCMP | SEND+5~, SEND+11*, NTE+6 |
IENS | SEND+4~, SEND+22*, SEND+23, SEND+24, QPD+1~, QPD+5*, QPD+6 |
NAME | NTE+1~ |
SEG | QAK+1~, QAK+2*, QAK+3*, QAK+4*, QAK+5*, QAK+6, QPD+1~, QPD+2*, QPD+3*, QPD+4* , QPD+6*, QPD+7*, QPD+8*, QPD+9*, QPD+10, NTE+1~, NTE+2*, NTE+4*, NTE+5*, NTE+7* , NTE+8*, NTE+9 |
SEGCNT | SEND+4~, SEND+13*, SEND+14*, SEND+15*, SEND+16* |
U | SEND+8, SEND+19, SEND+24, SEND+29, SEND+30, SEND+37 |
Z | NTE+1~, NTE+3*, NTE+4, NTE+6*, NTE+7 |