1
นอกเรื่อง / Re: ส่งออก RewData แล้ว Error
« เมื่อ: กรกฎาคม 01, 2013, 15:35:11 PM »
โหลด โปรแกรม Unitcost ตัวล่าสุด
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.
ที่บัญชีโรคเรื้อรังอื่นๆมันก็ยังขาดทะเบียนคลินิกโรคไตไปอ่าครับอาจารย์ ถ้ามีคลินิกขึ้นมาอีกได้ละก็แจ๋วววเลยครับเพิ่มในตาราง clinic ได้นี้ครับ
ถ้าผมต้องการจะสั่ง >2 คำสั่งในคราวเดียว ต้องสั่งยังไงครับ ผมเคยทำเมื่อประมาณ 2 ปีก่อน ตอนนี้ลืมแล้ว เช่น
@กำหนดตัวแปร HN
update ovst set pttype="71" where hn="ตัวแปร HN";
update vn_stat set pttype="71" where hn="ตัวแปร HN"
ประมาณว่า เปลี่ยน HN แล้วสั่งครั้งเดียวเสร็จเลยน่ะครับ
พอดีต้องทำเรื่อง Unit cost ที่ต้องนำข้อมูลให้ งานบัญชีLOS ใน RawData คือ จำนวนวันนอน
และไม่อยากรบกวนน้อง Admin ที่งานเยอะอยู่แล้ว , เลยลองมาค้นๆดู ว่ามีที่ไหน ทำกันอย่างไร
มาพบเครื่องมือของอาจารย์ เลยขออนุญาต แชร์ ครับ
..................................................................
เครื่องมือของอาจารย์ใช้งานได้ดีเลยครับ ส่งออกข้อมูลได้ทั้งหมด
มีประเด็นฝากอาจารย์นิดนึงครับ
พอดีจะนำเอาข้อมูล LOS ไปบันทึกใน CostProject แล้วพบว่า
LOS ใน RawData กับ ใน DATA ไม่ตรงกันครับ
...................................................................
ใน RawData น่าจะถูกต้องครับ
แต่ผมไม่ทราบว่า อาจารย์คิด LOS อย่างไร ระหว่าง การส่งออกข้อมูลไปที่ DATA กับ RawData
ขอบคุณครับ
ลองทดสอบการเขียนฟอร์มในปุ่ม Custom Form โดยที่ เราสร้างฟอร์มย่อยมากกว่า 1 form ยกตัวอย่างเช่น มี MianForm กับ ChildForm เรียก ChildForm ด้วยคำสั่ง RunHOSxP_ScriptProgram('xxxxFORM') ผ่าน Button ใน MainForm โดยปกติใน Delphi เราสามารถประกาศตัวแปรในส่วนของ Public ของ Unit1 แล้ว Use Unit1 ใน Unit2 ซึ่งจะทำให้เราสามารถที่จะใช้ตัวแปรร่วมกันได้(รับส่งค่าระหว่าง Form ได้) แต่จากเท่าที่ลองทำใน HOSxP ไม่สามารถทำได้ครับ เลยไม่แน่ใจว่าตอนนี้ HOSxP สามารถทำได้หรือยังครับ ถ้าไม่ได้จริงคงต้องใช้วิธีเดิม Compile เป็น Exe file แล้วเรียกขึ้นมาใช้งานตรงๆผมอยากได้แบบนี้เหมือนกันครับ
... ใช้การอนุญาต port ของ MySQL แทนการปิด firewallผมก็ใช้แบบนี้อยู๋ ปลอดภัยกว่าครับ
น่าจะดีกว่านะครับ ... ...
ผมทำให้เลือก Checkbok ก่อนว่า จะ นำเข้าคนไหนบ้างครับ เพื่อให้เจ้าหน้าทีตรวจสอบอีกทีครับถ้าเราจะดึงจากตาราง ovstdiag ต้องใช้คำสั่งอย่างไรครับ เพราะมีผู้ป่วยบางคนยังไม่ลงทะเบียนใน clinic_memberSuperP2P --->Visit2Clinic เลือกผู้ป่วยเฉพาะที่ยังไม่ได้ลงทะเบียนใน clinic แล้ว สามารถนำเข้า Clinic ได้เลย
ของ เทพ.อ.เจมส์ ตัด hn ที่ตายอัตโนมัติแล้วใช่ไหมครับ
ถ้าเราจะดึงจากตาราง ovstdiag ต้องใช้คำสั่งอย่างไรครับ เพราะมีผู้ป่วยบางคนยังไม่ลงทะเบียนใน clinic_memberSuperP2P --->Visit2Clinic เลือกผู้ป่วยเฉพาะที่ยังไม่ได้ลงทะเบียนใน clinic แล้ว สามารถนำเข้า Clinic ได้เลย
เพิ่งเป็นเหมือนกันเเล้วครับตอนนี้ หาผู้รู้ยากมากๆ
ใส่คำสั่ง d1.group by icode เเล้วก็ยังไม่หายครับ
BoNanZa ครับนอนไหนครับ อ.เจมส์
มีความต้องการเพิ่มข้อมูลในตารางผมเพิ่มไปแล้ว อิอิ
refer_point_list
จากเดิม
มีแค่ ER IPD OPD
จะเพิ่ม LR, Dent ,ห้องจิตเวช , อื่น ๆ จะได้ไหมครับ
ขอแบบเป็นรายการครับหมายถึง อันดับการใช้ยา หรอครับ
รบกวนอาจารย์เพิ่ม Refer in ด้วยได้ไหมครับไว้ว่างๆๆนะครับ
ดีเลยครับผมไม่มี Access2010Program UnitCost --> http://hpc11.go.th/james011/จากที่ไปประชุมมาแนะนำให้ใช้ office2010 ครับ และต้องตั้งค่ารหัสสถานพยาบาลก่อนทุกครั้งที่กดเริ่มต้นใหม่ ผมทกสอบแล้วหลังจากนำเข้าไม่ error นะครับ
น่าจะต้องใช้ Office 2007 ขึ้นไปนะครับ (Office>=2007)ต้อง Office 2010 ถึงใช้ได้ผมก็ใช้ Office 2010 ในการทดสอบ เอาเป็นว่า ให้ Office 2010 Stable แล้วกันครับ อิอิ
ไม่สามารถใช้ได้กับ Office 2003,Office 2013
ต้องใช้ตัวนี้แทน http://www.microsoft.com/en-us/download/details.aspx?id=10910
ขอบคุณครับ อิอินี้แระครับ คือ ปัญหา อิอิแล้วจะได้ไปกันหม้าย ไม่มีรายชื่อ อิอิเพิ่งโทรถามทางโรงแรมบอกว่าเต็มแล้วครับ งามแล้วล่ะครับรู้สึกว่าที่ผ่านมา ก็พัก โรงแรมนอกตลอด อิอิ
แถวนั้นแฟนคลับพี่เจมส์เยอะคงหาที่นอนได้มั้งแหละ
ไม่งั้นก็ไปพักกับป๋า JD ก็ได้ครับ ป๋าก็แฟนคลับก็เยอะเหมือนกันนิ
คุณเจมส์ ยังไม่ส่งรายชื่อมาเลยนะค้า
พี่เจมส์คะ พี่เปาจะส่งรายชื่อพี่มาให้คะ ไม่ต้องกังวลคะ เรื่องที่พักติดต่อกลับคุณเปาเรียบร้อยแล้วคะ
ขอบคุณคะ
นี้แระครับ คือ ปัญหา อิอิแล้วจะได้ไปกันหม้าย ไม่มีรายชื่อ อิอิเพิ่งโทรถามทางโรงแรมบอกว่าเต็มแล้วครับ งามแล้วล่ะครับรู้สึกว่าที่ผ่านมา ก็พัก โรงแรมนอกตลอด อิอิ
แถวนั้นแฟนคลับพี่เจมส์เยอะคงหาที่นอนได้มั้งแหละ
ไม่งั้นก็ไปพักกับป๋า JD ก็ได้ครับ ป๋าก็แฟนคลับก็เยอะเหมือนกันนิ
คุณเจมส์ ยังไม่ส่งรายชื่อมาเลยนะค้า
แล้วจะได้ไปกันหม้าย ไม่มีรายชื่อ อิอิเพิ่งโทรถามทางโรงแรมบอกว่าเต็มแล้วครับ งามแล้วล่ะครับรู้สึกว่าที่ผ่านมา ก็พัก โรงแรมนอกตลอด อิอิ
แถวนั้นแฟนคลับพี่เจมส์เยอะคงหาที่นอนได้มั้งแหละ
ไม่งั้นก็ไปพักกับป๋า JD ก็ได้ครับ ป๋าก็แฟนคลับก็เยอะเหมือนกันนิ
เพิ่งโทรถามทางโรงแรมบอกว่าเต็มแล้วครับ งามแล้วล่ะครับรู้สึกว่าที่ผ่านมา ก็พัก โรงแรมนอกตลอด อิอิ
อยากได้บ้างครับ ss-hospital@hotmail.comเข้าในนี้ก็ได้ครับ http://www.facebook.com/groups/191037677695931/
FB มันขึ้น โพสต์นี้ได้ถูกลบไปแล้วหรือไม่สามารถโหลดได้
Program UnitCost --> http://hpc11.go.th/james011/จากที่ไปประชุมมาแนะนำให้ใช้ office2010 ครับ และต้องตั้งค่ารหัสสถานพยาบาลก่อนทุกครั้งที่กดเริ่มต้นใหม่ ผมทกสอบแล้วหลังจากนำเข้าไม่ error นะครับ
น่าจะต้องใช้ Office 2007 ขึ้นไปนะครับ (Office>=2007)
ต้อง Office 2010 ถึงใช้ได้ผมก็ใช้ Office 2010 ในการทดสอบ เอาเป็นว่า ให้ Office 2010 Stable แล้วกันครับ อิอิ
ไม่สามารถใช้ได้กับ Office 2003,Office 2013
ทดสอบแล้ว error แบบนี้ครับท่านเจมส์ลอง กระชับและซ่อมแซม ฐานข้อมูลดูครับ
เปิดไม่ได้นะครับมันขึ้น Error ว่าอะไรครับ ตอนเปิด
ลองทดสอบ เปิด Rawdata.accdb และ data.accdb ว่า สามารถเปิดได้หรือเปล่าครับทดสอบแล้ว error แบบนี้ครับท่านเจมส์แก้ไข Error ได้ยังครับ
ผมเพิ่ม ก้อเป็น Error นี้
ทดสอบแล้ว error แบบนี้ครับท่านเจมส์แก้ไข Error ได้ยังครับ
Program UnitCost --> http://hpc11.go.th/james011/Update หน่อย EasyReport2U 1.56.2.5
@ โอนข้อมูลจาก HOSxP ไปยัง UnitCost มีครบ 2 แบบ
1. RawData.accdb
2. Data.accdb
ใครมี
1. RawData.accdb
2. Data.accdb
บาง ผมประชุมพรุ่ง ว่าจะเอามาทดสอบก่อนประชุม
เข้ามากด Like ให้ คุณเจมส์ค่ะขอบคุณครับ อิอิ
procedure Variable35OnCalc(var Value: Variant);
begin
if (DBPipeline['egfr']='') then Value:=0 ;
end;
beginตัวหารเป็น 0
if DBPipeline['sex']=1 then
if DBPipeline['creatinine']<=0.9 then
Value :=141*exp(-0.411*ln(DBPipeline['creatinine']/0.9))*exp(DBPipeline['age_y']*ln(0.993))
else
Value:=141*exp(-1.209*ln(DBPipeline['creatinine']/0.9))*exp(DBPipeline['age_y']*ln(0.993));
if DBPipeline['sex']=2 then
if DBPipeline['creatinine']<=0.7 then
Value:=144*exp(-0.329*ln(DBPipeline['creatinine']/0.7))*exp(DBPipeline['age_y']*ln(0.993))
else
Value:=144*exp(-1.209*ln(DBPipeline['creatinine']/0.7))*exp(DBPipeline['age_y']*ln(0.993));
end;
อ้างถึงยังแก้ไม่ได้ครับ จะหาทางแก้ให้ ต่อไปคงต้องไปใช้ zeoslib เห็นใช้ได้
อันนี้เขียนมาเยอะแล้ว 555
ทีอย่างอื่นล่ะเห็นแก้เร็วจัง......ศรัญญู
สอบถามผู้รู้เรื่องการเงินหน่อยครับ ว่าค่าลงทะเบียนข้าราชการสามารถเบิกได้หรือไม่ครับ ทำไม รพ.ผมบอกว่าเบิกไม่ได้ปกติค่าลงทะเบียนมันเบิกได้นะครับ ข้าราชการ
รพ.สต.บ้านวัดโพรงจระเข้ คำสั่งตรวจแฟ้มpersonกับpatientSuperP2P56 --->http://www.facebook.com/groups/191037677695931/221193704680328/
แย่เลยที่โรงพยาบาล block facebookซุ่มยิงกันทั้งนั้น 55
ปีนี้พี่เจมส์ส่งผลงานอีกไหมครับ ..... ไม่รู้ว่าส่งอีกได้ไหม 5555....
แต่ปีนี้ไม่เห็นใครเลย เงียบๆ มีพี่เจมส์มาแว้ว......
จะร่วมทดสอบ กะอ.เจมส์ด้วย แต่โหลดมิได้นะขอรับอยู่ในกลุ่ม Facebook ตาม Link ด้านบนครับ