Simple list reporting

[HemendraS]

Hi Experts,

I'm getting the Summary report on the initial page(Page1) while the other report on Page2, Page 3 & Page 4.

Now what I want If I double click on The first row of page1 It will display Page2 & if on second row of Page1 it will display Page 3, & if row3 of page1 it will display page4.

Plz help,

Helps will be appreciated.

Thanks & regards.

Hemendra

[former_member585060]

Hi,

Use Interactive reports to achieve that.

check this link

Edited by: Bala Krishna on Aug 8, 2008 5:37 PM

[Former Member]

Hi ,

This is an interactive report output.Below I have written an example , you can change it according to your requirements.

TABLES :

sbook, sflight.

***********************************************************************
* INITIALIZATION *
***********************************************************************
INITIALIZATION.
***********************************************************************
* Structure Declaration to Hold the Sflight TABLES DATA
*
***********************************************************************

  TYPES :

  BEGIN OF type_t_sflight,
  carrid LIKE sflight-carrid, " Carrier ID
  connid LIKE sflight-connid, " Connection ID
  fldate LIKE sflight-fldate, " Flying Date
  price LIKE sflight-price, " Price
  currency LIKE sflight-currency," Currency
  END OF type_t_sflight.

***********************************************************************
* Structure Declaration to Hold the Sbook TABLES DATA
*
***********************************************************************

  TYPES :

  BEGIN OF type_t_sbook,
  carrid LIKE sbook-carrid, " Carrier Id
  connid LIKE sbook-connid, " Connection Id
  fldate LIKE sbook-fldate, " Flying Date
  bookid LIKE sbook-bookid, " Booking Id
  loccuram LIKE sbook-loccuram, " Local Currency Amount
  END OF type_t_sbook.

***********************************************************************
* Internal Table And Work Area Declarations *
***********************************************************************

  DATA : t_sflight TYPE STANDARD TABLE OF type_t_sflight,
  fs_sflight TYPE type_t_sflight.

  DATA : t_sbook TYPE STANDARD TABLE OF type_t_sbook,
  fs_sbook TYPE type_t_sbook.

***********************************************************************
* START-OF- SELECTION *
***********************************************************************
START-OF-SELECTION.
***********************************************************************
* CALLING SUBROUTINE *
***********************************************************************
  PERFORM getflightdata.

  PERFORM readflightdata.
***********************************************************************
* AT LINE- SELECTION *
***********************************************************************
AT LINE-SELECTION.
AT PF13.
  PERFORM getbookingdata.
  PERFORM readbookingdata.
AT PF14.
  PERFORM sortfldate.
AT PF16.
  PERFORM sortloccuram.

*&---------------------------------------------------------------------*
*& Form getflightdata
&---------------------------------------------------------------------*
* Get Flight Data from Sflight into t_sflight
*----------------------------------------------------------------------*

FORM getflightdata .

  SELECT
  carrid
  connid
  fldate
  price
  currency
  INTO TABLE t_sflight
  FROM sflight.

ENDFORM. " getflightdata

*&---------------------------------------------------------------------*
*& Form readflightdata
*&---------------------------------------------------------------------*
* Display Flight Data from t_sflight
*----------------------------------------------------------------------*

FORM readflightdata .

  WRITE : / 'carrid',
  8 'connid',
  20 'fldate',
  30 'Currency',
  40 'price'.

  LOOP AT t_sflight INTO fs_sflight.
    WRITE : / fs_sflight-carrid,
    7 fs_sflight-connid,
    17 fs_sflight-fldate,
    27 fs_sflight-price,
    35 fs_sflight-currency.
    HIDE : fs_sflight-carrid ,fs_sflight-connid.
  ENDLOOP.
ENDFORM. " readflightdata
*&---------------------------------------------------------------------*
*& Form getbookingdata
*&---------------------------------------------------------------------*
* Get Booking Data from SBOOK INTO t_SBOOK
*----------------------------------------------------------------------*

FORM getbookingdata .
  SELECT
  carrid
  connid
  fldate
  bookid
  loccuram
  INTO TABLE t_sbook
  FROM sbook
  WHERE carrid = fs_sflight-carrid AND
  connid = fs_sflight-connid.
ENDFORM. " getbookingdata

*&---------------------------------------------------------------------*
*& Form readbookingdata
*&---------------------------------------------------------------------*
* Displaying Booking Data from t_Sbook
*----------------------------------------------------------------------*
FORM readbookingdata .
  LOOP AT t_sbook INTO fs_sbook.
    WRITE : / fs_sbook-carrid,
    7 fs_sbook-connid,
    18 fs_sbook-fldate,
    30 fs_sbook-bookid,
    40 fs_sbook-loccuram.
  ENDLOOP.

ENDFORM. " readbookingdata
*&---------------------------------------------------------------------*
*& Form sortfldate
*&---------------------------------------------------------------------*
* Sort Details By FLDATE.
*----------------------------------------------------------------------*
FORM sortfldate .
  SORT t_sbook BY fldate.
  LOOP AT t_sbook INTO fs_sbook.
    MODIFY LINE sy-tabix FIELD VALUE
    fs_sbook-carrid FROM fs_sbook-carrid
    fs_sbook-connid FROM fs_sbook-connid
    fs_sbook-fldate FROM fs_sbook-fldate
    fs_sbook-bookid FROM fs_sbook-bookid
    fs_sbook-loccuram FROM fs_sbook-loccuram.
  ENDLOOP.
ENDFORM. " sortfldate

*&---------------------------------------------------------------------*
*& Form sortloccuram
*&---------------------------------------------------------------------*

FORM sortloccuram .

  SORT t_sbook BY loccuram.
  LOOP AT t_sbook INTO fs_sbook.
    MODIFY LINE sy-tabix FIELD VALUE
    fs_sbook-carrid FROM fs_sbook-carrid
    fs_sbook-connid FROM fs_sbook-connid
    fs_sbook-fldate FROM fs_sbook-fldate
    fs_sbook-bookid FROM fs_sbook-bookid
    fs_sbook-loccuram FROM fs_sbook-loccuram.
  ENDLOOP.
ENDFORM. " sortloccuram

[Former Member]

Hi Hemedra Sabharwal,

Please check this link for good examples regarding interactive reports ,

http://omarabid.blogspot.com/2008/02/abap-multiple-interactive-report-sample.html

http://saptechnical.com/Tutorials/ALV/ALVMainPage.htm

Regards,

Sreekar.Kadiri.

[Former Member]

Hi,

Try like this:

DATA: int TYPE i,

rspar LIKE rsparams OCCURS 10 WITH HEADER LINE.

RANGES seltab FOR int.

WRITE: 'Select a Selection!',

/ '----

---

'.

SKIP.

FORMAT HOTSPOT COLOR 5 INVERSE ON.

WRITE: 'Selection 1',

/ 'Selection 2',

/ 'Selection 3',

/ 'Selection 4'.

AT LINE-SELECTION.

CASE sy-lilli.

WHEN 6.

CALL TRANSACTION 'MM02' AND SKIP FIRST SCREEN.

WHEN 7.

CALL TRANSACTION 'VA02' AND SKIP FIRST SCREEN.

WHEN 8.

CALL TRANSACTION 'MM01' AND SKIP FIRST SCREEN.

WHEN 9.

CALL TRANSACTION 'VA01' AND SKIP FIRST SCREEN.

ENDCASE.

Regards,

Bhaskar