Page 1 of 1
problem
Posted: Thu Jul 28, 2011 7:19 am
by zhousong
TdiPN_26 can not be find when I try your software with your example.
Re: problem
Posted: Thu Jul 28, 2011 7:44 am
by admin
Hi,
Each message contains its own version information.
Example is for HL7 v 2.2
MSH|^~\&|ABL735^ABL735 Operating Theatres|ABL735^ABL735 Operating Theatres|||20010516135518||ORU^R01|20010516135518|P^not present|2.2
You must use v2.2 component.
Re: problem
Posted: Fri Jul 29, 2011 1:01 am
by zhousong
Attached and please find the picture.
Source codes:
var
msg : TdiORU_R01_26;
Patient : TdiPN_26;
MsgStr : AnsiString;
i : integer;
begin
MsgStr :=
'MSH|^~\&|ABL735^ABL735 Operating Theatres|ABL735^ABL735 Operating Theatres|||'+
'20010516135518||ORU^R01|20010516135518|P^not present|2.6' + #13 +
.......
msg := TdiORU_R01_26.Create;
msg.AsString := Msg; //Parse message
Complie info:
[Error] Unit1.pas(54): Undeclared identifier: 'TdiPN_26'
[Error] Unit1.pas(94): Incompatible types: 'String' and 'TdiORU_R01_26'
Re: problem
Posted: Fri Jul 29, 2011 6:14 am
by admin
Hi,
Each version has its own structure. Can not switch to another version, by changing only the version information.
Version 2.6 does not contains 'PN' Data Type.
Please download and install :
http://www.delphihl7.com/download/DelphiHL7v22Trial.exe
Try compile with this.