แสดงกระทู้

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Topics - nksawan2011

หน้า: [1]
1
ผมต้องการ count ตาราง patient_opd_scan ใน vn_script ต้องทำอย่างไรบ้าง (มีการแยกserver) ขอบคุณครับ

2
ระบบตรวจสอบสิทธิแบบใหม่ โดยใช้ Smartcard error แบบนี้ ต้องทำอย่างไรครับ

3

maininscl=OFC
maininsclMain=C
maininsclName=สิทธิข้าราชการ/สิทธิรัฐวิสาหกิจ
subinscl=G1
subinsclName=สิทธิหน่วยงานรัฐอื่น (ไม่สังกัดกรมบัญชีกลาง)

4
HOSxP_Upgrade_3.57.6.28 อ่าน smartcard ไม่ได้ ใช้ winxp ก่อนหน้าใช้ 3.56.9.30 อ่านได้ ตอนนนี้ลองกลับไปใช้ 3.56.9.30ก็อ่านไม่ได้ ลองลงhosxpใหม่ก็ไม่หาย แต่ถ้าใช้ Ver ก่อน v3.5.9.30ใช้ได้ ช่วยแนะนำค้วยครับ

5
สืบเนื่องจาการ mapping สิทธิการรักษา(ตารางpttyp)ทำให้ pttype_code เปลี่ยนจึงไม่สามารถเช็คสิทธิผู้ป่วยได้ จึงอยาก เพิ่ม เปลี่ยนแปลง provis_instype.code  ตัวอย่างเช่น สิทธิเบิกกรมบัญชีกลาง(ผู้รับเบี้ยหวัดบำนาญ) nhso_code =O3 จึงจะสามารถดึงข้อมูลสิทธิจากส่วนกลางได้ แต่พอมาmapไม่มี code "O3" มีแต่ 02 สิทธิข้าราชการ/สิทธิรัฐวิสาหกิจ ซึ่งผมเข้าใจว่า provis_instype ต้องการใช้ pttype_std_code เท่านั้น โปรดชี้แนะด้วยครับ


6
แจ้งปัญหา / ขอความช่วยเหลือ / Upgrade Structure แล้วerror
« เมื่อ: กรกฎาคม 17, 2014, 12:06:06 PM »
Upgrade Structure แล้วerror ตามรูป จะแก้ไขอย่างไรครับ

7
ขออนุเคราะห์ตาราง occupation ที่ map nhso_code แล้วด้วยครับ mapยากจังตาลายหมดแล้ว จะส่ง สปสชครับ ลองmapแล้ว ตรวจสอบ op/pp error มากเลย ขอบคุณล่วงหน้าครับ

8
แจ้งปัญหา / ขอความช่วยเหลือ / addressid ใน patient
« เมื่อ: กุมภาพันธ์ 19, 2014, 10:19:49 AM »
addressid ใน patient มีค่าว่างครับช่วยทำให้บันทีกข้อมูลตอนทำประวัติใหม่ด้วยครับ  ขอบคุณครับ

9
เปลี่ยนver 3.55.6.26 เป็น 3.55.12.25 ลงหัตถการแล้วไม่มีราคาค่าหัตการขึ้น


10
ผมลองทำแล้วมันขึ้นทุกตัวครับ

select o.vn,o.hn,concat(p.pname,p.fname," ",p.lname) as pt_name,p.cid,o.vstdate,v.age_y,v.pttypeno
,if(op.icode like "1%",concat(d.name,d.strength," ",d.units),nd.name)  as drugname

,op.icode,op.qty,op.unitprice,op.sum_price,op.income,op.paidst
,if(op.paidst="01" or op.paidst="02",sum_price,null) as reim_amount
,if(op.paidst="03",sum_price,null) as not_reim_amount
,if(op.icode like "1%",if(op.paidst=03,"àºÔ¡äÁèä´é","àºÔ¡ä´é"),concat("ÃËÑÊ ",nd.billcode)) as reim_status
,if(op.income="03",if(d.drugaccount ='','¤èÒÂҹ͡ºÑ­ªÕÂÒËÅÑ¡áË觪ҵÔ','¤èÒÂÒ㹺ѭªÕÂÒËÅÑ¡áË觪ҵÔ'),i.name)as check_drugtype
,concat("***",i.name,"***") as income_name,o.vsttime,p1.name,concat(v.hospmain,"  ",h.hosptype,h.name) as hospname
,concat(p.addrpart,"ËÁÙè ",p.moopart," ",p.road," ",t.full_name) as fulladdressname
,concat(pc.name," , ",pa.name) as pcname,shortlist,d1.name as doctor_name,pdx,v.pttype,v.pttype,p.chwpart,p1.pcode,v.item_money,v.hospmain
,pn.presc_reason
from ovst o
join patient p on p.hn=o.hn
join vn_stat v on v.vn=o.vn
LEFT OUter Join thaiaddress t ON t.addressid=v.aid
join opitemrece op  on op.vn=o.vn
join income i on i.income=op.income
join income_report2 i2 on i2.group_id=i.group2
left outer join drugitems d on d.icode=op.icode
left outer join nondrugitems nd on nd.icode=op.icode
left outer join pttype p1 on p1.pttype=v.pttype
left outer join hospcode h on h.hospcode=v.hospmain
left outer join paidst pa on pa.paidst=p1.paidst
left outer join pcode pc on pc.code =p1.pcode
left outer join drugusage du on du.drugusage =op.drugusage
left outer join doctor d1 on d1.code =o.doctor
join ovst_presc_ned pn on pn.vn =o.vn
where o.vn="551025140054"

