PDA

View Full Version : Min in Std umrechnen



KL_RPG
14-03-08, 15:05
Hallo Forum,

wir haben ein Arbeitszeitraster in dem der Tag in Min (1440) hinterlegt ist,
hier werden dann Arbeitszeiten eingetragen, jetzt soll ich die Min.Zahl in einer Uhrzeit anzeigen
z.B.
von Min. 720 - 768 = 12:00 - 12:48 Uhr
bei der 720 passt ja noch alles (720/60 = 12)
aber
768/60 = 12,8
12*60=720
768-720 = 48
= 12:48

gibt es da in RPG was eleganteres?

danke für eure AW

BenderD
14-03-08, 15:16
na was denn nu? RPG, oder elegant?
%div und %rem heißen deine Freunde

D*B


Hallo Forum,

wir haben ein Arbeitszeitraster in dem der Tag in Min (1440) hinterlegt ist,
hier werden dann Arbeitszeiten eingetragen, jetzt soll ich die Min.Zahl in einer Uhrzeit anzeigen
z.B.
von Min. 720 - 768 = 12:00 - 12:48 Uhr
bei der 720 passt ja noch alles (720/60 = 12)
aber
768/60 = 12,8
12*60=720
768-720 = 48
= 12:48

gibt es da in RPG was eleganteres?

danke für eure AW

Pikachu
14-03-08, 15:24
Oder DIV (http://publib.boulder.ibm.com/iseries/v5r1/ic2924/books/c0925083642.htm) und MVR (http://publib.boulder.ibm.com/iseries/v5r1/ic2924/books/c0925083685.htm).

Spateneder
18-03-08, 09:43
Wenn Du Dein RPG-Programm nicht bewußt alt aussehen lassen willst, kannst Du auch ein Zeit-Feld definieren und ihm den Wert in Minuten zuweisen:
NewTime = %Minutes(Minutenangabe).
Dann ist zwar die RPG-II-Romantik futsch, über die man so schön lästern kann, aber es funktioniert auch.
Gruß
M. Spateneder

Fuerchau
18-03-08, 10:32
Wer's in RPG klassisch liebt, für den geht auch:

MOVE *LOVAL TIMFLD
ADDDUR MYMIN:*MN TIMFLD

TIMFLD muss als Zeitfeld deklariert sein.

Pikachu
18-03-08, 10:46
Und wie werden damit (klassisch oder modern) aus 768 Minuten 12 Stunden und 48 Minuten?

Fuerchau
18-03-08, 12:14
Indem die Funktion %minutes(N) einen Zeitwert errechnet und auf ein Zeitfeld addiert bzw. wie im Beispiel zuweist.

Das Gleiche gilt für ADDDUR.
Der Faktor2 wird in einen Zeitwert umgerechnet und dann addiert.

768 / 60 = 12
768 - (12 * 60) = 48