BMS-HOSxP Community
HOSxP => การเขียน SQL Script => ข้อความที่เริ่มโดย: songwut ที่ พฤศจิกายน 04, 2011, 13:09:44 PM
-
สวัสดีครับ
ผมได้ลองดัดแปลงรายงาน รง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)
ไม่ค่อยมีความรู้เรื่องเขียนโปรแกรม แต่อยากลองทำครับ
รบกวนช่วยแนะนำทีครับ
-
ลองดูนะค่ะ
ward := GetPickupList('select "ALL" as name union select name from ward order by name ');
if (ward = 'ALL') or (ward = '') then
begin
ward := '';
end;
if (ward <> 'ALL') and (ward <> '') then
begin
ward := GetSQLStringData('select ward from ward where name="'+ ward +'" ');
ward := 'and i.ward = "'+ward+'" ';
end;
ตอบโดย BMS Call Center ค่ะ
-
ขอบคุณครับ เดี๋ยวลองดูครับ :)
-
จะลองดูด้วยครับ