1
แจ้งปัญหา / ขอความช่วยเหลือ / Re: ขอความช่วยเหลือ ห้องตรวจ หน้าประวัติ(F2)
« เมื่อ: กรกฎาคม 01, 2024, 08:27:16 AM »
ขอบคุณครับ
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.
เอ ทำไมในรูปตัวอย่าง ชนิดการวินิจฉัย ICD9 = 4 หรือครับ
ขึ้นให้อัตโนมัติ? ครับ
จริงๆแล้ว ไม่อยากให้ขึ้นเป็นประเภท 1-5 เลย เพราะมันไม่ใช่ ICD10
หรือถ้าจะขึ้นชนิด อยากให้แยกชัดเจนไปเลย เช่นเป็น "9" หรือ "0"
เป็นกับผู้รับบริการทุกรายที่บันทึกข้อมูลด้วยเครื่องนี้
หรือ
เป็นเฉพาะการบันทึกข้อมูลของผู้รับบริการรายนี้ครับ
เป็นกับผู้รับบริการทุกรายครับ ที่บันทึกเครื่องนี้ เครื่องอื่นไม่เป็นเลยครับ
ลองตรวจสอบ formate datetime ที่กำหนดใน windows ในการคำนวณ อายุ ผู้มารับบริการ...กำหนด format วันเดือนปี ไว้อย่างไร
เป็นกับผู้รับบริการทุกรายที่บันทึกข้อมูลด้วยเครื่องนี้
หรือ
เป็นเฉพาะการบันทึกข้อมูลของผู้รับบริการรายนี้ครับ
ได้แล้วค่ะ ไฟล์ libmysal41.dll หาย น่าจะโดนไวรัสกิน ((^_^))
ถ้าคิวรี่ออกมาแค่ row เดียว field เดียว จะใช้แบบนี้ก็ได้ครับ
fhn := GetSQLdata('select hn from ovst where vn = "'+fvn+'"');
----------------------------------------------------------------------------------
แต่ถ้าต้องการคิวรี่ออกมา row เดียว แต่หลาย field ก็ใช้แบบนี้ครับ
procedure .........
var
sql, f1, f2: string;
tmp: TClientDataset;
begin
sql := 'SELECT field1, field2, ... FROM ..............';
tmp.data := HOSxP_GetDataSet(sql);
//เวลาจะใช้งานก็แบบนี้ครับ
f1 := tmp.FieldByName('field1').AsString;
f2 := tmp.FieldByName('field2').AsString;
//ก็เอา result ที่ได้มาใส่เข้าไปใน client dataset เลยก็ได้ ****************
end;
----------------------------------------------------------------------------------
ถ้า result คิวรี่ออกมามีหลาย row
ก็เอา result ที่ได้มาใส่เข้าไปใน client dataset เลยก็ได้ ****************
หรือใช้วิธีการ loop เอาข้อมูลมาใช้ หรืออาจจะคำนวนออะไรก่อนก็ได้ครับ
procedure .........
var
sql, f1: string;
tmp: TClientDataset;
begin
sql := 'SELECT field1, field2, ... FROM ..............';
try
tmp.data := HOSxP_GetDataSet(sql);
while not tmp.eof do begin
f1 := tmp.FieldByName('field1').AsString;
tmp.Next;
end;
except
on E : Exception do Exit;
end;
end;
----------------------------------------------------------------------------------
โดยคำนึงถึงการ except error เอาไว้ด้วยเพื่อป้องกันการผิดพลาดของโปรแกรม
front มีให้ download ที่ไหนบ้างครับ ผมก็เจอปัญหาแบบเดียวกัน
ให้ทำหนังสือแจ้งมาที่ รพ.ด่านมะขามเตี้ยแล้ว
ให้ ผอ. รพ.ค่ายสุรสีห์ โทรมา ผอ. รพ.ด่านมะขามเตี้ย
และระบบน่าจะหยุดไม่น้อยกว่า 12 ชั่วโมง
ระบบตอนแรกวางไว้
เครื่อง Master = เครื่องคอมพิวเตอร์ แรม 64GB
เครื่อง Slave = เครื่องคอมพิวเตอร์ แรม 16GB
แล้วระบบเกิดปัญหาจาก Admin รพ.ค่ายสุรสีห์ ไม่ส่งต่อกัน
สาเหตุ คือ เปลี่ยน server สลับไปมา ระหว่างmaster กับ slave
เพราะระบบ repication ใน hosxp ไม่ได้เอาข้อมูลมาทั้งหมด 100%
ผมนึกว่าใช้ main_dep_que ครับ..
select vn,main_dep_queue,vstdate from ovst order by vn desc limit 10
การที่จะทำให้ข้อมูลเท่ากันกับ Master เลยเราต้องมีการสั่ง Run Agent เพื่อให้ข้อมูลได้ Sync กัน ระหว่างเครื่อง Master กับ Slave และต้องอยู่ในสถานะ Active-Sync ครับ[/color]
ต้องขอบคุณพี่ sukjai krub สำหรับคำแนะนำนี้ก่อนนะครับ
แต่ปัญหาที่นี้คือ ผมต้องการทำให้เครื่อง Master มีข้อมูลล่าสุด(หลังจาก วันที่ 17 เมษา 56 ) ครับ
คือว่าอธิบายง่ายๆคือ ผมต้องการทำให้เครือ่ง master มีข้อมูลเท่ากันกับ เครื่อง Slave ครับ (ทำสลับกันนะครับ^^)
ซึ่งตอนนี้ผมซ่อมแซ่มฐานข้อมูลเครื่อง Master ได้เเ้ล้ว
และได้ปรึกษากับเจ้าหน้่าที่ของบริษัท BMS เขาก็บอกว่าให้ Run agent เหมือนกับที่พี่ sukjai krub บอกนะครับ^^
เเละขณะนี้กำลังรอดูผล จากการ run agent ที่ตั้งให้ เครือ่งตั้งให้เครือ่ง Slave เป็น master แทน และ เครื่อง Master เป็น slave ครับ
ดูๆเเล้วก็น่าจะได้ตามที่ต้องการครับ ^^
------------------------------------------------------------------------------------------------------------------------
ขอให้แก้ปัญหาผ่านไปด้วยดีนะครับ
ปัญหานี้จะไม่เกิดขึ้น หากเราคอยตรวจเช็ค Server และมีการ Backup อย่างสม่ำเสมอ Initial Import เป็นประจำ ตรวจเช็คข้อมูลระหว่างเครื่อง Master และ Slave อยู่เสมอว่าเท่ากันหรือไม่
และอย่าแก้ไข my.cnf โดยที่เราไม่เข้าใจความหมาย หรือก่อนแก้ไขควร Backup ค่าเดิมไว้ก่อน เพราะการแก้ไขค่าบางค่าอาจส่งผลให้ MySQL ไม่ทำงานได้ครับ
การที่จะทำให้ข้อมูลเท่ากันกับ Master เลยเราต้องมีการสั่ง Run Agent เพื่อให้ข้อมูลได้ Sync กัน ระหว่างเครื่อง Master กับ Slave และต้องอยู่ในสถานะ Active-Sync ครับ[/color]
------------------------------------------
ที่ว่าหาย คือ อะไรหายครับ
พี่ๆครับ
รบกวนทราบถามหน่อยครับว่า
การทำ initial import กับฐานข้อมูลที่มีข้อมูลอยู่เเล้ว
จะทำให้ข้อมูลที่มีอยู่เเล้วหายไปไหมครับ
ขอบคุณครับ
เฉินหลง
ลองไปศึกษา
C:\Program Files\HOSxP\manual\HOSxP_Administration_Manual.pdf
พี่ๆครับhttp://hosxp.net/smf/index.php?action=profile แนะนำต้ว ใส่รายละเอียดที่ตรงส่วนนี้ด้วยครับ โดยเฉพาะลายเซ็นครับ ดูตัวอย่างจากในเว็บบอร์ดก็ได้ครับ จะได้รู้จักกันไว้ครับ
รบกวนสอบถามเกี่ยวกับการทำ initial import ว่ามันคืออะไรครับ และมีความสำคัญอย่า่งไรครับ
ขอบคุณครับ
ประณต จันทร์อนันต์ (เฉินหลง)
นักวิชาการคอมพิวเตอร์ รพ.ค่ายสุรสีห์
*** มือใหม่ครับผม ^^***
แบบบ้านๆ ก็การ copy database ไปยังอีกเครื่องหนึ่ง เดี๋ยวท่านอ.อื่นๆ จะเข้ามาให้ความรู้เพิ่มเติมนะครับ
ขอบคุณครับ ^^
และถ้าจะให้ข้อมูลคืนมาทั้งหมด ต้องได้ชื่อตารางที่ไม่เท่ากันทั้งหมด
แนะนำให้ใส่ชื่อ ตารางไว้ บน Notepad ตารางที่ไม่เท่ากันทั้งหมด
ตารางจากเครื่อง slave มาใส่ Master ไม่ยาก แต่ต้องใช้ความรอบคอบให้มาก
เพราะ ตารางที่มันต่างกัน จากโครงมะเร็งเต้านม อ.ชัยพรเพิ่มไม่นานมานี้