Re: Converting minutes to hours/minutes

[rob@xxxxxxxxx]

I just screwed up.  I meant if the hours exceeded a day.  Like 36 hours 
and 5 minutes.

How would one want this formatted?
36:05
or 
1-12:05

Since there's no 'zero' date, this won't format nice using my technique.

Then you start getting a huge select statement.

Select;
When %diff(timestamp2:timestamp1:*years)>0;
  // Include year
When %diff(timestamp2:timestamp1:*months)>0;
...



Rob Berendt
-- 
Group Dekko Services, LLC
Dept 01.073
PO Box 2000
Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com





RPower@xxxxxxxxxx 
Sent by: rpg400-l-bounces+rob=dekko.com@xxxxxxxxxxxx
01/31/2005 08:48 AM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
cc

Subject
Re: Converting minutes to hours/minutes






245 / 60 = 4 with Remainder of 5 mins.  Thus 4 hours and 5 minutes.  That 
exceeds an hour doesn't it?

Ron Power
Programmer
Information Services
City Of St. John's, NL
P.O. Box 908
St. John's, NL
A1C 5M2
Tel: 709-576-8132
Email: rpower@xxxxxxxxxx
Website: http://www.stjohns.ca/
___________________________________________________________________________
Success is going from failure to failure without a loss of enthusiasm. - 
Sir Winston Churchill




rob@xxxxxxxxx 
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
31/01/2005 01:33 PM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
cc

Subject
Re: Converting minutes to hours/minutes






I like my solution better.  What happens if the duration exceeds an hour? 
But, in some cases, your solution would work.
     D mytime          s               t   timfmt(*hms)
     D DspChar         s              5a
      /free
       clear mytime;
       mytime += %minutes(175);
       DspChar = %subst(%char(mytime):1:5);
       dsply mytime;
       dsply DspChar;

Rob Berendt
-- 
Group Dekko Services, LLC
Dept 01.073
PO Box 2000
Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com





Scott Klement <rpg400-l@xxxxxxxxxxxxxxxx> 
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
01/31/2005 11:50 AM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
cc

Subject
Re: Converting minutes to hours/minutes








> C     timestamp2    subdur    timestamp1    mins:*mn          5 0
>
> Now I need to convert the 'mins' to hour/minute.  I checked the RPG ILE 
> manual and only can find the *mn or *h.

Perhaps I'm not understanding the situation. Wouldn't converting it to 
hours/minutes be as simple as dividing it by 60 and taking the remainder?

-- 
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.


-- 
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.


-- 
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.