Dalam sebuah SP saya perlu men-fix-kan waktu sehingga hanya sampai bilangan MENIT saja.
Misal : NOW = '11/02/2003 13:01:55'
Saya ingin men-fix-kannya menjadi = '11/02/2003 13:01:00' (55 detik dihapus).
Saya udah coba:
1. Pakai UDF (saya lupa dapet darimana..Free), dan saya tambahkan fungsi sbb:
function udf_FixedDateTime(var T:TIBTimeStamp):TIBTimeStamp;
var Year,Month,Day,Hour,Min,Sec :smallint;
begin
IBDecodeDate(T.Date,Year,Month,Day);
IBDecodeTime(T.Time,Hour,Min,Sec);
Sec:=0;
udf_EncodeTimeStamp(T,Year,Month,Day,Hour,Min,Sec);
Result:=T;
end;
2. Pakai FreeUDFLib nya Gregory Deatz, saya tambahkan fungsi sbb:
function FixedDateTime(ib_date:PISC_QUAD):PISC_QUAD;
var tm_date:tm;
begin
isc_decode_date(ib_date,@tm_date);
tm_date.tm_sec:=0;
isc_encode_date(@tm_date,ib_date);
FixedDateTime:=ib_date;
end;
Yang saya tanyakan :
1. Benarkah logika berfikir spt diatas ? (Second dibuat = 0, lalu di-encode lagi)
2. Keduanya memberikan hasil yg SAMA dan SALAH.
APAPUN date yg dikirimkan melalui parameternya, hasilnya adalah : 11/22/29
12:15:00 AM
Salahnya dimana ya... ?
3. Adakah UDF Free yg bisa untuk keperluan saya diatas ?
TIA
Salam
Ariefn
[Non-text portions of this message have been removed]
------------------------ Yahoo! Groups Sponsor ---------------------~-->
Rent DVDs Online - Over 14,500 titles.
No Late Fees & Free Shipping.
Try Netflix for FREE!
http://us.click.yahoo.com/xlw.sC/XP.FAA/3jkFAA/i7folB/TM
---------------------------------------------------------------------~->
Berlangganan: [EMAIL PROTECTED]
Stop Berlangganan: [EMAIL PROTECTED]
Keluhan Milis(Unbouncing,spam,dll): [EMAIL PROTECTED]
Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/
