ลองแบบนี้ดูครับ
select between ICD10 หลายช่วงในคราวเดียวได้หรือเปล่าครับ
เช่นต้องการหาจำนวนผู้ป่วยนอกที่มี PDX อยู่ในช่วง A00-B99  หรือ E00-E89 หรือ C00-D89 หรือ P00-P96 หรือ Q00-Q99 หรือ R00-R99 หรือ Z00-Z99  ครับ

ตอนนี้ผมห่ทีล่ะช่วงครับ  Grin
select count(v.vn)
from ovst o
left outer join vn_stat v on v.vn=o.vn
where o.vstdate between "2012-10-01" and "2013-09-30"
and    (v.pdx between "A00" and "B999"   or
            v.pdx between "E00" and "E999"   or
            v.pdx between "C00" and "D899"   or
            v.pdx between "P00" and "P969"   or
            v.pdx between "Q00" and "Q999"   or
            v.pdx between "R00" and "R999"   or
             v.pdx between "Z00" and "Z999"  )

ขอเพิ่มตรงรหัสท้ายเป็น 4 หลักครับ เพราะ บาง ICD 10  หลาย ๆ รหัสมี 4 - 5  หลัก ครับ

ขอลองไล่ทีละข้อครับ
เอาแต่ผลลัพธ์ตัวเลขใช่ไหมครับ

F =  ผู้ป่วย NCD  ได้แก่  คลินิกเบาหวาน,ความดัน,หอบหืด,ไต,หัวใจ 
ทั้งหมดที่มีผลการคัดกรอง >= 7  มีกี่คน

   โค้ดคือ
 select count(distinct(v.hn))     from depression_screen d1
    left outer join vn_stat v on v.vn = d1.vn     
    LEFT OUTER JOIN clinicmember c ON c.hn=v.hn                   
    where vn.vstdate  between "'+d1+'" and "'+d2+'"
        and c.clinic in("1","10","2","9","13")
        and d1.depression_score>=7
ไม่รู้ว่าเหมือนกันไหมนะครับ ถ้าตัดตารางที่ไม่เกี่ยวข้องจะทำให้หาข้อมูลได้เร็วขึ้นครับ

ของ โรงพยาบาลผมก็เคยเกิดปัญหา คล้าย ๆ กัน คือใช้เวลา ประมาณ 2 นาที กว่า ๆ กว่าจะprint ใบสั่งยาออกมาได้ครับ โดยเกิดจากการที่ไปใช้ Variable ในรายงานดึงข้อมูลต่างหาก ทำให้การประมวลผลดึงข้อมูลมันช้าครับ
จึงใช้วิธีดึงผ่านคำสั่ง sql ให้ได้ทุกตัวที่ต้องการตั้งแต่แรกครับ
หลังจากนั้นก็ทำให้การprint ใช้เวลา ลดลงอย่างมากครับ เหลือประมาณ 10 วิ

ดังนั้นถ้าเป็นไปได้ ควรตัดการใช้ variable ออกไปครับ

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

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

ปล. ใจจริงไม่อยากให้ลงข้อมูลล่วงหน้า เพราะ หากมีอะไรเปลี่ยนแปลง อาจยุ่งยากทีหลังได้ครับ

ลองเอาตัวอักษร      #        ออกดูครับ

ทางโปรแกรม HOSxP ใช้ eGFR สูตร EPI-CKD ครับ จึงได้ค่าคนละค่ากันครับ
ซึ่งทางสมาคมโรคไตกำหนดให้ใช้ แบบที่ HOSxP ใช้อยู่ครับ

ย้อนหลังเมื่อ 3 ปีที่แล้วก็ดูในช่วงวันที่ ของ 3 ปีที่แล้วเช่น วันที่มาตรวจในช่วงวันที่ 1 ต.ค.53 ถึง 30 ก.ย. 54
แล้วดึงจาก vn_stat ได้เลยเพราะ มี age_y ในตัวแปรอยู่แล้ว คืออายุเป็นปีขณะนั้น
แต่ว่าผมไม่แน่ใจว่าถ้าจะเอาโรคที่เยอะสุดอาจต้องเอาจาก ovstdiag หรือเปล่า เพราะใน vn_stat มันดึง
pdx พร้อม dx0,1,2,3,4,5 ออกมารวมกันเป็นตัวเดียวกันไม่ได้ครับ