order by income_name,i2.group_id,check_drugtype, op.item_no

11
ใครทราบช่วยอธิบายที่มาที่ไปให้หน่อยครับ ,วิธีการได้มา ใครทำได้ช่วยหน่อยครับ

12
ใช้ HOSxP_Upgrade_3.55.6.26 มี error ตามรูปครับ  (report form doctor opdcard emr not found)


13
พอบันทึกกรรมการตรวจรับมีErrorขึ้นตามด้านล่าง ต้องแก้ไขที่ส่วนไหนครับ

SQL Error: Column 'stock_committee_id' cannot be null
select * from stock_request_committee where stock_request_id = 12

SQL Error: Column 'stock_committee_id' cannot be null
select * from stock_request_committee where stock_request_id = 12

14
แจ้งปัญหา / ขอความช่วยเหลือ / ต้องการ group 8 โรค สป.
« เมื่อ: กุมภาพันธ์ 22, 2012, 09:36:39 AM »
ต้องการ group 8 โรค สป. ต้องเชื่อมตารางไหนบ้างครับ ขอตัวอย่าง query ด้วยครับ

15
ต้องการกำหมดช่วง diag f20-f29 ต้องเพื่มคำสั่งตรงไหนครับลองมาหลายวิธีแล้วไม่สำเร็จครับ


GetDateRangeDialog(date1, date2);
GetDateRangeDialog(date3, date4);
ds1 := Formatdatetime('yyyy-mm-dd',date1);
ds2 := Formatdatetime('yyyy-mm-dd',date2);
ds3 := Formatdatetime('yyyy-mm-dd',date3);
ds4 := Formatdatetime('yyyy-mm-dd',date4);

ChangeReportSQL('select o.oapp_id,concat(p.pname,p.fname,"  ",p.lname) as ptname, '+
'c.name as clinic_name,d.name as doctor_name,o.app_user, o.hn,o.vstdate,o.nextdate,v1.main_pdx, '+
'o.nexttime,o.note,o.vn,k.department,count(v.hn) as visit_count '+
'from oapp o '+
'left outer join patient p on p.hn=o.hn '+
'left outer join clinic c on c.clinic=o.clinic '+
'left outer join doctor d on d.code=o.doctor '+
'left outer join kskdepartment k on k.depcode = o.depcode '+
'left outer join ovst v on v.vstdate=o.nextdate and v.hn=o.hn '+
'left outer join vn_stat v1 on  v1.vn=v.vn '+
'where o.nextdate between "'+ds1+'" and "'+ds2+'" '+
'and o.hn not in(select hn from ovst where vstdate between "'+ds3+'" and "'+ds4+'") '+

'group by o.nextdate,o.clinic,p.pname,v1.main_pdx ');



