ผู้เขียน หัวข้อ: CVD ColorChart รายงาน การประเมินความเสี่ยงการเกิดโรคหัวใจและหลอดเลือด DM/HT  (อ่าน 18793 ครั้ง)

0 สมาชิก และ 1 บุคคลทั่วไป กำลังดูหัวข้อนี้

ออฟไลน์ Sukjai

  • Hero Member
  • *****
  • กระทู้: 984
  • Facebook : Sukjai Krub
  • Respect: +673
    • ดูรายละเอียด
    • Share Tips HOSxP
เครดิต ต้องขอขอบคุณ อ.วรเวทย์ เอี่ยมพร  รพ.บึงสามัคคี ที่ได้จัดทำรายงานนี้ ครับ

ออฟไลน์ บิ๊กเบิร์ด

  • Full Member
  • ***
  • กระทู้: 203
  • ศรัทธา
  • Respect: +11
    • ดูรายละเอียด
    • http://lo.moph.go.th
แยกคลิกนิกได้ด้วยนะครัช อิอิ ของเขาดีจริง อิอิ
กัมปนาท  บุตรจันทร์  (bigbird)
นวก.คอมพิวเตอร์ @สสจ.เลย
mybigbird1983@gmail.com
blog : http://bigbird1983.blogspot.com/
---------------------------------------------------
วิธีใส่ลายเซ็น เพื่อแนะนำตัวเอง

ขอบคุณ ที่ก

ออฟไลน์ บิ๊กเบิร์ด

  • Full Member
  • ***
  • กระทู้: 203
  • ศรัทธา
  • Respect: +11
    • ดูรายละเอียด
    • http://lo.moph.go.th
แบบของผม ครับ ได้โค้ดมาจาก อ.วรเวทย์ เอี่ยมพร เหมือนกันครับ เอามาปรับนิดหน่อยครับ

credit : อ.วรเวทย์ เอี่ยมพร , อ.ภศล สุริยะ

คำสั่งสร้างตาราง colorchart
อ้างถึง
CREATE TABLE `colorchart` (
  `id` int(5) NOT NULL,
  `has` varchar(1) DEFAULT NULL,
  `chronic` varchar(1) DEFAULT NULL,
  `sex` varchar(1) DEFAULT NULL,
  `age` int(3) DEFAULT NULL,
  `smoke` varchar(1) DEFAULT NULL,
  `bp` int(3) DEFAULT NULL,
  `cholesterol` int(3) DEFAULT NULL,
  `color` int(1) DEFAULT NULL,
  PRIMARY KEY (`id`)
) ENGINE=MyISAM DEFAULT CHARSET=tis620;
« แก้ไขครั้งสุดท้าย: พฤษภาคม 01, 2014, 16:00:02 PM โดย บิ๊กเบิร์ด »
กัมปนาท  บุตรจันทร์  (bigbird)
นวก.คอมพิวเตอร์ @สสจ.เลย
mybigbird1983@gmail.com
blog : http://bigbird1983.blogspot.com/
---------------------------------------------------
วิธีใส่ลายเซ็น เพื่อแนะนำตัวเอง

ขอบคุณ ที่ก

ออฟไลน์ golf_win

  • Hero Member
  • *****
  • กระทู้: 3,481
  • Respect: +112
    • ดูรายละเอียด
ต้องปรับเรื่องการสูบบุหรี่นิดนึงครับสำหรับคนที่ smoking_type_id=1 คือ ไม่เคยสูบ ครับ และถ้าใช้ function thaiage ไม่ได้ก็ใช้ timestampdiff แทนก็ได้นะครับ
โรงพยาบาลเจ็ดเสมียน จังหวัดราชบุรี
Start 19-1-51    35 station
HOSxP  3.59.5.18 Activate License
Tel. 032-305096-7 ต่อ 118
Web. http://csmhos.thaiddns.com:8080
         http://csmhos.thaieasydns.com:8080

ออฟไลน์ jangmozard

  • Jr. Member
  • **
  • กระทู้: 54
  • Respect: +1
    • ดูรายละเอียด
ของผมลองทำแล้วก็ยัง Error อยู่ครับ
 

ออฟไลน์ Sukjai

  • Hero Member
  • *****
  • กระทู้: 984
  • Facebook : Sukjai Krub
  • Respect: +673
    • ดูรายละเอียด
    • Share Tips HOSxP
ของผมลองทำแล้วก็ยัง Error อยู่ครับ

-------------------------------------------------------------------

ส่งภาพที่ Error ขึ้นมาดูด้วยครับ 