อ้างจาก: woravet ที่ มีนาคม 11, 2013, 14:46:04 PM

ไม่แสดง preview หน้าขาวๆ ได้มั๊ยคับ

หรือจะใช้ subreport ก็ได้นะครับใน band title ใส่ชื่อหัวรายงานเอาไว้ส่วนตัว data ก็ใช้ DBPipelinelink แค่นี้็ไม่แสดงหน้าว่างๆแล้วครับ

ลองแก้จาก Property for Report ดูซิครับ
เลือกใน NoDataBehaviors จาก ndBlankPage เป็น ndBlankReport ครับ

เข้าไปที่เมนู System ==> System setting เลือกที่ สิทธิการรักษา
double click สิทธิ ที่ ต้องการให้มีรายการ จ่าย 30 บาท
เลือกรายการค่าใช้จ่ายเพิ่มที่  ค่าธรรมเนียมสิทธิที่ต้องชำระเอง แล้ว กด ตกลงครับ

อ้างจาก: mslangu ที่ กุมภาพันธ์ 22, 2013, 12:10:13 PM

จะทำอย่างไรให้ผู้ป่วยมี firstday ทุกราย ครับ ที่ข้อมูลปรากฎออกมาเป็น 0:00:00 ก็เพราะในตาราง patient ไม่มีข้อมูล  firstday ครับ ข้อมูลส่วนใหญ่โอนมาจากระบบ mitnet จะแก้ปัญหานี้ได้อย่างไรบ้างครับ รายงานที่แก้ไขนี้ก็เพื่อให้เจ้าหน้าเวชสถิติพิมพ์ออกมาตรวจสอบส่งตรวจสอบกับทาง สปสช ที่ต้องการวันที่มารับบริการวันแรกในหน้าข้อมูลที่พิมพ์ออกมาตรวจสอบครับ ขอบคุณมากครับ

Value=GetSqlDatedata('select min(vstdate) from vn_stat where hn='"+DBPipeline['HN']+"' ');

น่าจะเป็นอย่างนี้หรือเปล่าครับ

รายงานนี้ใช้ tempreport (temp-report) โดยเข้าแก้ไขโดยเข้าไปที่
 report designer => เลือก report นี้
เข้าไปที่แถบ Script ที่หน้าจอ ที่มีการ assign parameter โดยจะเห็น แถบ SQL, Script, Reference ครับ
แล้วสร้างตัวแปรข้อมูลไปเก็บที่ tempreport โดยตัวรายงานที่นำมาให้ดูเก็บอยู่ในตัวแปรชื่อ mon.. ต่าง ๆ ครับ

ลองแก้เล็กน้อยลองดูแล้วกันครับ

เดี๋ยวพรุ่งนี้จะดูในตารางให้ครับ เพราะผมก็เอารายชื่อเจ้าหน้าที่ผ่าตัดมาแสดงในการเบิกจ่ายนอกเวลาครับ

ตอนนี้ไม่ได้ backup มาที่ notebook ตัวเองครับ

