Code: Alles auswählen.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: P_GEWRK TYPE AUFK-VAPLZ.
PARAMETERS: P_TPLNR(40) TYPE C.
SELECTION-SCREEN end of LINE.
AT SELECTION-SCREEN.
*---------------------------------------------------------------------*
* Arbeitsplatz am TP nach ENTER übernehmen
*---------------------------------------------------------------------*
SELECT: ARBPL FROM CRHD AS A INNER JOIN
IFLOT AS B ON A~OBJID = B~LGWID INTO P_GEWRK
WHERE TPLNR = P_TPLNR.
ENDSELECT.
Code: Alles auswählen.
IF P_GEWRK IS INITIAL.
* Do Selection
ENDIF.
Folgende Benutzer bedankten sich beim Autor a-dead-trousers für den Beitrag:
peripe
Code: Alles auswählen.
IF SY-SUBRC NE 0.
CLEAR: P_GEWRK.
ENDIF.
Code: Alles auswählen.
IF P_TPLNR IS INITIAL.
CLEAR: P_GEWRK.
ENDIF.