LA7HL7 ;DALISC/JRR - Main Driver for incoming HL7 messages ; 12/3/1997
Source file <LA7HL7.m>
| Package | Total | Call Graph |
|---|---|---|
| Automated Lab Instruments | 1 | CREATE^LA7LOG |
| Kernel | 1 | $$NOW^XLFDT |
| VA Fileman | 1 | FILE^DICN |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| REJECT(LA7AR) | ;build a reject segment if the incoming message
|
|
| Z | ;LA7HL7 ;DALISC/JRR - Main Driver for incoming HL7 message
|
|
| ORU | ;Process incoming ORU
|
|
| EXIT | ||
| ORUPUT | ;store incoming message in ^LAHM(62.49,
|
| FileNo | Call Tags |
|---|---|
| ^LAHM(62.49 - [#62.49] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("LPC" | ORU+8 |
| ^HL(772 - [#772] | ORU+3, ORUPUT+19, ORUPUT+21 |
| ^LAHM(62.48 - [#62.48] | ORU+9, ORU+12, ORUPUT+26, ORUPUT+27 |
| ^LAHM(62.49 - [#62.49] | ORUPUT+3, ORUPUT+4, ORUPUT+6, ORUPUT+13, ORUPUT+16*, ORUPUT+21*, ORUPUT+22*, ORUPUT+23 |
| Name | Line Occurrences |
|---|---|
| EXIT | ORU+4, ORU+10, ORU+12 |
| REJECT | ORU+4, ORU+11, ORU+13 |
| Name | Field # of Occurrence |
|---|---|
| ^(1 | ORUPUT+27 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | EXIT! |
| %H | EXIT! |
| %I | EXIT! |
| DD | ORUPUT+7! |
| DIC | ORUPUT+8*, EXIT! |
| DIC("DR" | ORUPUT+10*, ORUPUT+11* |
| DIC(0 | ORUPUT+8* |
| DINUM | ORUPUT+9*, EXIT! |
| DO | ORUPUT+7! |
| DT | ORUPUT+22 |
| DTOUT | EXIT! |
| DUOUT | EXIT! |
| >> HLDA | ORU+3, ORUPUT+19, ORUPUT+21 |
| >> HLFS | ORUPUT+24, REJECT+7 |
| >> HLMID | ORUPUT+24, REJECT+7 |
| >> HLSDATA(2 | ORUPUT+24*, REJECT+7* |
| LA7 | ORU+7*, ORUPUT+19*, ORUPUT+20, ORUPUT+21, EXIT! |
| LA71 | ORUPUT+18*, ORUPUT+20*, ORUPUT+22, EXIT! |
| LA76248 | ORU+9*, ORU+10, ORU+12, ORUPUT+10, ORUPUT+26, ORUPUT+27, EXIT! |
| LA76249 | ORUPUT+5*, ORUPUT+6, ORUPUT+16, ORUPUT+21, ORUPUT+22, ORUPUT+23, EXIT! |
| LA7AR | EXIT!, REJECT~, REJECT+7 |
| LA7CFIG | ORU+6*, ORU+7*, ORU+8, ORU+9, EXIT+1! |
| LA7DTIM | ORUPUT+1*, ORUPUT+10, EXIT+1! |
| LA7FS | ORU+5*, ORU+7, ORUPUT+15, EXIT+1! |
| LA7MSH | ORU+3*, ORU+4, ORU+5, ORU+7, ORUPUT+15*, ORUPUT+16, EXIT+1! |
| LA7TYPE | ORU+2*, EXIT+1! |
| X | ORU+1~, ORU+8*, ORUPUT+4*, ORUPUT+5, ORUPUT+9, EXIT+1! |
| Y | ORU+1~, ORU+9, EXIT+1! |