BMS-HOSxP Community
HOSxP => Report Exchange => ข้อความที่เริ่มโดย: วีระวัฒน์ (เอก) ที่ มีนาคม 04, 2009, 15:04:12 PM
-
พอดีอยากให้แสดง diagtype ที่เป็นชื่อด้วย
เช่น S001 1 priciple diagnosis
URI 2 cormobidity
Bed sore 3 complication
HT 4 other diagnosis
V012 5 External Cause of procedure
หรือมีตัวอย่างอื่นส่งให้ก็ได้ครับ
-
... เอาแบบวาง 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 ก็ทำในลักษณะเดียวกันครับ เปลี่ยนคำสั่งแค่ตรงสีน้ำเงินเหมือนกัน ... :D ....
... เพิ่มเติมให้พี่เอกนิดนะครับ ตรง 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 อื่นมาได้ครับ.... :D ...
-
... อันนี้ ลองแก้ไขฟอร์มของพี่เอกให้แล้วครับ ที่เพิ่มเงื่อนไขคำสั่งแสดงข้อมูล diagtype ที่เป็นตัวเลขก็มีตรง
variable14,variable5,variable15,variable16
... ส่วน variable ที่แสดงข้อมูล diagtype ที่เป็นตัวหนังสือ ก็ตรง
variable18,variable19,variable20,variable21 ครับ ... :D ...
-
ขอบคุณมากครับ