ขอคำแนะนำด้วยครับ การ Query รายงาน

[nonrock1]

พอเข้าไปสร้างรายงานในรีฟอร์ทดีไซด์ใช้ฟังชั่น GetDateRangeDialog ข้อมูลออกเฉพาะช่วงวันที่ ที่ผมเขียนสคิปครับ ต้องแก้ตรงใหนครับ(มือใหม่หัดเขียน )

select vn.vstdate,vn.pttypeno,concat(p.pname,p.fname,"   ",p.lname)as fullname,p.cid,vn.main_pdx from
person p
left outer join vn_stat vn on vn.hn=p.patient_hn
where vn.vstdate between "2010-10-01" and "2010-10-31"
order by vn.pttype,vn.vstdate

[ไม่เสียสละ ชัยชนะไม่เกิด]

ลองเอาตัวอย่างไป Import แล้วลองปรับแก้ตามนี้ดูครับ

[niyomstd]

     ds1 := formatdatetime('yyyy-mm-dd',d1);
     ds2 := formatdatetime('yyyy-mm-dd',d2);
สร้างตัวแปร ds1,ds2 ก่อนนะครับ
แล้วนำ ds1,ds2 ไปใส่ใน
select vn.vstdate,vn.pttypeno,concat(p.pname,p.fname,"   ",p.lname)as fullname,p.cid,vn.main_pdx from
person p
left outer join vn_stat vn on vn.hn=p.patient_hn
where vn.vstdate between "'+ds1+'" and "'+ds2+'"
order by vn.pttype,vn.vstdate

[nonrock1]

ขอบคุณมากครับ ทั้ง 2 ท่านทำให้ผมเห็นทางสว่าง ทำได้แล้วครับ สุดยอด;D

 

[nonrock1]

ประกาศตัวแปร
        date1,date2:datetime;
        ds1,ds2:string; แบบนี้

ส่วน
begin

GetDateRangeDialog(date1, date2);
              ds1:= FormatDateTime('yyyy-mm-dd',date1);
              ds2:= FormatDateTime('yyyy-mm-dd',date2);

  GetSQLStringData('select vn.vstdate,vn.pttypeno,concat(p.pname,p.fname,"   ",p.lname)as fullname,p.cid,vn.main_pdx from '

+'person p '

+'left outer join vn_stat vn on vn.hn=p.patient_hn '
+'where vn.vstdate between"'+ds1+'" and "'+ds2+'" '
+'order by vn.pttype,vn.vstdate ');
end;
ทางสว่างมืดอีกครั้ง ช่วยดูให้อีกทีครับ

[James011]

ประกาศตัวแปร
        date1,date2:datetime;
        ds1,ds2:string; แบบนี้

ส่วน
begin

GetDateRangeDialog(date1, date2);
              ds1:= FormatDateTime('yyyy-mm-dd',date1);
              ds2:= FormatDateTime('yyyy-mm-dd',date2);

  GetSQLStringData('select vn.vstdate,vn.pttypeno,concat(p.pname,p.fname,"   ",p.lname)as fullname,p.cid,vn.main_pdx from '

+' person p '

+' left outer join vn_stat vn on vn.hn=p.patient_hn '
+' where vn.vstdate between "'+ds1+'" and "'+ds2+'" '
+' order by vn.pttype,vn.vstdate ');
end;
ทางสว่างมืดอีกครั้ง ช่วยดูให้อีกทีครับ

  ผมแก้ให้แล้ว เว้นช่องว่างในคำสั่ง SQL ด้วยครับ ลองเปรียบเทียบ บน กะ ล่างดูนะครับ

[thannawe]

+'   left outer join vn_stat vn on vn.hn=p.patient_hn   '
+ '   where vn.vstdate between"'+ds1+'" and "'+ds2+'"   '
+'    order by vn.pttype,vn.vstdate  ');

ใส่ เว้นวรรค ให้มันด้วย ตามอ.เจมส์บอกครับ

[nonrock1]

