ผู้เขียน หัวข้อ: รบกวนด้วยครับ  (อ่าน 3543 ครั้ง)

0 สมาชิก และ 1 บุคคลทั่วไป กำลังดูหัวข้อนี้

ออฟไลน์ kookkaija

  • Hero Member
  • *****
  • กระทู้: 969
  • kookkaija
  • Respect: +1
    • ดูรายละเอียด
    • โรงพยาบาลดอนตูม
รบกวนด้วยครับ
« เมื่อ: พฤศจิกายน 13, 2009, 07:59:43 AM »
0
รบกวนตามภาพเลยครับ :)
สุทธิ พรึงลำภู ชื่อเล่น ไก่
โรงพยาบาลดอนตูม อ.ดอนตูม จ.นครปฐม 73150
HOSxP V. 3.58.2 ขึ้นระบบ 1 เมษายน 2552 เภสัชกรนาจ เข็มแข็ง   อาจารย์ ที่ปรึกษา
คลิกที่นี่ เพื่อไปที่ สิ่งที่คุณต้องการ
คลิกที่นี่ เพื่อไปที่ ทดสอบความเร็ว

ออฟไลน์ เกื้อกูล ครับ..

  • Hero Member
  • *****
  • กระทู้: 12,611
  • Respect: +169
    • ดูรายละเอียด
    • โรงพยาบาลปากท่อ
Re: รบกวนด้วยครับ
« ตอบกลับ #1 เมื่อ: พฤศจิกายน 13, 2009, 08:19:47 AM »
0
1.  ตาราง  person_screen_type
2.  ตาราง  person_screen
Implement  HOSxP  Start 2548 ---> NOW!
Station : 140 Client   V.3 Version  3.67.7.8
Server  : CENTOS 7 +MySQL maria 10.x.x

ออฟไลน์ kookkaija

  • Hero Member
  • *****
  • กระทู้: 969
  • kookkaija
  • Respect: +1
    • ดูรายละเอียด
    • โรงพยาบาลดอนตูม
Re: รบกวนด้วยครับ
« ตอบกลับ #2 เมื่อ: พฤศจิกายน 13, 2009, 11:24:16 AM »
0
-ขอบคุณท่าน kuakool... มากครับ แต่ว่าเพิ่มไปแล้วยังไม่เห็นมีครับ ต้องไปเพิ่มรายการที่ไหนอีกหรอเปล่าครับ
มีอีกเรื่องครับที่จะรบกวน
ตามภาพครับ
สุทธิ พรึงลำภู ชื่อเล่น ไก่
โรงพยาบาลดอนตูม อ.ดอนตูม จ.นครปฐม 73150
HOSxP V. 3.58.2 ขึ้นระบบ 1 เมษายน 2552 เภสัชกรนาจ เข็มแข็ง   อาจารย์ ที่ปรึกษา
คลิกที่นี่ เพื่อไปที่ สิ่งที่คุณต้องการ
คลิกที่นี่ เพื่อไปที่ ทดสอบความเร็ว

ออฟไลน์ naj

  • Hero Member
  • *****
  • กระทู้: 2,449
  • Respect: +10
    • ดูรายละเอียด
    • http://www.luangphopern-hospital.com
Re: รบกวนด้วยครับ
« ตอบกลับ #3 เมื่อ: พฤศจิกายน 13, 2009, 11:41:37 AM »
0

ลองใช้คำสั่งนี้ตรวจสอบ
select hospmain  from ipt_pttype where an=520002428
ว่า รพ หลักเป็นรหัสอะไรครับ
และข้อควรระวัง
ผม fix code บางส่วนไว้ ของสิทธิการรักษาบางสิทธิไว้ครับ
โค๊ด: Delphi
  1.  sdm1 := getsqlstringdata('select b.hospmain from an_stat a, vn_stat b  where a.an="'+DBPipeline['name2'] +'" '+
  2.             'and a.vn=b.vn and a.pttype not in("10","34","20","21","22")  ');
  3.  
  4.   sdm2 := getsqlstringdata('select chwpart from hospcode where hospcode="'+sdm1+'"');  
  5.   value:= GetSQLStringData('select concat("Êӹѡ§Ò¹ÊÒ¸ÒóÊØ¢¨Ñ§ËÇÑ´  ",name) as dd from thaiaddress where chwpart="'+sdm2+'" and codetype="1"');
  6.  
  7.  
  8.  
เนื่องจากบางสิทธิของ รพ ผมไม่ต้องแสดง ชื่อ หน่วยงาน สสจ
« แก้ไขครั้งสุดท้าย: พฤศจิกายน 13, 2009, 11:55:19 AM โดย naj »
Yindee And Tan