16
ต้องการกำหนดให้แสดงค่ารักษาที่มากกว่า 50 บาทในคำสั่งต้องเพิ่มคำสั่งตรงไหนครับ ตามนี้ครับ

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

    pttype := GetPickupList('select "ALL" as name union select "1 ºÑµÃ»ÃСѹÊØ¢ÀÒ¾¶éǹ˹éÒ" as name '+
    ' union select "2 »ÃСѹÊѧ¤Á" as name union select "3 µèÒ§´éÒÇ" as name union select "4 àºÔ¡ä´é" as name union select "5 »ÃСѹÀÑÂ" as name union select "6 ªÓÃÐà§Ô¹àͧ" as name ');
   
    pp:=pttype;
   

    if (pttype='') or (pttype='ALL') then
    begin
       pttype := '';
    end else
    begin
   
       pttype :=  GetSQLStringData('select substring("'+pttype+'",1,1) ');
       
       
       if pttype = '1' then
       begin
        pttype := 'and pttype in ("21","62","63","70","71","72","73","74","75","76","77","80","81","82","87","88","89","90","91","94","95" ) ';
       end;
       if pttype = '2' then
       begin
        pttype := 'and pttype in ("17") ';
       end;
       if pttype = '3' then
       begin
        pttype := 'and pttype in ("50","60","68","69","29") ';
       end;
       if pttype = '4' then
       begin
        pttype := 'and pttype in ("21","22","75" ';
       end;
       if pttype = '5' then
       begin
        pttype := 'and pttype in ("80") ';
       end;
       if pttype = '6' then
       begin
        pttype := 'and pttype in ("10") ';
       end;
       
    end;
   
    hcode := GetPickupList('select "ALL" as name union select concat(h.hospcode," ",h.name) as cc from vn_stat  v '+
                          ' left outer join hospcode h on v.hospmain=h.hospcode '+
                          ' where h.chwpart=60 and concat(h.hospcode," ",h.name) <> "" '+
                          ' group by  h.hospcode ');
   
    kk := hcode;
   
    if (hcode='') or (hcode='ALL') then
    begin
       hcode := '';
    end else
    begin
       hcode :=  GetSQLStringData('select substring_index("'+hcode+'"," ",1) as ff ');
       hcode := 'and hospmain="'+hcode+'"';
    end;
   

   
    {showmessage('select *,if((inc01+inc04+inc05+inc06+inc07+inc09+  '+
    ' inc10+inc12+inc13+inc14) > 700,700,(inc01+inc04+inc05+inc06+inc07+inc09+inc10+inc12+inc13+inc14)) as mm from vn_stat '+
    '  where vstdate between "'+ds1+'" and "'+ds2+'" '+pttype+' '+hcode+' '+
    '  group by vn order by vstdate '); }
   

    vn := GetSQLSubQueryData('select vn from vn_stat '+
    '  where vstdate between "'+ds1+'" and "'+ds2+'" '+pttype+' '+
    '  '+hcode+'  group by vn order by vstdate');
   
    ChangeReportSQL('select *,if((inc01+inc04+inc05+inc06+inc07+inc09+  '+
    ' inc10+inc12+inc13+inc17) > 700,700,(inc01+inc04+inc05+inc06+inc07+inc09+inc10+inc12+inc13+inc14)) as mm from vn_stat '+
    '  where vstdate between "'+ds1+'" and "'+ds2+'" '+pttype+' '+hcode+' '+
    '  group by vn order by vstdate ');
   
   

17
อยากเพิ่มรูปผู้ป่วยใน REPORT-RG501 พอพิมพ์ออกมาไม่มีรูปครับ

18
รบกวนปรึกษาด้วยครับ คือที่ รพ.ต้องพิมพ์ใบสั่งยาที่ห้องหมอ ปัญหาคือพิมพ์ใบสั่งยาไปแล้วยาตัวนั้นหมด ต้องกลับมาปรับยาตัวใหม่แทนปรากฏว่าพอพิมพ์ใบสั่งยาก็ยังมียาตัวที่ไม่ต้องการขึ้นมาอีก ทั้งๆที่ลบจากรายการยาตัวนั้นแล้ว พอมาดูในตาราง doctor_order_print ก็ยังมียาต้วนั้นจริงๆ อยากทราบว่า
  -ตาราง doctor_order_print ไม่ใช่ตารางการสั่งยาที่แท้จริงหรือไม่
      *ถ้าใช่ ในใบสั่งยาจึงไม่ใช้ตารางการสั่งยาที่แท้จริงมาใช้ ถ้าที่ไหนใช้รบกวนส่ง query มาให้ใช้บ้างครับ
      *ถ้าไม่ใช่เราจะแก้ไขอย่างไรใบสั่งยาอย่างไร เพราะลบแล้วก็ยังมีในตารางอยู่
ขอบคุณครับ

19
อยากแก้เงื่อนไขครับ คือ

1.เลือกช่วงวันที่ (ตามเดิม)
2.เลือกสิทธิ์ เปลี่ยนเป็น เลือกตามจังหวัด (จากตาราง chwpart.hospcode)
3.เลือก รพ. เปลี่ยนเป็น เลือกตามอำเภอ (จากตาราง amppart.hospcode)
   
