Event "bei Berechnung Jahresurlaubsanspruch (Monatskonto) bei unterjährigem Eintritt"

Der Aufruf erfolgt vor bei der Berechnung des Jahresurlaubsanspruchs wenn das Monatskonto aufgebaut wird (manuell und automatisch), falls das Eintrittsdatum unterjährig ist (<> 1. Januar).

Wichtig: Die Rückgabe wird immer auf 1/4 Tage (kaufmännisch) gerundet, wird eine abweichende Rundung auf 1/2 oder ganze Tage gewünscht muss die Rückgabe im Codeblock gerundet werden.

Beispiel

CODE

| nEvtNo:P1, oDab262:P2, nJahresUrlaubAnspruch:P3, nRestUrlaubVorjahr:P4,
nBerechneterUrlaubAnspruch:P5, cDebug |

//################################################################################
// oDab262                         : positionierte Dab262 (BDE Personen) - NICHT ÄNDERN ODER NAVIGIEREN!
// nJahresUrlaubAnspruch           : Jahres Urlaubsanspruch
// nRestUrlaubVorjahr              : Resturlaub Vorjahr
// nBerechneterUrlaubAnspruch      : berechneter Urlaubsanspruch (ungerundet)
//
// Rückgabe                        : berechneter Urlaubsanspruch (ungerundet)
//                                   die Rückgabe wird im Anschluss auf 1/4 Tage
//                                   gerundet. Ist eine Rundung auf 1/2 oder 1/1 Tage
//                                   gewünscht muss im Codeblock gerundet werden
//################################################################################

cDebug := 'Person: ' + Str(oDab262:PERSNR) + ' - ' + oDab262:NAME + crlf +
          'Jahres Urlaub Anspruch: ' + Str(nJahresUrlaubAnspruch) + crlf +
          'Resturlaub Vorjahr: ' + Str(nRestUrlaubVorjahr) + crlf +
          'Berechneter Urlaub Anspruch: ' + Str(nBerechneterUrlaubAnspruch),

Meld(cDebug),
// Auf ganze Tage aufrunden
RoundDiv(nBerechneterUrlaubAnspruch, 2, Trunc(1 / 1), 1)