Event "bei Berechnung Jahresurlaubsanspruch (Monatskonto)"

Der Aufruf erfolgt bei der Berechnung des Jahresurlaubsanspruchs wenn das Monatskonto aufgebaut wird (manuell und automatisch).

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

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

//################################################################################
// oDab262                         : positionierte Dab262 (BDE Personen) - NICHT ÄNDERN ODER NAVIGIEREN!
// nJahresUrlaubAnspruch           : Jahres Urlaubsanspruch
// nRestUrlaubVorjahr              : Resturlaub Vorjahr
// nBerechneterUrlaubAnspruch      : berechneter Urlaubsanspruch (ungerundet)
// nBerechnungsJahr                : In welchem Jahr die Berechnung sich befindet (nur zur Info)
//
// 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) + crlf +
          'Berechnungs Jahr: ' + Str(nBerechnungsJahr),

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