New post
Question
· Mar 5

HL7 search and replace and adding extra carriage return/line feed after a segment - resolved

#HL7 #Ensemble #Health Connect

Sample with multiple Items;

 

MSH|^~\&|GMRC IF CONSULT|XXX^XXXXX^DNS|GMRC IF CONSULT|YYY^^DNS|20250123175341+0000|CRNR|ORM^O01^ORM_O01|Q5808332894T6790522104|T|2.3|||State|State|USA

PID|1||1013570973V041977^^^ICN^ID~1110106796^^^EDIPI^EDIPI||PROSTEST^EHR||19760902|M||||||||||129256619|678235672

ORC|NW|15207778763^XXX^GMRCIFR|||||^^^20250123175300+0000^^R||20250123175331+0000|XXX8051652^PCP1^Physician||XXX8051652^PCP1^Physician|||20250123175341+0000||YYY

OBR|1|15207778763^XXX^GMRCIFR||YYY^PROSTHETICS IFC^757Office1235||20250123175300+0000||||||||||XXX8051652^PCP1^Physician|||Implant Usage (PSAS)||||||||^^^20250123175300+0000

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|1|Implant Usage (PSAS)||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|2|REASON FOR REQUEST: Item Number: 00801741016608||||||O   <<<< Remove ALL instances of “REASON FOR REQUEST:”

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|3|REASON FOR REQUEST:      Transaction Date/Time: 01/22/2025 17:45||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|4|REASON FOR REQUEST:      Station Number: 757||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|5|REASON FOR REQUEST:      Item Description: Plug Surgical 1.3in Groin Monofilament ||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|6|REASON FOR REQUEST: Nonabsorbable Perfix Polypropylene Medium Taper 1.55in Sterile Hernia ||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|7|REASON FOR REQUEST: Repair 0112760||||||O

………… continued

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|128|REASON FOR REQUEST: Item Number: 00380650697127||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|129|REASON FOR REQUEST:      Transaction Date/Time: 01/23/2025 16:10||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|130|REASON FOR REQUEST:      Station Number: 757||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|131|REASON FOR REQUEST:      Item Description: Lens SP PmmA 5.25x12.0mm (5) +13.0D||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|132|REASON FOR REQUEST:      Manufact urer: ALCON||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|133|REASON FOR REQUEST:      Manufacturer Model Number: LX10BD 13.0||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|134|REASON FOR REQUEST:      HCPCS:||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|135|REASON FOR REQUEST:      Lot Number: 01232025||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|136|REASON FOR REQUEST:      Expiration Date/Time: 02/28/2025 05:00||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|137|REASON FOR REQUEST:      Serial Number: 01232025||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|138|REASON FOR REQUEST:      Source: 757-TrackCore Inv||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|139|REASON FOR REQUEST:      Used Quantity:           0||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|140|REASON FOR REQUEST:      Waste Quantity:           0||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|141|REASON FOR REQUEST:      Unit Cost:           0.00||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|142|REASON FOR REQUEST:      Total Cost:           0.00      <<<<<<||||||O     Add a line break but only on messages with multiple “Item Number:”.

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|143|Special Instructions: ||||||O

OBX|2|CE|^PROVISIONAL DIAGNOSIS|1|R52^Pain, unspecified^I10||||||O

NTE|P|UCID:757_15207778763

 

Req 1

Add line breaks to OBX 5 segment with  Prosthetics orders contains "Issued in Clinic (PSAS)" OR "Implant Usage (PSAS)" with multiple items but Not messages with only one Item

Example

 

 

Req 2

Remove repeating text "REASON FOR REQUEST:" in OBX 5, with Prosthetics orders contains "Issued in Clinic (PSAS)" OR "Implant Usage (PSAS)".

Description: If PSAS order type is "Implant Usage (PSAS)" OR PSAS Order type is "Issued in Clinic (PSAS)" then remove string "REASON FOR REQUEST:" from OBX-5 fields where string "REASON FOR REQUEST:" is found.

Product version: IRIS 2021.2
Discussion (15)3
Log in or sign up to continue
Clayton Lewis · Mar 5

If I'm reading this right, you need to modify the text you're receiving in OBX-5.

If that's the case, this documentation link should help.  It'll show you how to extract the content from OBX-5 to a Stream object, and save the modified text back into the HL7 Message.

https://docs.intersystems.com/healthconnect20251/csp/docbook/DocBook.UI....

