On Mon, 2002-09-30 at 17:18, Felix Geerinckx wrote:
> on Mon, 30 Sep 2002 21:12:56 GMT, Charlie Farinella wrote:
>
> > I have an error popping up in an application that runs monthly reports
> > and everymonth seems to leave off the last day's entries.
> >
> > The subroutine that determines the last day of the month is here:
> >
> > sub GetLastDayOfMonth {
> > my( $sec, $min, $hours, $mday, $mon, $year ) = localtime( $_[0] );
> >
> > return timelocal( 59, 59, 23, $monthDays[$mon], $mon, $year );
> > }
> >
>
> Please tell us:
I don't know if this is helpful. Let me know.
> a) how this function is called, and
if( $hashref->{'period'} eq '1' ) {
$starttime = GetFirstDayOfMonth( $curtime );
$endtime = GetLastDayOfMonth( $curtime );
> b) what's in the @monthDays array (and where it is defined).
our @monthDays= qw( 31 28 31 30 31 30 31 31 30 31 30 31 );
Thanks.
--
------------------------------------------------------------------------
Charlie Farinella, Appropriate Solutions, Inc.
[EMAIL PROTECTED]
603-924-6079
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]