export 12 แฟ้ม มีปัญหา

[sungoku]

ผมลอง export 12 แฟ้ม ออกมาพบปัญหาที่ตาราง CHA แล้ว CHARTITEM ไม่ตรงครับ รบกวนอาจารย์และผู้รู้ทุกท่านช่วยดูให้หน่อยครับ รายละเอียดอยู่ที่ file word ที่แนบมาครับ

[woravet]

ลองตรวจตรง DRGs Income Group ดูซิครับ
ฟิลด์ DRG_Group ใน income

[anukul]

ที่รพ.ก็มีอาการเดียวกันมานานแล้ว  พยายามแก้หลายที แต่ยังไม่ทราบสาเหตุ

ดูจาก income.stdgroup,drggroup,group2 ก็แก้ไขตามที่แนะนำไว้แล้ว

อ.อ๊อด เคยส่ง ตาราง income ของรพ.ไทรโยคมาให้ดู (รพ.ไทรโยค ไม่มีปัญหาเรื่อง CHA)  ดูแล้วพบว่า ต่างกัน (แต่ไม่ทราบว่าเป็นสาเหตุหรือเปล่า)  คือ income ของรพ.มะการักษ์ ก็คล้ายกับของคุณ sungoku คือ มีเยอะครับ ประมาณ 60 กว่าเรคคอร์ด   แต่พอดู income ของรพ.ไทรโยค มีแค่ 16-17 เรคคอร์ด  ตาม Income group เลยครับ   ผมพยายามจะหาวิธีลองปรับให้เหมือนของไทรโยค  แต่ยังไม่รู้ว่าจะทำอย่างไร เพราะข้อมูลเดิมเยอะมาก  และไม่แน่ใจว่าจะเป็นสาเหตุให้ CHA ไม่ตรงหรือเปล่า

ยังไงคงต้องรบกวน อ. MN อีกแล้วครับ 

[doramon]

drgs_income group 

ตรงหรือเปล่าครับ

[sungoku]

ผมลองทำแล้วครับ แต่ยังเป็นเหมือนเดิมครับ ผมเลยแนบตาราง income ที่ผมแก้ไขใหม่แล้ว มาให้ดู ช่วยตรวจสอบให้ด้วยครับ

[doramon]

ส่งไฟล์เป็นภาษา ENG ครับ download ไม่ได้ครับ

[doramon]

 543 function TDRGExportForm.TranslateIncome(Income: string): string;
  544 var
  545   i: integer;
  546 begin
  547   try
  548     i := strtoint(income);
  549   except
  550     i := 0;
  551   end;
  552
  553   if OldCHAMethod.checked then
  554   begin
  555
  556     case i of
  557       0: result := 'W2';
  558       1: result := 'A1';
  559       2: result := 'B1';
  560       3: result := 'D1';
  561       4: result := 'J1';
  562       5: result := 'H1';
  563       6: result := 'K1';
  564       7: result := 'K1';
  565       8: result := 'C1';
  566       9: result := 'Q1';
  567       10: result := 'N1';
  568       11: result := 'N1';
  569       12: result := 'N1';
  570       13: result := 'N1';
  571       14: result := 'N1';
  572       15: result := 'W2';
  573       16: result := 'P1';
  574       17: result := 'M1';
  575       18: result := 'C1';
  576       19: result := 'F1';
  577       20: result := 'R1';
  578       21: result := 'T1';
  579       22: result := 'U1';
  580     else
  581       result := 'W2';
  582     end;
  583   end
  584   else
  585   begin
  586     case i of
  587       1: result := '00';
  588       2: result := '09';
  589       3: result := '09';
  590       4: result := '01';
  591       5: result := '02';
  592       6: result := '03';
  593       7: result := '03';
  594       8: result := '09';
  595       9: result := '09';
  596       10: result := '09';
  597       11: result := '04';
  598       12: result := '05';
  599       13: result := '04';
  600       14: result := '09';
  601       15: result := '06';
  602       16: result := '08';
  603       17: result := '09';
  604     end;
  605   end;
  606 end;


สรุปคือ  แบบนี้ครับ

drgs_income group
จะต้องเป็นรหัส 01 - 17 เท่านั้นครับ
และหลังจากส่งออก 12 แฟ้มแล้ว

drgs_income group  :result:='00'

      1: result := '00';
       2: result := '09';
       3: result := '09';
       4: result := '01';
       5: result := '02';
       6: result := '03';
       7: result := '03';
       8: result := '09';
       9: result := '09';
      10: result := '09';
      11: result := '04';
      12: result := '05';
      13: result := '04';
      14: result := '09';
      15: result := '06';
      16: result := '08';
      17: result := '09';

ด้านหลังคือค่าที่จะส่งออกไปที่  cha ครับ

[manoi]

การส่งออก DRGs โปรแกรมจะใช้รหัส ในตาราง income.drg_group ครับ

ดังนั้นให้ตรวจสอบว่าในตาราง income มีรหัสกำกับทุก record ใน field drg_group

