HLCSHDR ; ALB/MFK,JRP - Make HL7 header from a #772 IEN ;05/31/2000 08:59 [ 04/02/2003 8:38 AM ]
Source file <HLCSHDR.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
PIDCK(IEN101) | ; This subroutine added by HL*1.6*80
; Given 101's IEN, return the PROCESSING ID. (See PID^HLCSHDR ; and PID^HLCSHDR1 for other locations where HLPID is set.) ; HLPARAM -- req |
|
HEADER(IEN,HLERROR) | ; Create an HL7 MSH segment
|
|
PID | ;Processing ID
|
|
MID | ;Message ID
|
|
HDR23 | ;generate extended facility field info based on 'facility required'
|
|
BHSHDR(IEN) | ; Create Batch Header Segment
; The BHS has 12 segments, of which 4 are blank. ; INPUT: IEN - IEN of entry in file #772 ; OUTPUT: HLHDR(1) and HLHDR(2) - the two lines with the 12 segs. ; ready for adding to a message directly. |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^HL(772 - [#772] | HEADER+18, HEADER+26, HEADER+30, PID+13, BHSHDR+8, BHSHDR+11, BHSHDR+45, BHSHDR+51, BHSHDR+52, BHSHDR+56 , HDR23+11 |
^ORD(101 - [#101] | HDR23+5, HDR23+6, PIDCK+4 |
Name | Line Occurrences |
---|---|
$$PIDCK | BHSHDR+45 |
HDR23 | PID+8 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ACCACK | HEADER+21~, HEADER+80*, PID+14 |
ACKMID | BHSHDR+5~, BHSHDR+49*, BHSHDR+51*, BHSHDR+54, BHSHDR+58 |
ACKTO | HEADER+22~, HEADER+55*, HEADER+67, HEADER+77, BHSHDR+5~, BHSHDR+35*, BHSHDR+36, BHSHDR+41, BHSHDR+50, BHSHDR+51 , BHSHDR+52, BHSHDR+56, HDR23+9, HDR23+11 |
APPACK | HEADER+21~, HEADER+81*, PID+14 |
APPPRM | HEADER+20~, BHSHDR+5~ |
APPPRM( | HEADER+40, HEADER+41, HEADER+43, HEADER+44, HEADER+46, HEADER+48, HEADER+49, BHSHDR+19, BHSHDR+20, BHSHDR+22 , BHSHDR+24, BHSHDR+26, BHSHDR+28 |
BC | BHSHDR+5~ |
BCD | BHSHDR+5~, BHSHDR+31*, BHSHDR+58 |
BCI | BHSHDR+5~ |
BEC | BHSHDR+5~, BHSHDR+20*, BHSHDR+43, BHSHDR+46, BHSHDR+56, BHSHDR+58 |
BFS | BHSHDR+5~, BHSHDR+19*, BHSHDR+58 |
BN | BHSHDR+5~, BHSHDR+46*, BHSHDR+58 |
BRA | BHSHDR+5~, BHSHDR+26*, BHSHDR+58 |
BRF | BHSHDR+5~, BHSHDR+28*, BHSHDR+58 |
BS | BHSHDR+5~, BHSHDR+33*, BHSHDR+58 |
BSA | BHSHDR+5~, BHSHDR+22*, BHSHDR+58 |
BSF | BHSHDR+5~, BHSHDR+24*, BHSHDR+58 |
BSTATUS | BHSHDR+6~, BHSHDR+52*, BHSHDR+56 |
BTACK | BHSHDR+6~, BHSHDR+49*, BHSHDR+53*, BHSHDR+55*, BHSHDR+56*, BHSHDR+58 |
CHILD | HEADER+22~, HEADER+26*, HEADER+27, HEADER+28, HEADER+34, HEADER+77, HEADER+78, BHSHDR+6~, BHSHDR+8*, BHSHDR+9 , BHSHDR+14, BHSHDR+36 |
CLIENTP | HEADER+20~, HEADER+34*, HEADER+35, HEADER+37, HEADER+43, HEADER+44, BHSHDR+6~, BHSHDR+14*, BHSHDR+15, BHSHDR+18 , BHSHDR+26, BHSHDR+28 |
CLNTAPP | HEADER+22~, HEADER+43*, PID+10 |
CLNTFAC | HEADER+22~, HEADER+44*, PID+10, HDR23+4*, HDR23+15*, HDR23+17 |
CNTRY | HEADER+22~, HEADER+46*, PID+14 |
EC | HEADER+21~, HEADER+49*, HEADER+50*, HEADER+70, HEADER+72, PID+10 |
FS | HEADER+20~, HEADER+48*, HEADER+51*, PID+10, PID+11, PID+12, PID+13, PID+14 |
HLDATE | HEADER+21~, HEADER+83*, HEADER+84*, PID+11, BHSHDR+6~, BHSHDR+29*, BHSHDR+31 |
HLDTID | HEADER+21~, BHSHDR+6~ |
HLEP773 | HDR23+3~, HDR23+5*, HDR23+7, HDR23+16 |
HLERROR | HEADER~, HEADER+18*, HEADER+27*, HEADER+29*, HEADER+33*, HEADER+35*, HEADER+69*, PID+5*, BHSHDR+42*, BHSHDR+45 , PIDCK+8* |
>> HLFS | HDR23+13*, HDR23+14 |
>> HLHDR(1 | PID+10*, PID+11*, PID+12*, PID+16, PID+17*, PID+21, PID+22*, BHSHDR+10*, BHSHDR+13*, BHSHDR+15* , BHSHDR+58* |
>> HLHDR(2 | PID+13*, PID+16, PID+17, PID+18*, PID+21, PID+22, PID+23*, PID+25, PID+26*, PID+29! |
>> HLHDR(3 | PID+14*, PID+18, PID+19*, PID+25, PID+26, PID+27*, PID+30! |
HLID | HEADER+21~, MID+1*, PID+11, BHSHDR+30*, BHSHDR+58 |
>> HLOGLINK | BHSHDR+36 |
HLPARAM | HEADER+22~, HEADER+24*, PID+4, PIDCK+6~*, PIDCK+7 |
HLPID | PID+3*, PID+4*, PID+5, PID+12, BHSHDR+6~, BHSHDR+45*, BHSHDR+46, PIDCK+4*, PIDCK+5, PIDCK+7* , PIDCK+8, PIDCK+9 |
HLPROT | HEADER+22~, HEADER+61*, HEADER+76* |
HLPROTS | HEADER+22~, HEADER+78*, HDR23+5, HDR23+6 |
HLS773 | HDR23+3~, HDR23+6*, HDR23+7, HDR23+17 |
ID | HEADER+21~, BHSHDR+6~ |
IEN | HEADER~, HEADER+17*, HEADER+18, HEADER+26, BHSHDR~, BHSHDR+8 |
IEN101 | PIDCK~, PIDCK+4 |
MSGTYPE | HEADER+20~, HEADER+67*, HEADER+69, HEADER+70*, HEADER+72*, PID+11, BHSHDR+41*, BHSHDR+42, BHSHDR+43*, BHSHDR+46 |
PARENT | HEADER+20~, HEADER+30*, HEADER+32, HEADER+55, HEADER+61, HEADER+76, HEADER+83, MID+1, PID+7, PID+13 , BHSHDR+6~, BHSHDR+11*, BHSHDR+12, BHSHDR+29, BHSHDR+30, BHSHDR+33, BHSHDR+35, BHSHDR+36 |
PARENTP | HEADER+20~, HEADER+28*, HEADER+29, HEADER+30, BHSHDR+6~, BHSHDR+9*, BHSHDR+10, BHSHDR+11 |
PROT | HEADER+20~, HEADER+61*, HEADER+64, HEADER+76*, HEADER+77*, HEADER+79, BHSHDR+36*, BHSHDR+40, BHSHDR+45 |
PROTOCOL | HEADER+20~, HEADER+64*, HEADER+67, HEADER+69, HEADER+70, HEADER+72, HEADER+79*, HEADER+80, HEADER+81, PID+3 , PID+12 |
RBCI | BHSHDR+7~ |
>> RECFAC | HDR23+14*, HDR23+15 |
SECURITY | HEADER+21~, PID+7*, PID+11 |
>> SENDFAC | HDR23+14*, HDR23+15 |
SERAPP | HEADER+21~, HEADER+40*, PID+10 |
SERFAC | HEADER+21~, HEADER+41*, PID+10, HDR23+4*, HDR23+15*, HDR23+16 |
SERVERP | HEADER+20~, HEADER+32*, HEADER+33, HEADER+38, HEADER+40, HEADER+41, HEADER+46, HEADER+48, HEADER+49, BHSHDR+7~ , BHSHDR+12*, BHSHDR+13, BHSHDR+17, BHSHDR+19, BHSHDR+20, BHSHDR+22, BHSHDR+24 |
U | PID+4, BHSHDR+42, BHSHDR+43, BHSHDR+45, BHSHDR+46, HDR23+6, PIDCK+4, PIDCK+7 |
>> X | BHSHDR+40*, BHSHDR+41, BHSHDR+42, BHSHDR+43, BHSHDR+46, HDR23+11*, HDR23+12, HDR23+13, HDR23+14 |