I have an other problem:
Components version 1.6.5.2 with Delphi XE5
If I user the Components HL7-Version 2.31 it works,
but if I change to your components HL7-Version 2.4 or 2.5 it do not receive the OBR-Segments
all other Segments can be read and the result is okay
The Message:
MSH|^~\&|SAP-ISH|010^0010|Avantgarde|4.0.1.60|20131219093837||ORM^O01|0000140071|P|2.4
PID|||4100002076||Jemlich^PLAN-005^Jem^ter^Dr.^^X|Jem|19880306|F|||Im Wald 33^^Isernhagen^^30916^DE
PV1||I|1A^311^311a^CH^^N^2^4||||4711^Langer^Bernhard^Meier^Meyer^Dr.^von^X^Y&A^Z|THON^Thon^Angelika^^^^Dr. med.|||||||u||||49002674|0102114819|P|||||||||||||||||||||||20100803174600
ORC|NW|0000151076||00013996|IP||^^^20141022093837^20131219093837^000||20131219093837|||TESTARZT^TESTARZT^XXX|Audiologie|||Anamnese^oder so||XAUD^A^B^C^D^E|||||0172-12 34 456^AA^Handy^user@t-online.de^DEU^X^0152 22 33 44 ^Ext^Text
OBR|1|0000151076||925AUDLBTE^Optokinetik^01|||20131219093837||||| INFEKT:Infektiös|Vormerkung|||TESTARZT^TESTARZT^XXX||Hörgerät RECHTS|infektiös||||||||^^^20131219093837|||GE
ORC|NW|0000151076||00013996|IP||^^^20141022093837^20131219093837^000||20131219093837|||TESTARZT^TESTARZT^XXX|Audiologie|||Anamnese^oder so||XAUD^A^B^C^D^E|||||0172-12 34 456^AA^Handy^user@t-online.de^DEU^X^0152 22 33 44 ^Ext^Text
OBR|2|0000151077||925AUDSITe^Optokinetik^01|||20131219093837||||| INFEKT:Infektiös|Vormerkung|||TESTARZT^TESTARZT^XXX||Hörgerät RECHTS|infektiös||||||||^^^20131219093837|||GE
ORC|NW|0000151076||00013996|IP||^^^20141022093837^20131219093837^000||20131219093837|||TESTARZT^TESTARZT^XXX|Audiologie|||Anamnese^oder so||XAUD^A^B^C^D^E|||||0172-12 34 456^AA^Handy^user@t-online.de^DEU^X^0152 22 33 44 ^Ext^Text
OBR|3|0000151078||925AUDBEKT^Optokinetik^01|||20131219093837||||| INFEKT:Infektiös|Vormerkung|||TESTARZT^TESTARZT^XXX||Hörgerät RECHTS|infektiös||||||||^^^20131219093837|||GE
if msg.ORDERRepCount > 0 then begin
for i := 0 to msg.ORDERRepCount - 1 do begin
hl7_AnalysReceivedOBR(msg.ORDER.ORDER_DETAIL.OBR);
end;
end;
In Version 2.31 msg.ORDERRepCount is 3
In Version 2.4 or 2.5 msg.ORDERRepCount is 0
What is the problem
Best Regard
Joschim