ขอช่วยแก้โค๊ดรายงานครับ

[อู๋kokha50]

รายงานrefer  ยอดรวม refer โดยพยาบาล    มี  6 ครั้ง              ถูกต้อง
                    ยอดรวม refer โดยรถยนต์       มี 7 ครั้ง               ถูกต้อง
                    ยอดรวม พยาบาลพร้อมรถยนต์ มี 5 ครั้ง           ไม่ถูกต้องมีน้อยกว่า ที่ถูกต้องจะต้องมี 6หรือ7 ครั้ง
                                                                                       เพราะพยาบาลจะต้องเท่ากับหรือน้อยกว่ารถยนต์
                                                                                       
                                                                                        พยาบาลจะไปreferเอง โดยไม่มีรถยนต์ไม่ได้
                                                                                        มีบางครั้งที่ refer เอารถแต่ไม่เอาพยาบาล
                 

[non431]

ตามรายงานก็น่าจะถูกนะครับ เพราะ ตรงยอดรวม พยาบาลพร้อมรถยนต์ นั้น sql ที่เขียนไว้ในตัวรายงานใช้เงื่อนไข and ตามโค๊ดด้านล่าง คือ จะนับก็ต่อเมื่อทั้งสองกรณีเป็น Y เท่านั้น
กรณีอื่นไม่นับ


   Value := GetSQLStringData(' select count(*)as cc '+
 ' from referout ro '+
 ' left outer join ovst o on o.vn = ro.vn '+
 ' left outer join patient p on p.hn=ro.hn  '+
 ' left outer join hospcode h on h.hospcode = ro.hospcode '+
 ' left outer join rfrcs r on r.rfrcs = ro.rfrcs '+
 ' left outer join doctor d on d.code = ro.doctor  '+
 ' left outer join pttype pe on pe.pttype = o.pttype  '+
 ' where   ro.department in( "OPD","IPD") '+
 ' and ro.refer_date between  "' + ds1 + '" and "' + ds2 + '" '+
 ' and (ro.with_nurse="Y" and ro.with_ambulance="Y") ');

[atit]

ตามรายงานก็น่าจะถูกนะครับ เพราะ ตรงยอดรวม พยาบาลพร้อมรถยนต์ นั้น sql ที่เขียนไว้ในตัวรายงานใช้เงื่อนไข and ตามโค๊ดด้านล่าง คือ จะนับก็ต่อเมื่อทั้งสองกรณีเป็น Y เท่านั้น
กรณีอื่นไม่นับ

   Value := GetSQLStringData(' select count(*)as cc '+
 ' from referout ro '+
 ' left outer join ovst o on o.vn = ro.vn '+
 ' left outer join patient p on p.hn=ro.hn  '+
 ' left outer join hospcode h on h.hospcode = ro.hospcode '+
 ' left outer join rfrcs r on r.rfrcs = ro.rfrcs '+
 ' left outer join doctor d on d.code = ro.doctor  '+
 ' left outer join pttype pe on pe.pttype = o.pttype  '+
 ' where   ro.department in( "OPD","IPD") '+
 ' and ro.refer_date between  "' + ds1 + '" and "' + ds2 + '" '+
 ' and ro.with_nurse="Y" and ro.with_ambulance="Y" ');
ลองดูครับ

[non431]

ตรงเครื่องหมายวงเล็บผมใส่ไปเอง แต่ก็ไม่มีผลอะไรครับ
copy sql ไปวางได้เลยครับ

[อู๋kokha50]

ยังไม่ถูกครับ
   ยอดรวม พยาบาลควรจะ เท่ากับ พยาบาลพร้อมรถยนต์
                            ยอดรวม ไม่น่าจะน้อยกว่า เพราะพยาบาลไปเองโดยไม่มีรถเป็นไปไม่ได้ ครัับ

[golf_win]

พี่อู๋ครับ แล้วพยาบาลได้บันทึกข้อมูลครบหรือป่าวครับ ผมลองนับยอดกับที่โรงพยาบาลก็ OK นะครับ กับคำสั่ง variable ที่ให้มา ลองตรวจสอบที่ user ก่อนครับ

[อู๋kokha50]

  ;Dตรวจสอบอีกครั้งครับ เพราะตอนนี้ยังเขียนสมุดrefer คู่กับลงคอมไปด้วยกัน:D

[atit]

ตามรายงานก็น่าจะถูกนะครับ เพราะ ตรงยอดรวม พยาบาลพร้อมรถยนต์ นั้น sql ที่เขียนไว้ในตัวรายงานใช้เงื่อนไข and ตามโค๊ดด้านล่าง คือ จะนับก็ต่อเมื่อทั้งสองกรณีเป็น Y เท่านั้น
กรณีอื่นไม่นับ

ถูกต้องครับคำสั่งถูกต้องไปดูอีกทีว่าลงถูกหรือเปล่าเช่น ลงว่ามีพยาบาลแต่ลืมลงว่าพร้อมรถ ก็จะไม่นับให้ในข้อสุดท้ายครับลองดูแล้วของผมก็เป้น

[Neo]

ขอบคุณครับ หัว ER พึ่งมาบอกให้เขียนรายงานแบบนี้เลย ขอลองเอาไปทดสอบด้วยคนนะครับ

[Neo]

ทดสอบรายงานแล้ว ของรพ.ผมก็ไม่ตรงครับ แต่สามารถไม่ได้มาจาก โค๊ดรายงาน แต่มาจากเจ้าหน้าที่ไม่ลงบันทึกข้อมูลเวลาใช้รถrefer กับ พยาบาล ครับ