This one will help with processing the text using Stream objects.

https://docs.intersystems.com/healthconnect20251/csp/docbook/DocBook.UI....

I think the general approach would be:

  1. Use a method like GetFieldStreamRaw() or GetFieldStreamBase64() to extract the content from your HL7 message to a Stream object.
  2. Read through the stream applying your rules and write modified text to a new output stream.
  3. Use a method like StoreFieldStreamRaw() or StoreFieldStreamBase64() to replace the original content with your edited version.
1 0
Clayton Lewis · Mar 7

What part are you finding overly complicated?  If the text embedded within OBX-5 isn't too large you could treat it as a String rather than Stream, but I don't think that saves you much.  Am I even correct that you're trying to modify unstructured text?  In re-reading this it looks like maybe some of the criteria are in structured fields, e.g., Order Type. Can you give an example of input and desired output?

0 0
Gary M Lusso · Mar 8

Ok, I regrouped my criteria.

Sub question: is there a website of consultants that I can hire. I used o use SourceForge.

Example message with requirements Note: If only one item, don't add carriage return after line with Total Cost:

Sample with multiple Items;

MSH|^~\&|GMRC IF CONSULT|XXX^XXXXX^DNS|GMRC IF CONSULT|YYY^^DNS|20250123175341+0000|CRNR|ORM^O01^ORM_O01|Q5808332894T6790522104|T|2.3|||State|State|USA

PID|1||1013570973V041977^^^ICN^ID~1110106796^^^EDIPI^EDIPI||PROSTEST^EHR||19760902|M||||||||||129256619|678235672

ORC|NW|15207778763^XXX^GMRCIFR|||||^^^20250123175300+0000^^R||20250123175331+0000|XXX8051652^PCP1^Physician||XXX8051652^PCP1^Physician|||20250123175341+0000||YYY

OBR|1|15207778763^XXX^GMRCIFR||YYY^PROSTHETICS IFC^757Office1235||20250123175300+0000||||||||||XXX8051652^PCP1^Physician|||Implant Usage (PSAS)||||||||^^^20250123175300+0000

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|1|Implant Usage (PSAS)||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|2|REASON FOR REQUEST: Item Number: 00801741016608||||||O   <<<< Remove ALL instances of “REASON FOR REQUEST:”

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|3|REASON FOR REQUEST:      Transaction Date/Time: 01/22/2025 17:45||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|4|REASON FOR REQUEST:      Station Number: 757||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|5|REASON FOR REQUEST:      Item Description: Plug Surgical 1.3in Groin Monofilament ||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|6|REASON FOR REQUEST: Nonabsorbable Perfix Polypropylene Medium Taper 1.55in Sterile Hernia ||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|7|REASON FOR REQUEST: Repair 0112760||||||O

………… continued

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|128|REASON FOR REQUEST: Item Number: 00380650697127||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|129|REASON FOR REQUEST:      Transaction Date/Time: 01/23/2025 16:10||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|130|REASON FOR REQUEST:      Station Number: 757||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|131|REASON FOR REQUEST:      Item Description: Lens SP PmmA 5.25x12.0mm (5) +13.0D||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|132|REASON FOR REQUEST:      Manufact urer: ALCON||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|133|REASON FOR REQUEST:      Manufacturer Model Number: LX10BD 13.0||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|134|REASON FOR REQUEST:      HCPCS:||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|135|REASON FOR REQUEST:      Lot Number: 01232025||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|136|REASON FOR REQUEST:      Expiration Date/Time: 02/28/2025 05:00||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|137|REASON FOR REQUEST:      Serial Number: 01232025||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|138|REASON FOR REQUEST:      Source: 757-TrackCore Inv||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|139|REASON FOR REQUEST:      Used Quantity:           0||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|140|REASON FOR REQUEST:      Waste Quantity:           0||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|141|REASON FOR REQUEST:      Unit Cost:           0.00||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|142|REASON FOR REQUEST:      Total Cost:           0.00      <<<<<<||||||O     Add a line break but only on messages with multiple “Item Number:”.

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|143|Special Instructions: ||||||O

OBX|2|CE|^PROVISIONAL DIAGNOSIS|1|R52^Pain, unspecified^I10||||||O

NTE|P|UCID:757_15207778763

Req 1

Add line breaks to OBX 5 segment with  Prosthetics orders contains "Issued in Clinic (PSAS)" OR "Implant Usage (PSAS)" with multiple items but Not messages with only one Item

