Re: [Allegro] win-alf: rückgabe mit verpäteten medien, die verlängert werden sollen

[Klaus Lehmann]

On Tue, 03 Nov 2009 10:38:48 +0100 Bernhard Eversberg wrote:

<>h. eversberg:
<>Eine schnelle Lösung kann ich daher für diesen Fall nicht
<>anbieten. Sie könnten sich nur orientieren an der Methodik, die
<>in a-chkin.flx vorgezeichnet ist:

ok. können sie denn eine "langsame" lösung einbauen? 
ein bisschen geduld hätte ich schon, wenn ich so vermessen sein
darf....
das manko ist derzeit mit der "notlösung" so, daß wir jetzt zum glück
einen hinweis bekommen, daß da was gefährlich weit zurückliegt, aber
wenn eben verlängert wird, sind die aufgelaufenen gebühren für die
staatskasse futsch.

danke und gruß k.lehmann





<>Klaus Lehmann schrieb:
<>> ich denke, hier fehlt was!
<>> er müsste in #9DI nachschauen, was im subfield R steht. (z.b. :
<>> R20091207
<>> er müsste das aktuelle tagesdatum nehmen, davon die schliesstage
usw
<>> abziehen, 
<>Wie soll das gehen? Welche Schließtage wie von dem Datum "abziehen"?


<>Die Berechnung der Tage ist etwas problematisch, weil die Funktion
<>Wday nicht ermöglich, zwei Datumsangaben zu nehmen und die Differenz
<>in Arbeitstagen daraus zu errechnen.
<>Nehmen wir  20091103 und 20091005, dann liefert
<>
<>var "20091103-20091005"
<>Day
<>
<>die Zahl der Tage, aber mit Wday kriegt man nicht die Zahl der
<>Arbeitstage. Wday kennt nur Argumente +n und -n, nicht zwei
<>Datumsangaben mit Subtraktion.

<>Eine schnelle Lösung kann ich daher für diesen Fall nicht
<>anbieten. Sie könnten sich nur orientieren an der Methodik, die
<>in a-chkin.flx vorgezeichnet ist:


<>
<>   Frist abgelaufen? Dann $r > $R in #9DI ($r = Rckgabetag = heute)
<>var #9DI$r "-" #9DI$R
<>Days
<>if <1 jump belast    // ok, kein Verzug
<>   Verzug, aber wieviele Oeffnungstage?
<>z=1
<>
<>:vlo
<>var z
<>if >100 jump long
<>  var #dts(0,8) "-" z
<>var "-" z
<>WDay
<>ins #uaV
<>var #uaV "-" #9DI$R
<>Day
<>if >0 z+1;jump vlo
<>
<>Denn da wird mit z=1 begonnen und dann mit
<>var "-" z
<>Wday
<>diese Zahl vom aktuellen Tag subtrahiert, der dann
<>sich ergebende Arbeitstag(!) verglichen mit dem vorge-
<>sehenen Rückgabetag in #9DI$R, und wenn beide gleich
<>sind (Differenz 0), dann hat man mit z die Zahl der Arbeitstage.
<>
<>B.E.
<>
<>
<>_______________________________________________
<>Allegro mailing list
<>Allegro at biblio.tu-bs.de
<>http://sun250.biblio.etc.tu-bs.de/mailman/listinfo/allegro
<>
<>
<>