Code: Alles auswählen.
* Personenliste pro Werk
SELECT *
INTO CORRESPONDING FIELDS OF TABLE it_personal
FROM /../bde_wtoh
INNER JOIN pa0001 ON /../bde_wtoh~persa = pa0001~werks
AND /../bde_wtoh~btrtl = pa0001~btrtl
INNER JOIN pa0000 ON pa0000~pernr = pa0001~pernr
INNER JOIN /../pa9001 ON /../pa9001~pernr = pa0001~pernr
INNER JOIN pa0002 ON pa0002~pernr = pa0001~pernr
WHERE /../bde_wtoh~werks = iv_werk
* Hier bekomme ich die Fehlermeldung: Auf den IN-OPerator folgt mit "IT_PERNR" weder eine interne Tabelle noch eine Werteliste.
AND pa0001~pernr in it_pernr.
AND pa0000~begda <= sy-datum
AND pa0000~endda >= sy-datum
AND pa0001~begda <= sy-datum
AND pa0001~endda >= sy-datum
AND /../pa9001~begda <= sy-datum
AND /..e/pa9001~endda >= sy-datum
AND pa0002~begda <= sy-datum
AND pa0002~endda >= sy-datum
AND pa0000~stat2 = '3'
AND /../pa9001~sprps = ' '.
Code: Alles auswählen.
ra_pernr-sign = 'I'.
ra_pernr-option = 'BT'.
ra_pernr-low = ra_pernr-low.
APPEND ra_pernr TO ra_pernr.
Personenliste pro Werk
SELECT *
INTO CORRESPONDING FIELDS OF TABLE gt_abschluss
FROM /../bde_wtoh INNER JOIN pa0001 ON
/../bde_wtoh~persa = pa0001~werks
AND /../bde_wtoh~btrtl = pa0001~btrtl
INNER JOIN pa0000 ON pa0000~pernr = pa0001~pernr
INNER JOIN /../pa9001 ON /../pa9001~pernr = pa0001~pernr
INNER JOIN pa0002 ON pa0002~pernr = pa0001~pernr
WHERE /../bde_wtoh~werks = p_werk
* So klappt es
AND pa0001~pernr IN ra_pernr
AND pa0000~begda <= sy-datum
AND pa0000~endda >= sy-datum
AND pa0001~begda <= sy-datum
AND pa0001~endda >= sy-datum
AND /../pa9001~begda <= sy-datum
AND /../pa9001~endda >= sy-datum
AND pa0002~begda <= sy-datum
AND pa0002~endda >= sy-datum
AND pa0000~stat2 = '3'
AND /../pa9001~sprps = ' '.
Code: Alles auswählen.
START-OF-SELECTION.
SELECTION-SCREEN BEGIN OF BLOCK eingabe WITH FRAME TITLE text-100.
SELECT-OPTIONS: ra_pernr FOR /../..-pernr OBLIGATORY.
SELECTION-SCREEN END OF BLOCK eingabe.
ra_pernr-sign = 'I'.
ra_pernr-option = 'BT'.
ra_pernr-low = ra_pernr-low.
APPEND ra_pernr TO ra_pernr.
Und genau dieses PerNr-Range möchte ich meinem FUBA übergeben...
Nochmals Danke,
Mario