ท่านที่โหลดกรุณากด Thank   เพื่อขอบคุณ

ใช้ได้ดีครับ แต่ตอนบีบอัดไฟล์นี่ นานใช่เล่นเลย

มีแบบใหม่ไหมครับ

เชต ผิดครับตามภาพเลย

VDRL1   VDRL2  lab_item_code  ต้องไม่เหมือนกันครับ
 เพราะผลจะอ้างอิงที่  lab_item_code  ครับ  

ถังนั้นถ้าต้องการให้ อัพผลให้อัตโนมัติ ต้องไปสร้าง
 LAB  VDRL ขึ้นมาอีกตัววเพื่อทำการอ้างอิงใหม่ครับ

 

ท่านใดพอจะมีรายงาน การใช้  เนื่องจาก ช่วงนี้ Pseudoepredine กำลังดัง
เลยส่งผลให้ วัตถุออกฤทธิ์ในประเภท 2 โดนเล่นไปด้วย
พี่ท่านอาจารย์พอจะมีรายงานตัวนี้บ้างไหมครับ
 

วัตถุออกฤทธิ์ในประเภท 2

        1.จัดทำบัญชี รับ-จ่าย แจ้งรายละเอียดผู้ป่วย (แบบบ.จ. บัญชี รับ- จ่าย รายเดือน(แบบบ.จ.9) และ บัญชี รับ-จ่าย รายปี (แบบบ.จ.10) ตามกฎกระทรวงฉบับที่ 15 (สำหรับยาทุกตัวที่ซื้อจากกองควบคุมวัตถุเสพติด
        2.จัดทำบัญชี รับ-จ่าย รายเดือน (แบบบ.จ.9) ส่งสำนักงานคณะกรรมการอาหารและยาทุกเดือนภายใน 30 วัน หลังวันสิ้นเดือนทั้งนี้โปรดสำเนาไว้ที่สถานพยาบาล 1 ชุด (สำหรับยาทุกตัวที่ซื้อจากกองควบคุมวัตถุเสพติด)
       3.จัดทำบัญชี รับ-จ่าย ประจำปี (แบบบ.จ.10) ส่งสำนักงานคณะกรรมการอาหารและยาทุกปี
       4.จัดทำบัญชี รับ-จ่าย แจ้งรายละเอียดผู้ป่วย (แบบบ.จ. เก็บไว้ที่สถานพยาบาลสำหรับเจ้าหน้าที่ไปตรวจสอบ บัญชีต่างๆเก็บไว้อย่างน้อย 2 ปี นับแต่ลงรายการครั้งสุดท้ายของบัญชี (มาตรา 87)
       5. กรอกรายละเอียดให้ถูกต้องครบถ้วนทุกช่อง ระบุรหัสสถานที่ และรหัสผู้ถือใบอนุญาต ทุกครั้ง
       6.การลงชื่อยา ต้องลงทั้งชื่อสามัญ และ ชื่อการค้า ของยา
       7.การลงปริมาณการใช้ไม่ต้องคำนวณเป็นกรัม ให้ลงเป็น มิลลิลิตร (ml) เม็ด ขวด หลอด ก็ได้ และ ยอดรับ-จ่าย ยอดคงเหลือ ต้องถูกต้องตามจริง
       8.ต้องมีลายเซ็นต์ผู้รับใบอนุญาตกำกับในการทำรายงานทุกครั้ง
       9.การส่งรายงานทางไปรษณีย์ให้จ่าหน้าซองถึง ผู้อำนวยการกองควบคุมวัตถุเสพติดโดยตรง เพื่อมิให้เกิดความล่าช้า

ตัวอย่างหน้าตารายงาน
http://www.software.worldmedic.com/sis/main/bj10.php

ยินดีด้วยนะครับ

มีผลช่วงวันที่ที่เลือกครับ

ไม่ได้จบ ป.ตรี 

ขอดูหน้าจอตอนบันทึกการห้องหน้าจอซักประวัติ
และหน้าจอ ห้องแพทย์ที่ส่งเข้าไป

ปัญหานี้มาจากการส่งไม่ถูกห้องหรือแพทย์login ไม่ถูกห้อง

อ้างถึง

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

สงสัยป้า ๆ ขี้เกียจคีย์แน่ ๆ อ่านตรงนี้
แฟ้มที่ 7 : APPOINT
Definition : เก็บรายละเอียดการนัดมารับบริการครั้งต่อไปของบุคคลที่มารับบริการ
การมารับบริการแต่ละครั้งสามารถมีการนัดได้มากกว่า 1 รายการ
ลักษณะแฟ้ม : เป็นแฟ้มบริการ
คิดเอาเองว่าจะเอา 1 point หรือ 2 point
 

ออ ไม่ได้ขี้เกียจลงครับ นัดฉีด 3 อย่าง ก็ลงนัด 3 รายการครับ เพื่อส่งเบิกวัคซีน
แต่สงสัย ตามรูปที่ลูกศรชี้ครับ จะเห็นว่า
ต้องกรอกข้อมูลที่
วัคซีนที่นัดมารับ คือ DTP+HB  เข็มที่ 3  และ ประเภทการนัดหมาย คือ DTPHB 3
ซึ่ง ดูแล้วความหมายมันคล้าย ๆ กันเลยครับ  และต้องลงข้อมูลตัวเดียวกันด้วย  เลยสงสัยครับ
ว่าถ้าเราไม่ใส่ข้อมูลในช่อง วัคซีนที่นัดมารับ  จะส่งผลอย่างไรบ้าง
เพราะการเลือกจากรายการมันทำให้บันทึกได้ช้าลงนิดหนึ่งครับ

งงคำถาม
ถ้าเข้าใจไม่ผิด
1.
ก่อน admit ให้ลงการให้บริการที่ ER ให้เสร็จก่อนรับ Admit รายการจึงจะโอนเข้าไปผู้ป่วยใน
2.
ถ้า Admit ไปแล้ว
ให้ผู้ป่วยในคลิกขวาที่ชื่อผู้ป่วย เลือกส่งทำหัตถการ ER เพื่อให้ ER ทำหัตถการ

จะเอา code นี้ไปทำอะไรครับ

code ที่ อ.udomchok เขียนไว้ก็ได้ครับ เพราะ เอา max vn มาใช้แล้ว

select v.hn, v.vn, v.vstdate, v.age_y ,v.age_m,p.lname,p.fname
from vn_stat v
left join patient p on p.hn=v.hn
join (select v2.hn, max(v2.vn) max_vn from vn_stat v2 group by hn limit 1000)
temp on temp.hn=v.hn and temp.max_vn=v.vn

ดัน ดันดัน

2. แฟ้มของแบบฟอร์ม ที่ถูกส่งออกจาก Report designer (Attach เข้ามาด้วย)

ในกระทู้ก่อนยังไม่ได้เหรอครับ
http://hosxp.net/index.php?option=com_smf&Itemid=28&topic=23946.0

ลองใส่  group by o.vn  เข้าไปนะครับ ประมาณนี้

in ('+clinic_hn+')  group by o.vn ');

 

select a.an,a.hn,a.regdate,concat(pt.pname,pt.fname,'  ',pt.lname )as name,ic.icnp_classification_name,dch.name as dchtype,
et.name as er_type,a.age_y,s.name as department
,a.pdx,i1.name as pdxname,a.dx0,i2.name as namedx0,a.dx1,i3.name as namedx1,
a.dx2,i4.name as namedx2,
a.dx3,i5.name as namedx3,
a.dx4,i6.name as namedx4,
a.dx5,i7.name as namedx5,
a.dchdate,a.admdate,d.name as discharg_type,a.income
from an_stat  a
left outer join patient pt on a.hn = pt.hn
left outer join spclty s on a.spclty = s.spclty
left outer join ipt i on a.an = i.an
left outer join dchstts  d on i.dchstts = d.dchstts
left outer join icd101 i1 on a.pdx = i1.code
left outer join icd101 i2 on a.dx0 = i2.code
left outer join icd101 i3 on a.dx1 = i3.code
left outer join icd101 i4 on a.dx2 = i4.code
left outer join icd101 i5 on a.dx3 = i5.code
left outer join icd101 i6 on a.dx4 = i6.code
left outer join icd101 i7 on a.dx5 = i7.code
left outer join ipt_icnp ii on a.an = ii.an
left outer join icnp_classification ic on ii.icnp_classification_id = ic.icnp_classification_id
left outer join ipt ipt on   a.an = ipt.an
left outer join  dchtype dch on ipt.dchtype = dch.dchtype
left outer join er_regist er on a.vn = er.vn
left outer join er_emergency_type et   on er.er_emergency_type =et.er_emergency_type

where a.regdate between '2011-10-01' and '2011-10-31'  and a.an not in (select an from ipt_labour)

แล้วตาราง CHRONICFU 
ต้องคีย์เมนูไหนครับ
ส่งออกแล้วไม่มีข้อมูลครับ
LABFU  ออกปกติครับ
แต่ตารางผู้ป่วยคลีนิคพิเศษมารับบริการไม่ออกครับ
รบกวนอาจารย์ทุกท่านด้วยครับ

]ศึกษาจาก
http://hosxp.net/index.php?option=com_smf&Itemid=28&topic=23284.0

ส่งออก 18 แฟ้มปี 55
ของผม patient ยังไม่ไปสร้าง person อัติโนมัติตอนส่งออก 18 แฟ้ม ไม่ทราบว่าใครเจอบ้างครับ

ปัจจุบันคิดว่า HOSXP ยังไม่มีการสร้าง person อัตโฯมัติ
แนะนำให้ใช้ Patient2person ของ อ.เจมส์ โอนข้อมูล Patient ไป person   ก่อนส่งออกครับ
ทั้งนี้ ควรบันทึกข้อมูลฝั่ง patient ให้สมบูรณืที่สุด โดยเฉพาะ CID
 

ได้ ไม่มีปัญหาถ้า รหัส user ไม่เปลี่ยน

ปล.ทำไมต้อง append

ทำไมต้อง join ipt มาครับ
ลองแบบนี้ 
Value :=GetSQLStringData('select provision_dx  from ipt   where an="'+DBPipeline['an']+'"');

 

ตั้งกระทู้ขอรายงาน หรือแจกรายงาน ที่หมวด Report Exchange >

และการโพสต์ขอ Report ที่ดีควรแจ้งข้อมูลดังนี้
1. ชื่อแบบฟอร์ม และคำอธิบายการนำไปใ้้ช้ บันทึกข้อมูลที่หน้าจอไหน
2. แฟ้มของแบบฟอร์ม ที่ถูกส่งออกจาก Report designer (Attach เข้ามาด้วย)
3. ตัวอย่างรูปของ Report ที่พิมพ์ออกมา (่jpg,png)

ตัวอย่าง การโพสต์ขอรายงาน หรือขอความช่วยเหลือเรื่องรายงานที่ดี
http://hosxp.net/index.php?option=com_smf&Itemid=28&topic=23904.0


ตัวอย่างการโพสต์ขอ ที่ไม่ควรทำ เพราะจะมีคนช่วยน้อยหรือถ้ามีก็จะช้า
เพราะคนช่วย จะช่วยต้องไปไล่ออกแบบหน้าตารายงานให้ใหม่ทั้งหมด
http://hosxp.net/index.php?option=com_smf&Itemid=28&topic=23819.0

...

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

Value := GetSQLStringData('select anc_baby_position_name from anc_baby_position where anc_baby_position_id="'+DBPipelineLink8['anc_baby_position_id']+'"');

 

ปล.กด [applaud] ให้หน่อยนะครับ

งานเข้าครับ
ทำไม ท่าเด็ก ระดับมดลูก  ส่วนนำ/การลง 
ไม่แสดงข้อมูลครับ ผิดตรงไหนครับ ช่วยดูหน่อย 

Value := GetSQLStringData('select anc_baby_position_name from anc_baby_position where anc_baby_position_id="'+DBPipeline['anc_baby_position_id']+'"');

การใส่ checkbox การซ่อนแสดงข้อมุลในรายงาน
ใช้ LABEL
  Label42.Visible := DBPipeline['an'] > '0';  
(ถ้า an > 0 ให้มองเห็น label42)

 ใช้ Variable (if ...then... else if)
procedure Variable2OnCalc(var Value: Variant);
begin
Label12.visible:=False;
Label21.visible:=False;
Label23.visible:=False;
Label29.visible:=False;

if   DBPipeline['spclty']='09' then Label12.visible:=True
else if DBPipeline['spclty']='08' then Label21.visible:=True
else if DBPipeline['spclty']='02' then Label23.visible:=True
else Label29.visible:=True;

end;

อีกแบบหนึ่ง
If getsqlintegerdata(' select count(vn) as cc from opdscreen where (hpi like "%ให้ทานยา%" or hpi like "%ส่ง ER%" or hpi like "%ให้ ทานยา%") and vn="'+dbpipeline['vn']+'" ')>0 then
   CheckBox1.checked:=false
  else
   CheckBox1.checked:=true;



จากโจทย์ น่าะประมาณนี้

If getsqlintegerdata(' select count(vn) as cc from ovst where (ovstist <> "07" or ovstist <> "08" or ovstist <> "09") and vn="'+dbpipeline['vn']+'" ')>0 then
   CheckBox11.checked:=false
  else
   CheckBox11.checked:=true;

ตอนนี้ทำได้เฉพาะรายการยาครับ

แต่
ทำเป็นสูตร เหมือนสูตรยาไว้ก็ได้ครับ เช่น ชุดทำแผล ประกอบด้วย alc สำลี ก๊อซ
เวลาใช้ก็ .ชุดทำแผล
เป็นต้น