ลองดูคล้าย ๆ แบบนี้ดูไหมครับ
เพราะว่า Variable 37 นำค่า Last Creatinine ออกมาเป็น String ครับ
 If   DBPipeline['age_y']<18 then
  begin
    if ((Variable37.value)>0.01) and ((Variable37.value)<= 99.99) then
    Value:= (0.41 * DBPipeline['height'])/Variable37.Value;
  end else
  if DBPipeline['sex']='2'  then
  Begin{Female}
     if ((Variable37.value)>0.01) and ((Variable37.value)<= 0.7) then
        Value := (144 * (exp(-0.329*ln((Variable37.value)/0.7)))*exp(DBPipeline['age_y']*ln(0.993))) else
     if ((Variable37.value)>0.7) and (Strtofloat(Variable37.value)< 99.99) then
        Value := (144 * (exp(-1.209*ln((Variable37.value)/0.7)))*exp(DBPipeline['age_y']*ln(0.993)));
  End  {Female}
  else
  Begin{Male}
     if ((Variable37.value)>0.01) and ((Variable37.value)<= 0.9) then
        Value := (141 * (exp(-0.411*ln(Strtofloat(Variable37.value)/0.9)))*exp(DBPipeline['age_y']*ln(0.993))) else
     if ((Variable37.value)>0.9) and ((Variable37.value)< 99.99) then
        Value := (141 * (exp(-1.209*ln((Variable37.value)/0.9)))*exp(DBPipeline['age_y']*ln(0.993))) ;
  End;
ส่วนการกำหนดช่วงเพราะเคยมีการใส่ข้อมูลที่ไม่ใช่ตัวเลขในโปรแกรมทำให้ error ในการคำนวนแล้วข้อมูลไม่ออกได้ครับ

select ot.operation_time_type_name, em.emergency_name, p.hn, p.fname from operation_detail op
left outer join operation_list ol on ol.operation_id = op.operation_id
left outer join patient p on p.hn = ol.hn
left outer join operation_time_type ot on  ot.operation_time_type_id  = ol.operation_time_type_id
left outer join operation_emergency em on  em.emergency_id  = ol.emergency_id
where begin_datetime between '2012-05-01 08:30:00' and '2012-05-31 16:30:00'

and time(datetime) between "08:00:00" and "16:00:00"
***********
ถ้าผมอยากแยกเวลาด้วยครับตั้งแต่ 08:00:00 ถึง 16:00:00 ต้องใช้คำสั่งอยากไรครับ ขอบคุณครับ

แต่ผมว่า code มันแปลก ๆ ครับ
ควรเป็น
    ChangeReportSQL('select p.pname,p.fname,p.lname,p.cid,h.hospcode,h.hosptype,dr.name AS DRUGNAME , '+
    ' li.lab_items_name,x.xray_list,v.vstdate,v.pttype_expire,v.income,d.name,op.cc,o.rxdate,o.icode from VN_STAT V '+
    ' left outer join  PATIENT P  on  v.hn=p.hn                                                    '+
    ' left outer join  hospcode h on  h.hospcode = p.hcode                                         '+
    ' left outer join  opitemrece o on o.VN = V.VN                                                 '+
    ' left outer join  drugitems dr on dr.icode = o.icode                                          '+
    ' left outer join  lab_head lh  on  lh.vn = v.vn                                               '+
    ' left outer join  lab_order lo on lo.lab_order_number = lh.lab_order_number                   '+
    ' left outer join  lab_items li on li.lab_items_code = lo.lab_items_code                       '+
    ' left outer join doctor d on  d.code=v.dx_doctor                                              '+
    ' left outer join  xray_head x on x.vn = v.vn                                                  '+
    ' left outer join opdscreen op on op.vn = v.vn                                                 '+
    ' where v.vn  ="'+fvn+'"                                                                       '+
    ' group by dr.name');
เพราะคุณไปเลือกตารางหลักเป็น patient ไม่ใช่ vn_stat ครับ
ตัวอักษรใหญ่คือที่น่าจะแก้ไขครับ
ปล. ผมไม่ได้ลองนะครับ ถ้าอย่างไรก็ลองดูนะครับ

ตาม Link นี้คะ

http://hosxp.net/index.php?option=com_smf&Itemid=28&topic=9303.msg53387;topicseen#msg53387

นันท์ทา   ตั้งใจ(ตั๊ก)
ฝ่ายลูกค้าสัมพันธ์

ผมเอามาดัดแปลงนะครับลองปรับใช้ดูครับ

