ช่วยแก้รายงาน report-501 หน่อยครับ

[วีระวัฒน์ (เอก)]

พอดีอยากให้แสดง diagtype ที่เป็นชื่อด้วย
เช่น                   S001                        1  priciple diagnosis
                         URI                          2  cormobidity
                         Bed sore                  3  complication
                         HT                           4  other diagnosis
                         V012                       5  External Cause of procedure

หรือมีตัวอย่างอื่นส่งให้ก็ได้ครับ

[Khuad]

... เอาแบบวาง variable เพิ่มเข้าไปเลยก็ได้ครับพี่เอก ...

... ตัวอย่างเช่น ตรงแถวของข้อมูลที่เป็น pdx นะครับ  ให้พี่เอกวาง variable ตรงตำแหน่งที่พี่ต้องการ แล้วใส่คำสั่งเป็น( copy คำสั่งไปวางใน variable ได้เลยครับ )

  Value := GetSQLStringData('select d.name from iptdiag i '+
   'left outer join diagtype d on d.diagtype = i.diagtype '+
   'where i.icd10 = "'+DBPipeline['pdx']+'" '+
   'and i.an = "'+DBPipeline['an']+'" ');

... ถ้าเป็นตรง dx0  ก็วาง variable แล้วใช้คำสั่งเหมือนกัน แต่เปลี่ยนคำสั่งตรงสีน้ำเงินเป็น "'+DBPipeline['dx0']+'"  ครับ ....

... dx1,2,3,4,5  ก็ทำในลักษณะเดียวกันครับ เปลี่ยนคำสั่งแค่ตรงสีน้ำเงินเหมือนกัน ...  ....



... เพิ่มเติมให้พี่เอกนิดนะครับ  ตรง variable ที่พี่เอกใช้แสดงข้อมูล diagtype ที่เป็นตัวเลข แล้วพี่เอกใช้คำสั่งเป็น

Value := GetSQLStringData('select diagtype from iptdiag where icd10 = "'+DBPipeline['xxx']+'" ');


ให้พี่เอกเปลี่ยนโดยเพิ่มเงื่อนไขในการกำหนดค่าของ  an เข้าไปด้วยนะครับ เป็น

Value := GetSQLStringData('select diagtype from iptdiag where icd10 = "'+DBPipeline['xxx']+'" and an = "'+DBPipeline['an']+'" ');


ที่เพิ่มคือส่วนที่เป็นสีน้ำเงินครับ  ไม่งั้นอาจจะไปเอา diagtype ของผู้ป่วย an อื่นมาได้ครับ....  ...

[Khuad]

... อันนี้ ลองแก้ไขฟอร์มของพี่เอกให้แล้วครับ ที่เพิ่มเงื่อนไขคำสั่งแสดงข้อมูล diagtype ที่เป็นตัวเลขก็มีตรง
variable14,variable5,variable15,variable16


... ส่วน variable ที่แสดงข้อมูล diagtype ที่เป็นตัวหนังสือ ก็ตรง
variable18,variable19,variable20,variable21  ครับ ...  ...

[วีระวัฒน์ (เอก)]

ขอบคุณมากครับ