[sungoku]

ตาราง income รพ.ชัยนาท ครับ

[sungoku]

ผมแก้ไขข้อมูลใน drg_income แล้วครับใช้ได้ครับ ขอบพระคุณ อาจารย์,พี่อ๊อด และทุกท่านที่ใหคำแนะนำอย่างสูงครับ

[sungoku]

drgs_income group
จะต้องเป็นรหัส 01 - 17 เท่านั้นครับ
และหลังจากส่งออก 12 แฟ้มแล้ว

drgs_income group  :result:='00'

      1: result := '00';
       2: result := '09';
       3: result := '09';
       4: result := '01';
       5: result := '02';
       6: result := '03';
       7: result := '03';
       8: result := '09';
       9: result := '09';
      10: result := '09';
      11: result := '04';
      12: result := '05';
      13: result := '04';
      14: result := '09';
      15: result := '06';
      16: result := '08';
      17: result := '09';

รบกวนอาจารย์อีกหน่อยครับ ไม่เห็นมีส่งออก= 07 ที่เป็นค่าห้องเลยครับ เพราะเห็นมีแต่ 08 ค่าอาหารครับ หรือต้องการจะให้เอาค่าห้องไปรวมกับค่าอาหารครับ

[manoi]

ในขั้นตอนการส่งออกไม่ต้อง Check ตรงนี้แล้วลองดูใหม่ครับ

[sungoku]

ปกติผมก็ไม่ได้ check อยู่แล้วครับ

[manoi]

ส่งตาราง income เข้ามาด้วยครับ

[doramon]

http://hosxp.net/index.php?option=com_smf&Itemid=28&action=dlattach;topic=2511.0;attach=4652

[manoi]

ระบบจะใช้รหัส drg_group จากตาราง Income ในการ map ไปยัง field chartitem ลองทำการตรวจสอบอีกครั้งนะครับ

หรือหากไ่ม่แน่ใจใช้คำสั่งนี้เพื่อตรวจสอบกับข้อมูลจริงๆ ครับ

โค๊ด: SQL

1. SELECT ipt.an,ipt.hn,t.pcode,ipt.dchdate,inc.income AS income_code,ic.drg_group AS chartitem_code,SUM(inc.rcptamt) AS amount
2. FROM ipt
3. LEFT OUTER JOIN incith inc ON inc.an=ipt.an AND inc.paidst = "02"
4. LEFT OUTER JOIN income ic ON ic.income=inc.income
5. LEFT OUTER JOIN pttype t ON t.pttype = ipt.pttype
6. WHERE ipt.dchstts IS NOT NULL
7. AND ipt.dchdate >= "2007-07-01" AND ipt.dchdate<= "2007-07-31"
8. GROUP BY ipt.an,ipt.hn,t.pcode,ipt.dchdate,inc.income,ic.drg_group
9.  

[anukul]

ของรพ.มะการักษ์ลองปรับแก้แล้ว ใช้งานได้ปกติดีแล้วครับ หลังจากใช้งาน CHA แบบไม่ถูกหมวดมานาน แต่ยังงงๆ เล็กน้อยครับ

เดิม ในตาราง Income --> คอลัมน์  DRG_group ลงค่ารหัสของตาราง CHA เลย  เช่น กลุ่มชันสูตร DRG_group = 00  (ในตาราง CHA  00 ---> ชันสูตร)      ผลก็คือ เพี๊ยนไปครับ

ใหม่ ปรับตาม ที่ดูจาก script ที่อ.อ๊อด post ไว้ข้างนี้   โดย กลุ่ม่ชันสูตร  Income.DRG_group = 01    ผลคือ ตรงครับ  รายการค่าใช้จ่ายนี้ จะถูกนำไปอยู่ใน กลุ่ม 00 ของ CHA

ผมเลย งง งง  ครับ ว่า เข้าใจผิดมาตลอด โดยเอา รหัสของ CHA มาลงใน Income.DRG_group เลย  แล้วจะประมวลผลโดยใช้ รหัสนี้  แต่มันไม่ถูกสักที  ตอนนี้ได้แล้วครับ   แต่ก็ยังสงสัยว่า มี Income.DRG_group ทำไม ครับ  มันก็คือ Income.income ใช้่มั๊ยครับ

 

[doramon]

ถ้าที่ไหนไม่ได้ไปแก้ไข  income ก็จะส่งตรงครับ
 

[manoi]

ทำการตรวจสอบ Code ที่ group รหัสค่าใช้จ่ายให้ใหม่แล้วครับ

ช่วยตรวจสอบอีกครั้งใน 3.50.7.22 โดยโปรแกรมจะนำรหัสที่กำหนดไว้ใน income.drg_group มาส่งออกไปยัง cha  (chartitem)

[doramon]

ดีเลยครับ จะได้ไม่ต้องคิดสลับกันอีก ต่อไปอยากได้อะไรก็ใส่รหัสเข้าไปเลย