ต้องแก้ไขตรงไหนบ้างครับ ตอนนี้กำลังงมหาอยู่ครับรบกวนด้วยครับ
 
       GetDateRangeDialog(date1, date2);
       ds1:=formatdatetime('yyyy-mm-dd',date1);
       ds2:=formatdatetime('yyyy-mm-dd',date2);
      pttype_list := getsqlsubquerydata('select distinct pttype from vn_stat where vstdate between "'+ds1+'" and "'+ds2+'" ');
      pttype_list :=getpickuplist('select concat(pttype,":",name) as pttype_name from pttype where pttype in ('+pttype_list+')  order by pttype ');
      hospcode_list:=getsqlsubquerydata('select distinct hospmain from vn_stat where pttype in ('+copy(pttype_list,1,2)+') and vstdate between "'+ds1+'" and "'+ds2+'" ');
      hospcode_list := getpickuplist('select concat(hospcode,":",hosptype," ",name) as name from hospcode where hospcode in ('+hospcode_list+')order by hospcode ');
     
    ChangeReportSQL('select v.* from vn_stat v  left outer join ovst o on o.vn = v.vn   where v.pttype in ('+copy(pttype_list,1,2)+') and v.vstdate between "'+ds1+'" and "'+ds2+'"  and v.hospmain="'+copy(hospcode_list,1,5)+'" and o.an is null order by v.vn ');
   
   
   

20
อยากเพิ่มข้อความเตือนพิมพ์ใบนี้ตรับ โดยถ้าผู้ป่วยใช้สิทธิ์ประกันสังคม (17) ให้แสดงข้อความเตือน 'กรุณาตรวจสอบใบแรกรับ จากแพทย์' จะต้องเพิ่มคำสั่งตรงไหนครับ (REPORT-RG501)ช่วยชี้แนะด้วยครับ

21
ตามqueryนี้ครับ ค่ายามีเพิ่มเป็น 2 เท่า ค่าบริการไม่มีปัญหา

select d1.*,v1.*,o1.*,p.drugallergy,i1.name as pdx_name ,concat(v1.hospmain,"  ",hc.hosptype,hc.name)
as hospname,v1.pttype,pa.name as pay,pt.paidst as paycode,concat(pc.name," , ",pa.name) as pcname,concat("***",c.name,"***") as inname
from doctor_order_print d1
left outer join vn_stat v1 on v1.vn=d1.vn
left outer join ovst o1 on o1.vn=d1.vn
left outer join patient p on p.hn = v1.hn
left outer join hospcode hc on hc.hospcode=o1.hospmain
left outer join icd101 i1 on i1.code=v1.main_pdx
left outer join opdscreen os on os.vn=o1.vn
left outer join pttype pt on pt.pttype=v1.pttype
left outer join paidst pa on pa.paidst=pt.paidst
left outer join pcode pc on pc.code =pt.pcode
left outer join service_time st on st.vn =d1.vn
left outer join s_drugitems s on d1.icode = s.icode
left outer join income c on c.income = s.income
where d1.vn="540908081755"


order by s.income

22
error  varchar(20),i1.incdate,121)+convert(varchar(20),i1.inctime,121)
as id,i1.hn,i1.rcpno,i1. at line 1


select distinct(i1.hn+convert(varchar(20),i1.incdate,121)+convert(varchar(20),i1.inctime,121))
as id,i1.hn,i1.rcpno,i1.incdate,
rtrim(rtrim(pt.pname)+rtrim(pt.fname)+" "+rtrim(pt.lname)) as ptname,
(select sum(rcptamt)  from incoth where hn=i1.hn and incdate=i1.incdate and inctime=i1.inctime and paidst="00") as money0,
(select sum(rcptamt)  from incoth where hn=i1.hn and incdate=i1.incdate and inctime=i1.inctime and paidst="01") as money1,
(select sum(rcptamt)  from incoth where hn=i1.hn and incdate=i1.incdate and inctime=i1.inctime and paidst="02") as money2,
(select sum(rcptamt)  from incoth where hn=i1.hn and incdate=i1.incdate and inctime=i1.inctime ) as totmoney

from incoth i1
left outer join patient pt on pt.hn=i1.hn

where convert(char(7),i1.incdate,121)="2011-08" and rtrim(i1.rcpno) <> ""

group by i1.hn,i1.incdate,i1.inctime,i1.paidst,i1.rcpno,pt.pname,pt.fname,pt.lname
order by i1.rcpno,i1.incdate,i1.hn

รบกวนตรวจสอบให้ด้วยครับ ขอบคุณครับ

23
รพ.ได้หนังสือด่วน ของกรมบัญชีกลาง เรื่องการออกเอกสารแสดงค่าใช้จ่ายเบิกจ่ายตรงบ้าง ลืมไปขอแนะนำตัวก่อนจาก รพ.จิตเวชนครสวรรค์ราชนครินทร์ครับ ขึ้นระบบ มีนาคม 54 ยังไม่ได้อบรม รบกวน รพ.ไดเขียน repot ตัวนี้เสร็จแล้วรบกวนช่วยเผยแพร่ด้วยครับ

หน้า: [1]