51
นอกเรื่อง / Re: รพ. ไหนได้ 15,000 แล้วยกมือขึ้น
« เมื่อ: กรกฎาคม 03, 2012, 10:25:02 AM »
15000 คงจะยาก แต่ 700 เหมือนจะได้ข่าวว่าจะปรับให้ ลจ.ชั่วคราว น่ะครับ มีผลย้อนหลัง ม.ค คับ
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.
สรุปไม่ได้ 15000 แต่ได้ปรับขึ้น 700 บาท ใช่มั้ยครับ
ลองคำสั่งนี้ดู
select o.vn,o.hn,c.number,concat(p.pname,p.fname," ",p.lname) as ptname
,o.vstdate,o.vsttime,s.bw,s.height,s.bmi,s.bps,s.bpd
,if(s.bps between 140 and 159 or s.bpd between 90 and 99,'1'
,if(s.bps between 160 and 179 or s.bpd between 100 and 109,'2'
,if(s.bps>=180 or s.bpd>=110,'3'
,if(s.bps is null or s.bpd is null,'Error',' ')))) 'BP_Grade'
,if(s.bps between 140 and 159 or s.bpd between 90 and 99,1,0) 'BP_Grade1'
,if(s.bps between 160 and 179 or s.bpd between 100 and 109,1,0) 'BP_Grade2'
,if(s.bps>=180 or s.bpd>=110,1,0) 'BP_Grade3'
,s.tg,s.ldl,s.hdl,s.hbA1c,s.creatinine,s.ua
,s.fbs
,if(s.fbs is null,'Error'
,if(s.fbs<=125,'Normal',if(s.fbs<=154,'1',if(s.fbs<=182,'2','3')))) 'FBS_Grade'
,if(s.fbs between 126 and 154,1,0) 'FBS_Grade1'
,if(s.fbs between 155 and 182,1,0) 'FBS_Grade2'
,if(s.fbs>=183,1,0) 'FBS_Grade3'
from ovst o
left join patient p on p.hn=o.hn
left join opdscreen s on o.vn=s.vn
left join clinicmember c on c.hn=o.hn
where o.vstdate between '2012-01-01' and '2012-06-30'
and c.clinic ="001"
order by o.hn,o.vn
รบกวนด้วยครับ ใส่ variable ไปแล้วผลตรงเกรดออกมาเพี้ยนๆไม่ตรงครับ ทั้ง bps และ fbs เลยคับ
ลองดูนะครับ ไม่รู้ว่าจะถูกใจหรือเปล่าครับ
procedure Variable4OnCalc(var Value: Variant);
begin
if (DBPipeline['bps']>= 140) and (DBPipeline['bps']<=159)
and (DBPipeline['bpd']>=90) and (DBPipeline['bpd']<=99) then
Value := 'Grade 1'
else if (DBPipeline['bps']>= 160) and (DBPipeline['bps']<=179)
and (DBPipeline['bpd']>=100) and (DBPipeline['bpd']<=109) then
Value := 'Grade 2'
else if (DBPipeline['bps']>= 180) and (DBPipeline['bpd']>=110) then
Value := 'Grade 3';
end;
ไม่รู้ว่าตรงตามความต้องการหรือเปล่านะครับ ลองๆดู
สำหรับตัวบน ---- Value:=GetSQLDoubleData('select bps from opdscreen where hn="'+DBPipeline['hn']+'" and '+
' vstdate between "'+ds1+'" and "'+ds2+'"');
if Value < 140 then
Value := ' »¡µÔ'
else if (Value >= 140) and (Value <= 159) then
Value := 'Grade1'
else if (Value >= 170) and (Value <= 179) then
Value := 'Grade2'
else if Value >= 183 then
Value := 'Grade3';
สำหรับตัวล่าง
Value:=GetSQLDoubleData('select bpd from opdscreen where hn="'+DBPipeline['hn']+'" and '+
' vstdate between "'+ds1+'" and "'+ds2+'"');
if Value < 90 then
Value := ' »¡µÔ'
else if (Value >= 90) and (Value <= 99) then
Value := 'G1'
else if (Value >= 100) and (Value <= 109) then
Value := 'G2'
else if Value >= 110 then
Value := 'G3';
ได้ลองแยก bps กับ bpd กันคนลง variable หรือยังครับ อาจจะพอได้นะครับ
เออคือ จะนับบนหรือล่างอ่าครับ
ข่าวดีโรงพยาบาลผมได้ปรับ 15,000 แล้วแต่สงสัยเงินเดือนใหม่มาพร้อมภาระอันใหญ่ยิ่งชัวร์
Value:=GetSQLDoubleData('select fbs from opdscreen where hn="'+DBPipeline['hn']+'" and '+
' vstdate between "'+ds1+'" and "'+ds2+'"');
if Value < 125 then
Value := ' »¡µÔ'
else if (Value >= 126) and (Value <= 154) then
Value := 'G1'
else if (Value >= 155) and (Value <= 182) then
Value := 'G2'
else if Value >= 183 then
Value := 'G3';
where hn="'+DBPipeline['name3']+'"
เชื่อมจากตารางไหนครับ
จะให้ง่าย ส่ง ตัวรายงานมาให้ทดสอบครับ
ผมต้องการเงื่อนไขแบบนี้ครับ
FBS 126-154 = Grade 1
155-182 = Grade 2
>= 183 = Grade 3
แล้วผมเขียนคำสั่งแบบนี้ แต่มันแปลผลออกมาเป็น ปกติ หมดครับ ต้องแก้ตรงไหนคับ รบกวนท่านอาจาร์ยทั้งหลายด้วยครับ เพื่อเป็นแนวทางในการเขียนครั้งต่อไปครับ
Value:=GetSQLDoubleData('select fbs from opdscreen where hn="'+DBPipeline['name3']+'"');
if Value < 125 then
Value := '- ปกติ'
else if (Value >= 126) and (Value <= 154) then
Value := '- 1'
else if (Value >= 155) and (Value <= 182) then
Value := '- 2'
else if Value >= 183 then
Value := '- 3';
ลองใช้ case of เอาครับ ทำเป็นช่วง ๆ ก็ได้
ตัวอย่างครับ
Case Value of
1..125 : Value :='ปกติ';
126..154 : Value :='1';
155..182 : Value :='2';
else Value :='3';
end;
กรอกน้ำหนักและส่วนสูงหรือยังครับ...
อ้างถึง : manoi
ตอนนี้ในโปรแกรมใช้สูตรแรกครับ
GFR1
สูตร ผู้ชาย (140-อายุ(y))* BMI / 72*serum creatinine
สูตร ผู้หญิง {(140-อายุ(y))* BMI / 72*serum creatinine}*0.85
(140-age_y)*bw*if(sex=1,1,0.85)/(72*serum creatinine) as GFR
ของผมได้ข่าวแว่วๆว่าจะได้ 15000 บาทครับ
หัวหน้าพยาบาลช่วยดันสุดฤทธิ์
แต่ดูท่าทางงานจะหนักขึ้นตามเงินเดือนที่เพิ่มขึ้นด้วย
ได้เรื่องยังไงส่งข่าวด้วยนะครับ จ.เดียวกันจะได้เอาเรื่องไปให้หัวหน้า ของ รพ ผมหัวหน้าก็ดัน แต่ธุรการอ้างเรื่องระเบียบอย่างเดียวเลย
มีกรอบอัตรากำลัง นวก.คอม ที่ สสจ. , รพศ,รพท.,รพช.ใน รพช. ไม่มีตำแหน่งสำหรับ นวก.คอมพิวเตอร์ที่เป็น พนักงานราชการ หรือ ข้าราชการ มีแต่ลูกจ้างชั่วคราว เพราะไม่มีกรอบจาก กพ.
อันนี้ ไม่รู้ว่าเป็น พนักงานราชการ หรือ กำหนดให้เป็น ข้าราชการเลย
ยังไง ท่านๆ ลองเอาหนังสือฉบับนี้ ไปคุยกับ งานทรัพยากรบุคคล ของหน่วยงานท่านดู
อ้างถึงที่พักเต็มแล้ว จะได้ที่ใหม่ใกล้ๆกับที่ประชุมหรือป่าวครับ กรุณาแจ้งกลับด้วยครับ
จะได้โอนเงินค่าที่พักจองไว้ครับ .. กลัวได้นอนกางเต๊นท์ตามชายหาด Grin Grin
อย่าไปกลัวครับ บรรยากาศดี อย่างน้อย ๆ ก็มีผมกับน้านาญล่ะที่นอนชายหาดแต่ไม่กางเต๊นท์
ผอ.อนุมัติแล้วครับ..
โรงพยาบาลหนองม่วง จ.ลพบุรี จำนวน 2 คนครับ
จะส่งใบสมัครตามไปให้ครับ..
ก็ทำงานของเราไป ใครไม่เห็นชั่งมัน เราทำตามภาระงานของเราให้ดีเป็นพอ
ถึงจะไม่ดีเด่น แต่ องค์กร เคลื่อนที่ก้เป็นพอ งานทุกงานเขาหวังให้เราตอบสนองให้มากที่สุด เพื่อนที่เขาจะได้เป็นง้อย มากเพิ่มขึ้นเรื่อยๆ คิดเองอะไรเองไม่เป็น เอ่ะอ่ะ ไร เรียกแต่ IT ศักยภาพเริ่มต่ำลงในเรื่องงาน IT เฉพาะงาน รพ แต่ว่า IT ส่วนตัว เช่น สมัคร FB ,สมัคร youtube ,เอา clip ลง Youtube ไม่ต้องถาม ทำเป็นหมด ทีเครื่องปริ้น ไม่ทำงาน เรียกให้ไปเปิด power งี้ แหละ กรรม ของ IT
ปล เขายังแซวอีกว่า โต๊ะทำงานผม เนตเร็ว มากโหลดอะไร ก็แปป เด๋ว แต่โตีะทำงานเขาก็ อืดๆๆๆ มาก ผมก็บอกไปว่า เครื่องผมต่อตรง ---->ซะใจ ดี (เครื่องผม ไม่มีโปรแกรมไรมา ลบขยะออกตลอด แต่เครื่องเขาโปรแกรมไรไม่รู้เพียบเลย บอกวาอย่าโหลดมาลง ๆๆ ก็ไม่เชื่อ จนเยอะ อ่ะ เวลา Antivirus ทำงานที ก็อื่ด นานๆ อ่ะ )
พวกเราไม่ได้ กาก นะ แต่เรายังเรียนรู้ไม่พอ ครับ อย่าว่าตัวเองเลย อย่าพัฒนาก็ ต้อง เร่งๆ ตัวเองหน่อยครับ
มึเพียงแค่ ประโยคนึ่งฝากไว้ "สู้ๆ ครับ พร้อมเก็บเกี่ยวประสบการณ์ให้มากที่สุด และเตรียมตัวเองให้พร้อมเพื่อ เตรียมสอบไปอย่างอื่นที่ดีกว่า"
นั่งทำไปทำมา ตอนนี้แก้ได้แล้วครับ.......แต่ปรากฏว่ามันพิมพ์ออกมาผิดคือ คนที่ไม่ดื่มสุรา มันก็พิมพ์ว่า "ดื่ม" คนที่ไม่สูบบุหรี่ มันก็พิมพ์ว่า "สูบ" อันนี้มึนตึ๊บเลยครับ..............
ครับต้องลงข้อมูลในคลินิกพิเศษด้วยครับแล้วต้องลงข้อมูลในคลินิกโรคเรื้อรังด้วยไหมครับ
ในที่นี้หมายถึงคลินิกโรคเรื้อรังสูงอายุ ?
แล้วต้องลงข้อมูลในคลินิกโรคเรื้อรังด้วยไหมครับ
ช่วยหน่อยครับ
ลบของเดิมในตาราง icd10_nhso ออกก่อนครับ..แล้วค่อยนำเข้า.cds ไฟล์ แล้วก็อย่าลืม update excute ล่ะครับ
เสร็จแล้ว logout ก่อน เข้าใช้งานใหม่ จะได้ข้อมูลตามต้องการมาตรฐาน สปสช OP+PP Package