ขอแนะนำให้ทำ sub report ครับ โดยกำหนดตัวแปรก่อนว่ามีกี่รายการในตอนแรก
แล้วกำหนด DbPipelineLink1 เช่น
Variable:= จำนวนที่ขาดไปในหนึ่งหน้า
'select code from provis_education limit '+Variable ;
เพราะผมก็ใช้อยู่ในรพ.ของผมโดยกำหนดแบบนี้ แต่เอามาให้ไม่ได้ เพราะ ตัวแปรยาของผมเป็นแบบกำหนดเองว่าไม่เอาอะไร เอาอะไร มาใส่ในตาราง med sheet

เช่น ถ้าต้องการ 10 รายการต่อหน้าแต่ มียา 2 รายการ หรือ 12 รายการ ก็แสดงเพิ่มอีก 8 รายการเปล่าโดยใส่เนื้อหาของ DbPipelineLink1 แสดงเนื้อหาเป็นสีขาวครับ

ลองเอาไฟล์ cds มาซิครับ เผื่ออาจจะลองแก้ให้ครับถ้าว่าง

ผมลองแก้เองแล้วนะครับ อาจไม่ค่อยน่าดู code ซักเท่าไร แต่ก็คำนวณ ตรงใช้ได้ครับ
จาก
  no:=JD-JD5+1;
จากตรงนี้ครับ
  if nmonth<5 then m:=4 else m:=5;
  lcheck:=True;
  lwork:=False;
  i:=0;
  while not lwork do
    begin
      i:=i+1;
      n:=no;
      nmod:=m mod 2;
      if nmod=1 then _day:=29 else _day:=30;
      if (m=7 and _index=2) then _day:=_day+1;
      if nmonth<5 then m:=m-1 else m:=m+1;
      if m<5 then no:=no+_day else no:=no-_day;
//      showmessage(inttostr(m-1)+'-'+inttostr(_index)+'-'+booltostr(lcheck)+#13+inttostr(nmod)+#13+inttostr(_day)+#13+inttostr(n)+'-'+inttostr(no));
      if m=9 then
        if _index=1 then
          if lcheck then
            begin
              lcheck:=False;
              m:=8;
            end;
      if nmonth<5 then lwork:=no>0 else lwork:=no<=_day;
      if i>12 then lwork:=true;
    end;    n:=dayofweek(nowdate);
    cthaiday:=formatdatetime('dddd',nowdate);  //getsqldata('select name from thaiday where id="'+inttostr(n)+'" ');
    ram:='';
    if no<16 then ram:='ขึ้น '+inttostr(no) else ram:='แรม '+inttostr(no-15);
    ram:=ram+' ค่ำ';
    if nmonth<5 then m:=m+1;

