ปุ่ม CF ในงาน one stop service

[วีระวัฒน์ (เอก)]

ผมได้สร้าง script แล้ว SAVE ชื่อว่า SYS_ONESTOPSERVICE_FORM  เพิ่มนำไปใช้ในงานโดยการ กดปุ่ม CF ใน เมนู งาน one stop service ของ โปรแกรม HOSxP PCU แต่กดแล้วใช้ไม่ได้ แจ้ง Error แต่ผมทดสอบ ใน HOSxP 3.57.8.15 ปุ่ม CF ในเมนูงาน one stop service  ปรากฎว่าใช้งานได้เหมือน ปุ่ม CF ในเมนูห้องตรวจแพทย์  CF ในเมนูห้องคัดกรอง 
ตอนนี้ทดสอบกับ HOSxP_PCU_Setup_3.57.6.28b ครับ

[วีระวัฒน์ (เอก)]

script ที่ผมสร้างใว้ เพื่อ run โปรแกรมข้างนอก

var fonlineid,fvn,fhn,fdepartment,fcid,fdepartmentcode,exefile:string;
begin
   fonlineid:=get_onlineid;
   fvn:= GetGlobalValue('VN');
   fhn:=getsqldata('select hn from ovst where vn = "'+fvn+'"');
   fcid:=getsqldata('select cid from patient where hn="'+fhn+'"');

   fdepartment := getsqldata('select department from onlineuser where onlineid="'+fonlineid+'"');

   fdepartmentcode:=copy(fdepartment,0,3);

   exefile:='C:\Program Files\HOSxP\Chome.exe '+fcid;
   WinExec(exefile,nil);
   end;

[armds]

โค้ดน่าจะถูกแล้วนะครับ

ลอง ปิด HOSxP PCU แล้วเปิดใช้งานใหม่ดูครับ มันอาจจะจำค่าเก่าอยู่ครับ มันถึงถามว่า unit นี้

ปล. ผมก็ยังไม่ได้ลองกับ HOSxP PCU เลยครับ

[admin30]

HOSxP PCU ใช้สคริปไม่ได้ครับ

[jdadmin1]

HOSxP PCU ใช้สคริปไม่ได้ครับ

ได้ครับ เดี๋ยวรอให้พี่เอกมาเฉลย อิ อิ อิ
 

[วีระวัฒน์ (เอก)]

งานเข้าอีกแล้ว ถูกอ้างอิง

[Bangkaja Distric Health Center]

'C:\Program Files\HOSxP\Chome.exe '