วิธีการเขียนคำสั่งให้นำข้อมูลจาก Image Server มาแสดงในรายงาน
![](https://hosxp.net/wordpress/wp-content/uploads/2023/05/07-06-2555-11-02-44-1030x647.png)
![](https://hosxp.net/wordpress/wp-content/uploads/2023/05/tabbar.png)
ตัวอย่างชุดคำสั่งที่ต้องเขียน
procedure DetailBeforeGenerate;
var cds:tclientdataset;
begin
cds:=tclientdataset.create(nil);
cds.HOSxP_GetDataset_ImageServer('select * from opdscan where hn="xxx"');
cds.AssignDataToPipeLineLink5;
cds.free;
end;
และเนื่องจาก DataPipeLine5 จะต้องมีข้อมูลก่อน ดังนั้น Event GlobalOnCreate ของ Report นี้จึงต้องกำหนดให้ DBPipeLineLink5 มีข้อมูลก่อนด้วย ดังตัวอย่าง
procedure GlobalOnCreate;
var cds:tclientdataset;
begin
cds:=tclientdataset.create(nil);
cds.HOSxP_GetDataset_ImageServer('select * from patient_image limit 0');
cds.AssignDataToPipeLineLink5;
cds.free;
end;
หลังจากที่เขียนเสร็จแล้ว ให้วาง DBImage เอาไว้ใน Band Detail แล้วกำหนด DataPipeLine ไปที่ DBPipeLine5 แล้วเลือกกำหนด Field ให้ชี้ไปยัง Blob field ที่เก็บข้อมูลรูปภาพเอาไว้