ประกาศตัวแปร
        date1,date2:datetime;
        ds1,ds2:string; แบบนี้

ส่วน
begin

GetDateRangeDialog(date1, date2);
              ds1:= FormatDateTime('yyyy-mm-dd',date1);
              ds2:= FormatDateTime('yyyy-mm-dd',date2);

  GetSQLStringData('select vn.vstdate,vn.pttypeno,concat(p.pname,p.fname,"   ",p.lname)as fullname,p.cid,vn.main_pdx from '

+' person p '

+' left outer join vn_stat vn on vn.hn=p.patient_hn '
+' where vn.vstdate between "'+ds1+'" and "'+ds2+'" '
+' order by vn.pttype,vn.vstdate ');
end;
ทางสว่างมืดอีกครั้ง ช่วยดูให้อีกทีครับ

  ผมแก้ให้แล้ว เว้นช่องว่างในคำสั่ง SQL ด้วยครับ ลองเปรียบเทียบ บน กะ ล่างดูนะครับ

แก้ตรงใหนครับผมมองไม่เห็น รบกวนอีกทีคับ ทำเป็นสีแดงหรือจุดบอกได้จะดียิ่งครับ

[James011]

   

[naj]

ความเคยชินส่วนตัวผมชอบที่จะเอาเครื่องหมาย +ไปไว้ หลังคำสั่งครับ ข้อสังเกตง่ายคือหลังจากคำสั่งแต่ละบรรทัดให้เว้นช่องว่างอย่างน้อย 1 ช่อง แล้วค่อยใส่เครื่องหมาย  '+ ที่จะเชื่อมกับคำสังของบรรทัดอื่น เพื่อที่ Compiler จะได้มองว่าเป้นคำสั่งที่ต่อเนื่องกันครับ สู้ต่อไป ทาเคชิ
  GetSQLStringData('select vn.vstdate,vn.pttypeno,concat(p.pname,p.fname,"   ",p.lname)as fullname,p.cid,vn.main_pdx from person p  '+
'left outer join vn_stat vn on vn.hn=p.patient_hn '+
'where vn.vstdate between"'+ds1+'" and "'+ds2+'" '+
'order by vn.pttype,vn.vstdate ');
end;

[niyomstd]

ตาม อ นาจ เลยครับ

[udomchok]

