Bob Gajewski
rbgajewski at adelphia.net
Mon Jul 12 14:46:35 CDT 2004
Dear Group: This is a similar issue to the recent one about summing time. I have two actual fields and one calculated field in each detail record: StartTime EndTime txtTimeDiff (calculated) On the report, I print the StartTime, EndTime, and txtTimeDiff - all using Short Time format. I group and subtotal the data at the deepest level. The detail records show the true time difference (such as 02:30 for two and one-half hours difference). PROBLEM: My subtotals and totals for the txtTimeDiff are only adding the integers (hours); not the minutes (In the above example, it is only adding two hours). All my fields are set to one decimal place. Any suggestions where I have gone awry? Below is the code and a sample output: TIA Bob Gajewski REPORT CODE ==================================================== rptMembers FullName Header IncidentClassMajorName Header IncidentClassMinorName Header Detail [PageNumber] [StartTime] [EndTime] [txtTimeDiff] txtTimeDiff: IIf([EndTime]>[StartTime],Format([EndTime]-[StartTime],"Short Time"),Format(DateAdd("d",1,[EndTime]-[StartTime]),"Short Time")) IncidentClassMinorName Footer [sttlCountIncidentID] [sttlTimeDiff] sttlCountIncidentID: Count([IncidentID]) sttlTimeDiff: Sum(Val([txtTimeDiff])) Format 0.0 IncidentClassMajorName Footer FullName Footer [ttlCountIncidentID] ttlCountIncidentID: Count([IncidentID]) ttlTimeDiff: Sum(Val([txtTimeDiff])) Format 0.0 REPORT SAMPLE OUTPUT ==================================================== Jones, John Drill Fire Drill 19:00 20:00 01:00 19:00 20:30 01:30 STTL 2 2.0 hrs 'should be 2.5 EMS Drill 23:00 02:00 03:00 19:30 21:00 01:30 10:00 15:30 05:30 STTL 3 8.0 hrs 'should be 9.0 TTL 5 10.0 hrs 'should be 11.5