Re: [ITCENTER] hitung jam di VB

2007-11-26 Terurut Topik Luwanto at yuhana dot com
Rekan Adhe Vendy,
saya bongkar-2 file Foxpro, temukan fungsi hitung selisih berapa menit 
antara jamawlSV & jamakhSV.

** Awal skrip **
FUNC Fslsmnt && Selisih menit.
PARA jamawlSV,jamakhSV
jamN=IIF(VAL(LEFT(jamawlSV,2))<1,  24,  VAL(LEFT(jamawlSV,2)))
 jam2N=IIF(VAL(LEFT(jamakhSV,2))<1,  24,  VAL(LEFT(jamakhSV,2)))
mntN=VAL(RIGH(jamawlSV,2))
 mnt2N=VAL(RIGH(jamakhSV,2))
IF mntN>mnt2N
 mnt2N=mnt2N+60
 jam2N=IIF(jam2N-1<1,24,jam2N-1)
ENDI
RETU mnt2N-mntN+IIF(jamN<=jam2N,  (jam2N-jamN)*60,  (24-ABS(jam2N-jamN))*60)
** Akhir skrip **

Kalau ada yang tidak dipahami, silakan posting pertanyaan kembali.

Semoga membantu,
Handoko Luwanto
www.yuhana.com


- Original Message - 
From: adhe_vendy
To: ITCENTER@yahoogroups.com
Sent: Saturday, October 06, 2007 11:57 AM
Subject: [ITCENTER] hitung jam di VB

gimana cara jumlahkan jam / waktu di database misal acces ??

contoh kasus,

gw lg bikin program biling untuk biliard.

disitu ada 40 meja.

terus gw diminta membuat laporan untuk meja yang paling sering
dipakai berdasarkan lamanya pemakaian.

gw pke script Sql :
" SELECT TOP 40 tbltransaksi.Meja, Sum(tbltransaksi.total) AS
totaljam, Sum(tbltransaksi.jumlah) AS Jumlah From tbltransaksi WHERE
transaksi.Meja <> '0' "

ket:
gw pnya tbel namanya tbltransaksi
fieldnya :
meja, >> nomor meja
total >> lamanya pemakaian format(hh:mm:ss)
Jumlah>> jumlah biaya pemakaina format ("###,###,###")

udah gw coba pake script diatas, ternyata jumlah jamnya ngaco...
yang ter jumlah cuma jamnya aja, menitnya ga kejumlah

ada yang tau caranya
Help me

Thanx bwt yang bantu...




-- 
www.itcenter.or.id - Komunitas Teknologi Informasi Indonesia 
Gabung, Keluar, Mode Kirim : [EMAIL PROTECTED] 

 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/ITCENTER/

<*> Your email settings:
Individual Email | Traditional

<*> To change settings online go to:
http://groups.yahoo.com/group/ITCENTER/join
(Yahoo! ID required)

<*> To change settings via email:
mailto:[EMAIL PROTECTED] 
mailto:[EMAIL PROTECTED]

<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]

<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
 


Re: [ITCENTER] hitung jam di VB

2007-10-07 Terurut Topik SYARIFL
Access Nyimpen DateTime itu dalam hitungan per 24 jam, jadi kalo datanya
yang dimasukkan misal 2 jam, maka yang tercatat dalam database adalah 2/24 =
0.08333

Saran daku sih mendingan dikau buat fieldnya dengan mencatat StartTime dan
StopTime. Misal sebuah meja mulai bermain billyard pada 10-Okt-2007 18:10:00
dan selesai pada 11-Okt-2007 01:05:00 jika dikurangkan pada Access akan
menghasilkan: 0.70486109494 hari kira-kira =

0.70486109494 * 24 = 16.9127856 jam atau
16.9127856 * 60 = 1014.767136 menit

On 10/6/07, adhe_vendy <[EMAIL PROTECTED]> wrote:
>
>
> gimana cara jumlahkan jam / waktu di database misal acces ??
>
> contoh kasus,
>
> gw lg bikin program biling untuk biliard.
>
> disitu ada 40 meja.
>
> terus gw diminta membuat laporan untuk meja yang paling sering
> dipakai berdasarkan lamanya pemakaian.
>
> gw pke script Sql :
> " SELECT TOP 40 tbltransaksi.Meja, Sum(tbltransaksi.total) AS
> totaljam, Sum(tbltransaksi.jumlah) AS Jumlah From tbltransaksi WHERE
> transaksi.Meja <> '0' "
>
> ket:
> gw pnya tbel namanya tbltransaksi
> fieldnya :
> meja, >> nomor meja
> total >> lamanya pemakaian format(hh:mm:ss)
> Jumlah>> jumlah biaya pemakaina format ("###,###,###")
>
> udah gw coba pake script diatas, ternyata jumlah jamnya ngaco...
> yang ter jumlah cuma jamnya aja, menitnya ga kejumlah
>
> ada yang tau caranya
> Help me
>
> Thanx bwt yang bantu...


