ผู้เขียน หัวข้อ: อยากทราบการเขียน Script UE Form  (อ่าน 9216 ครั้ง)

0 สมาชิก และ 1 บุคคลทั่วไป กำลังดูหัวข้อนี้

ออฟไลน์ thaidelphi

  • Newbie
  • *
  • กระทู้: 15
  • Respect: 0
    • ดูรายละเอียด
อยากทราบการเขียน Script UE Form
« เมื่อ: มกราคม 11, 2010, 19:45:32 PM »
0
อยากทราบการเขียน Script UE Form
มี function อะไรที่ใช้ได้บ้างครับ
จะติดต่อกับตัว database ผ่าน TZquery ได้ไหม ใน UE ฟอร์ม

เผื่อจะทำตัวตรวจสอบ VN ว่ามีการบันทึกข้อมูลในฟอร์ม UE ไปหรือยัง
@SaiNgam Hospital Kamphaengphet
CentOS 5.2 : MySQL 5.1.x; HOSxP v.3.54.x.x
cxxxxx[]:::::::::::::::::::::>

ออฟไลน์ nummon

  • Full Member
  • ***
  • กระทู้: 107
  • Respect: 0
    • ดูรายละเอียด
    • SrisangwornSukhothai Hospital
Re: อยากทราบการเขียน Script UE Form
« ตอบกลับ #1 เมื่อ: มกราคม 13, 2010, 22:53:38 PM »
0
ผมลอง(ผิดลองถูก)เขียน  event script ติดต่อ  database ได้
ผ่าน tclientdataset ตาม ตย.


  vn := GetGlobalValue('VN');
  uCDS :=tclientdataset.create(nil);
  uCDS.Data := HOSxP_Getdataset('select ward from ipt where an = "'+vn+'"');
  ward:= uCDS.FieldByName('ward').AsString ;

มี function อะไรที่ใช้ได้บ้างครับ

หาเก็บๆแกะๆเอาจากของที่มีแจกตัวอย่างUEให้ในเวบนี้น่ะครับ
ไม่รู้ว่าทั้งหมดมีอะไรบ้าง
<a href=http://www.srisangworn.go.th>โรงพยาบาลศรีสังวรสุโขทัย</a>
Hosxp : 3.54.2.15
SERVER :  Xeon 3.4    Ram 4G   HD 120 GB OS : Linux CENOS 5.1   Mysql  5.1.23-rc
SLAVE-I :  Xeon 3.4    Ram 4G   HD 120 GB OS : Linux CENOS 5.2   Mysql  5.1.45 (Mysql Replication)
เริ่ม  4 สิงหาคม 2549  ขึ้นระบบ : อ.ชัยพร และ ทีม BMS

ออฟไลน์ thaidelphi

  • Newbie
  • *
  • กระทู้: 15
  • Respect: 0
    • ดูรายละเอียด
Re: อยากทราบการเขียน Script UE Form
« ตอบกลับ #2 เมื่อ: มกราคม 14, 2010, 19:35:00 PM »
0
ผมลอง(ผิดลองถูก)เขียน  event script ติดต่อ  database ได้
ผ่าน tclientdataset ตาม ตย.


  vn := GetGlobalValue('VN');
  uCDS :=tclientdataset.create(nil);
  uCDS.Data := HOSxP_Getdataset('select ward from ipt where an = "'+vn+'"');
  ward:= uCDS.FieldByName('ward').AsString ;


ขอบคุณครับ
@SaiNgam Hospital Kamphaengphet
CentOS 5.2 : MySQL 5.1.x; HOSxP v.3.54.x.x
cxxxxx[]:::::::::::::::::::::>

doramon

  • บุคคลทั่วไป
Re: อยากทราบการเขียน Script UE Form
« ตอบกลับ #3 เมื่อ: มกราคม 14, 2010, 22:42:00 PM »
0
ผมลอง(ผิดลองถูก)เขียน  event script ติดต่อ  database ได้
ผ่าน tclientdataset ตาม ตย.


  vn := GetGlobalValue('VN');
  uCDS :=tclientdataset.create(nil);
  uCDS.Data := HOSxP_Getdataset('select ward from ipt where an = "'+vn+'"');
  ward:= uCDS.FieldByName('ward').AsString ;

มี function อะไรที่ใช้ได้บ้างครับ

หาเก็บๆแกะๆเอาจากของที่มีแจกตัวอย่างUEให้ในเวบนี้น่ะครับ
ไม่รู้ว่าทั้งหมดมีอะไรบ้าง


หาเก็บๆแกะๆเอาจากของที่มีแจกตัวอย่างUEให้ในเวบนี้น่ะครับ 

แบบนี้และครับ