Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

Interactive Reporting

Former Member
0 Likes
631

In basic list i have 2 fields,"BILL NO" and "Budget".If i click 'BILL NO' first interactive list should be displayed. and if i double clik on budget another list be displayed .

PLZ help me with sample code which matches my requirement.

Thanx in advance

1 ACCEPTED SOLUTION
Read only

Former Member
0 Likes
609

Hi,

Hope this code may help you.

<code>

TYPES : BEGIN OF TY_ITAB,

KUNNR TYPE KUNNR,

NAME1 TYPE NAME1,

END OF TY_ITAB.

DATA : GT_ITAB TYPE TABLE OF TY_ITAB,

WA_ITAB TYPE TY_ITAB,

FIELDNAME(30).

SELECT KUNNR NAME1

FROM KNA1

INTO TABLE GT_ITAB

UP TO 10 ROWS.

ULINE.

WRITE :'Customer Number',50 'Customer Name'.

ULINE.

LOOP AT GT_ITAB INTO WA_ITAB.

WRITE 😕 WA_ITAB-KUNNR,50 WA_ITAB-NAME1.

ENDLOOP.

AT LINE-SELECTION.

GET CURSOR FIELD FIELDNAME.

CASE SY-LSIND.

WHEN 1.

IF FIELDNAME EQ 'WA_ITAB-KUNNR'.

************************CODE FOR FIRST LIST**********************

WRITE : 'CUSTOMER NUMBER'.

WRITE 😕 'CODE FOR FIRST LIST'.

ELSEIF FIELDNAME EQ 'WA_ITAB-NAME1'.

************************CODE FOR SECOND LIST**********************

WRITE : 'CUSTOMER NAME'.

WRITE 😕 'CODE FOR SECOND LIST'.

ENDIF.

ENDCASE.

<code>

check the code and write your code accordingly.

Regards.

4 REPLIES 4
Read only

former_member182354
Contributor
0 Likes
609

Code accordingly in AT LINE-SELECTION event ....

sy-lsind is one more syst variable that may be useful to you..

Raghav

Read only

naveen_inuganti2
Active Contributor
0 Likes
609

Hi...,

As of my knowledge, It is not possible with AT LINE_SELECTION event to navigate from 1 to 3 directly.

Make two push buttons on apllication tool bar and you can go for AT USER COMMND event.

Thanks,

Naveen.I

Read only

Former Member
0 Likes
610

Hi,

Hope this code may help you.

<code>

TYPES : BEGIN OF TY_ITAB,

KUNNR TYPE KUNNR,

NAME1 TYPE NAME1,

END OF TY_ITAB.

DATA : GT_ITAB TYPE TABLE OF TY_ITAB,

WA_ITAB TYPE TY_ITAB,

FIELDNAME(30).

SELECT KUNNR NAME1

FROM KNA1

INTO TABLE GT_ITAB

UP TO 10 ROWS.

ULINE.

WRITE :'Customer Number',50 'Customer Name'.

ULINE.

LOOP AT GT_ITAB INTO WA_ITAB.

WRITE 😕 WA_ITAB-KUNNR,50 WA_ITAB-NAME1.

ENDLOOP.

AT LINE-SELECTION.

GET CURSOR FIELD FIELDNAME.

CASE SY-LSIND.

WHEN 1.

IF FIELDNAME EQ 'WA_ITAB-KUNNR'.

************************CODE FOR FIRST LIST**********************

WRITE : 'CUSTOMER NUMBER'.

WRITE 😕 'CODE FOR FIRST LIST'.

ELSEIF FIELDNAME EQ 'WA_ITAB-NAME1'.

************************CODE FOR SECOND LIST**********************

WRITE : 'CUSTOMER NAME'.

WRITE 😕 'CODE FOR SECOND LIST'.

ENDIF.

ENDCASE.

<code>

check the code and write your code accordingly.

Regards.

Read only

0 Likes
609

Thanku Rock ur solution solved my requirement