i'm getting lost/confuse

[NomoreSpam4Me]

Hi, right now i have a database that calcul attendance time.

I have a qry with Date, EmployeeName, EmployeeID, PayCodeName,
TimeInSecond.

In the PayCodeName there is multiple thing, like, Regular or Overtime.
(this is how the employee is pay).

So the result of my qry may look like this:
------------------------------------------------------------------------------------------
2006-01-29, Sponge Bob, 12345, Reg, 21 600
2006-01-29, Sponge Bob, 12345, Reg, 3 600
2006-01-29, Sponge Bob, 12345, Overtime, 3 600
------------------------------------------------------------------------------------------
My table r from an application and i cannot change the display:what i
mean is that the app return me couple of line with regular, (ie: from 9
-12 then the lunch time is cut, and from 13 to 16), and if it's an
overtime day i may end up with 2 lines with regular time on it ans 2
lines with overtime.

What i wanna do is be able to calcul all the regulard time and then all
the overtime. And hae it display like that in a rpt.

EmployeeID
12345
EmployeeName
Sponge Bob
Date PaycodeName
TimeInSecond
2006-01-29 Reg
21 600
2006-01-29 Reg
1 600
2006-01-29 Overtime
1 600

Total : Reg: (21600+ 1600) displayed in hours
Overtime (1600) displayed in hours

The date part is in the detail of my report. My problem is i'm not sure
how to say to acces, Sum everything that is in Reg, and then Sum
everthing that is in Overtime.

IS there a way i can do that in VBA?? PLS help me.

[NomoreSpam4Me]

solve, i changed the form. now it's okay.

[MGFoster]

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

Not sure what you're asking, so....

In a query you can get the sums per PayCodeName like this:

SELECT Date, EmployeeName, EmployeeID, PayCodeName,
Sum(TimeInSecon d) \ 3600 As HoursWorked
FROM <query name or table name>
GROUP BY Date, EmployeeName, EmployeeID, PayCodeName

In the report you can use a running sum property of a TextBox like this:
Name the control that holds the TimeInSecond value something like
"txtSeconds ." Next to the txtSeconds control place an inVisible TextBox
with properties like this:

Control Source: =IIf(PayCodeNam e="Reg",txtSeco nds,0)\3600
Visible: False
Running Sum: Over Group
Name: txtRegularTime

Now make another TextBox with properties like this:

Control Source: =IIf(PayCodeNam e="Overtime",tx tSeconds,0)\360 0
Visible: False
Running Sum: Over Group
Name: txtOverTime

The interger division (\) by 3600 will translate the seconds into hours.

Then in the Employee's Group footer put two TextBoxes with properties
like this:

Control Source: =txtRegularTime
Visible: True
Running Sum: No
Name: txtSumRegularTi me

Control Source: =txtOverTime
Visible: True
Running Sum: No
Name: txtSumOverTime

--
MGFoster:::mgf0 0 <at> earthlink <decimal-point> net
Oakland, CA (USA)

-----BEGIN PGP SIGNATURE-----
Version: PGP for Personal Privacy 5.0
Charset: noconv

iQA/AwUBQ9frAYechKq OuFEgEQJSzwCg58 fnbnEXU0cV0mcP9 xvQjFk9+2AAoMmO
dV0t86uo5hAuBb5 Yiw6w6g4s
=Z56P
-----END PGP SIGNATURE-----

No***********@h otmail.com wrote:

Hi, right now i have a database that calcul attendance time.

I have a qry with Date, EmployeeName, EmployeeID, PayCodeName,
TimeInSecond.

In the PayCodeName there is multiple thing, like, Regular or Overtime.
(this is how the employee is pay).

So the result of my qry may look like this:
------------------------------------------------------------------------------------------
2006-01-29, Sponge Bob, 12345, Reg, 21 600
2006-01-29, Sponge Bob, 12345, Reg, 3 600
2006-01-29, Sponge Bob, 12345, Overtime, 3 600
------------------------------------------------------------------------------------------
My table r from an application and i cannot change the display:what i
mean is that the app return me couple of line with regular, (ie: from 9
-12 then the lunch time is cut, and from 13 to 16), and if it's an
overtime day i may end up with 2 lines with regular time on it ans 2
lines with overtime.

What i wanna do is be able to calcul all the regulard time and then all
the overtime. And hae it display like that in a rpt.

EmployeeID
12345
EmployeeName
Sponge Bob
Date PaycodeName
TimeInSecond
2006-01-29 Reg
21 600
2006-01-29 Reg
1 600
2006-01-29 Overtime
1 600

Total : Reg: (21600+ 1600) displayed in hours
Overtime (1600) displayed in hours

The date part is in the detail of my report. My problem is i'm not sure
how to say to acces, Sum everything that is in Reg, and then Sum
everthing that is in Overtime.

IS there a way i can do that in VBA?? PLS help me.