มันผิดที่ as full name ไปติดกับ ) ครับ

  GetSQLStringData('select vn.vstdate,vn.pttypeno,concat(p.pname,p.fname,"   ",p.lname)as fullname,p.cid,vn.main_pdx from '

เว้นวรรคต่าง ๆ ถูกต้อง แต่ไม่สวยงาม ดูยากครับ ควรทำตามที่ อ.นาจแนะนำครับ

begin

GetDateRangeDialog(date1, date2);
              ds1:= FormatDateTime('yyyy-mm-dd',date1);
              ds2:= FormatDateTime('yyyy-mm-dd',date2);

GetSQLStringData('select vn.vstdate, vn.pttypeno, concat(p.pname,p.fname,"   ",p.lname) as fullname, p.cid, vn.main_pdx '+
'from person p '+
'left outer join vn_stat vn on vn.hn=p.patient_hn '+
'where vn.vstdate between "'+ds1+'" and "'+ds2+'" '+
'order by vn.pttype, vn.vstdate');
end;

[nonrock1]

ขอถามต่ออีกนะครับ

1.การเลือกตารางหลักสำคัญรึป่าวครับ

2.ถ้าสำคัญควรจะเลือกอย่างไร

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

[เกื้อกูล ครับ..]

ขอถามต่ออีกนะครับ

1.การเลือกตารางหลักสำคัญรึป่าวครับ

2.ถ้าสำคัญควรจะเลือกอย่างไร

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

ส่ง report .cds มาบนบอร์ดเลยครับ..เดี๊ยวจะมีคนช่วยหลายคนครับ...ชุมชนนี้อบอุ่นครับ

[ไม่เสียสละ ชัยชนะไม่เกิด]

ลองเอาของผม Import เข้าไปแล้วดูตัวอย่างครับรับรองได้แน่นอนครับ

[udomchok]

ยังไม่ได้เลือก dbpipeline ทำให้ไม่เห็นข้อมูลที่เรา select คับ แต่ต้อง preview ก่อนนะครับ
ไฟแรงอย่างนี้ต้องไปเชียงใหม่ครับ เดี๋ยวเปิด course basic report designer ให้ครับ

[nonrock1]

แนะส่วนที่ผมทำผิดด้วยนะครับ มือใหม่หัดเขียน พี่ๆคงไม่รำคาญซะก่อน(ผมมันอ่อน )

[nonrock1]

ลองเอาของผม Import เข้าไปแล้วดูตัวอย่างครับรับรองได้แน่นอนครับ

ลองนำเข้าแล้วครับ แต่ก็ยังไม่เข้าใจ ขอบคุณครับ จะพยายามต่อไป

[ไม่เสียสละ ชัยชนะไม่เกิด]

ตัวอย่างรายงานที่เอามาให้ทดลองต้องการอะไรครับ
  เพราะว่าสองตารางมันไม่สัมพันธ์กันครับ

[udomchok]

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

โค๊ด: SQL

1. SELECT vn.vstdate, vn.pttypeno, concat(p.pname,p.fname,"   ",p.lname) AS fullname, p.cid, vn.main_pdx
2. FROM  person p
3. LEFT OUTER JOIN vn_stat vn ON vn.hn=p.patient_hn
4. WHERE vn.vstdate BETWEEN "2010-10-01" AND "2010-10-31"
5. ORDER BY vn.pttype, vn.vstdate

ลองเทียบกับของเดิม

โค๊ด: SQL

1. SELECT vn.vstdate,vn.pttypeno,concat(p.pname,p.fname,"   ",p.lname)AS fullname,p.cid,vn.main_pdx
2.  
3. FROM  person p
4.  
5. LEFT OUTER JOIN vn_stat vn ON vn.hn=p.patient_hn
6. WHERE vn.vstdate BETWEEN "2010-10-01"AND"2010-10-31"
7. ORDER BY vn.pttype,vn.vstdate

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

ลองดูรายงานที่ปรับแก้แล้วนะครับ ไปตกแต่งให้สวยงามเองนะ

[naj]

ลองเอาของผม Import เข้าไปแล้วดูตัวอย่างครับรับรองได้แน่นอนครับ

ลองนำเข้าแล้วครับ แต่ก็ยังไม่เข้าใจ ขอบคุณครับ จะพยายามต่อไป

สู้ต่อไป น้องเอ้ย....ถ้าเก่งแล้วจะได้ช่วยคนอื่นต่อไป

[niyomstd]

ตาม อ นาจอีกครั้ง ครับ 
อยากทราบว่ารายงานนี้ต้องการอะไรเหรอครับ 

[nonrock1]

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

โค๊ด: SQL

1. SELECT vn.vstdate, vn.pttypeno, concat(p.pname,p.fname,"   ",p.lname) AS fullname, p.cid, vn.main_pdx
2. FROM  person p
3. LEFT OUTER JOIN vn_stat vn ON vn.hn=p.patient_hn
4. WHERE vn.vstdate BETWEEN "2010-10-01" AND "2010-10-31"
5. ORDER BY vn.pttype, vn.vstdate

ลองเทียบกับของเดิม

โค๊ด: SQL

1. SELECT vn.vstdate,vn.pttypeno,concat(p.pname,p.fname,"   ",p.lname)AS fullname,p.cid,vn.main_pdx
2.  
3. FROM  person p
4.  
5. LEFT OUTER JOIN vn_stat vn ON vn.hn=p.patient_hn
6. WHERE vn.vstdate BETWEEN "2010-10-01"AND"2010-10-31"
7. ORDER BY vn.pttype,vn.vstdate

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

ลองดูรายงานที่ปรับแก้แล้วนะครับ ไปตกแต่งให้สวยงามเองนะ

ได้แล้วครับ จะเก็บไว้เป็นตัวอย่าง ขอบคุณมากครับ

ตรง parameter ทาง bms ที่มาอบรมให้  เขาบอกว่าตัวใหนก็ได้ เพื่อให้ผ่านหน้านั้นเข้าไปสร้างรายงาน

[naj]

ฝากทุกท่านดูแลด้วยครับ เป็นน้อง คอมพิวเตอร์ ของ รพ.สต.บ้านสาลวัน อ.พุทธมณฑล จ.นครปฐม  ชื่อเล่น เปิ้ล  มือใหม่หัดขับ

[nonrock1]

ตาม อ นาจอีกครั้ง ครับ 
อยากทราบว่ารายงานนี้ต้องการอะไรเหรอครับ 

ไม่ได้นำไปใช้งานในตอนนี้แค่หัดเขียนครับ ผมคิดว่ามันเป็น Basic ของ Basic  ในการจะพัฒนารายงานอื่นๆต่อไปครับ (แค่ง่ายยังตั้งหลายวันเลย ) ขอบคุณพี่ๆทุกท่านครับ ต่อไปจะได้เิริ่มขั้นต่อไปซะที คงเจอปัญหาอีกมากมายในการสร้างรายงาน ยังไงก็ขอฝากเนื้อฝากตัวไว้ในดวงแดของพี่ๆทุกคนด้วยนะครับ  

[naj]

น้องเขารู้ว่าอีกไม่นาน งานเข้า เลยเตรียมตัวเตรียมใจไว้ก่อนครับ เพราะตอนนี้ ทุกอย่างพร้อมแล้ว รอจุดไฟเผาอย่างเดียว.....ส่วนผมเองก็ไม่ได้ว่างคุยกับน้องเขาด้วยครับ (เป็นชายเหมือนกัน เลยไม่มีเวลาให้...ซะง้าน)  ยังงั้ย  ก็ฝากน้องเขาไว้ในอ้อมใจของทุกท่านด้วยนะครับ 
หมายเหตุ
จริงๆๆแนะนำน้องไปแล้วว่าให้ใช้ชื่อที่เป็นหญิง พร้อมรูปถ่ายด้วย จะได้รับการช่วยเหลือโดยฉับพลัน 

[thannawe]

น้องเขารู้ว่าอีกไม่นาน งานเข้า เลยเตรียมตัวเตรียมใจไว้ก่อนครับ เพราะตอนนี้ ทุกอย่างพร้อมแล้ว รอจุดไฟเผาอย่างเดียว.....ส่วนผมเองก็ไม่ได้ว่างคุยกับน้องเขาด้วยครับ (เป็นชายเหมือนกัน เลยไม่มีเวลาให้...ซะง้าน)  ยังงั้ย  ก็ฝากน้องเขาไว้ในอ้อมใจของทุกท่านด้วยนะครับ 
หมายเหตุ
จริงๆๆแนะนำน้องไปแล้วว่าให้ใช้ชื่อที่เป็นหญิง พร้อมรูปถ่ายด้วย จะได้รับการช่วยเหลือโดยฉับพลัน 

เป็นเรื่องจริงครับ

[golf_win]

น้องเขารู้ว่าอีกไม่นาน งานเข้า เลยเตรียมตัวเตรียมใจไว้ก่อนครับ เพราะตอนนี้ ทุกอย่างพร้อมแล้ว รอจุดไฟเผาอย่างเดียว.....ส่วนผมเองก็ไม่ได้ว่างคุยกับน้องเขาด้วยครับ (เป็นชายเหมือนกัน เลยไม่มีเวลาให้...ซะง้าน)  ยังงั้ย  ก็ฝากน้องเขาไว้ในอ้อมใจของทุกท่านด้วยนะครับ 
หมายเหตุ
จริงๆๆแนะนำน้องไปแล้วว่าให้ใช้ชื่อที่เป็นหญิง พร้อมรูปถ่ายด้วย จะได้รับการช่วยเหลือโดยฉับพลัน 

  เป็นแผนหรือป่าวครับ

[nonrock1]

ขอต่อนะครับ (จะมีท่านใดเข้ามาดูรึป่าว) ผมทดลองทำรายงานขึ้นมาใหม่ ประมาณ นค1.

มาจบตรงที่ จะรวมค่าใช้จ่ายของแต่ละคนต้องทำยังไงครับ 

ขอบคุณครับ

[pop_hosxp]

ขอต่อนะครับ (จะมีท่านใดเข้ามาดูรึป่าว) ผมทดลองทำรายงานขึ้นมาใหม่ ประมาณ นค1.

มาจบตรงที่ จะรวมค่าใช้จ่ายของแต่ละคนต้องทำยังไงครับ 

ขอบคุณครับ

ในตาราง vn_stat มีข้อมูลสรุปต่าง ๆ อยู่ สามารถนำมาใช้ได้ครับ ถ้าเป็นสรุปค่าใช้จ่ายของ visit นั้น ๆ จะอยู่ที่ field income ครับ

[เกื้อกูล ครับ..]

คล้าย ๆ กับต้องการ  sum  เฉพาะ  inc14+inc6+inc12  แค่ 3 ด้านครับ..ไม่เอาทั้งหมดของ vn นั้น ๆ

[nonrock1]

ขอต่อนะครับ (จะมีท่านใดเข้ามาดูรึป่าว) ผมทดลองทำรายงานขึ้นมาใหม่ ประมาณ นค1.

มาจบตรงที่ จะรวมค่าใช้จ่ายของแต่ละคนต้องทำยังไงครับ 

ขอบคุณครับ

ในตาราง vn_stat มีข้อมูลสรุปต่าง ๆ อยู่ สามารถนำมาใช้ได้ครับ ถ้าเป็นสรุปค่าใช้จ่ายของ visit นั้น ๆ จะอยู่ที่ field income ครับ

ได้แล้วครับ ขอบคุณครับ แล้วถ้าต้องการ รวมค่าใช้จ่ายทั้งหมดละครับ ผมจะ sum ยังไง?

[เกื้อกูล ครับ..]

sum (income) อีกทีในการออกแบบให้เลือกแสดง band เพิ่มโดยเลือกแสดง แถบ  summary

[nonrock1]

sum (income) อีกทีในการออกแบบให้เลือกแสดง band เพิ่มโดยเลือกแสดง แถบ  summary

ออ.. ต้อง sum income ทั้งหมดที่เราแสดง แต่ไม่เข้าใจวีธีทำครับ ว่าต้องเขียน สคริปเพิ่ม หรือ เลือกเครื่องมือ

อันใหน ในหน้าดีไซน์(ผมยังไม่ค่อยรู้อ่ะครับ )

[nonrock1]

sum ได้แล้วครับ  ขอความช่วยเหลืออีกหน่อยนะครับ  ถ้าจะทำรายงานแบบให้เลือกหลายๆสิทธิต้องทำไงครับ

ขอความช่วยเหลือ ขอบคุณครับ

[เกื้อกูล ครับ..]

getpickuplist  ลองดูในขั้นตอนออกแบบครับ...มีในTAB  language  ครับ  ประมาณว่า

pttypelist:= GetPickupList('select name from pttype order by pttype');

[nonrock1]

getpickuplist  ลองดูในขั้นตอนออกแบบครับ...มีในTAB  language  ครับ  ประมาณว่า

pttypelist:= GetPickupList('select name from pttype order by pttype');

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

[nonrock1]

ขอความช่วยเหลือครับ  คือผมสร้างรายงานมาแล้ว ต้องการ จะนับยอดผู้มารับบริการ

อยากได้สรุป จำนวนที่มารับบริการ และจำนวนครั้ง

[เกื้อกูล ครับ..]

ขอความช่วยเหลือครับ  คือผมสร้างรายงานมาแล้ว ต้องการ จะนับยอดผู้มารับบริการ

อยากได้สรุป จำนวนที่มารับบริการ และจำนวนครั้ง

หาคนทั้งหมดในช่วงเดือนที่ประมวลผล..ลองใช้
กำหนด valiable ดูครับ...
  Value := GetSQLIntegerData('select count(distinct v.hn ) as cc from vn_stat v where v.pttype="01"  and v.hospmain="10679" and v.vstdate between "'+ds1+'" and "'+ds2+'"');

หาจำนวนครั้งก็เห็นว่าออกแล้วครับ

  Value := GetSQLIntegerData('select count(v.vn ) as cc from vn_stat v where v.pttype="01"  and v.hospmain="10679" and v.vstdate between "'+ds1+'" and "'+ds2+'"');

น่าจะประมาณนี้น่ะครับ..แต่ถ้าให้แน่  ถาม อ.นาจได้เลย..ผมได้แนวทาง แรงบันดาลใจ   variable จาก. อ.นาจ.ครับ

[nonrock1]

ขอบคุณมากครับได้แล้วครับ เรื่องสุดท้ายของรายงานตัวนี้

ฟังชั่นตัวนี้ ThaiMoney ใช้ยังไงครับ ผมเห็นหลายรายงานใช้แต่ลองทำดูแล้วมันไม่ได้

ขอบคุณครับ

[เกื้อกูล ครับ..]

ขอบคุณมากครับได้แล้วครับ เรื่องสุดท้ายของรายงานตัวนี้

ฟังชั่นตัวนี้ ThaiMoney ใช้ยังไงครับ ผมเห็นหลายรายงานใช้แต่ลองทำดูแล้วมันไม่ได้

ขอบคุณครับ

กำหนด valiable    ขึ้นมาใหม่ในตำแหน่งที่ต้องการบนรายงาน( footer หรือ summary    แล้วใช้่ผลลัพธ์ จาก DBcalc มาจากค่า sum ของ ผลรวมมูลค่าค่ารักษาครับ..ลำดับ ของผลรวมต้องเป็นของท่าน  แล้ว calculation  หาค่า จากคำสั่ง     Value := '('+(ThaiMoney(DBCalc2.value)+'ถ้วน)';

[nonrock1]

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

[jeab101]

ความรู้เพียบ ดูดครับ..

[nonrock1]

มาอีกแล้วครับ
select count(v.hn)as ptcount,v.vstdate, v.pttypeno, concat(p.pname,p.fname,"   ",p.lname) as fullname, p.cid,
       v.hn,i.name as dname,
       p.pttype_hospmain,v.inc14,v.inc06,v.inc12,v.income,s.name as sname
from vn_stat v
left outer join person p on p.patient_hn=v.hn
left outer join icd101 i on i.code=v.main_pdx
left outer join spclty s on s.spclty=v.spclty
where v.pttype="89"
and p.pttype_hospmain="11303"
and v.vstdate between "2010-10-01" and "2010-10-31"
group by v.hn
order by v.vstdate

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

[golf_win]

ก็ใช้ตามที่พี่เกื้อบอกไปแล้วไงครับตามนี้เลย

getpickuplist  ลองดูในขั้นตอนออกแบบครับ...มีในTAB  language  ครับ  ประมาณว่า

pttypelist:= GetPickupList('select name from pttype order by pttype');

[เกื้อกูล ครับ..]

คงต้องวาง Getpickuplist  เลือกสิทธิ ก่อน run main sql ครับ... ในtab calulation หลังประกาศตัวแปรครับแล้วครับ...คงต้องลองทำดู

[nonrock1]

คงต้องวาง Getpickuplist  เลือกสิทธิ ก่อน run main sql ครับ... ในtab calulation หลังประกาศตัวแปรครับแล้วครับ...คงต้องลองทำดู

จะ view table ดูนะครับ