BMS-HOSxP Community

HOSxP => แจ้งปัญหา / ขอความช่วยเหลือ => ข้อความที่เริ่มโดย: vinaisena ที่ มีนาคม 15, 2011, 13:19:20 PM

หัวข้อ: ขอความช่วยเหลือ
เริ่มหัวข้อโดย: vinaisena ที่ มีนาคม 15, 2011, 13:19:20 PM
พอดี Team audit ของ รพ.ไปทำการ Audit OPD card ที่ สปสช.จัดขึ้น มีงานให้เวชระเบียนปรับปรุงเรื่อง OPD card ว่า น่าจะมีชื่อ user ที่ login ปรากฏบน OPD card หลังเจ้าหน้าที่ห้องบัตร สั่งพิมพ์ เลยรบกวน อาจารย์ board hosxp ช่วยเหลือแก้ไขด้วยครับ
ขอบพระคุณล่วงหน้าครับ
หัวข้อ: Re: ขอความช่วยเหลือ
เริ่มหัวข้อโดย: udomchok ที่ มีนาคม 15, 2011, 13:43:38 PM
สร้าง Label ขึ้นมา 1 ตัส สมมุติตั้งชื่อว่า lblPrintFromComp วางในตำแหน่งที่ต้องการ แล้วไปที่ tab calc เลือก event เลือก lblPrintFromComp
แล้ว copy code นี้ไปใส่นะครับ

  Text := '¾ÔÁ¾ì¨Ò¡à¤Ã×èÍ '+GetSQLStringData('select concat(servername," ...login by ",kskloginname) from onlineuser where onlineid ="'+GetOnlineID+'"');

อันนี้คำแปลครับ
  Text := 'พิมพ์จากเครื่อง '+GetSQLStringData('select concat(servername," ...login by ",kskloginname) from onlineuser where onlineid ="'+GetOnlineID+'"');

ผมสอนวิธีจับปลาให้นะครับ จะได้ยั่งยืนกว่าการหาปลามาให้ครับ  ;D ;D ;D
หัวข้อ: Re: ขอความช่วยเหลือ
เริ่มหัวข้อโดย: udomchok ที่ มีนาคม 15, 2011, 13:44:36 PM
หรือลองหา report ตัวหลัง ๆ ที่ post นะครับ ผมจะใส่ไว้ทุก report ครับ
เอาไปศึกษานะครับ
หัวข้อ: Re: ขอความช่วยเหลือ
เริ่มหัวข้อโดย: vinaisena ที่ มีนาคม 15, 2011, 13:54:39 PM
ขอบคุณครับ
สั้น ง่าย ได้ใจความ
หัวข้อ: Re: ขอความช่วยเหลือ
เริ่มหัวข้อโดย: Bond_007 ที่ มีนาคม 15, 2011, 13:56:04 PM
ขอบคุณครับ ได้เทคนิคเพิ่มอีกแล้ว ;D
หัวข้อ: Re: ขอความช่วยเหลือ
เริ่มหัวข้อโดย: vinaisena ที่ มีนาคม 15, 2011, 14:11:19 PM
ประมาณนี้ได้ไหม หลังจากเข้าไปดู
begin

   {
   Value := GetCurrentUser;
   
   or
   }
   
   Value :=  GetSQLStringData('select name from opduser where loginname = "'+GetCurrentUser+'" ');

end;
หัวข้อ: Re: ขอความช่วยเหลือ
เริ่มหัวข้อโดย: vinaisena ที่ มีนาคม 15, 2011, 14:19:55 PM
ผมหาปลาได้แล้วครับ อ.โก้
ขอบคุณครับ
หัวข้อ: Re: ขอความช่วยเหลือ
เริ่มหัวข้อโดย: udomchok ที่ มีนาคม 15, 2011, 14:39:26 PM
ผมหาปลาได้แล้วครับ อ.โก้
ขอบคุณครับ
ยินดีด้วยครับ
นี่แหละครับ จะได้เกิดความยั่งยืนในการดำรงชีวิตครับ  ;D ;D ;D ;D