แสดงกระทู้

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.


Messages - SrWooD

หน้า: [1] 2 3 ... 21
1
Development / Re: การพัฒนาระบบ HOSxP Addon Package ใน HOSxP XE 4.0
« เมื่อ: พฤษภาคม 31, 2013, 13:59:00 PM »
 ;D ;D ;D

4
แล้วเจอกันครับ

 ;D ;D ;D

6
Delphi / Pascal / Re: Delphi : Edit
« เมื่อ: พฤศจิกายน 07, 2011, 16:23:17 PM »
ประกาศตัวแปรใน PersonnelAddForm

แถวๆ   
  public
    { Public declarations }
    AddrID:integer;
  end;

ลองดูครับ

 ;D ;D ;D

7
คลอดแล้วหรือครับ

ขอให้เข็มแข็งกันทั้งครอบครัวนะครับ

 ;D ;D ;D

8
Delphi / Pascal / Re: Windows 7 64bit Delphi Debugger Fix / Workaround
« เมื่อ: กุมภาพันธ์ 23, 2011, 08:04:46 AM »
 ;D ;D ;D

9
Delphi / Pascal / Re: Delphi For android
« เมื่อ: มกราคม 25, 2011, 16:32:10 PM »
 ;D ;D ;D

10
eye_screen_group ลองตามรูปดูนะครับ

ส่วน name ก็ตามต้องการครับ

ลองดูครับ

 ;D ;D ;D

11
eye_screen_list ครับ

 ;D ;D ;D

12
เพิ่มเติม พี่เกื้อครับ

ลองดูที่ setvice_time -> rx_tyme_type อีกที่ครับ

 ;D ;D ;D

13
Delphi / Pascal / Re: ฝาก script ให้ golf_win ครับ
« เมื่อ: มกราคม 17, 2011, 16:22:09 PM »
ได้ผลอย่างไร แจ้งให้ทราบด้วยครับ จะได้นำไปใช้บ้าง

 ;D ;D ;D

15
Report Exchange / Re: ถาม : การเขียน Script ควบคุมใน UE
« เมื่อ: มกราคม 14, 2011, 13:55:48 PM »
ลองทดสอบใช้ DBGrid กำหนด DBGrid Property เรียบร้อยแล้ว

ใช้ script ผ่าน OnClick ของ Button ตามรูปครับ

พอ Test กด Button แล้ว error ครับ

อ.MN พอจะมีคู่มือให้ศึกษาไหมครับ

 ;D ;D ;D

18
ยินดีต้อนรับ / Re: ให้กำลังใจน้า PeeNan
« เมื่อ: มกราคม 06, 2011, 11:47:45 AM »
ขอให้หายป่วยเร็วๆ ครับ

 ;D ;D ;D

22
 ;D ;D ;D

23
นอกเรื่อง / Re: อาลัยกับการจากไปของ Admin HOSxP
« เมื่อ: พฤศจิกายน 05, 2010, 08:56:26 AM »
ยังตกใจไม่หายเลยครับ หลังจากที่พี่พยาบาลเดินมาแจ้งข่าวการเสียชีวิตของท่าน james รพ.แสวงหา

หลังจากล่าสุดได้มีโอกาสอาศัยรถราชการของ รพ.แสวงหา

ไปอบรมเรื่อง 18 แฟ้มที่โรงแรมริชมอนด์เมื่อ 27 ต.ค. 53

ยังเห็นนั่งคุยกับท่านเอก องครักษ์อยู่หลังห้องประชุมเลย (ไม่รู้ว่าท่านเอก องครักษ์ยังจำได้หรือป่าวครับ)

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

หลายคนบอกว่าเช้าวันที่เสียชีวิตยังมาทำงานตามปกติ

ไม่บ่งบอกหรือบ่นว่ามีอาการที่จะนำไปสู่การเสียชีวิตแต่อย่างใด

เจ้าหน้าที่ทั้ง รพ. แสวงหาก็ยังตกใจเหมือนกับผมเลยครับ

เพราะท่าน james เป็นคนที่ไม่สูบบุหรี่หรือดื่มเหล้า เป็นนักกีฬาตะกร้อ ยิ้มแย้มแจ่มใสอารมณ์ดีตลอด