Example

Req 2

Remove repeating text "REASON FOR REQUEST:" in OBX 5, with Prosthetics orders contains "Issued in Clinic (PSAS)" OR "Implant Usage (PSAS)".

Description: If PSAS order type is "Implant Usage (PSAS)" OR PSAS Order type is "Issued in Clinic (PSAS)" then remove string "REASON FOR REQUEST:" from OBX-5 fields where string "REASON FOR REQUEST:" is found.

0 0
Gary M Lusso · Mar 10

Here is the Production process code.

Method FromCerner(pRequest As EnsLib.HL7.Message) As %Status
{
               ; for all messages coming from Cerner to VistA
               #dim tStatus As %Status = $$$OK
               #dim eException As %Exception.AbstractException
               Set tMessageType = pRequest.GetValueAt("MSH:9.1")
               Try {
                              Set tMessageSubType = pRequest.GetValueAt("ORCgrp(1).ORC:1")
                              If tMessageSubType = "RE"
                              {
                                             // For disassociated documents (tResultType="D"), delete from EHRM Edge, remove all OBX lines and add the new OBX segment
                                             Set tResultType = pRequest.GetValueAt("ORCgrp(1).OBRuniongrp.OBXgrp(1).OBX:11")
                                             If tResultType = "D"
                                             {
                                                            $$$ThrowOnError(..ProcessPurgeDocumentToVista(pRequest))
                                             }
                                             // For all other documents coming from Cerner, save OBX lines into EHRM Edge, then delete from message and add the new OBX segment
                                             else
                                             {
                                                            $$$ThrowOnError(..ProcessNewDocumentToVista(pRequest))
                                             }
                              }
                              // otherwise, translate and send outbound to vista: Add OBX5, modify OBR16 and save off PID, OBR,& FIN
                              elseif (tMessageType="ORM")
                              {
                                             $$$ThrowOnError(..SendRequestAsync(..VistaTarget,pRequest,1,"OutputCernerToVistaORM"))
                              }
                              elseif (tMessageType="ORR") || (tMessageType = "ACK")
                              {
                                             $$$ThrowOnError(..SendRequestAsync(..VistaTarget,pRequest,1,"OutputCernerToVistaORR"))
                              }
                              else
                              {
                                             $$$ThrowOnError($$$ERROR($$$GeneralError, "Error: unable to process message from Cerner. Message type " _ tMessageType _ " received."))
                              }
}
               Catch eException {
                              set tStatus = eException.AsStatus()
                              set tStatus = $$$ADDSC(tStatus , ..CreateAndSendAlert(eException.DisplayString(), pRequest))
               }
               Quit tStatus
}

0 0
Gary M Lusso · Mar 8

MSH|^~\&|GMRC IF CONSULT|757^B1930^DNS|GMRC IF CONSULT|757^^DNS|20250123175341+0000|CRNR|ORM^O01^ORM_O01|Q5808332894T6790522104|T|2.3|||AL|AL|USA

PID|1||1013570973V041977^^^ICN^VVVID~2110106796^^^EDIPI^EDIPI||PROSTEST^EHR||19760902|M||||||||||129256619|678235672

ORC|NW|15207778763^757^GMRCIFR|||||^^^20250123175300+0000^^R||20250123175331+0000|1578051652^PCP1^ZZ-Physician||1578051652^PCP1^ZZ-Physician|||20250123175341+0000||757

