BMS-HOSxP Community
HOSxP => Development => ข้อความที่เริ่มโดย: chronoX ที่ มกราคม 17, 2008, 17:24:48 PM
-
--- เนื่องจากทางรพ.สมเด็จพระยุพราชท่าบ่อ ได้ทำการลงระบบ Computed Radiography System เข้ามาใช้
โดยมีหลักการคือ การแปลงภาพสแกน ที่จากเดิมที่เป็นฟิมล์ เป็น cassette แล้วนำไปแปลงเป็นภาพ Digital ที่เป็น ภาพของ dicom หรือ jpeg ได้ ขณะนี้ได้ทำระบบเข้าใช้จริง แต่ ยังติดปัญหาอีกนิดหน่อย คือ ต้องการจะใช้งานร่วมกับทางโปรแกรม HOSxp โดยจะต้องทำการเขียน script เพื่อสั่งให้เครื่องคอมพิวเตอรืที่ห้อง x-ray ทำการ query ไฟล์ ซึ่งมีรูปแบบตามไฟล์ที่แนบ
--- หลักการ คือ เมื่อมีการสั่ง xray คนไข้ กี่รายก็ตาม หรือกี่ครั้ง เมื่อบันทึกสั่ง จะมีการสร้างสคิป ดังกล่าวไว้ เมื่อทาง x-ray ได้ทำการ x-ray คนไข้แล้ว ทางเครื่อง CR ก็จะดึงข้อมูล ชื่อ -สกุล , hn , ชื่อแพทย์ที่สั่ง , วันเดือนปี ,อายุ ,ฟิมล์ที่ทำ เป็นต้น เพื่อลดระยะเวลาการกรอกข้อมูลที่ซ้ำซ้อน จากนั้น เมื่อแปลงรูปเสร็จ ก็เจ้าหน้าที่จะทำการยืนยันข้อมุลใน HOSxpว่าได้ทำเสร็จแล้ว จากนั้น เมื่อมีการสั่ง x-ray ใหม่ ก็จะมีการ query ไฟลืทับตัวเดิม ......
ปัญหาคือ ผมไม่รู้จะเริ่มยังงัย หรือเขียนยังงัย ไม่ทราบว่า มีผู้รู้ท่านใด เป็นเซียนเรื่องนี้บ้างครับ
-
สุดยอดเลยครับ
เดียวเก็บเงิน ซื้อเครื่องก่อนครับ
-
น่าสนใจมากเลยครับ
รบกวนขอข้อมูลเพิ่มเติม เกี่ยวกับ เจ้าเครื่อง iCR1000 ได้มั๊ยครับ ว่าทางรพร.ท่าบ่อ เลือกใช้รุ่นไหนครับ dual หรือเปล่า ใช้แล้วเป็นอย่างไรบ้างครับ คุณภาพเป็นยังไง ต้องใช้จอ monitor พิเศษหรือ ใช้จอ LCD ธรรมดาก็ดูได้ครับ แล้วการ scan film เก่า ได้ลองหรือยังครับ
ไม่กล้าถามราคา แต่อยากทราบว่า ประมาณกี่หลักครับ
:o :o
-
--- เนื่องจากทางรพ.สมเด็จพระยุพราชท่าบ่อ ได้ทำการลงระบบ Computed Radiography System เข้ามาใช้
โดยมีหลักการคือ การแปลงภาพสแกน ที่จากเดิมที่เป็นฟิมล์ เป็น cassette แล้วนำไปแปลงเป็นภาพ Digital ที่เป็น ภาพของ dicom หรือ jpeg ได้ ขณะนี้ได้ทำระบบเข้าใช้จริง แต่ ยังติดปัญหาอีกนิดหน่อย คือ ต้องการจะใช้งานร่วมกับทางโปรแกรม HOSxp โดยจะต้องทำการเขียน script เพื่อสั่งให้เครื่องคอมพิวเตอรืที่ห้อง x-ray ทำการ query ไฟล์ ซึ่งมีรูปแบบตามไฟล์ที่แนบ
--- หลักการ คือ เมื่อมีการสั่ง xray คนไข้ กี่รายก็ตาม หรือกี่ครั้ง เมื่อบันทึกสั่ง จะมีการสร้างสคิป ดังกล่าวไว้ เมื่อทาง x-ray ได้ทำการ x-ray คนไข้แล้ว ทางเครื่อง CR ก็จะดึงข้อมูล ชื่อ -สกุล , hn , ชื่อแพทย์ที่สั่ง , วันเดือนปี ,อายุ ,ฟิมล์ที่ทำ เป็นต้น เพื่อลดระยะเวลาการกรอกข้อมูลที่ซ้ำซ้อน จากนั้น เมื่อแปลงรูปเสร็จ ก็เจ้าหน้าที่จะทำการยืนยันข้อมุลใน HOSxpว่าได้ทำเสร็จแล้ว จากนั้น เมื่อมีการสั่ง x-ray ใหม่ ก็จะมีการ query ไฟลืทับตัวเดิม ......
ปัญหาคือ ผมไม่รู้จะเริ่มยังงัย หรือเขียนยังงัย ไม่ทราบว่า มีผู้รู้ท่านใด เป็นเซียนเรื่องนี้บ้างครับ
ต้อง พา อ.ชัยพร ไปเที่ยว รพ ครับแบบนี้ ;D ;D ;D
-
น้องโต้งครับ....อาจารย์มาเยี่ยมเมื่อไหร่ เรียกด้วยนะครับ..........
-
ตอบ พี่หนุ่ยครับ ... คงเป็นเร็วๆนี้น่ะ ครับ แล้วยังงัยจะแจ้งให้ทราบครับ
------------------------------------------------------------------------------------------------------
รบกวนขอข้อมูลเพิ่มเติม เกี่ยวกับ เจ้าเครื่อง iCR1000 ได้มั๊ยครับ ว่าทางรพร.ท่าบ่อ เลือกใช้รุ่นไหนครับ dual หรือเปล่า ใช้แล้วเป็นอย่างไรบ้างครับ คุณภาพเป็นยังไง ต้องใช้จอ monitor พิเศษหรือ ใช้จอ LCD ธรรมดาก็ดูได้ครับ แล้วการ scan film เก่า ได้ลองหรือยังครับ
ไม่กล้าถามราคา แต่อยากทราบว่า ประมาณกี่หลักครับ
------------------------------------------------------------------------------------------------------
เครื่อง iCR1000 ไม่ใช่รุ่น dual ครับ ตอนนี้กำลังทดสอบการดูภาพใช้ดูจาก software ของทางบริษัทโดยผ่าน browser ครับ การเปรียบเทียบภาพ ต่าง หรือภาพก็ค่อนข้างโอเคครับ
ส่วนผู้ใช้คือ แพทย์ และเจ้าหน้าที่เอ็กซเรย์ ก้กำลังปรับตัว ส่วนจอที่ใช้โดยส่วนมากที่ห้องตรวจจะเป็นจอ LCD ซึ่งทางแพทย์ก็บอกว่าดูได้ชัดเจนดี แต่เพียงว่าจอมันเล็กไปนิดนึง (เป็นจอ LCD 15 และ 17 นิ้วครับ ) ส่วนถ้าจะดูรูปใหญ่และที่ชัดเจนจริงก็จะมีเครื่องและจอของทางบริษัทที่ลงระบบอยู่ที่ห้องเอ็กซเรย์ ส่วนค่าใช้จ่ายคิดเป็นรายเดือนครับ ส่วนราคาน่าจะเดือนละ 6 หลักนี่ล่ะครับ
ส่วนฟิลม์เก่า ยังไม่ได้ลองสักเท่าไหร่ครับ เพราะตอนนี้ทดสอบคนไข้ปัจจุบันให้ลงตัวก่อน
ถ้ามีความคืบหน้าหรือปัญหาอะไรจะแจ้งให้ชาว HOSxP ทราบอีกทีครับ
-
รบกวนคุณ chronoX ไม่ทราบว่า ขอเบอร์ติดต่อทางบริษัทได้มั๊ยครับ ค้นหาไม่เจอ บ. transtek co. ???
-
เผอิญหยุดกลับบ้านที่ ขอนแก่น เสาร์-อาทิตย์ เลยไม่ได้ตอบ
ติดต่อที่
----- คุณ กิตติพล แพงไพจิตรกุล
บริษัท ทรานสเทค จำกัด
โทร. 0 2883 5815 มือถือ 086 5708240
หรือ คุณตี๋ มือถือ - 089 5591686
-
ขอบคุณมากครับ
:)
-
มาตราฐานที่ต้องมี
1. IHE
http://www.ihe.net/
2. HL7
3. DICOM3
-
ไม่ทราบว่าจะพอมีคนช่วยมั้ยครับ ????
หมดปัญญาจริงๆ
-
สวัสดีครับขอ ตอบคำถามให้ครับ
- การจะทำให้เครื่อง Modality ต่างๆ สามารพทำการ query data ข้อมูลของคนไข้ได้นั้น ต้องมีโปรแกรมหรือเครื่องคอมพิวเตอร์
ตัวหนึ่งที่ทำหน้าที่เป็น DMWL หรือ Dicom Modality Work List ซึ่งไอ้เจ้าตัวนี้จะทำการ รับข้อมูลคนไข้ที่ถูกส่งมาจาก HIS หรือ RIS โดยจะต้องรับข้อมูลเป็นในรูปแบบ HL7
- แล้วถ้าตัวส่งข้อมูล (HIS หรือ RIS) ที่มันไม่ส่งเป็นแบบ HL7 เราจะทำอย่างไร
เราก็สามารถทำได้ โดยเราเขียนโปรแกรมตัวหนึ่งให้ทำการ Query ข้อมูลชื่อคนไข้ขึ้นมา แล้วส่งเข้า DMWL
หรือเราเขียน DMWL แล้วส่งข้อมูลเข้า Modality ............................. ทำได้หลายแบบ..... (ทำ Broker) ..จบ
-
ไม่ทราบว่าจะพอมีคนช่วยมั้ยครับ ????
หมดปัญญาจริงๆ
ติดต่อกลับผมด้วยครับ
-
ต้องใช้ 3.51.1.29b ครับ
เมื่อ check ตรงตัวเลือก ris export แล้วกดปุ่มบันทึกโปรแกรมจะไปเรียก script ของระบบชื่อ SYS_RIS_EXPORT มาทำงานครับ
ที่ต้องทำคือไปออกแบบ script ตัวนี้ให้รับค่า GlobalVariable ชื่อ XN แล้วนำไปหาค่าในตาราง xray_report แล้วส่งข้อมูลออกมาครับ
-
ต้องใช้ 3.51.1.29b ครับ
เมื่อ check ตรงตัวเลือก ris export แล้วกดปุ่มบันทึกโปรแกรมจะไปเรียก script ของระบบชื่อ SYS_RIS_EXPORT มาทำงานครับ
ที่ต้องทำคือไปออกแบบ script ตัวนี้ให้รับค่า GlobalVariable ชื่อ XN แล้วนำไปหาค่าในตาราง xray_report แล้วส่งข้อมูลออกมาครับ
เรื่องการแสดงภาพ xray จากเครื่อง icr1000 ต้องรบกวนทำแบบ เรียกผ่าน browser เหมือน webmayo
ที่ห้องตรวจ ครับ
:D
-
...ออกแบบ script ตัวนี้ให้รับค่า GlobalVariable ชื่อ XN แล้วนำไปหาค่าในตาราง xray_report ...
ทำยังไงครับ แฮ่ๆๆ ช่วยแสดงวิธีทำหน่อยได้มั๊ยครับ
:'(
-
ผมจำ รูปแบบของที่จะนำเข้า โปรแกรม icr1000 ไม่ได้แล้ว
ช่วยส่งมาให้ด้วย เลยไม่รู้ว่าจะทำให้แบบไหน
unit SYS_SCREEN_FORM;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ExtCtrls, Mask, DBCtrls, DB, DBClient, Grids, DBGrids;
type
TForm29 = class(TForm)
Panel1: TPanel;
Panel2: TPanel;
Button1: TButton;
Panel3: TPanel;
ScreenCDS: TClientDataSet;
ScreenDS: TDataSource;
Label1: TLabel;
DBEdit1: TDBEdit;
Label2: TLabel;
DBEdit2: TDBEdit;
Label3: TLabel;
DBMemo1: TDBMemo;
Button2: TButton;
Button3: TButton;
Button4: TButton;
CM1DS: TDataSource;
CM1CDS: TClientDataSet;
Button5: TButton;
Button6: TButton;
Button7: TButton;
Button8: TButton;
Button9: TButton;
Button10: TButton;
DBGrid1: TDBGrid;
procedure Button1Click(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
procedure Button4Click(Sender: TObject);
procedure Button5Click(Sender: TObject);
procedure Button6Click(Sender: TObject);
procedure Button7Click(Sender: TObject);
procedure Button8Click(Sender: TObject);
procedure Button9Click(Sender: TObject);
procedure Button10Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form29: TForm29;
vn,hn:string;
implementation
{$R *.dfm}
procedure TForm29.Button10Click(Sender: TObject);
begin
cm1cds.insert;
cm1cds.fieldbyname('hn').asstring:=hn;
cm1cds.fieldbyname('clinic').asstring:='011';
try cm1cds.post; except end;
if cm1cds.changecount>0 then
hosxp_updatedelta(cm1cds.delta,'select * from clinicmember where hn = "'+hn+'"');
// close;
end;
procedure TForm29.Button1Click(Sender: TObject);
begin
close;
end;
procedure TForm29.Button2Click(Sender: TObject);
begin
try screencds.post; except end;
if screencds.changecount>0 then
hosxp_updatedelta(screencds.delta,'select * from opdscreen where vn = "'+vn+'"');
close;
end;
procedure TForm29.Button3Click(Sender: TObject);
begin
RunHOSxP_ScriptProgram('SYS_SCREEN_FORM');
end;
procedure TForm29.Button4Click(Sender: TObject);
begin
PrintReportWithParam('DRUG LIST-1','','','','','','','','','','');
//PrintReportToPrinterWithParam
end;
procedure TForm29.Button5Click(Sender: TObject);
begin
cm1cds.insert;
cm1cds.fieldbyname('hn').asstring:=hn;
cm1cds.fieldbyname('clinic').asstring:='001';
try cm1cds.post; except end;
if cm1cds.changecount>0 then
hosxp_updatedelta(cm1cds.delta,'select * from clinicmember where hn = "'+hn+'"');
// close;
end;
procedure TForm29.Button6Click(Sender: TObject);
begin
cm1cds.insert;
cm1cds.fieldbyname('hn').asstring:=hn;
cm1cds.fieldbyname('clinic').asstring:='002';
try cm1cds.post; except end;
if cm1cds.changecount>0 then
hosxp_updatedelta(cm1cds.delta,'select * from clinicmember where hn = "'+hn+'"');
// close;
end;
procedure TForm29.Button7Click(Sender: TObject);
begin
cm1cds.insert;
cm1cds.fieldbyname('hn').asstring:=hn;
cm1cds.fieldbyname('clinic').asstring:='009';
try cm1cds.post; except end;
if cm1cds.changecount>0 then
hosxp_updatedelta(cm1cds.delta,'select * from clinicmember where hn = "'+hn+'"');
// close;
end;
procedure TForm29.Button8Click(Sender: TObject);
begin
cm1cds.insert;
cm1cds.fieldbyname('hn').asstring:=hn;
cm1cds.fieldbyname('clinic').asstring:='003';
try cm1cds.post; except end;
if cm1cds.changecount>0 then
hosxp_updatedelta(cm1cds.delta,'select * from clinicmember where hn = "'+hn+'"');
// close;
end;
procedure TForm29.Button9Click(Sender: TObject);
begin
cm1cds.insert;
cm1cds.fieldbyname('hn').asstring:=hn;
cm1cds.fieldbyname('clinic').asstring:='012';
try cm1cds.post; except end;
if cm1cds.changecount>0 then
hosxp_updatedelta(cm1cds.delta,'select * from clinicmember where hn = "'+hn+'"');
// close;
end;
procedure TForm29.FormShow(Sender: TObject);
begin
vn:= GetGlobalValue('VN');
hn:= vartostr(getsqldata('select hn from ovst where vn = "'+
vn+'"'));
panel3.caption:='VN : '+vn+ ' HN : '+
vartostr(getsqldata('select concat(pname,fname," ",lname) as ptname from patient where hn = "'+
hn+'"' ))+'-->'+vartostr(GetSQLSubQueryData('select c.name from clinicmember cm left outer join clinic c on c.clinic=cm.clinic where cm.hn= "'+
hn+'"' ));
screencds.data:=hosxp_getdataset('select * from opdscreen where vn = "'+vn+'"');
CM1cds.data:=hosxp_getdataset('select * from clinicmember where hn = "'+hn+'"')
end;
end.
-
ต้องใช้ 3.51.1.29b ครับ
เมื่อ check ตรงตัวเลือก ris export แล้วกดปุ่มบันทึกโปรแกรมจะไปเรียก script ของระบบชื่อ SYS_RIS_EXPORT มาทำงานครับ
ที่ต้องทำคือไปออกแบบ script ตัวนี้ให้รับค่า GlobalVariable ชื่อ XN แล้วนำไปหาค่าในตาราง xray_report แล้วส่งข้อมูลออกมาครับ
เรื่องการแสดงภาพ xray จากเครื่อง icr1000 ต้องรบกวนทำแบบ เรียกผ่าน browser เหมือน webmayo
ที่ห้องตรวจ ครับ
:D
บ.จะมีโปรแกรมที่ดูภาพ โดยผ่าน browser อยู่แล้วครับ ถ้า set url ให้ตรงแล้วกดปุ่มลิงค์ก็สามารถทำได้ อีกอย่างระบบจะมีการเก็บภาพอยุ่ที่ server ที่ห้องเอ็กซเรย์ โดยไม่ต้องนำเข้าในฐานข้อมูลของ HOSxP เลย ทำให้ประหยัดพื้นที่ไปได้เยอะเลยครับ เพราะไฟล์dicom 1 ไฟล์ ขนาด 8-12 MB เลยที่เดียว
-
ผมจำ รูปแบบของที่จะนำเข้า โปรแกรม icr1000 ไม่ได้แล้ว
ช่วยส่งมาให้ด้วย เลยไม่รู้ว่าจะทำให้แบบไหน
ตอบ -----> อ.อ๊อด นะครับ ไฟล์ตามที่ผมแนบให้ในกระทู้แรกครับ ชื่อว่า $$dcmWLQuery.nrs
ใช้ editer หรือ notepad เปิดนะครับ หรือ ถ้าอ.อ๊อดสงสัย โทร 086-5802848 ในเวลาราชการนะครับ
-
New Record
"(0008,0050),SH,0,AccessionNumber"
"(0008,0090),PN,0,ReferringPhysician’sName"
"(0010,0010),PN,8,Patient’sName" mr test
"(0010,0020),LO,4,PatientID" 8888
"(0010,0030),DA,0,Patient'sBirthDate"
"(0010,0040),CS,0,Patient'sSex"
"(0032,1033),LO,0,RequestingService"
"(0032,1060),LO,0,RequestedProcedureDescription"
"(0040,0100),SQ,-1,ScheduledProcedureStepSequence" (null)
"<(0008,0060),CS,2,Modality" CR
"<(0040,0001),AE,0,ScheduledStationAETitle"
"<(0040,0002),DA,0,ScheduledProcedureStepStartDate"
"<(0040,0003),TM,0,ScheduledProcedureStepStartTime"
"<(0040,0009),SH,0,ScheduledProcedureStepID"
"(0040,1001),SH,0,RequestedProcedureID"
New Record
"(0008,0050),SH,8,AccessionNumber" 2002-37
"(0008,0090),PN,10,ReferringPhysician’sName" Elke Jauch
"(0010,0010),PN,12,Patient’sName" Hoerer^Emmet
"(0010,0020),LO,4,PatientID" 1670
"(0010,0030),DA,8,Patient'sBirthDate" 19760223
"(0010,0040),CS,2,Patient'sSex" F
"(0032,1033),LO,24,RequestingService" US-DRAINAGE GUIDE LIVER
"(0032,1060),LO,24,RequestedProcedureDescription" US-DRAINAGE GUIDE LIVER
"(0040,0100),SQ,-1,ScheduledProcedureStepSequence" (null)
"<(0008,0060),CS,2,Modality" US
"<(0040,0001),AE,10,ScheduledStationAETitle" AE_NETRIS
"<(0040,0002),DA,8,ScheduledProcedureStepStartDate" 20021202
"<(0040,0003),TM,6,ScheduledProcedureStepStartTime" 112107
"<(0040,0009),SH,8,ScheduledProcedureStepID" 2002-37
"(0040,1001),SH,6,RequestedProcedureID" 70003
New Record
"(0008,0050),SH,8,AccessionNumber" 2002-36
"(0008,0090),PN,12,ReferringPhysician’sName" Ardra Vieser
"(0010,0010),PN,14,Patient’sName" Goedecke^Arndt
"(0010,0020),LO,4,PatientID" 1667
"(0010,0030),DA,8,Patient'sBirthDate" 19450811
"(0010,0040),CS,2,Patient'sSex" F
"(0032,1033),LO,24,RequestingService" US-DRAINAGE GUIDE LIVER
"(0032,1060),LO,24,RequestedProcedureDescription" US-DRAINAGE GUIDE LIVER
"(0040,0100),SQ,-1,ScheduledProcedureStepSequence" (null)
"<(0008,0060),CS,2,Modality" US
"<(0040,0001),AE,10,ScheduledStationAETitle" AE_NETRIS
"<(0040,0002),DA,8,ScheduledProcedureStepStartDate" 20021130
"<(0040,0003),TM,6,ScheduledProcedureStepStartTime" 85140
"<(0040,0009),SH,8,ScheduledProcedureStepID" 2002-36
"(0040,1001),SH,6,RequestedProcedureID" 70003
New Record
"(0008,0050),SH,8,AccessionNumber" 2002-35
"(0008,0090),PN,10,ReferringPhysician’sName" Elke Jauch
"(0010,0010),PN,12,Patient’sName" Corbet^Jenny
"(0010,0020),LO,4,PatientID" 1674
"(0010,0030),DA,8,Patient'sBirthDate" 19781125
"(0010,0040),CS,2,Patient'sSex" F
"(0032,1033),LO,30,RequestingService" US-ASPIRAT GUIDE/ABD/PELVI NN
"(0032,1060),LO,30,RequestedProcedureDescription" US-ASPIRAT GUIDE/ABD/PELVI NN
"(0040,0100),SQ,-1,ScheduledProcedureStepSequence" (null)
"<(0008,0060),CS,2,Modality" US
"<(0040,0001),AE,10,ScheduledStationAETitle" AE_NETRIS
"<(0040,0002),DA,8,ScheduledProcedureStepStartDate" 20021130
"<(0040,0003),TM,6,ScheduledProcedureStepStartTime" 84043
"<(0040,0009),SH,8,ScheduledProcedureStepID" 2002-35
"(0040,1001),SH,6,RequestedProcedureID" 70006
New Record
"(0008,0050),SH,8,AccessionNumber" 2002-34
"(0008,0090),PN,10,ReferringPhysician’sName" Elke Jauch
"(0010,0010),PN,18,Patient’sName" Morweiser^Cassidy
"(0010,0020),LO,4,PatientID" 1673
"(0010,0030),DA,8,Patient'sBirthDate" 19441005
"(0010,0040),CS,2,Patient'sSex" M
"(0032,1033),LO,6,RequestingService" MAMMO
"(0032,1060),LO,6,RequestedProcedureDescription" MAMMO
"(0040,0100),SQ,-1,ScheduledProcedureStepSequence" (null)
"<(0008,0060),CS,2,Modality" CT
"<(0040,0001),AE,10,ScheduledStationAETitle" AE_NETRIS
"<(0040,0002),DA,8,ScheduledProcedureStepStartDate" 20021130
"<(0040,0003),TM,6,ScheduledProcedureStepStartTime" 84008
"<(0040,0009),SH,8,ScheduledProcedureStepID" 2002-34
"(0040,1001),SH,4,RequestedProcedureID" 1234
New Record
"(0008,0050),SH,8,AccessionNumber" 2002-33
"(0008,0090),PN,12,ReferringPhysician’sName" Hedwig Baal
"(0010,0010),PN,16,Patient’sName" Edinger^Wolfgang
"(0010,0020),LO,4,PatientID" 1672
"(0010,0030),DA,8,Patient'sBirthDate" 19320721
"(0010,0040),CS,2,Patient'sSex" M
"(0032,1033),LO,6,RequestingService" MAMMO
"(0032,1060),LO,6,RequestedProcedureDescription" MAMMO
"(0040,0100),SQ,-1,ScheduledProcedureStepSequence" (null)
"<(0008,0060),CS,2,Modality" CT
"<(0040,0001),AE,10,ScheduledStationAETitle" AE_NETRIS
"<(0040,0002),DA,8,ScheduledProcedureStepStartDate" 20021130
"<(0040,0003),TM,6,ScheduledProcedureStepStartTime" 83940
"<(0040,0009),SH,8,ScheduledProcedureStepID" 2002-33
"(0040,1001),SH,4,RequestedProcedureID" 1234
New Record
"(0008,0050),SH,8,AccessionNumber" 2002-32
"(0008,0090),PN,10,ReferringPhysician’sName" Elke Jauch
"(0010,0010),PN,12,Patient’sName" Hoerer^Emmet
"(0010,0020),LO,4,PatientID" 1670
"(0010,0030),DA,8,Patient'sBirthDate" 19760223
"(0010,0040),CS,2,Patient'sSex" F
"(0032,1033),LO,18,RequestingService" MRI-CERVICAL SPINE
"(0032,1060),LO,18,RequestedProcedureDescription" MRI-CERVICAL SPINE
"(0040,0100),SQ,-1,ScheduledProcedureStepSequence" (null)
"<(0008,0060),CS,2,Modality" MR
"<(0040,0001),AE,10,ScheduledStationAETitle" AE_NETRIS
"<(0040,0002),DA,8,ScheduledProcedureStepStartDate" 20021128
"<(0040,0003),TM,6,ScheduledProcedureStepStartTime" 92025
"<(0040,0009),SH,8,ScheduledProcedureStepID" 2002-32
"(0040,1001),SH,6,RequestedProcedureID" 70803
New Record
"(0008,0050),SH,8,AccessionNumber" 2002-26
"(0008,0090),PN,10,ReferringPhysician’sName" Monica Hey
"(0010,0010),PN,10,Patient’sName" Giro^Adolf
"(0010,0020),LO,4,PatientID" 1675
"(0010,0030),DA,8,Patient'sBirthDate" 19800911
"(0010,0040),CS,2,Patient'sSex" F
"(0032,1033),LO,26,RequestingService" MRI-BRAIN W/ W/O CONTRAST
"(0032,1060),LO,26,RequestedProcedureDescription" MRI-BRAIN W/ W/O CONTRAST
"(0040,0100),SQ,-1,ScheduledProcedureStepSequence" (null)
"<(0008,0060),CS,2,Modality" MR
"<(0040,0001),AE,10,ScheduledStationAETitle" AE_NETRIS
"<(0040,0002),DA,8,ScheduledProcedureStepStartDate" 20021128
"<(0040,0003),TM,6,ScheduledProcedureStepStartTime" 70427
"<(0040,0009),SH,8,ScheduledProcedureStepID" 2002-26
"(0040,1001),SH,6,RequestedProcedureID" 70802
New Record
"(0008,0050),SH,8,AccessionNumber" 2002-25
"(0008,0090),PN,12,ReferringPhysician’sName" Hedwig Baal
"(0010,0010),PN,12,Patient’sName" Denzer^Eric
"(0010,0020),LO,4,PatientID" 1677
"(0010,0030),DA,8,Patient'sBirthDate" 19401027
"(0010,0040),CS,2,Patient'sSex" M
"(0032,1033),LO,22,RequestingService" MRI-BRAIN W/ CONTRAST
"(0032,1060),LO,22,RequestedProcedureDescription" MRI-BRAIN W/ CONTRAST
"(0040,0100),SQ,-1,ScheduledProcedureStepSequence" (null)
"<(0008,0060),CS,2,Modality" MR
"<(0040,0001),AE,10,ScheduledStationAETitle" AE_NETRIS
"<(0040,0002),DA,8,ScheduledProcedureStepStartDate" 20021126
"<(0040,0003),TM,6,ScheduledProcedureStepStartTime" 84737
"<(0040,0009),SH,8,ScheduledProcedureStepID" 2002-25
"(0040,1001),SH,6,RequestedProcedureID" 70801
New Record
"(0008,0050),SH,8,AccessionNumber" 2002-24
"(0008,0090),PN,10,ReferringPhysician’sName" Elke Jauch
"(0010,0010),PN,16,Patient’sName" Ehrlich^Natascha
"(0010,0020),LO,4,PatientID" 1681
"(0010,0030),DA,8,Patient'sBirthDate" 19780929
"(0010,0040),CS,2,Patient'sSex" F
"(0032,1033),LO,18,RequestingService" MRI-CERVICAL SPINE
"(0032,1060),LO,18,RequestedProcedureDescription" MRI-CERVICAL SPINE
"(0040,0100),SQ,-1,ScheduledProcedureStepSequence" (null)
"<(0008,0060),CS,2,Modality" MR
"<(0040,0001),AE,10,ScheduledStationAETitle" AE_NETRIS
"<(0040,0002),DA,8,ScheduledProcedureStepStartDate" 20021126
"<(0040,0003),TM,6,ScheduledProcedureStepStartTime" 84723
"<(0040,0009),SH,8,ScheduledProcedureStepID" 2002-24
"(0040,1001),SH,6,RequestedProcedureID" 70803
New Record
"(0008,0050),SH,8,AccessionNumber" 2002-19
"(0008,0090),PN,10,ReferringPhysician’sName" Elke Jauch
"(0010,0010),PN,18,Patient’sName" Morweiser^Cassidy
"(0010,0020),LO,4,PatientID" 1673
"(0010,0030),DA,8,Patient'sBirthDate" 19441005
"(0010,0040),CS,2,Patient'sSex" M
"(0032,1033),LO,26,RequestingService" MRI-BRAIN W/ W/O CONTRAST
"(0032,1060),LO,26,RequestedProcedureDescription" MRI-BRAIN W/ W/O CONTRAST
"(0040,0100),SQ,-1,ScheduledProcedureStepSequence" (null)
"<(0008,0060),CS,2,Modality" MR
"<(0040,0001),AE,10,ScheduledStationAETitle" AE_NETRIS
"<(0040,0002),DA,8,ScheduledProcedureStepStartDate" 20021111
"<(0040,0003),TM,6,ScheduledProcedureStepStartTime" 210443
"<(0040,0009),SH,8,ScheduledProcedureStepID" 2002-19
"(0040,1001),SH,6,RequestedProcedureID" 70802
New Record
"(0008,0050),SH,8,AccessionNumber" 2002-18
"(0008,0090),PN,12,ReferringPhysician’sName" Hedwig Baal
"(0010,0010),PN,12,Patient’sName" Denzer^Eric
"(0010,0020),LO,4,PatientID" 1677
"(0010,0030),DA,8,Patient'sBirthDate" 19401027
"(0010,0040),CS,2,Patient'sSex" M
"(0032,1033),LO,24,RequestingService" US-DRAINAGE GUIDE BREAST
"(0032,1060),LO,24,RequestedProcedureDescription" US-DRAINAGE GUIDE BREAST
"(0040,0100),SQ,-1,ScheduledProcedureStepSequence" (null)
"<(0008,0060),CS,2,Modality" US
"<(0040,0001),AE,10,ScheduledStationAETitle" AE_NETRIS
"<(0040,0002),DA,8,ScheduledProcedureStepStartDate" 20021105
"<(0040,0003),TM,6,ScheduledProcedureStepStartTime" 112128
"<(0040,0009),SH,8,ScheduledProcedureStepID" 2002-18
"(0040,1001),SH,6,RequestedProcedureID" 70002
New Record
"(0008,0050),SH,8,AccessionNumber" 2002-17
"(0008,0090),PN,12,ReferringPhysician’sName" Hedwig Baal
"(0010,0010),PN,14,Patient’sName" Kutsche^Tanja
"(0010,0020),LO,4,PatientID" 1678
"(0010,0030),DA,8,Patient'sBirthDate" 19630704
"(0010,0040),CS,2,Patient'sSex" M
"(0032,1033),LO,26,RequestingService" MRI-C SPINE W/W/O CONTRAST
"(0032,1060),LO,26,RequestedProcedureDescription" MRI-C SPINE W/W/O CONTRAST
"(0040,0100),SQ,-1,ScheduledProcedureStepSequence" (null)
"<(0008,0060),CS,2,Modality" MR
"<(0040,0001),AE,10,ScheduledStationAETitle" AE_NETRIS
"<(0040,0002),DA,8,ScheduledProcedureStepStartDate" 20021105
"<(0040,0003),TM,6,ScheduledProcedureStepStartTime" 112042
"<(0040,0009),SH,8,ScheduledProcedureStepID" 2002-17
"(0040,1001),SH,6,RequestedProcedureID" 70805
New Record
"(0008,0050),SH,8,AccessionNumber" 2002-16
"(0008,0090),PN,12,ReferringPhysician’sName" Ardra Vieser
"(0010,0010),PN,10,Patient’sName" Giro^Adolf
"(0010,0020),LO,4,PatientID" 1675
"(0010,0030),DA,8,Patient'sBirthDate" 19800911
"(0010,0040),CS,2,Patient'sSex" F
"(0032,1033),LO,24,RequestingService" US-DRAINAGE GUIDE RENAL
"(0032,1060),LO,24,RequestedProcedureDescription" US-DRAINAGE GUIDE RENAL
"(0040,0100),SQ,-1,ScheduledProcedureStepSequence" (null)
"<(0008,0060),CS,2,Modality" US
"<(0040,0001),AE,10,ScheduledStationAETitle" AE_NETRIS
"<(0040,0002),DA,8,ScheduledProcedureStepStartDate" 20021105
"<(0040,0003),TM,6,ScheduledProcedureStepStartTime" 111534
"<(0040,0009),SH,8,ScheduledProcedureStepID" 2002-16
"(0040,1001),SH,6,RequestedProcedureID" 70005
New Record
"(0008,0050),SH,8,AccessionNumber" 2002-15
"(0008,0090),PN,0,ReferringPhysician’sName"
"(0010,0010),PN,16,Patient’sName" Jentsch^Raymond
"(0010,0020),LO,4,PatientID" 1682
"(0010,0030),DA,8,Patient'sBirthDate" 19860618
"(0010,0040),CS,2,Patient'sSex" M
"(0032,1033),LO,24,RequestingService" MRI-C SPINE W/ CONTRAST
"(0032,1060),LO,24,RequestedProcedureDescription" MRI-C SPINE W/ CONTRAST
"(0040,0100),SQ,-1,ScheduledProcedureStepSequence" (null)
"<(0008,0060),CS,2,Modality" MR
"<(0040,0001),AE,10,ScheduledStationAETitle" AE_NETRIS
"<(0040,0002),DA,8,ScheduledProcedureStepStartDate" 20021103
"<(0040,0003),TM,6,ScheduledProcedureStepStartTime" 5852
"<(0040,0009),SH,8,ScheduledProcedureStepID" 2002-15
"(0040,1001),SH,6,RequestedProcedureID" 70804
New Record
"(0008,0050),SH,6,AccessionNumber" 2002-6
"(0008,0090),PN,12,ReferringPhysician’sName" Hedwig Baal
"(0010,0010),PN,18,Patient’sName" Herzberg^Swetlana
"(0010,0020),LO,4,PatientID" 1668
"(0010,0030),DA,8,Patient'sBirthDate" 19340802
"(0010,0040),CS,2,Patient'sSex" M
"(0032,1033),LO,26,RequestingService" US-DRAINAGE GUIDE/ABD/PELV
"(0032,1060),LO,26,RequestedProcedureDescription" US-DRAINAGE GUIDE/ABD/PELV
"(0040,0100),SQ,-1,ScheduledProcedureStepSequence" (null)
"<(0008,0060),CS,2,Modality" US
"<(0040,0001),AE,10,ScheduledStationAETitle" AE_NETRIS
"<(0040,0002),DA,8,ScheduledProcedureStepStartDate" 20021021
"<(0040,0003),TM,6,ScheduledProcedureStepStartTime" 83029
"<(0040,0009),SH,6,ScheduledProcedureStepID" 2002-6
"(0040,1001),SH,6,RequestedProcedureID" 70000
number of records :16
ไม่คำอธิบายส่งสัยจะลำบากครับ
-
ในการสั่ง 1 ครั้ง จะมีการ query ดังนี้ แล้วต่อกันไปเรื่อยๆครับ
New Record
"(0008,0050),SH,8,AccessionNumber" 2002-37 <--- serial ที่รันไปเรื่อยๆครับ หรือลำดับการสั่ง ก็ได้"(0008,0090),PN,10,ReferringPhysician’sName" Elke Jauch < ----- ชื่อผู้สั่งx-ray
"(0010,0010),PN,12,Patient’sName" Hoerer^Emmet < ------ชื่อผู้ป่วย"(0010,0020),LO,4,PatientID" 1670 < ------- HN
"(0010,0030),DA,8,Patient'sBirthDate" 19760223 < -------- ปี เดือน วัน ที่เกิด"(0010,0040),CS,2,Patient'sSex" F < --------- เพศ"(0032,1033),LO,24,RequestingService" US-DRAINAGE GUIDE LIVER < --------- ชื่อฟิลม์ที่สั่ง"(0032,1060),LO,24,RequestedProcedureDescription" US-DRAINAGE GUIDE LIVER
"(0040,0100),SQ,-1,ScheduledProcedureStepSequence" (null)
"<(0008,0060),CS,2,Modality" US
"<(0040,0001),AE,10,ScheduledStationAETitle" AE_NETRIS
"<(0040,0002),DA,8,ScheduledProcedureStepStartDate" 20021202
"<(0040,0003),TM,6,ScheduledProcedureStepStartTime" 112107
"<(0040,0009),SH,8,ScheduledProcedureStepID" 2002-37
"(0040,1001),SH,6,RequestedProcedureID" 70003
ส่วนที่เหลืออื่นๆไม่จำเป้นต้อง query ก็ได้ครับ