...del...

-- 
// syarifl.com


[Non-text portions of this message have been removed]



-- 
www.itcenter.or.id - Komunitas Teknologi Informasi Indonesia 
Gabung, Keluar, Mode Kirim : [EMAIL PROTECTED] 

 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/ITCENTER/

<*> Your email settings:
Individual Email | Traditional

<*> To change settings online go to:
http://groups.yahoo.com/group/ITCENTER/join
(Yahoo! ID required)

<*> To change settings via email:
mailto:[EMAIL PROTECTED] 
mailto:[EMAIL PROTECTED]

<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]

<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
 


Re: [ITCENTER] hitung jam di VB

2007-10-06 Terurut Topik Muhamad Fitra Syawal
ya iyalah bro jam itu ga bisa langsung di sum begitu aja, ya nanti jadinya
ya ngaco,

nieh bro semoga membantu
" SELECT TOP 40 tbltransaksi.Meja, Sum(hour(tbltransaksi.total)) as hour,
Sum(minute(tbltransaksi.total)) as minute, Sum(tbltransaksi.jumlah) AS
Jumlah From tbltransaksi WHERE
transaksi.Meja <> '0' "




On 10/6/07, adhe_vendy <[EMAIL PROTECTED]> wrote:
>
>
> gimana cara jumlahkan jam / waktu di database misal acces ??
>
> contoh kasus,
>
> gw lg bikin program biling untuk biliard.
>
> disitu ada 40 meja.
>
> terus gw diminta membuat laporan untuk meja yang paling sering
> dipakai berdasarkan lamanya pemakaian.
>
> gw pke script Sql :
> " SELECT TOP 40 tbltransaksi.Meja, Sum(tbltransaksi.total) AS
> totaljam, Sum(tbltransaksi.jumlah) AS Jumlah From tbltransaksi WHERE
> transaksi.Meja <> '0' "
>
> ket:
> gw pnya tbel namanya tbltransaksi
> fieldnya :
> meja, >> nomor meja
> total >> lamanya pemakaian format(hh:mm:ss)
> Jumlah>> jumlah biaya pemakaina format ("###,###,###")
>
> udah gw coba pake script diatas, ternyata jumlah jamnya ngaco...
> yang ter jumlah cuma jamnya aja, menitnya ga kejumlah
>
> ada yang tau caranya
> Help me
>
> Thanx bwt yang bantu...
>
>  
>



-- 
--~--~-~--~~~---~--~~
LAB UNDERGRON...!!!
we here because we want to...!!
-~--~~~~--~~--~--~---


[Non-text portions of this message have been removed]



-- 
www.itcenter.or.id - Komunitas Teknologi Informasi Indonesia 
Gabung, Keluar, Mode Kirim : [EMAIL PROTECTED] 

 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/ITCENTER/

<*> Your email settings:
Individual Email | Traditional

<*> To change settings online go to:
http://groups.yahoo.com/group/ITCENTER/join
(Yahoo! ID required)

<*> To change settings via email:
mailto:[EMAIL PROTECTED] 
mailto:[EMAIL PROTECTED]

<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]

<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
 


[ITCENTER] hitung jam di VB

2007-10-05 Terurut Topik adhe_vendy

gimana cara jumlahkan jam / waktu di database misal acces ??

contoh kasus,

gw lg bikin program biling untuk biliard.

disitu ada 40 meja.

terus gw diminta membuat laporan untuk meja yang paling sering 
dipakai berdasarkan lamanya pemakaian.

gw pke script Sql :
 " SELECT TOP 40 tbltransaksi.Meja, Sum(tbltransaksi.total) AS 
totaljam, Sum(tbltransaksi.jumlah) AS Jumlah From tbltransaksi WHERE 
transaksi.Meja <> '0' "

ket:
gw pnya tbel namanya tbltransaksi
fieldnya :
meja, >> nomor meja
total >> lamanya pemakaian format(hh:mm:ss)
Jumlah>> jumlah biaya pemakaina format ("###,###,###")

udah gw coba pake script diatas, ternyata jumlah jamnya ngaco...
yang ter jumlah cuma jamnya aja, menitnya ga kejumlah

ada yang tau caranya
Help me

Thanx bwt yang bantu...



-- 
www.itcenter.or.id - Komunitas Teknologi Informasi Indonesia 
Gabung, Keluar, Mode Kirim : [EMAIL PROTECTED] 

 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/ITCENTER/

<*> Your email settings:
Individual Email | Traditional

<*> To change settings online go to:
http://groups.yahoo.com/group/ITCENTER/join
(Yahoo! ID required)

<*> To change settings via email:
mailto:[EMAIL PROTECTED] 
mailto:[EMAIL PROTECTED]

<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]

<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/