OBR|1|15207778763^757^GMRCIFR||757^PROSTHETICS IFC^757ZZ1235||20250123175300+0000||||||||||1578051652^PCP1^ZZ-Physician|||Implant Usage (PSAS)||||||||^^^20250123175300+0000

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|1|Implant Usage (PSAS)||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|2|Item Number: 00801741016608||||||O 

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|3|     Transaction Date/Time: 01/22/2025 17:45||||||O     <<<< remove “REASON FOR REQUEST:” regardless of number of Item Numbers

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|4|     Station Number: 757||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|5|     Item Description: Plug Surgical 1.3in Groin Monofilament ||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|6|Nonabsorbable Perfix Polypropylene Medium Taper 1.55in Sterile Hernia ||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|7|Repair 0112760||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|8|     Manufacturer: Davol Inc||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|9|     Manufacturer Model Number: 0112760||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|10|     HCPCS: C1781||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|11|     Lot Number: 012220252||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|12|     Expiration Date/Time: 05/22/2025 04:00||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|13|     Serial Number:||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|14|     Source: 757-TrackCore Inv||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|15|     Lot Quantity:           0||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|16|     Lot Waste Quantity:           1||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|17|     Unit Cost:           0.00||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|18|     Total Cost:           0.00||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|19|Item Number: 00888867351288||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|20|     Transaction Date/Time: 01/22/2025 17:45||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|21|     Station Number: 757||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|22|     Item Description: Anchor Suture 2 Swivelock C Closed Eyelet Twist in ||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|23|Knotless 19.1mm Blue AR-2324KBCC||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|24|     Manufacturer: ARTHREX INC||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|25|     Manufacturer Model Number: AR-2324KBCC||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|26|     HCPCS: C1713||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|27|     Lot Number: 012220253||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|28|     Expiration Date/Time: 05/17/2025 04:00||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|29|     Serial Number:||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|30|     Source: 757-TrackCore Inv||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|31|     Lot Quantity:           0||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|32|     Lot Waste Quantity:           1||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|33|     Unit Cost:           0.00||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|34|     Total Cost:           0.00                <<<<<<<<  add carriage return after “Total Cost” if multiple Item Numbers. Note: ||||||O can be deleted

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|35|Item Number:||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|36|     Transaction Date/Time: 01/23/2025 17:43||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|37|     Station Number: 757||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|38|     Item Description: A female part which is inserted into the acrylic ||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|39|overdenture and houses changeable nylon retention inserts.||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|40|     Manufacturer: 0||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|41|     Manufacturer Model Number: MOR RC-1||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|42|     HCPCS:||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|43|     Lot Number: 1||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|44|     Expiration Date/Time:||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|45|     Serial Number:||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|46|     Source: 757-C-DENTAL SEC||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|47|     Lot Quantity:           1||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|48|     Lot Waste Quantity:           0||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|49|     Unit Cost:           0.00||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|50|     Total Cost:           0.00                               CRLF

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|51|Item Number: 00889024015296||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|52|     Transaction Date/Time: 01/23/2025 17:43||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|53|     Station Number: 757||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|54|     Item Description: Abutment Dental 4.5mm 3.5mm Indirect Transfer ||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|55|Tapered Screw-vent Connection Trabecular Metal HLT3/4||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|56|     Manufacturer: Zimvie Inc||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|57|     Manufacturer Model Number: HLT3/4||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|58|     HCPCS:||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|59|     Lot Number:||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|60|     Expiration Date/Time:||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|61|     Serial Number:||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|62|     Source: 757-C-DENTAL SEC||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|63|     Used Quantity:           4||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|64|     Waste Quantity:           0||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|65|     Unit Cost:           0.00||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|66|     Total Cost:           0.00||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|67|Item Number: 00889024015340||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|68|     Transaction Date/Time: 01/23/2025 17:43||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|69|     Station Number: 757||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|70|     Item Description: Abutment Dental Profile 6.5mm 5.7mm Screw-vent ||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|71|Indirect Transfer Retaining Screw Orange HLT56||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|72|     Manufacturer: Zimmer Biomet Inc||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|73|     Manufacturer Model Number: HLT56||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|74|     HCPCS:||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|75|     Lot Number:||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|76|     Expiration Date/Time:||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|77|     Serial Number:||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|78|     Source: 757-C-DENTAL SEC||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|79|     Used Quantity:           1||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|80|     Waste Quantity:           0||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|81|     Unit Cost:           0.00||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|82|     Total Cost:           0.00                CR/LF

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|83|Item Number:||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|84|     Transaction Date/Time: 01/23/2025 17:43||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|85|     Station Number: 757||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|86|     Item Description: Abutment, Gold,  Engaging||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|87|     Manufacturer: Zimmer Biomet Dental||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|88|     Manufacturer Model Number: HLA4G||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|89|     HCPCS:||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|90|     Lot Number: 1||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|91|     Expiration Date/Time:||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|92|     Serial Number:||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|93|     Source: 757-C-DENTAL SEC||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|94|     Lot Quantity:           1||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|95|     Lot Waste Quantity:           0||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|96|     Unit Cost:           0.00||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|97|     Total Cost:           0.00||||||O                        CR/LF

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|98|Item Number: TC024057||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|99|     Transaction Date/Time: 01/23/2025 17:43||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|100|     Station Number: 757||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|101|     Item Description: Abutment, Gold, Engaging CEANP31||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|102|     Manufacturer: Zimmer||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|103|     Manufacturer Model Number: CEANP31||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|104|     HCPCS:||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|105|     Lot Number: 2||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|106|     Expiration Date/Time: 05/31/2025 05:00||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|107|     Serial Number:||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|108|     Source: 757-C-DENTAL SEC||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|109|     Lot Quantity:           1||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|110|     Lot Waste Quantity:           0||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|111|     Unit Cost:           0.00||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|112|     Total Cost:           0.00                             CR/LF

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|113|Item Number: TC024076||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|114|     Transaction Date/Time: 01/23/2025 17:43||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|115|     Station Number: 757||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|116|     Item Description: Abutment, Gold, Engaging HLA3G||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|117|     Manufacturer: Zimmer||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|118|     Manufacturer Model Number: HLA3G||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|119|     HCPCS:||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|120|     Lot Number: 3||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|121|     Expiration Date/Time: 03/28/2025 05:00||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|122|     Serial Number:||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|123|     Source: 757-C-DENTAL SEC||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|124|     Lot Quantity:           1||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|125|     Lot Waste Quantity:           0||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|126|     Unit Cost:           0.00||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|127|     Total Cost:           0.00||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|128|Item Number: 00380650697127||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|129|     Transaction Date/Time: 01/23/2025 16:10||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|130|     Station Number: 757||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|131|     Item Description: Lens SP PmmA 5.25x12.0mm (5) +13.0D||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|132|     Manufacturer: ALCON||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|133|     Manufacturer Model Number: LX10BD 13.0||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|134|     HCPCS:||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|135|     Lot Number: 01232025||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|136|     Expiration Date/Time: 02/28/2025 05:00||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|137|     Serial Number: 01232025||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|138|     Source: 757-TrackCore Inv||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|139|     Used Quantity:           0||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|140|     Waste Quantity:           0||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|141|     Unit Cost:           0.00||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|142|     Total Cost:           0.00||||||O       <<< last “Total Cost”, DO NOT add CR/LF

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|143|Special Instructions: ||||||O

