ช่วนด้วยครับ รายงานส่วนที่ 4 ทันตกรรมประดิษฐ์ รันไม่ได้ครับ.

[kalakachang]

รายงานทันตกรรม  ส่วนที่ 4 ครับ
เขียน Codeใน Variable  


Value :=GetSQLStringData('select count(d.vn)'+
'from dtmain d'+
'left outer join patient p on p.hn=d.hn '+
'where vstdate between"'+ds1+'"and"'+ds2+'"'+
'and d.tmcode in("52009","52010","66025","66026","66027","66028","66029","66030","66031","66032","66033","66034","66035")'+
'and p.pttype in("c0","C1","C2","C3","C4","20","21","22","23","24")');
  รันเเล้วไม่ออกครับ
แต่พอเอาไปรันใน sql ออกครับ..
มันผิดคตรงไหนครับ..
ช่วยที่ครับ.
หรือใครมีรายงาน   ทันตกรรมส่วนที่ 4 ข้อมูลงานรักษาทางทันตกรรมประดิษฐ์
เเล้วเสร็จบ้างครับ..ขอหน่อยครับ...
ขอบคุณครับ..

[Tigger]

GetSQLStringData  เปลี่ยนเป็น GetSQLIntegerData แล้วตัวแปรที่แสดงต้องเป็น integer
ด้วยค่ะ เดี๋ยวไม่ออก ลองดูนะจ๊ะ

[kalakachang]

เปลี่ยนแล้วครับ..ไม่ออกอยู่ดี
ออกเป็น 0 ราย
แต่รันใน sql ออกเป็น 2 ราย

[kalakachang]

GetSQLStringData  เปลี่ยนเป็น GetSQLIntegerData แล้วตัวแปรที่แสดงต้องเป็น integer
ด้วยค่ะ เดี๋ยวไม่ออก ลองดูนะจ๊ะ

พี่มีรายงานทันตกรรมส่วนที่ 4 เปล่าครับ..
ขอหน่อยครับ...

[snhos]

ไม่ได้มาช่วยหรอกครับ  แต่มาขอ 
ส่งมาให้บ้างซิครับ  กำลังต้องการพอดี

[Tigger]

งั้นลองเอารายงานนี้ไปปรับดูนะคะ

[nuttavut]

รายงานทันตกรรม  ส่วนที่ 4 ครับ
เขียน Codeใน Variable  


Value :=GetSQLStringData('select count(d.vn)'+
'from dtmain d'+
'left outer join patient p on p.hn=d.hn '+
'where vstdate between"'+ds1+'"and"'+ds2+'"'+
'and d.tmcode in("52009","52010","66025","66026","66027","66028","66029","66030","66031","66032","66033","66034","66035")'+
'and p.pttype in("c0","C1","C2","C3","C4","20","21","22","23","24")');
  รันเเล้วไม่ออกครับ
แต่พอเอาไปรันใน sql ออกครับ..
มันผิดคตรงไหนครับ..
ช่วยที่ครับ.
หรือใครมีรายงาน   ทันตกรรมส่วนที่ 4 ข้อมูลงานรักษาทางทันตกรรมประดิษฐ์
เเล้วเสร็จบ้างครับ..ขอหน่อยครับ...
ขอบคุณครับ..

ปัญหาคือไม่ได้เว้นช่องว่าง หลัง Single quote
จาก code ของคุณเวลา run จะได้ติดกันเลยครับแบบนี้

select count(d.vn)from dtmain dleft outer join patient p on p.hn=d.hnwhere vstdate between"'+ds1+'"and"'+ds2+'

ทำให้รันไม่ได้ ลองดูตามนี้....
 

โค๊ด: [Select]

Value :=GetSQLStringData('select count(d.vn) '+
' from dtmain d '+
' left outer join patient p on p.hn=d.hn  '+
' where vstdate between"'+ds1+'"and"'+ds2+'" '+
' and d.tmcode in("52009","52010","66025","66026","66027","66028","66029","66030","66031","66032","66033","66034","66035") '+
' and p.pttype in("c0","C1","C2","C3","C4","20","21","22","23","24") ');


[kalakachang]

ขอบคุณมากๆครับ..ได้เเล้วครับ.ขอบคุณทุกคนเลย..