สวัสดีครับ
ผมได้ลองดัดแปลงรายงาน รง505 อันเก่า ในส่วนของ script ให้แยกเป็นในอำเภอ นอกอำเภอ แล้วในตึกเค้าก็อยากให้เลือกดูข้อมูลตามตึกได้ เลยลองใช้ความรู้งูๆปลาๆ เพิ่มคำสั่ง getPickupList ให้มันสามารถเลือก ward ได้ แต่มัน error ตอนประมวลผล
อันนี้คำสั่งที่คือที่ผมเพิ่มไปเพื่อให้มีป๊อปอัพเลือก ward และเก็บค่าไว้
ward_list:=GetPickupList('select "All" as name union all select name from ward order by name');
ward := getsqldata('select ward from ward where name="'+ward_list+'"');
แล้วตรง function GetICDRangeCount_InChwpart และ OutChwpart
ได้เพิ่ม v.ward = "'+ward+'" เข้าไปเป็นเงื่อนไขเพิ่ม เพื่อที่จะให้มันแสดงตาม ward ที่เราเลือก
แต่ตอนประมวลผลก็ error ตรงบรรทัดที่ 3ร้อยต้นๆ (while not fcds2.eof do)
ไม่ค่อยมีความรู้เรื่องเขียนโปรแกรม แต่อยากลองทำครับ
รบกวนช่วยแนะนำทีครับ