BMS-HOSxP Community

HOSxP => แจ้งข้อผิดพลาดการทำงานของ HOSxP V3 => ข้อความที่เริ่มโดย: Neo ที่ ธันวาคม 29, 2008, 15:54:34 PM

หัวข้อ: อ.นาจ ช่วยแก้ไขรายงายให้หน่อยครับ ตรงคำสั่งอายุครับ
เริ่มหัวข้อโดย: Neo ที่ ธันวาคม 29, 2008, 15:54:34 PM

กำลังหัดใช้ Varible ถ้า อ.นาจมีคู่มือการเขียนรายงานส่งมาให้หน่อยนะครับ ช่วยนี้กำลังขยัน

หัวข้อ: Re: อ.นาจ ช่วยแก้ไขรายงายให้หน่อยครับ ตรงคำสั่งอายุครับ
เริ่มหัวข้อโดย: Neo ที่ ธันวาคม 29, 2008, 15:58:14 PM

ลืมส่ง Report

หัวข้อ: Re: อ.นาจ ช่วยแก้ไขรายงายให้หน่อยครับ ตรงคำสั่งอายุครับ
เริ่มหัวข้อโดย: nayok ที่ ธันวาคม 29, 2008, 16:02:14 PM

ผมขออนุญาตแนะนำนะครับ อยากให้เข้าไปศึกษาดูในเว็บ Delphi Basic ครับจะมีตัวอย่างของคำสั่งทุกคำสั่งใน Variable อธิบาย+ตัวอย่างเข้าใจง่ายดีครับ ตามลิ้งค์เลยครับ
http://www.delphibasics.co.uk/ByFunction.asp?Main=Strings

หัวข้อ: Re: อ.นาจ ช่วยแก้ไขรายงายให้หน่อยครับ ตรงคำสั่งอายุครับ
เริ่มหัวข้อโดย: yord ที่ ธันวาคม 29, 2008, 16:52:21 PM

อ้างจาก: nayok ที่ ธันวาคม 29, 2008, 16:02:14 PM

ผมขออนุญาตแนะนำนะครับ อยากให้เข้าไปศึกษาดูในเว็บ Delphi Basic ครับจะมีตัวอย่างของคำสั่งทุกคำสั่งใน Variable อธิบาย+ตัวอย่างเข้าใจง่ายดีครับ ตามลิ้งค์เลยครับ
http://www.delphibasics.co.uk/ByFunction.asp?Main=Strings

แอบมาเก็บเป็นความรู้ครับ  ;D
ขอบคุณครับ  ;D ;D ;D

หัวข้อ: Re: อ.นาจ ช่วยแก้ไขรายงายให้หน่อยครับ ตรงคำสั่งอายุครับ
เริ่มหัวข้อโดย: snhos ที่ ธันวาคม 29, 2008, 17:41:46 PM

ช่วยตอบ ใน vn_stat ก็มีฟิลด์ อายุ (age_y) ไม่น่าต้องใช้ variable ให้ยุ่งยาก
ผมทำให้เลยแนบไฟล้มาให้ลองดูนะ

หัวข้อ: Re: อ.นาจ ช่วยแก้ไขรายงายให้หน่อยครับ ตรงคำสั่งอายุครับ
เริ่มหัวข้อโดย: golf_win ที่ ธันวาคม 29, 2008, 18:59:01 PM

