BMS-HOSxP Community

HOSxP => Report Exchange => ข้อความที่เริ่มโดย: โรงพยาบาลอัมพวา ที่ พฤศจิกายน 14, 2012, 11:26:09 AM

หัวข้อ: ขอความช่วยเหลือหน่อยรายงานออกเบิ้ล
เริ่มหัวข้อโดย: โรงพยาบาลอัมพวา ที่ พฤศจิกายน 14, 2012, 11:26:09 AM

ชื่อรายการออกเบิ้ล ครับ ผมชื่อvariable  คำสั่ง
 Value := GetSQLStringData('select name from s_drugitems where icode="'+  DBPipeline['icode'] +'"group by icode');

ดังรูป  แก้ไขอย่างไร ดีครับ

หัวข้อ: Re: ขอความช่วยเหลือหน่อยรายงานออกเบิ้ล
เริ่มหัวข้อโดย: Peace ที่ พฤศจิกายน 14, 2012, 11:38:37 AM

อ้างจาก: โรงพยาบาลอัมพวา ที่ พฤศจิกายน 14, 2012, 11:26:09 AM

ชื่อรายการออกเบิ้ล ครับ ผมชื่อvariable  คำสั่ง
 Value := GetSQLStringData('select name from s_drugitems where icode="'+  DBPipeline['icode'] +'"group by icode');

ดังรูป  แก้ไขอย่างไร ดีครับ

ลอง Value := GetSQLStringData('select s.name from s_drugitems s'+
' left outer join opitemrece o on o.icode=s.icode '+
' where o.vn="'+  DBPipeline['vn'] +'" ');

หัวข้อ: Re: ขอความช่วยเหลือหน่อยรายงานออกเบิ้ล
เริ่มหัวข้อโดย: โรงพยาบาลอัมพวา ที่ พฤศจิกายน 14, 2012, 11:50:02 AM

ลองแล้ว ครับ ขึ้นแบบ นี้ครับ

หัวข้อ: Re: ขอความช่วยเหลือหน่อยรายงานออกเบิ้ล
เริ่มหัวข้อโดย: เกื้อกูล ครับ.. ที่ พฤศจิกายน 14, 2012, 12:57:29 PM

ส่งตัวรายงาน .cds ขึ้น บอร์ด ให้ BMS ช่วยดูให้ครับ  :D

หัวข้อ: Re: ขอความช่วยเหลือหน่อยรายงานออกเบิ้ล
เริ่มหัวข้อโดย: Peace ที่ พฤศจิกายน 14, 2012, 13:12:54 PM

อ้างจาก: โรงพยาบาลอัมพวา ที่ พฤศจิกายน 14, 2012, 11:50:02 AM

ลองแล้ว ครับ ขึ้นแบบ นี้ครับ

ลองเพิ่ม group by icode รึยังครับผม


ถ้าไม่ได้ ส่ง form มาก็ได้ครับ

หัวข้อ: Re: ขอความช่วยเหลือหน่อยรายงานออกเบิ้ล
เริ่มหัวข้อโดย: โรงพยาบาลอัมพวา ที่ พฤศจิกายน 15, 2012, 10:27:19 AM

ลองแล้ว ครับ ส่ง*.cds ให้ช่วยแก้ไข้ทีนะครับ มันออกเบิ้อฌแพาะผู้ป่วยแผนไทยกับทันตกรรมจะออกเบื้อตลอดอ่ะครับ

หัวข้อ: Re: ขอความช่วยเหลือหน่อยรายงานออกเบิ้ล
เริ่มหัวข้อโดย: BBT Hospital ที่ พฤศจิกายน 15, 2012, 20:55:34 PM

ใน Variable4 กับ Variable6 ลืมใส่
ว่าเป็น vn ของคนไข้รายนั้นหรือเปล่าครับ
จาก
  Value := GetSQLStringData('select name from s_drugitems where icode="'+  DBPipeline['icode'] +'"group by icode');

น่าจะแก้เป็น
  Value := GetSQLStringData('select sd.name from opitemrece o '
                  +' left outer join s_drugitems s on s.icode=o.icode '
                  +' where vn="'+DBPipeline['vn'] +'" '
                  +' and s.icode="'+  DBPipeline['icode'] +'" group by s.icode');
มากกว่านะครับ
จะได้เป็นของคนไข้รายนี้แน่ ๆ
เหตุผลที่ใช้ ตาราง opitemrece เป็นหลักเพราะว่า vn นั้นมีไม่กี่รายการแต่ถ้าอิงตาราง s_drugitmes จะได้ชื่อยาซึ่งมา link กับ vn ได้หลายตัวนะครับ
ผมยังไม่ได้ลองรันนะครับ เพราะว่าใช้ NB ที่บ้านลงแต่Program HOSxP แต่ไม่มีdatabase จึงไม่สามารถรันทดสอบดูครับ