แก้เป็น
ดังนี้ครับ
 if _index=1 then
 begin
   if (no >=-117)and (no<=-89) then begin no:=no+118;m:=1; end else
   if (no >=-88) and (no<=-59) then begin no:=no+89;m:=2;  end else
   if (no >=-58) and (no<=-30) then begin no:=no+59;m:=3;  end else
   if (no >=-29) and (no<=0)   then begin no:=no+30;m:=4;  end else
   if (no >=1)   and (no<=29)  then begin m:=5;            end else
   if (no >=30)  and (no<=59)  then begin no:=no-29;m:=6;  end else
   if (no >=60)  and (no<=88)  then begin no:=no-59;m:=7;  end else
   if (no >=89)  and (no<=118) then begin no:=no-88;m:=8;  end else
   if (no >=119) and (no<=148) then begin no:=no-118;m:=88;end else
   if (no >=149) and (no<=177) then begin no:=no-148;m:=9; end else
   if (no >=178) and (no<=207) then begin no:=no-177;m:=10;end else
   if (no >=208) and (no<=236) then begin no:=no-207;m:=11;end else
   if (no >=237) and (no<=266) then begin no:=no-236;m:=12;end else
   if (no >=267) and (no<=295) then begin no:=no-266;m:=1; nthaiyear:=nthaiyear+1; end;
 end else
 if _index=2 then
 begin
   if (no >=-117)and (no<=-89) then begin no:=no+118;m:=1; end else
   if (no >=-88) and (no<=-59) then begin no:=no+89;m:=2;  end else
   if (no >=-58) and (no<=-30) then begin no:=no+59;m:=3;  end else
   if (no >=-29) and (no<=0)   then begin no:=no+30;m:=4;  end else
   if (no >=1)   and (no<=29)  then begin m:=5;            end else
   if (no >=30)  and (no<=59)  then begin no:=no-29;m:=6;  end else
   if (no >=60)  and (no<=89)  then begin no:=no-59;m:=7;  end else
   if (no >=90)  and (no<=119) then begin no:=no-88;m:=8;  end else
   if (no >=120) and (no<=148) then begin no:=no-119;m:=9; end else
   if (no >=149) and (no<=178) then begin no:=no-148;m:=10;end else
   if (no >=179) and (no<=207) then begin no:=no-178;m:=11;end else
   if (no >=208) and (no<=237) then begin no:=no-207;m:=12;end else
   if (no >=238) and (no<=266) then begin no:=no-237;m:=1; nthaiyear:=nthaiyear+1; end else
   if (no >=267) and (no<=296) then begin no:=no-266;m:=1; nthaiyear:=nthaiyear+1; end;
 end else
 begin
   if (no >=-117)and (no<=-89) then begin no:=no+118;m:=1; end else
   if (no >=-88) and (no<=-59) then begin no:=no+89;m:=2;  end else
   if (no >=-58) and (no<=-30) then begin no:=no+59;m:=3;  end else
   if (no >=-29) and (no<=0)   then begin no:=no+30;m:=4;  end else
   if (no >=1)   and (no<=29)  then begin m:=5;            end else
   if (no >=30)  and (no<=59)  then begin no:=no-29;m:=6;  end else
   if (no >=60)  and (no<=88)  then begin no:=no-59;m:=7;  end else
   if (no >=89)  and (no<=118) then begin no:=no-88;m:=8;  end else
   if (no >=119) and (no<=147) then begin no:=no-118;m:=9; end else
   if (no >=148) and (no<=177) then begin no:=no-147;m:=10;end else
   if (no >=178) and (no<=206) then begin no:=no-177;m:=11;end else
   if (no >=207) and (no<=236) then begin no:=no-206;m:=12;end else
   if (no >=237) and (no<=265) then begin no:=no-236;m:=1; nthaiyear:=nthaiyear+1; end else
   if (no >=266) and (no<=295) then begin no:=no-265;m:=1; nthaiyear:=nthaiyear+1; end;
 end;

สีเขียวเป็นแก้ไขอีกรอบครับนับจำนวนวันผิด

แก้จาก
_mas:=int((y*(nyear-1181)+dd0)/m)- ((_index mod 3) mod 2) * int(((24+(y*(nyear-1181)+dd0)/(m/30))mod 30)/24);
เป็น
int((y*(nyear-1181)+dd0)/m)- ((_index mod 3) mod 2) * int((((24+(y*(nyear-1181)+dd0))/(m/30))mod 30)/24);

เพราะตอนคำนวณ มันหาร 30 ก่อน + 24 ครับ

ตัวอย่าง-ใบรับรองการเกิด
error ตรงคำนวณค่ามาสเกณฑ์(_mas)
ที่ต้อง +25 ไม่รู้เพราะอะไร
คำนวณได้แค่ 2401-2559
หาค่าตารางสังวัตสร (ผมตั้งชื่อว่า sws) ได้แค่นี้

ความจริงต้อง+ แค่ 24ถึง 25 เพราะจาก เวป มีเวปที่บอกเรื่องการคำนวณ
http://www.payakorn.com/webboard_ans.php?q_id=34139

นำไปใส่ใน excel ถึงได้คำตอบว่าผิดตรงที่ แจ้งไว้ครับ

