Sammle in Saldo-Tabelle des Tages #
Die Operation ADDDB kumuliert den Wert aus dem Stundenanzahl-Feld unter
der durch Parameter xxxx bestimmten Zeitart in die interne Tabelle der Tagessalden.
Syntax #
ADDDBXXXXY
ADDDB Operationsname
XXXX Angabe der Zeitart, in die der Wert kumuliert wird
- * Aktuell bearbeitete Zeitart
- XXXX wird als Name der Zeitart interpretiert
Y Steuerungskennzeichen für die Kumulation Operation ADDDB
- blank Kumulation, der Wert wird zu einem eventuell schon in der
Zeitart vorhandenen Wert addiert. - Z Initialisieren (zero), ein eventuell in der Zeitart bereits
enthaltender Wert wird überschrieben. - – Umkehrung des Vorzeichens, vor der Kumulation wird das Vorzeichen
des Stunden-anzahl-Feldes umgekehrt, d.h. der Wert des Stunden-anzahl-Feldes
wird mit -1 multipliziert. - T Sollstunden (target hours), vor der Kumulation wird das Stundenanzahl-Feld
mit den Sollarbeitsstunden laut Tagesarbeitszeitplan gefüllt. ADDDBxxxxT ist äquivalent zu HRS=S ADDDBxxxx.
Code #
*---------------------------------------------------------------------*
* FORM OPADDDB *
*---------------------------------------------------------------------*
* COLLECT in Tabelle TES *
*---------------------------------------------------------------------*
form opadddb.
case op+5(1).
when '*'.
tes-ztart = act-ztart.
when others.
tes-ztart = op+5(4).
endcase.
case op+9(1).
* WHEN 'S'.
when 'T'.
tes-anzhl = act_t550a-sollt.
perform make_time_longer using tes-anzhl. "K11K100351
collect tes.
when '-'.
tes-anzhl = 0 - act-anz.
collect tes.
when 'Z'.
read table tes with key tes-ztart.
tes-anzhl = act-anz.
if sy-subrc ne 0.
collect tes.
else.
modify tes index sy-tabix.
endif.
when others.
tes-anzhl = act-anz.
collect tes.
endcase.
endform. "of OPADDDB
