วิธีการเขียนคำสั่งให้นำข้อมูลจาก Image Server มาแสดงในรายงาน

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;

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;