BMS-HOSxP Community

HOSxP => Report Exchange => ข้อความที่เริ่มโดย: yokyai ที่ มีนาคม 29, 2011, 14:04:24 PM

หัวข้อ: ถามคับ เรื่อง getuserparameter รับค่าวันที่
เริ่มหัวข้อโดย: yokyai ที่ มีนาคม 29, 2011, 14:04:24 PM
ทำยังไงให้แสดงผล ค.ศ. เป็น พ.ศ. คับ ขอบคุณคับ
หัวข้อ: Re: ถามคับ เรื่อง getuserparameter รับค่าวันที่
เริ่มหัวข้อโดย: James011 ที่ มีนาคม 29, 2011, 14:13:20 PM
 ;D ;D ;D ;D   
โค๊ด: Delphi
  1.  Value := ISO2Date(GetUserParameter(0), 'dd/mm/yyyy');    
หัวข้อ: Re: ถามคับ เรื่อง getuserparameter รับค่าวันที่
เริ่มหัวข้อโดย: yokyai ที่ มีนาคม 29, 2011, 19:51:56 PM
ยังไม่ได้คับ
หัวข้อ: Re: ถามคับ เรื่อง getuserparameter รับค่าวันที่
เริ่มหัวข้อโดย: James011 ที่ มีนาคม 29, 2011, 21:34:16 PM
 ;D ;D  Preview Report by  HOSxP  ดูได้จาก Report ตัวอย่างครับ
หัวข้อ: Re: ถามคับ เรื่อง getuserparameter รับค่าวันที่
เริ่มหัวข้อโดย: usa0823 ที่ มีนาคม 29, 2011, 22:51:19 PM
Value := ISO2Date(GetUserParameter(0), 'd mmmm eeee');
แต่รู้สึกว่าจะมีปัญหากับ windows 7
อาจารย์ก็เลยเพิ่มฟังชั่นมาแก้ปัญหา
รู้สึกว่า thaidateformat ประมาณนี้ครับ 
หัวข้อ: Re: ถามคับ เรื่อง getuserparameter รับค่าวันที่
เริ่มหัวข้อโดย: James011 ที่ มีนาคม 30, 2011, 10:42:55 AM
 ;D ;D ;D ;Dผมใช้อยู่ครับ ใน Windows 7 ที่เคยทดสอบครับ อธิบายยาวๆๆ 555

  1. ถ้าใช้    GetDateRangeDialog(date1, date2);  ใช้สามารถ   FormatThaiDate(fFormat, fDate);  ได้ครับ
 
  2. แต่ถ้าใช้ GetUserParameter(i)  จะใช้  FormatThaiDate(fFormat, fDate) แล้ว Error ครับ
     
      - เลยเปลี่ยนมาใช้   ISO2Date(d, f); แทน   
      - แต่ ISO2Date(d, f) จะติดปัญหาตอน Preview ใน Report Designer จะได้ ค.ศ. เหมือนเดิม ถึงใช้ eeee แล้วก็ตาม  แต่ก็จะไม่มีปัญหาเวลาเปิดใน HOSxP เพราะจะได้ พ.ศ. ตามที่กำหนด ตามที่ผมแสดงตัวอย่างไว้ข้างบน   

     สรุปคือ GetUserParameter(i) ใช้กับ  ISO2Date(d, f);   ใช้ใน HOSxP  In  Windows 7   ได้ครับ
หัวข้อ: Re: ถามคับ เรื่อง getuserparameter รับค่าวันที่
เริ่มหัวข้อโดย: James011 ที่ มีนาคม 30, 2011, 10:44:47 AM
;D ;D ;D ;Dผมใช้อยู่ครับ ใน Windows 7 ที่เคยทดสอบครับ อธิบายยาวๆๆ 555

  1. ถ้าใช้    GetDateRangeDialog(date1, date2);  ใช้สามารถ   FormatThaiDate(fFormat, fDate);  ได้ครับ
 
  2. แต่ถ้าใช้ GetUserParameter(i)  จะใช้  FormatThaiDate(fFormat, fDate) แล้ว Error ครับ
     
      - เลยเปลี่ยนมาใช้   ISO2Date(d, f); แทน   
      - แต่ ISO2Date(d, f) จะติดปัญหาตอน Preview ใน Report Designer จะได้ ค.ศ. เหมือนเดิม ถึงใช้ eeee แล้วก็ตาม  แต่ก็จะไม่มีปัญหาเวลาเปิดใน HOSxP เพราะจะได้ พ.ศ. ตามที่กำหนด ตามที่ผมแสดงตัวอย่างไว้ข้างบน   

     สรุปคือ GetUserParameter(i) ใช้กับ  ISO2Date(d, f);   ใช้ใน HOSxP  In  Windows 7   ได้ครับ
