ผู้เขียน หัวข้อ: อยากทราบวิธีเอาตัวแปรประเภท date มาลบกันแล้วได้ค่าออกมาเป็นจำนวนวันที่ครับ  (อ่าน 9660 ครั้ง)

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

ออฟไลน์ perfectk

  • Newbie
  • *
  • กระทู้: 38
  • Respect: 0
    • ดูรายละเอียด
อยากทราบวิธีเอาตัวแปรประเภท date มาลบกันแล้วได้ค่าออกมาเป็นจำนวนวันที่ครับ
ไม่ทราบว่าต้องเขียนออกมาประมาณไหนครับ ขอบคุณครับ
อภิญพัฒน์ คงประยูร
รพ.เวียงป่าเป้า จ.เชียงราย

ออฟไลน์ usa0823

  • Hero Member
  • *****
  • กระทู้: 773
  • Respect: +9
    • ดูรายละเอียด
ใช้ DATEDIFF
SELECT DATEDIFF('2007-12-31','2007-12-30')
***************************************
นายศรัญญู  ชูเมือง
จพ.เภสัชกรรมชำนาญงาน
ดูแลระบบ โรงพยาบาลลานสกา
E-mail  Sarunyu0823@hotmail.com
..............................................................................
** HOSxP ver. 3.56.11.19d
** MySQL 5.6.17
** Activated 2560

ออฟไลน์ perfectk

  • Newbie
  • *
  • กระทู้: 38
  • Respect: 0
    • ดูรายละเอียด
ขอบคุณครับ
ถ้าเขียนเป็น delphi หรือ pascal มี function แบบนี้ไหมครับ
จะเอาไปใช้ใน SYS_VN_PRE_SCRIPT ครับ
อภิญพัฒน์ คงประยูร
รพ.เวียงป่าเป้า จ.เชียงราย

ออฟไลน์ usa0823

  • Hero Member
  • *****
  • กระทู้: 773
  • Respect: +9
    • ดูรายละเอียด
ประกาศตัวแปร day:integer;

day:=getsqldata('select datediff("2007-12-31","2007-12-30") as cc');

ไม่รู้ว่าได้ไหม ;D
***************************************
นายศรัญญู  ชูเมือง
จพ.เภสัชกรรมชำนาญงาน
ดูแลระบบ โรงพยาบาลลานสกา
E-mail  Sarunyu0823@hotmail.com
..............................................................................
** HOSxP ver. 3.56.11.19d
** MySQL 5.6.17
** Activated 2560

ออฟไลน์ perfectk

  • Newbie
  • *
  • กระทู้: 38
  • Respect: 0
    • ดูรายละเอียด
ถ้าอยากลบกับวันที่ปัจจุบันจะเขียน ยังไงครับ
ขอบคุณครับ
อภิญพัฒน์ คงประยูร
รพ.เวียงป่าเป้า จ.เชียงราย

ออฟไลน์ woravet

  • Sr. Member
  • ****
  • กระทู้: 409
  • Respect: +12
    • ดูรายละเอียด
รพ.บึงสามัคคี จ.กำแพงเพชร
*********************
อ.สุชัยและคณะ ขึ้นระบบ 29 ตค.49(Linux+Fedara 5)
*********************
ปัจจุบัน
HOSxP version 3.53.4.27
Server:Windows XP SP2,MySQL 5
Client ประมาณ 15 เครื่อง

ออฟไลน์ manoi

  • Hero Member
  • *****
  • กระทู้: 8,669
  • Respect: +170
    • ดูรายละเอียด
    • HOSxP Community Center
var d1,d2: TDateTime;
 i : Integer;
begin

  d1 := StrToDate('01/01/2000'); // 2000-01-01

  d2 := Date;  // today

  i := Trunc(d2 - d1) + 1  ;   // จำนวนวันที่ห่างกัน ปกติจะ + ด้วย 1 เพื่อให้ได้ค่าจำนวนที่ถูกต้อง



end;
HOSxP Project Manager / Cheif Developer / BMS MD

ออฟไลน์ perfectk

  • Newbie
  • *
  • กระทู้: 38
  • Respect: 0
    • ดูรายละเอียด
ขอบคุณค้าบ ได้แล้วค้าบ
อภิญพัฒน์ คงประยูร
รพ.เวียงป่าเป้า จ.เชียงราย