ขออนุญาติแจมนะครับ  ;D ;D
variable ที่คุณ NEO เขียนมาเกือบถูกแล้วครับขาดแค่วงเล็บปิดแค่อันเดียวลองเปรียบเทียบดูนะครับ
เดิม ---> Value :=    GetThaiAge((GetSQLDateData('select birthday from patient where hn = "'+DBPipeline['hn']+'"') ,CurrentDate);
ใหม่---> Value :=    GetThaiAge((GetSQLDateData('select birthday from patient where hn = "'+DBPipeline['hn']+'"') ),CurrentDate);
 ;D ;D ผมแนบ report แบบ variable มาด้วยครับเผื่อท่านใดต้องการใช้จะได้ไม่ต้องทำใหม่ครับ  ;D ;D

หัวข้อ: Re: อ.นาจ ช่วยแก้ไขรายงายให้หน่อยครับ ตรงคำสั่งอายุครับ
เริ่มหัวข้อโดย: มนตรี บอยรักยุ้ยคนเดียว ที่ ธันวาคม 29, 2008, 20:20:07 PM

อ้างจาก: golf_win ที่ ธันวาคม 29, 2008, 18:59:01 PM

ขออนุญาติแจมนะครับ  ;D ;D
variable ที่คุณ NEO เขียนมาเกือบถูกแล้วครับขาดแค่วงเล็บปิดแค่อันเดียวลองเปรียบเทียบดูนะครับ
เดิม ---> Value :=    GetThaiAge((GetSQLDateData('select birthday from patient where hn = "'+DBPipeline['hn']+'"') ,CurrentDate);
ใหม่---> Value :=    GetThaiAge((GetSQLDateData('select birthday from patient where hn = "'+DBPipeline['hn']+'"') ),CurrentDate);
 ;D ;D ผมแนบ report แบบ variable มาด้วยครับเผื่อท่านใดต้องการใช้จะได้ไม่ต้องทำใหม่ครับ  ;D ;D

:o :o :o :o :o :o

หัวข้อ: Re: อ.นาจ ช่วยแก้ไขรายงายให้หน่อยครับ ตรงคำสั่งอายุครับ
เริ่มหัวข้อโดย: naj ที่ ธันวาคม 30, 2008, 06:42:11 AM

แก้ไขให้ตามต้องการแล้วครับ
ใช้ function copy ช่วยครับ ตัดเฉพาะอายุที่เป็นปีที่ต้องการ

โค๊ด: Pascal

1.   Value :=   copy(GetThaiAge((GetSQLDateData('select birthday from patient where hn = "'+DBPipeline['hn']+'"') ,CurrentDate),1,5);
2.  

หัวข้อ: Re: อ.นาจ ช่วยแก้ไขรายงายให้หน่อยครับ ตรงคำสั่งอายุครับ
เริ่มหัวข้อโดย: Neo ที่ ธันวาคม 30, 2008, 08:13:10 AM

ขอบคุณอ.ทุกท่านที่ช่วยสั่งสอน

หัวข้อ: Re: อ.นาจ ช่วยแก้ไขรายงายให้หน่อยครับ ตรงคำสั่งอายุครับ
เริ่มหัวข้อโดย: snhos ที่ ธันวาคม 30, 2008, 14:30:42 PM

ข้อควรคำนึง ถ้าใช้ variable ตามที่ท่านทั้งหลายเขียนมา ผมว่านะเวลาที่เราเรียก report ออกมา  อายุน่าจะผิด สมมติ นาย  ก  ถูกลงวินิจฉัย เมื่อวันที่ 1/12/2551 ว่า เป็นหอบหืด ซึ่งตอนนั้นเขาอายุ 25  ถ้าเราใช้ variable ดังกล่าว ถ้าเราเรียกข้อมูลมาครั้งละวัน  หรือเดือน  อายุจะไม่ตรงกับอายุที่เขาถูกวินิจฉัยว่าเป็นหอบหืด  ผมว่าน่าจะใช้อายุที่มีอยู่แล้วใน vn_stat ดีกว่า ผมพูดถูกหรือเปล่านี้

หัวข้อ: Re: อ.นาจ ช่วยแก้ไขรายงายให้หน่อยครับ ตรงคำสั่งอายุครับ
เริ่มหัวข้อโดย: naj ที่ ธันวาคม 30, 2008, 14:44:48 PM

ถูกต้องครับ ไม่ควรใช้ currentdate ควรใช้ vstdateมากกว่าครับ

หัวข้อ: Re: อ.นาจ ช่วยแก้ไขรายงายให้หน่อยครับ ตรงคำสั่งอายุครับ
เริ่มหัวข้อโดย: Neo ที่ ธันวาคม 30, 2008, 15:14:17 PM

ขอบคุณอาจารย์ทั้งสองท่านมากครับ ถ้าเป็นอย่างนั้นควรทำอย่างที่อาจารย์กล่าวไว้จริง ควรเอาอายุ ณ วันที่ตรวจรักษา