Component not support unicode

Discussion of open issues, suggestions and bugs regarding to (known as Delphi HL7) HL7 Components
Post Reply
xiang_1988
Posts: 17
Joined: Thu Jul 31, 2014 9:15 am

Component not support unicode

Post by xiang_1988 »

hi
Why can't parse the code , usingTdiOMG_O19_26?
var
MsgOMGO19: TdiOMG_O19_26;
MsgStr:string;
begin
MsgOMGO19 := TdiOMG_O19_26.Create;
MsgStr:= Memo2.Text;
MsgOMGO19.AsString := MsgStr;
MsgOMGO19.ORDER[0].PRIOR_RESULT.PATIENT_PRIOR.PID.PatientID.IDNumber.AsString;//null?
//or MsgOMGO19.PATIENT.PID.PatientID.IDNumber.AsString;
end;
==================eg.=======================
Memo2.Text := 'MSH|^~\&|CIS||LWUS||20140620161939||OMG^O19|CIS_43500585|P|2.4';
Memo2.Lines.Append('PID||0000151854|^^^^PatientNO~0000151854^^^^IDCard~210222198004242336^^^^IdentifyNO||王玮||19800424|M|||||^^^^^^18676680424');
Memo2.Lines.Append('PV1||O|^^^0302^消化内科门诊||||003448||||||3|||||02|111220395|||||||||||||||||||||||||20140620161955');
Memo2.Lines.Append('ORC|NW|3492376|||1||||20140620161939|003069||003069^叶春福|||20140620161906||0302||||0302');
Memo2.Lines.Append('OBR||||F00000086906^电子结肠镜_^71||||||||||||||||||||3212#内镜中心');
Memo2.Lines.Append('OBX||ST|SIGN||脐周腹部胀痛 半年 伴腹泻,剑突下有压痛。肝胆脾不大');
Memo2.Lines.Append('OBX||ST|DIAG||慢性结肠炎');
Memo2.Lines.Append('OBX||ST|SITE||电子结肠镜');
Memo2.Lines.Append('BLG|||1');
xiang_1988
Posts: 17
Joined: Thu Jul 31, 2014 9:15 am

Re: Component not support unicode

Post by xiang_1988 »

TdiOMG_O19_26
Why can't it analytical PID?Bug?
xiang_1988
Posts: 17
Joined: Thu Jul 31, 2014 9:15 am

Re: Component not support unicode

Post by xiang_1988 »

Why cannot download?
Attachments
1.jpg
1.jpg (89 KiB) Viewed 11942 times
Post Reply

Who is online

Users browsing this forum: No registered users and 1 guest