ออฟไลน์ jangmozard

  • Jr. Member
  • **
  • กระทู้: 54
  • Respect: +1
    • ดูรายละเอียด
 

ออฟไลน์ Sukjai

  • Hero Member
  • *****
  • กระทู้: 984
  • Facebook : Sukjai Krub
  • Respect: +673
    • ดูรายละเอียด
    • Share Tips HOSxP
ภาพครับ

--------------------------------

ถ้าไม่แก้ไขรายงาน  ให้นำคำสั่งนี้ไป Run ใน SQL Query หรือ Navicat เพื่อสร้าง function thaiage ดูครับ

CREATE FUNCTION `thaiage`(param1 date,param2 date) RETURNS char(15) CHARSET tis620
begin
   declare cAge char(15);
   declare nyear int;
   declare nmonth int;
   declare nday int;
   set param2=date(param2);
   set param2=if(param2='0000-00-00',now(),param2);
   select timestampdiff(year,param1,param2) into nyear;
   select timestampdiff(month,param1,param2)-(timestampdiff(year,param1,param2)*12) into nmonth;
   select timestampdiff(day,date_add(param1,interval (timestampdiff(month,param1,param2)) month),param2) into nday;
   select concat(lpad(nyear,3,'0'),lpad(nmonth,2,'0'),lpad(nday,2,'0')) into cage;
   set cage=if(nyear>0,concat(lpad(nyear,2,'0'),' years'),'');
   set cage=if(cage='' and nmonth>0,concat(lpad(nmonth,2,'0'),' months'),cage);
   set cage=if(cage='',concat(lpad(nday,2,'0'),' days'),cage);
   set cage=replace(cage,'years','ปี');
   set cage=replace(cage,'months','เดือน');
   set cage=replace(cage,'days','วัน');
   return cage;
end

ออฟไลน์ bit48010010

  • Sr. Member
  • ****
  • กระทู้: 361
  • Respect: +1
    • ดูรายละเอียด
    • www.hodhospital.com
เหมือนมีชื่อเราถูกพาดพิงในกระทู้นี้
DELL R710
server centos 6.0
MySQL 3.5.2.27
RAM 16 GB
Client pentium duo core ram 2 gb

ออฟไลน์ Sukjai

  • Hero Member
  • *****
  • กระทู้: 984
  • Facebook : Sukjai Krub
  • Respect: +673
    • ดูรายละเอียด
    • Share Tips HOSxP
เครดิต ต้องขอขอบคุณ อ.วรเวทย์ เอี่ยมพร  รพ.บึงสามัคคี ที่ได้จัดทำรายงานนี้ ครับ

-----------------------------------------
อ.วรเวทย์ รพ.บึงสามัคคี

ฝากแก้ไขตาราง colorchart เนื่องจาก ตาราง เก่า มีการคำนวณเกี่ยวกับสี่ที่ผิดพลาด

ให้ ลบข้อมูลในตาราง colorchart เดิมทิ้ง
แล้ว Download และนำเข้า ไฟล์ colorchart.cds ใหม่ครับ



ออฟไลน์ udomchok

  • Hero Member
  • *****
  • กระทู้: 8,347
  • Respect: +589
    • ดูรายละเอียด
    • ร.พ.สมเด็จพระสังฆราช องค์ที่ 17
ในตัวรายงาน ใช้ v.age_y แทนการใช้ function thaiage ได้ไหมครับ
ให้ผลต่างกันหรือไม่
ทำด้วยหัวใจร.พ.สมเด็จพระสังฆราช องค์ที่ 17 อ.สองพี่น้อง จ.สุพรรณบุรี
อบรมโดย BMS Team เมื่อ พ.ย. 49 ขึ้นระบบห้องบัตรเมื่อ X'Mas 2007
2008 : X-Ray กายภาพบำบัด แพทย์แผนไทย กิจกรรมบำบัด OPD ตา
2009 : ทันตกรรม ห้องตรวจตา OPD (พยาบาลและห้องตรวจแพทย์บางห้อง)

ออฟไลน์ woravet

  • Sr. Member
  • ****
  • กระทู้: 409
  • Respect: +12
    • ดูรายละเอียด
รพ.บึงสามัคคี จ.กำแพงเพชร
*********************
อ.สุชัยและคณะ ขึ้นระบบ 29 ตค.49(Linux+Fedara 5)
*********************
ปัจจุบัน
HOSxP version 3.53.4.27
Server:Windows XP SP2,MySQL 5
Client ประมาณ 15 เครื่อง