SAP Jobsuche bei DV-Treff
michi74
  • michi74
  • SAP Forum - User Thema Starter
vor 15 Jahre
Hallo,
mittels eines ALV-Reports lasse ich Stücklisten und deren Komponenten anzeigen.
Im Anzeigeergebnis (ALV) besteht dann weiter die Möglichkeit, mit einem Mausklick auf die Komponente direkt in eine Standardtransaktion, hier „Stückliste ändern“ zu verzweigen:

SET PARAMETER ID 'MAT' FIELD header-idnrk.
SET PARAMETER ID 'WRK' FIELD header-werks.
SET PARAMETER ID 'CSV' FIELD header-stlan.
SET PARAMETER ID 'AUN' FIELD header-vbeln.
SET PARAMETER ID 'APO' FIELD vbap-posnr.
CALL TRANSACTION 'CS02' AND SKIP FIRST SCREEN.

Wie kann ich realisieren, dass ich beim Aufruf o.g. Transaktion CS02 direkt in der Detailansicht einer Stücklisten-Position lande, vorausgesetzt, ich über gebe entsprechende Parameter (Stüli-ebene, Mat-nr, etc.) ? Kann ich das Dynpro / den Screen direkt ansprechen ?
Danke im voraus !
Michi
LupusF
vor 15 Jahre
ja das geht, wir haben so einen ähnlichen Fall nur mit einer Stückliste für einen "Technischen Platz":

=> vor dem Aufruf der CS02 erst eine BTCI-Struktur (in BDCDATA) mit der gewünschten DYNPRO-Reihenfolge füllen

=> dann die CS02 aufrufen und die BDCDATA mit übergeben

=> CALL TRANSACTION 'CS02' USING BDCDATA MODE 'E'.

=> nach der Verbeitung bleibt man auf dem letzten gewünschten Dynpro stehen

hier als Beispiel unser Coding für Tcode IB13

musst du nur auf die CS02 abändern

.....

* Technische Platzstückliste anzeigen

WA_BDCDATA-PROGRAM = 'SAPLCSDI'.

WA_BDCDATA-DYNPRO = '0220'.

WA_BDCDATA-DYNBEGIN = 'X'.

APPEND WA_BDCDATA TO BDCDATA. CLEAR WA_BDCDATA.

WA_BDCDATA-FNAM = 'RC29N-TPLNR'.

WA_BDCDATA-FVAL = H_TPLNR.

APPEND WA_BDCDATA TO BDCDATA. CLEAR WA_BDCDATA.

WA_BDCDATA-FNAM = 'RC29N-WERKS'.

WA_BDCDATA-FVAL = ' '.

APPEND WA_BDCDATA TO BDCDATA. CLEAR WA_BDCDATA.

WA_BDCDATA-FNAM = 'RC29N-STLAN'.

WA_BDCDATA-FVAL = '4'.

APPEND WA_BDCDATA TO BDCDATA. CLEAR WA_BDCDATA.

WA_BDCDATA-FNAM = 'BDC_OKCODE'.

WA_BDCDATA-FVAL = '/00'.

APPEND WA_BDCDATA TO BDCDATA. CLEAR WA_BDCDATA.

WA_BDCDATA-PROGRAM = 'SAPLCSDI'.

WA_BDCDATA-DYNPRO = '0150'.

WA_BDCDATA-DYNBEGIN = 'X'.

APPEND WA_BDCDATA TO BDCDATA. CLEAR WA_BDCDATA.

WA_BDCDATA-FNAM = 'BDC_OKCODE'.

WA_BDCDATA-FVAL = '=SETP'.

APPEND WA_BDCDATA TO BDCDATA. CLEAR WA_BDCDATA.

WA_BDCDATA-PROGRAM = 'SAPLCSDI'.

WA_BDCDATA-DYNPRO = '0708'.

WA_BDCDATA-DYNBEGIN = 'X'.

APPEND WA_BDCDATA TO BDCDATA. CLEAR WA_BDCDATA.

WA_BDCDATA-FNAM = 'RC29P-SELPO'.

WA_BDCDATA-FVAL = H_POSNR.

APPEND WA_BDCDATA TO BDCDATA. CLEAR WA_BDCDATA.

WA_BDCDATA-FNAM = 'BDC_OKCODE'.

WA_BDCDATA-FVAL = '/00'.

APPEND WA_BDCDATA TO BDCDATA. CLEAR WA_BDCDATA.

WA_BDCDATA-PROGRAM = 'SAPLCSDI'.

WA_BDCDATA-DYNPRO = '0150'.

WA_BDCDATA-DYNBEGIN = 'X'.

APPEND WA_BDCDATA TO BDCDATA. CLEAR WA_BDCDATA.

WA_BDCDATA-FNAM = 'RC29P-AUSKZ(01)'.

WA_BDCDATA-FVAL = 'X'.

APPEND WA_BDCDATA TO BDCDATA. CLEAR WA_BDCDATA.

WA_BDCDATA-FNAM = 'BDC_OKCODE'.

WA_BDCDATA-FVAL = '=PALL'.

APPEND WA_BDCDATA TO BDCDATA. CLEAR WA_BDCDATA.

WA_BDCDATA-PROGRAM = 'SAPLCSDI'.

WA_BDCDATA-DYNPRO = '2130'.

WA_BDCDATA-DYNBEGIN = 'X'.

APPEND WA_BDCDATA TO BDCDATA. CLEAR WA_BDCDATA.

CALL TRANSACTION 'IB13' USING BDCDATA MODE 'E'.

...

LupusF
vor 15 Jahre
Nachrag:

DATA: BDCDATA TYPE TABLE OF BDCDATA.

DATA: WA_BDCDATA TYPE BDCDATA.

michi74
  • michi74
  • SAP Forum - User Thema Starter
vor 15 Jahre
Hallo LupusF,

funktioniert einwandfrei. So soll es sein !

Danke !

Michi