หัวข้อ: Re: ถามคับ เรื่อง getuserparameter รับค่าวันที่
เริ่มหัวข้อโดย: udomchok ที่ มีนาคม 30, 2011, 12:41:27 PM
;D ;D  Preview Report by  HOSxP  ดูได้จาก Report ตัวอย่างครับ
;D ;D ;D ;Dผมใช้อยู่ครับ ใน Windows 7 ที่เคยทดสอบครับ อธิบายยาวๆๆ 555

  1. ถ้าใช้    GetDateRangeDialog(date1, date2);  ใช้สามารถ   FormatThaiDate(fFormat, fDate);  ได้ครับ
 
  2. แต่ถ้าใช้ GetUserParameter(i)  จะใช้  FormatThaiDate(fFormat, fDate) แล้ว Error ครับ
    
      - เลยเปลี่ยนมาใช้   ISO2Date(d, f); แทน  
      - แต่ ISO2Date(d, f) จะติดปัญหาตอน Preview ใน Report Designer จะได้ ค.ศ. เหมือนเดิม ถึงใช้ eeee แล้วก็ตาม  แต่ก็จะไม่มีปัญหาเวลาเปิดใน HOSxP เพราะจะได้ พ.ศ. ตามที่กำหนด ตามที่ผมแสดงตัวอย่างไว้ข้างบน  

     สรุปคือ GetUserParameter(i) ใช้กับ  ISO2Date(d, f);   ใช้ใน HOSxP  In  Windows 7   ได้ครับ

ตามนี้แหละครับ
หัวข้อ: Re: ถามคับ เรื่อง getuserparameter รับค่าวันที่
เริ่มหัวข้อโดย: yokyai ที่ มีนาคม 31, 2011, 09:56:47 AM
ขอบคุณทุกท่านคับ ;D
หัวข้อ: Re: ถามคับ เรื่อง getuserparameter รับค่าวันที่
เริ่มหัวข้อโดย: pitaya ที่ เมษายน 06, 2011, 16:14:08 PM
อ.เจมส์ตอบเคลียร์ดีมากเลยครับ มือใหม่อ่านแล้วหายสงสัย ขอบคุณมากครับ
หัวข้อ: Re: ถามคับ เรื่อง getuserparameter รับค่าวันที่
เริ่มหัวข้อโดย: wiphusit ที่ เมษายน 07, 2011, 09:07:12 AM
Value :=GetSQLDateData('select firstday from patient where hn="'+DBPipeline['HN']+'" ');
แล้วถ้าแบบนี้กำหนดยังไงครับ
หัวข้อ: Re: ถามคับ เรื่อง getuserparameter รับค่าวันที่
เริ่มหัวข้อโดย: James011 ที่ เมษายน 07, 2011, 09:59:34 AM
Value :=GetSQLDateData('select firstday from patient where hn="'+DBPipeline['HN']+'" ');
แล้วถ้าแบบนี้กำหนดยังไงครับ

  ;D ;D ;D ;D  
โค๊ด: Delphi
  1.   Value:=FormatThaiDate('dd/mm/yyyy', GetSQLDateData('select firstday from patient where hn="'+DBPipeline['HN']+'" ')) ;
  2.    
หัวข้อ: Re: ถามคับ เรื่อง getuserparameter รับค่าวันที่
เริ่มหัวข้อโดย: armds ที่ เมษายน 07, 2011, 10:22:48 AM
เอาแบบ  Preview  ด้วยก็ต้องแบบนี้ครับ

โค๊ด: [Select]
Value := ISO2Date(GetUserParameter(0),'dd mmmm ')+
  inttostr(strtoint(ISO2Date(GetUserParameter(0),'yyyy'))+543);
หัวข้อ: Re: ถามคับ เรื่อง getuserparameter รับค่าวันที่
เริ่มหัวข้อโดย: wiphusit ที่ เมษายน 07, 2011, 11:09:19 AM
Value :=GetSQLDateData('select firstday from patient where hn="'+DBPipeline['HN']+'" ');
แล้วถ้าแบบนี้กำหนดยังไงครับ

  ;D ;D ;D ;D  
โค๊ด: Delphi
  1.   Value:=FormatThaiDate('dd/mm/yyyy', GetSQLDateData('select firstday from patient where hn="'+DBPipeline['HN']+'" ')) ;
  2.    
ขอบคุณครัย
หัวข้อ: Re: ถามคับ เรื่อง getuserparameter รับค่าวันที่
เริ่มหัวข้อโดย: udomchok ที่ เมษายน 08, 2011, 09:32:54 AM
ขอบคุณครัย
แล้ว วิภู จะขอบคุณใครล่ะครับ  ;D ;D ;D ;D