PSSHLU ;BIR/RLW-UTILITIES USED IN BUILDING HL7 SEGMENTS ;11/14/96
Source file <PSSHLU.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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| INIT | ; set up HL7 application variables
|
|
| SEGMENT(LIMIT) | ;
|
|
| CALL(HLEVN) | ; call DHCP HL7 package -or- protocol, to pass Orders
; HLEVN = number of segments in message |
|
| MF(HLEVN) | ; call DHCP HL7 -or- protocol, to pass Master File transactions
; HLEVN = number of segments in message |
|
| SCH(HLEVN) | ||
| USAGE(POI) | ;
|
|
| IVFLAG | ;
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(4 - [#4] | INIT+3 |
| ^PS(50.7 - [#50.7] | USAGE+2, USAGE+3 |
| ^PS(52.6 - [#52.6] | USAGE+8, USAGE+10 |
| ^PS(52.7 - [#52.7] | USAGE+12, USAGE+14 |
| ^PSDRUG - [#50] | USAGE+4, USAGE+5 |
| ^PSDRUG("A526" | USAGE+7 |
| ^PSDRUG("A527" | USAGE+11 |
| ^TMP("HLS" | INIT+3*, SEGMENT+7*, SEGMENT+8* |
| ^XMB(1 - [#4.3] | INIT+3 |
| Name | Line Occurrences |
|---|---|
| IVFLAG | USAGE+2 |
| Name | Field # of Occurrence |
|---|---|
| ^("I" | USAGE+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DT | USAGE+4, USAGE+8, USAGE+12 |
| >> FIELD( | SEGMENT+2, SEGMENT+3, SEGMENT+4, SEGMENT+5, SEGMENT+6 |
| HLEVN | CALL~, MF~, SCH~ |
| I | USAGE+1~*, USAGE+3*, USAGE+5*, IVFLAG+1* |
| >> J | SEGMENT+1*, SEGMENT+2, SEGMENT+3, SEGMENT+4, SEGMENT+5, SEGMENT+6, SEGMENT+8* |
| LIMIT | SEGMENT~, SEGMENT+1 |
| >> MSG | CALL+3*, CALL+4, MF+3*, MF+4, SCH+1*, SCH+2 |
| POI | USAGE~, USAGE+2, USAGE+3 |
| >> PSJCLEAR | INIT+4* |
| >> PSJI | INIT+2*, INIT+3, SEGMENT+7*, SEGMENT+8 |
| PSSDDINX | USAGE+1~, USAGE+3*, USAGE+4, USAGE+5, USAGE+7, USAGE+11 |
| PSSHINST | INIT+3*! |
| PSSOAD | USAGE+6~, USAGE+7*, USAGE+8, USAGE+10 |
| PSSOSD | USAGE+6~, USAGE+11*, USAGE+12, USAGE+14 |
| SEGLENGT | SEGMENT+1~, SEGMENT+3*, SEGMENT+4, SEGMENT+6 |
| >> SEGMENT( | SEGMENT+1*, SEGMENT+2*, SEGMENT+3, SEGMENT+4*, SEGMENT+5*, SEGMENT+6*, SEGMENT+8 |
| >> SEGMENT(0 | SEGMENT+7 |
| SUBSEG | SEGMENT+1~*, SEGMENT+2, SEGMENT+3, SEGMENT+4, SEGMENT+5*, SEGMENT+6* |
| USAGE | USAGE+1~, USAGE+5*, IVFLAG+1*, IVFLAG+2 |
| USAGE( | USAGE+1*, USAGE+5*, IVFLAG+1 |
| USAGE("A" | USAGE+10* |
| USAGE("B" | USAGE+14* |
| USAGE("I" | USAGE+9*, USAGE+13* |
| USAGE("V" | USAGE+9*, USAGE+13* |
