©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
BLRHL7 ;cmi/anch/maw - Main Driver for incoming HL7 messages 12/3/1997 ; 22-Oct-2013 09:22 ; MAW
Source file <BLRHL7.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(HLDA) | ;EP - 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+9 |
| ^INTHU - [#4001] | ORU+3, ORUPUT+21, ORUPUT+22 |
| ^LAHM(62.48 - [#62.48] | ORU+10, ORU+13, ORUPUT+29, ORUPUT+30, ORUPUT+37, ORUPUT+38 |
| ^LAHM(62.49 - [#62.49] | ORUPUT+3, ORUPUT+4, ORUPUT+6, ORUPUT+13, ORUPUT+16*, ORUPUT+28*, ORUPUT+30*, ORUPUT+33*, ORUPUT+34 |
| Name | Line Occurrences |
|---|---|
| EXIT | ORU+4, ORU+11, ORU+13 |
| REJECT | ORU+4, ORU+12, ORU+14 |
| Name | Field # of Occurrence |
|---|---|
| ^(1 | ORUPUT+38 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | EXIT! |
| %H | EXIT! |
| %I | EXIT! |
| >> BLRLEN | ORUPUT+24*, ORUPUT+25 |
| BLRSEG | ORUPUT+22*, ORUPUT+23*, ORUPUT+24, ORUPUT+25, ORUPUT+26*, ORUPUT+28, ORUPUT+32, EXIT+1! |
| BLRSEGF | ORUPUT+20*, ORUPUT+26, ORUPUT+31*, ORUPUT+32*, EXIT+1! |
| 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+33 |
| DTOUT | EXIT! |
| DUOUT | EXIT! |
| HLDA | ORU~, ORU+3, ORUPUT+21, ORUPUT+22 |
| LA7 | ORU+7*, ORUPUT+21*, ORUPUT+22, EXIT! |
| LA71 | ORUPUT+19*, ORUPUT+27*, ORUPUT+28, ORUPUT+29*, ORUPUT+30, ORUPUT+33, EXIT! |
| LA76248 | ORU+10*, ORU+11, ORU+13, ORUPUT+10, ORUPUT+29, ORUPUT+30, ORUPUT+37, ORUPUT+38, EXIT! |
| LA76249 | ORUPUT+5*, ORUPUT+6, ORUPUT+16, ORUPUT+28, ORUPUT+30, ORUPUT+33, ORUPUT+34, EXIT! |
| LA7AR | EXIT!, REJECT~ |
| LA7CFIG | ORU+6*, ORU+7*, ORU+8*, ORU+9, ORU+10, 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! |
| U | ORUPUT+29, ORUPUT+30 |
| X | ORU+1~, ORU+9*, ORUPUT+4*, ORUPUT+5, ORUPUT+9, EXIT+1! |
| Y | ORU+1~, ORU+10, EXIT+1! |