OBX|2|CE|^PROVISIONAL DIAGNOSIS|1|R52^Pain, unspecified^I10||||||O

NTE|P|UCID:757_15207778763

 

Ignore extra line feed between segments. It is a message formatting issue.

0 0
Jeffrey Drumm · Mar 15

Here's how I would approach this using a DTL ...

  1. Create a counter variable to hold the number of occurrences of "Item Number:"
  2. Use a for each action to iterate over the OBX segments
  3. In the for each, create an if action that checks for the presence of "Item Number:" in OBX:5 (using ..Contains())
  4. If the action is true, increment the counter variable

Example:

On completion of the for each, you should have a value that indicates the presence of more than one "Item Number." Next, update the OBXs:

  1. Create another counter variable to track occurrences of "Item Number" to be used for comparison
  2. Add another for each action to perform the modifications to the OBX segments
  3. Use the $REPLACE() or ..Replace() functions to replace "REASON FOR REQUEST:" in each OBX:5 with an empty string
  4. Add an if action to check the OBX:5 field for "Item Number:"; increment the new counter variable if found
  5. Add an if action to evaluate the new counter variable against the original; if it's less than the original, add a line break (not actual $C(13)/$C(10) characters, but escaped representation such as \.br\ or \X0D\\X0A\; likely vendor-dependent)

Example:

0 0
Gary Lusso · Mar 18

I have resolved most but still could use help setting the OBX5 field

I  parsed out the OBX 5 , "REASON FOR REQUEST".

Exmaple:

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|2|REASON FOR REQUEST: Item Number: 00801741016608||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|3|REASON FOR REQUEST:      Transaction Date/Time: 01/22/2025 17:45||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|4|REASON FOR REQUEST:      Station Number: 757||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|5|REASON FOR REQUEST:      Item Description: Plug Surgical 1.3in Groin Monofilament ||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|6|REASON FOR REQUEST: Nonabsorbable Perfix Polypropylene Medium Taper 1.55in Sterile Hernia ||||||O

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|7|REASON FOR REQUEST: Repair 0112760||||||O

Now , I need to replace the OBX 5 with the remainder

Example:

Before:

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|4|REASON FOR REQUEST:      Station Number: 757||||||O

After:

OBX|1|TX|2000.02^REASON FOR REQUEST^AS4|4|      Station Number: 757||||||O

spaces don't matter

0 0