Convert from classical interactive to ALV interactive report

[Former Member]

Hi Expert,

            Following code is exiting classical interactive report not clear to understand which has to convert into alv interactive report..

Note:   We need to call transaction by clicking header list with clicking header line as  document no along with its related transaction code.

GET CURSOR FIELD wa_clicktxt.
   IF wa_clicktxt =  'IT_BSAK-BELNR'.
     HIDE: it_bsak.
     SET PARAMETER ID 'BLN' FIELD sy-lisel+28(10).
     SET PARAMETER ID 'BUK' FIELD pa_bukrs.
     SET PARAMETER ID 'GJA' FIELD pa_gjahr.
     CALL TRANSACTION 'FB03' AND SKIP FIRST SCREEN.
   ELSEIF wa_clicktxt =  'IT_BKPF-AWKEY'.
     HIDE: it_bkpf.
     SET PARAMETER ID 'RBN' FIELD sy-lisel+15(10).
     SET PARAMETER ID 'GJR' FIELD pa_gjahr.
     CALL TRANSACTION 'MIR4' AND SKIP FIRST SCREEN.
   ELSEIF wa_clicktxt =  'IT_BSAK-LFBNR'.
     HIDE: it_bsak.
     SET PARAMETER ID 'BLN' FIELD sy-lisel+102(10).
     SET PARAMETER ID 'BUK' FIELD pa_bukrs.
     SET PARAMETER ID 'GJA' FIELD pa_gjahr.
     CALL TRANSACTION 'FB03' AND SKIP FIRST SCREEN.
   ELSEIF wa_clicktxt =  'IT_BSAK-EBELN'.
     SELECT SINGLE ebeln INTO wk_ebeln
     FROM ekko
     WHERE ebeln = it_bsak-ebeln
     AND bstyp = 'F'.
     IF sy-subrc EQ 0.
       HIDE: it_bsak.
       SET PARAMETER ID 'BES' FIELD sy-lisel+73(10).
       CALL TRANSACTION 'ME23N' AND SKIP FIRST SCREEN.
     ELSE.
       HIDE: it_bsak.
       SET PARAMETER ID 'VRT' FIELD sy-lisel+73(10).
       CALL TRANSACTION 'ME33' AND SKIP FIRST SCREEN.
     ENDIF.
   ENDIF.

Thanks

Shree

Moderator message : Not enough re-search before posting, discussion locked.

Message was edited by: Vinod Kumar

[Former Member]

Hi Expert,

            Following code is exiting classical interactive report not clear to understand which has to convert into alv interactive report..

Note:   We need to call transaction by clicking header list with clicking header line as  document no along with its related transaction code.

GET CURSOR FIELD wa_clicktxt.
   IF wa_clicktxt =  'IT_BSAK-BELNR'.
     HIDE: it_bsak.
     SET PARAMETER ID 'BLN' FIELD sy-lisel+28(10).
     SET PARAMETER ID 'BUK' FIELD pa_bukrs.
     SET PARAMETER ID 'GJA' FIELD pa_gjahr.
     CALL TRANSACTION 'FB03' AND SKIP FIRST SCREEN.
   ELSEIF wa_clicktxt =  'IT_BKPF-AWKEY'.
     HIDE: it_bkpf.
     SET PARAMETER ID 'RBN' FIELD sy-lisel+15(10).
     SET PARAMETER ID 'GJR' FIELD pa_gjahr.
     CALL TRANSACTION 'MIR4' AND SKIP FIRST SCREEN.
   ELSEIF wa_clicktxt =  'IT_BSAK-LFBNR'.
     HIDE: it_bsak.
     SET PARAMETER ID 'BLN' FIELD sy-lisel+102(10).
     SET PARAMETER ID 'BUK' FIELD pa_bukrs.
     SET PARAMETER ID 'GJA' FIELD pa_gjahr.
     CALL TRANSACTION 'FB03' AND SKIP FIRST SCREEN.
   ELSEIF wa_clicktxt =  'IT_BSAK-EBELN'.
     SELECT SINGLE ebeln INTO wk_ebeln
     FROM ekko
     WHERE ebeln = it_bsak-ebeln
     AND bstyp = 'F'.
     IF sy-subrc EQ 0.
       HIDE: it_bsak.
       SET PARAMETER ID 'BES' FIELD sy-lisel+73(10).
       CALL TRANSACTION 'ME23N' AND SKIP FIRST SCREEN.
     ELSE.
       HIDE: it_bsak.
       SET PARAMETER ID 'VRT' FIELD sy-lisel+73(10).
       CALL TRANSACTION 'ME33' AND SKIP FIRST SCREEN.
     ENDIF.
   ENDIF.

Thanks

Shree

Moderator message : Not enough re-search before posting, discussion locked.

Message was edited by: Vinod Kumar

[Former Member]

Hi Sree,

First u need to create a field catalog and specify the layout for the output .

Then check for the click event in  the class : CL_GUI_ALV_GRID , using which you can determine which field has been clicked by the end user.

Then you can simply call the transaction based on the selected field.

Reward if helpful.

Regards,

Faiz

[Former Member]

Hi,

     ex:   vendor no: 2343344 in header list.

     When clicking the vendor no which has to call MK01 and its screen with same vendor (2343344) no we can see in the Tcode

Thanks

shree