ผลเลือดจากการตรวจสุขภาพล่าสุดปีนี้ก็ปกติดีทุกอย่าง

แต่แล้วสายลมแห่งการพลัดพรากก็พัดพาให้ท่าน james ต้องจากครอบครัวอันแสนอบอุ่นไปอย่างสงบ

มีโอกาสได้ไปรดน้ำศพ ได้เจอกับลูกชายของท่าน james แล้วถึงกับอื้งเลยครับ

มีคนไปแกล้งถามครับว่าพ่อไปไหน

มีเสียงตอบจากเด็กน้อยมาว่า "พ่อตาย พ่อตาย"

เด็กน้อยจะเข้าใจความหมายของคำนั้นหรือไม่

 :'( :'( :'(

หลับให้สบายเถอะเพื่อนเอ๋ย

ผู้บุกเบิกระบบข้อมูลของ รพ. และอนามัย

ผู้เป็นขุนพล HOSxP ของอ่างทอง

 :'( :'( :'( :'(

24
opd_ipd_transfer

 ;D ;D ;D

25
Report Exchange / Re: ReportBuilder 12.0 Now Available!
« เมื่อ: ตุลาคม 11, 2010, 17:01:30 PM »
 ;D ;D ;D

26
นอกเรื่อง / Re: คอมพิวเตอร์แบบ All-in-one
« เมื่อ: ตุลาคม 08, 2010, 16:17:04 PM »
 ;D ;D ;D

27
ยินดีต้อนรับ / Re: มี FormatThaiDate ใน HOSxP PCUแล้ว
« เมื่อ: ตุลาคม 08, 2010, 16:13:29 PM »
;D ;D ;D

... ช่วงนี้ว่างมายิ้มได้บ้างแล้วเนอะ อ.วุฒิเรา ...  ;D  ;D  ;D ...

 ;D ;D ;D

28
ยินดีต้อนรับ / Re: มี FormatThaiDate ใน HOSxP PCUแล้ว
« เมื่อ: ตุลาคม 08, 2010, 16:07:17 PM »
 ;D ;D ;D

29
vn_stat,oppp,opitemrece,opdscreen

น่าจะเชื่อมกันด้วย vn นะครับ

ลองเปลี่ยนมาเป็น vn แล้วลองใหม่สิครับ

และน่าจะเริ่มตารางแรกด้วย opitemrece

แล้วนำตารางอื่นๆ มา join นะครับ

เดาเอาครับ ยังไม่ได้โหลดรายงานมาดูนะครับ

sql คร่าวๆ ยังไม่ได้ดูอย่างจริงจัง

ลองปรับใช้ดูครับ

โค๊ด: SQL
  1. SELECT o.hn,concat(p.pname,p.fname,"  ",p.lname) AS ptname,v.age_y,p.hometel,opd.bw,opd.height,
  2.  dt.name,o.vstdate,o.nextdate
  3.  FROM opitemrece op
  4.  LEFT OUTER JOIN vn_stat v ON op.vn=v.vn
  5.  LEFT OUTER JOIN oapp o ON op.vn=o.vn
  6.  LEFT OUTER JOIN opdscreen opd ON opd.vn=op.vn
  7.  LEFT OUTER JOIN patient p ON p.hn=op.hn
  8.  LEFT OUTER JOIN drugitems dt ON op.icode=dt.icode
  9.  WHERE o.vstdate BETWEEN "2009-09-01" AND "2009-09-30"
  10.  AND op.icode IN ("1490164","1490163","1510908","1490166","1490076","1510909",
  11.  "1460503","1490139","1470510","1510907","1460283","1460285","1430501","1490175","1490173","1500044","1500046","1500050",
  12.  "1460526","1460562","1460286","1470002","1470003","1470004","1490167")
  13.  GROUP BY op.vn
  14.  ORDER BY o.vstdate ,o.hn
  15.  

 ;D ;D ;D

30
Delphi / Pascal / Re: Compile TurboHOSxP Project ไม่ผ่านครับ
« เมื่อ: ตุลาคม 08, 2010, 08:36:33 AM »
 ;D ;D ;D

31
Delphi / Pascal / Re: Compile TurboHOSxP Project ไม่ผ่านครับ
« เมื่อ: ตุลาคม 07, 2010, 14:25:55 PM »
ทับของเก่ามันครับ folder realthinclient

แล้วค่อย compile ใหม่ครับ

 ;D ;D ;D

32
Delphi / Pascal / Re: Compile TurboHOSxP Project ไม่ผ่านครับ
« เมื่อ: ตุลาคม 07, 2010, 13:42:55 PM »
รุ่นที่ 1 เป็นเหมือนกันเลยครับ

http://hosxp.net/index.php?option=com_smf&Itemid=28&topic=15393.0

รู้วิธีแก้แล้วครับ

ทาง mail ลองดูครับ

ว่าแต่ ถ้าสำเร็จแล้วมาแบ่งกันใช้บ้างครับ

 ;D ;D ;D

33
SQL Trace ได้อันนี้มา

select * from nondrugitems  where income in (select income from income where income_group = '11')

ลองตรวจสอบ Income ดูก่อนครับ

 ;D ;D ;D

34
น่าจะยังไม่มีนะครับ ยังไม่เคยเจอครับ

ว่าแต่กำลังจะพัฒนาไปทำอะไรครับ

เสร็จแล้วอย่าลืม นำมาแบ่งกันใช้บ้างครับ

 ;D ;D ;D

35
คงต้องรอ version หลังจาก 3.53.8.26 ครับ

แล้วทดสอบใหม่ครับ

พอดีอันนี้ยังมีปัญหานิดหน่อยครับ

รอ อ.MN ปล่อยของก่อนแล้วกันครับ

 ;D ;D ;D

36
Development / Re: Hosxp 5.53.8.26 กำลังจะคลอดแล้ว!
« เมื่อ: สิงหาคม 26, 2010, 15:31:24 PM »
Hosxp 5.53.8.26 ไม่ต้องรีบครับ

ขอบคุณ อ.MN มากๆๆๆ ครับ

มีท่านใดทดสอบ ส่งออก fp แล้วเป็นอย่างไรแจ้งด้วยครับ

 ;D ;D ;D

37
นอกเรื่อง / Re: ประกาศผล Thailand ICT Awards หมวด E health Applications
« เมื่อ: สิงหาคม 24, 2010, 09:02:13 AM »
ยินดีด้วยอีกคนครับ

 ;D ;D ;D

38
หรือตรวจสอบข้อมูลที่ได้จากคำสั่งนี้ครับ (เป็นคำสั่งที่ดึงข้อมูลมาส่งออก)

select pw.*, w.export_code,
       op.icode,op.qty,di.did,ovs.seq_id, ov.hn as ovst_hn,
       a.*,p.person_id,p.cid,concat(p.pname,p.fname,'' '',p.lname) as ptname  ,p.age_y ,  h.address,h.road,v.village_moo,v.village_name,
       t.full_name as full_address_name  , m.name as marrystatus_name,w.women_birth_control_name
       from person_women_service pw
      left outer join ovst_seq ovs on ovs.vn = pw.vn
       left outer join ovst ov on ov.vn = pw.vn
       left outer join opitemrece op on op.vn = pw.vn
       left outer join drugitems di on di.icode = op.icode
       left outer join person_women a on a.person_women_id = pw.person_women_id
      left outer join person p on p.person_id = a.person_id
       left outer join house h on h.house_id = p.house_id
       left outer join village v on v.village_id = h.village_id
       left outer join thaiaddress t on t.addressid = v.address_id
       left outer join marrystatus m on m.code = p.marrystatus
      left outer join women_birth_control w on w.women_birth_control_id = a.women_birth_control_id
       where pw.service_date between '2010-07-01' and '2010-07-31'
      and pw.women_service_id = 1


จากการทดสอบมีการดึงข้อมูลเพิ่มตาม icode ของ opitemrece ครับ

ทำให้ person_women_service_id 1 เลขมีหลาย record ตาม icode ครับ

จึงเกิดมีข้อมูลซ้ำซ้อนตอนส่งออกครับ

รบกวน อ.MN ตรวจสอบให้ด้วยครับ

แล้วก็อันนี้ด้วยครับ

http://hosxp.net/index.php?option=com_smf&Itemid=28&topic=16883.msg136718#new

ขอบคุณครับ

 ;D ;D ;D

39
table opdscreen field pulse กะ hr บันทึกต่างกันอย่างไรครับ

จากการตรวจสอบ บันทึกหน้า screen ลง opdscreen -> pulse

แต่หน้า physical exam กลับนำ hr มาแสดง

;D ;D ;D

40
ใช่ version ไหนอยู่ครับ

 ;D ;D ;D

41
ยังไม่ได้ครับ

เคยแจ้ง อ.MN ไปแล้วแต่ไม่แน่ใจว่า อ.MN จำได้หรือป่าว

แก้ปัญหาเฉพาะหน้าไปก่อนโดยการ Copy DFM จาก reporttemplate มาแปะแทนไปก่อนครับ

 ;D ;D ;D

42
Delphi / Pascal / Re: ออกให้ทดสอบ DsHOSxP by armds
« เมื่อ: กรกฎาคม 15, 2010, 09:37:47 AM »
รอด้วยคน (version intraweb) ครับ  :D
เวอชัน  Intraweb   คิดว่าจะให้ชื่อ  DsIntraWeb 
ไม่นานเกินรอครับ   :) ;)


รอครับ

 ;D ;D ;D

44
เนื่องจากเนื่อหาการอบรมน่าสนใจมากประกอบกับ อ.MN สอนได้เข้าใจในเนื้อหาการอบรม

ทำให้เมื่อวานนี้ผู้เข้ารับการอบรมทุกคนทำโปรแกรมที่ อ.MN กำหนดให้ด้วยความสนุกสนานเพลิดเพลิน

เลิกกันเย็นเป็นพิเศษ อ.MN ใจดีมากครับ พาทุกคนไปรับประทานอาหารที่ภัตตาคารสุดหรู

อาหารอร่อยมากครับ สังเกตุจากหลายๆ ท่านรับประทานกันจนตัวกลมเลยครับ

ต้องขอขอบคุณ อ.MN เป็นอย่างมากครับ

(รอดไปอีกมื้อแล้วเรา) ก็หวังว่าจะได้โอกาสแบบนั้นอีกในทุกวันของการอบรมครับ

 ;D ;D ;D

45
นอกเรื่อง / Re: รพ.พระสมุทร์เจดีย์
« เมื่อ: กรกฎาคม 14, 2010, 10:47:46 AM »
 ;D ;D ;D

46
 ;D ;D ;D

47
Delphi / Pascal / Re: ออกให้ทดสอบ DsHOSxP by armds
« เมื่อ: กรกฎาคม 12, 2010, 12:09:53 PM »
ขอบคุณครับ

 ;D ;D ;D

48
Delphi / Pascal / Re: error Wsocket_rtc Complie ไม่ผ่าน
« เมื่อ: พฤษภาคม 25, 2010, 16:55:11 PM »
 ;D ;D ;D

49
นอกเรื่อง / Re: หลักสูตร Delphi Fundamental Part I รุ่นที่ 2
« เมื่อ: พฤษภาคม 18, 2010, 14:52:59 PM »
ประกาศ เลื่อนวันอบรมหลักสูตร Delphi Fundamental Part I รุ่นที่ 2   เป็นวันที่     27/09/2010  ถึงวันที่ 01/10/2010  ค่ะ

 ;D ;D ;D

50
Report Exchange / Re: ทะเบียนผู้ป่วยที่ได้รับ Rabies Vaccine
« เมื่อ: พฤษภาคม 18, 2010, 08:58:09 AM »
ทีนี้อยากจะสอบถามว่าหากต้องการแบ่งวันที่ได้รับ vaccine ออกเป็นส่วน ๆ (มี comma คั่น) จะทำอย่างไรดี ??
ใครมีความเห็นอย่างไร ช่วยหน่อยครับ รายงานจะได้สวยงามขึ้น

เท่าที่เห็นใน Report Designer มี function pos เพื่อใช้หาตำแหน่งของ string ที่ต้องการ
แต่ไม่พบ function left, right เพื่อตัดข้อความที่ต้องการ มีแต่ trimleft, trimright เพื่อตัดเอาช่องว่างออกเท่านั้น เลยไม่สามารถแยกข้อความที่ต้องการได้

อย่างนี้หรือป่าวครับ

http://hosxp.net/index.php?option=com_smf&topic=9100

 ;D ;D ;D

หน้า: [1] 2 3 ... 21