ส่วน จาก cds ที่ได้นี้ทำให้ผมดัดแปลงมาใช้ด้วย ขอบคุณอย่างสูงครับ

select * from er_regist
where time(finish_time)<"8.30" or time(finish_time)>"16.30"

ผมลองเอาเวลาเสร็จจากการดูแลผู้ป่วยเป็นตัวตัดเวลานะครับ

อ้างจาก: piya1111 ที่ ธันวาคม 10, 2012, 19:12:00 PM

อ้างจาก: มนตรี เทพไพศาล บอย(แก่งหลวง) ที่ ธันวาคม 08, 2012, 10:31:30 AM

select o.vn from opitemrece o
where op.icode in ("รหัสยา A" ,"รหัสยา B" ,"รหัสยา C" )
and  o.vstdate between "2012-12-01" and "2012-12-03"
group by o.vn

คำสั่งนี้หากมีการสั่งยาแค่ตัวเดียวก็จะขึ้นแล้วไม่ใช่หรือครับ แต่ที่เขาต้องการคือต้องมียาทั้ง 2 ตัวอยู่ด้วย
แต่พอมองเห็นคำสั่งนี้ก็นึกขึ้นได้อีกแบบครับ
select o.vn  from opitemrece o
where o.icode in ("รหัสยา 1","รหัสยา2","รหัสยา3")
and o.vstdate between "2012-12-01" and "2012-12-03"
group by o.vn
having count(o.vn>2)

ใช้ในกรณีที่สั่งยาทั้ง 3 ตัว ครับ

ขอแก้ไขเพิ่มเติมครับ
ตรง having count(o.vn>2)  ให้เอา >2 ออกนอกวงเล็บครับ
แบบนี้ครับ having count(o.vn)>2

ขอบคุณครับ บังเอิญไม่ได้ทดสอบ จึงพิมพ์ผิดไปครับ

select o.vn from opitemrece o
where op.icode in ("รหัสยา A" ,"รหัสยา B" ,"รหัสยา C" )
and  o.vstdate between "2012-12-01" and "2012-12-03"
group by o.vn

คำสั่งนี้หากมีการสั่งยาแค่ตัวเดียวก็จะขึ้นแล้วไม่ใช่หรือครับ แต่ที่เขาต้องการคือต้องมียาทั้ง 2 ตัวอยู่ด้วย
แต่พอมองเห็นคำสั่งนี้ก็นึกขึ้นได้อีกแบบครับ
select o.vn  from opitemrece o
where o.icode in ("รหัสยา 1","รหัสยา2","รหัสยา3")
and o.vstdate between "2012-12-01" and "2012-12-03"
group by o.vn
having count(o.vn>2)

ใช้ในกรณีที่สั่งยาทั้ง 3 ตัว ครับ

สอบถาม รายงานค่าใช้จ่ายครับ
ถ้า SUM--> v.uc_money + v.paid_money + v.remain_money จะได้ไม่เท่ากับ  v.income
1.จำเป็นหรือเปล่าที่ 3 ตัวนี้รวมกันต้องเท่ากับ income
2.ขอคำสั่งที่ตรวจสอบ v.uc_money + v.paid_money + v.remain_money แล้วไม่เท่ากับ  v.income ครับ
 

ถ้าของโรงพยาบาลผม ผมสังเกตุว่า paid money รวมกับ uc_money จะได้เท่ากับ income ส่วน remain_money จะเป็นยอดเงินที่ผู้ป่วยค้างชำระในvisit นั้น ครับ
(ผมคิดว่า paid_money น่าจะเป็น เงินที่ควรจะต้องจ่าย ไม่ใช่เงินที่ได้รับจากผู้ป่วยครับ)
จากรูปที่คุณนำมาให้ดูผมว่าคล้ายกับของผมครับ
ถ้าจะให้ดีลองcheck ในตาราง rcpt_print ดูที่ vn เดียวกัน ซิครับว่าชำระเงินแล้วยอดที่ขาดจาก paid_money ตรงกับ remain_money หรือเปล่าครับ