แจก pascal script ปรับปรุงสิทธิหลัก ของ patient กับ person

[armds]

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

- เช็คปีทีหมดอายุจาก  ถ้าเป็น  person  จะเช็คจากชื่อฟิว   pttype_expire_date
                                 ถ้าเป็น  patient  จะเช็คจาก  ตาราง  pttypeno   ชื่อฟิว   expiredate

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

[มนตรี บอยรักยุ้ยคนเดียว]

 

[nph2006]

  Very Thank s 

[doramon]

สุดยอด

 

[redfireball]

  ขอบคุณคร้าบบบบ

[atit]

      ขอบคุณคร้าบบบบ ด้วย

[SIWIT]

Thank U ครับผม

[bbb3]

ขอบคุณครับ...

[werachon]

ขอบคุณ ครับ ช่วย ผมได้เยอะเลย 

[doi53]

ขอบคุณครับ 

[Auing]

ผมนำเข้าแล้วมันไม่ออกอ่ะครับ   นำเข้าในสายฟ้า  ((หรือว่าทำไม่เป็น ))

[ARMIN]

ขอบคุณครับ 

[Tharuea_Hos]

อยากทราบวิธีการนำ ครับ

[chinaga]

ขอบคุณครับ

[arabama]

ขอบคุณครับ