ผู้เขียน หัวข้อ: รายงานทะเบียนผู้ป่วยความดัน เบาหวาน  (อ่าน 3930 ครั้ง)

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

ออฟไลน์ Bluebird

  • Hero Member
  • *****
  • กระทู้: 1,062
  • Respect: +2
    • ดูรายละเอียด
    • โรงพยาบาลระแงะ จังหวัดนราธิวาส
รายงานทะเบียนผู้ป่วยความดัน เบาหวาน
« เมื่อ: ธันวาคม 27, 2010, 11:53:30 AM »
0
พยาบาลต้องการรายงานผู้มารับบริการในเขตพื้นที่รับชอบ
แยกเป็นรายหมู่บ้าน
แยกเป็นความดันอย่างเดียว
ความดันที่มีโรคอื่นร่วมด้วย
เบาหวานอย่างเดียว
เบาหวานที่มีโรคอื่นร่วมด้วย
ใครพอมีแนวทางหรือตัวอย่างบ้างไหม
ทำแบบเลือกหมู่บ้าน เลือกประเภทโรคได้ จะได้ไม่ต้องทำหลาย ๆ ตัว

มี HN, ชื่อ-สกุล, อายุ, ที่อยู่
« แก้ไขครั้งสุดท้าย: ธันวาคม 27, 2010, 11:55:45 AM โดย Bluebird »
นักวิชาการคอมพิวเตอร์ โรงพยาบาลระแงะ  จังหวัดนราธิวาส
www.rangaehospital.com

เริ่มใช้งานระบบ 1 ตุลาคม 2550
Server     :  HP Proliant DL180G6 RAM 16Gb. 
Replicate  : DELL PowerEdge 1800   RAM 16 Gb.
MySQL 5.5.31
OS CentOS 5 64bit
HOSxP Version : 3.59.4.27(ตาม Version ที่ออกใหม่ล่าสุด)

ออฟไลน์ pongnk213

  • Full Member
  • ***
  • กระทู้: 146
  • Respect: +1
    • ดูรายละเอียด
Re: รายงานทะเบียนผู้ป่วยความดัน เบาหวาน
« ตอบกลับ #1 เมื่อ: ธันวาคม 29, 2010, 11:43:50 AM »
0

 
  ผมเคยpost ขอไป ลองดูคำสั่งที่คุณ  Khuad ได้แนะนำผม

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


  ในส่วนของ DM อย่างเดียว  ลองใช้คำสั่งเป็น

  Value := GetSQLIntegerData('select count(pc1.person_id) as cc '+
  ' from person_chronic pc1,person p '+
  ' where pc1.clinic = "001" '+
  ' and pc1.person_id = p.person_id '+
  ' and p.village_id = "'+DBPipeline['village_id']+'" '+
  ' and p.house_regist_type_id in ("1","3")' +
  ' and p.death = "N" '+
  ' and pc1.person_id not in ('+GetSQLSubQueryData('select pc2.person_id '+
  ' from person_chronic pc2 where pc2.clinic = "002" ')+') ');

    และในส่วนของ HT อย่างเดียว  ลองใช้คำสั่งเป็น

  Value := GetSQLIntegerData('select count(pc1.person_id) as cc '+
  ' from person_chronic pc1,person p '+
  ' where pc1.clinic = "002" '+
  ' and pc1.person_id = p.person_id '+
  ' and p.village_id = "'+DBPipeline['village_id']+'" '+
  ' and p.house_regist_type_id in ("1","3")' +
  ' and p.death = "N" '+
  ' and pc1.person_id not in ('+GetSQLSubQueryData('select pc2.person_id '+
  ' from person_chronic pc2 where pc2.clinic = "001" ')+') ');


  ตรงผลรวมก็ตัดตรง
  ' and p.village_id = "'+DBPipeline['village_id']+'" '+
  ออกไปเช่นกันครับ


... ลองทดสอบดูนะครับ ....   ...
 

 http://hosxp.net/index.php?option=com_smf&Itemid=28&topic=18424.0
 
 
Mr.ATIPONG  SOOKPEN
HOSxP_PCU สอ.บ้านนาจาน
สสอ.นครไทย  จ.พิษณุโลก
เริ่มใช้ วันที่ 1 ก.ค.2552
mail : Atipong205@gmail.com
MSN : Atipong205@hotmail.com
Server : HP ML110 G5 Ram 2 Gb.
ทดสอบ Centos 4.7 ServerCD, MySQL Percona XtraDB 5.1.45
ขึ้นระบบโดย Mr.Komkrit Noenpoempisute Admin สสอ.นครไทย