Code: Alles auswählen.
*&---------------------------------------------------------------------*
*& Report ZTEST5
*&---------------------------------------------------------------------*
REPORT ZTEST5.
TYPES:
BEGIN OF TS_ZEITDATENMODELLE,
PERNR TYPE PERSNO,
SCHKZ LIKE PA0007-SCHKZ, " Abwesenheitskontingentart
BEGDA LIKE PA0007-BEGDA,
ENDDA LIKE PA0007-ENDDA,
END OF TS_ZEITDATENMODELLE,
TT_ZEITDATENMODELLE TYPE TABLE OF TS_ZEITDATENMODELLE.
TYPES:
BEGIN OF TS_ZEITDATENMODELLE_CHANGED.
INCLUDE TYPE TS_ZEITDATENMODELLE.
TYPES: STATUS TYPE C, " I wie Insert oder D wie Delete; U wie Update kommt bei diesen Abwesenheiten nicht vor
END OF TS_ZEITDATENMODELLE_CHANGED,
TT_ZEITDATENMODELLE_CHANGED TYPE TABLE OF TS_ZEITDATENMODELLE_CHANGED.
*&---------------------------------------------------------------------*
*& Form GET_ALL_ZEITDATENMODELLE
*&---------------------------------------------------------------------*
* Alle Abwesenheiten übertragen, egal, ob diese schon früher übertragen worden sind
FORM GET_ALL_ZEITDATENMODELLE
USING CT_ZEITDATENMODELLE TYPE TT_ZEITDATENMODELLE
CHANGING CT_ZEITDATENMODELLE_CHANGED TYPE TT_ZEITDATENMODELLE_CHANGED.
CT_ZEITDATENMODELLE_CHANGED = VALUE #( STATUS = 'I' ( LINES OF CORRESPONDING TT_ZEITDATENMODELLE_CHANGED( CT_ZEITDATENMODELLE ) ) ).
ENDFORM. " GET_ALL_ZEITDATENMODELLE
Folgende Benutzer bedankten sich beim Autor black_adept für den Beitrag:
DeathAndPain
Code: Alles auswählen.
VALUE #( STATUS = 'I' ( PERNR = '123456' ) ( PERNR = '987654' ) )
Code: Alles auswählen.
targettab = CORRESPONDING #( sourcetab ).
MODIFY targettab FROM VALUE type_targettab ( status = 'I' ) TRANSPORTING status WHERE status <> 'I'.
Folgende Benutzer bedankten sich beim Autor black_adept für den Beitrag (Insgesamt 2):
DeathAndPain • qyurryus