SET PARAMETER

[Former Member]

HI,

MY REQUIREMENT IS TO WRITE A PROGARAM WHICH PROVIDES ACCESS TO SPECIFIC TABLES. I HAVE WRITTEN A SAMPLE CODE.

REPORT Z_TCODE .

DATA TAB(20) TYPE C VALUE 'AGR_USERS'.

DATA LIST.

WRITE:/ 'Z_NAR_ALV_USERS_LOCK_UNLOCK'.

LIST = 'A'.

HIDE LIST.

AT LINE-SELECTION.

CASE LIST.

WHEN 'A'.

SET PARAMETER ID 'DTB' FIELD TAB.

CALL TRANSACTION 'SE16' AND SKIP FIRST SCREEN.

ENDCASE.

THE PROBLEM IS WHEN I CLICK BACK BUTTON ON DATA BROWSE SCREEN OF AGR_USERS , IT IS GOING TO THE FIRST SCREEN OF SE16 , WHICH I WANT TO AVOID.

ARE THERE ANY FUNCTION MODUELS TO ACHIEVE MY GOAL.

[Former Member]

Hi Rajesh ,

Use function module "RS_TABLE_LIST_CREATE". Provide Name of the table to parameter "TABLE_NAME".

This will solve your problem.

Regards

Shekhar

[Former Member]

Hi

You can't control that function code, so:

- or you crete a dialog for SM30;

- or you try somthing like this:

The SE16 generates a browser program called /1BCDWB/DB<TABLE NAME>, so instead of CALL TRANSACTION you can use the SUBMIT:

DATA: REPORTNAME(30) TYPE C VALUE '/1BCDWB/DB&',

_REPORT(30) TYPE C VALUE.

AT LINE-SELECTION.

CASE LIST.

WHEN 'A'.

_REPORT = REPORTNAME.

REPLACE '&' WITH TAB INTO _REPORT.

• Check if report was generated:

SELECT SINGLE * TRDIR WHERE PROGRAM = _REPORT.

CHECK SY-SUBRC = 0.

SUBMIT (_REPORT) VIA SELECTION-SCREEN AND RETURN.

ENDCASE.

- or you use the same code used by SE16:

AT LINE-SELECTION.

CASE LIST.

WHEN 'A'.

CLEAR CALLING_TRANSACTION.

CALL 'GET_PARAM_TCOD'

ID 'PTCOD' FIELD CALLING_TRANSACTION.

DATABROWSE-TABLENAME = TAB.

CALL FUNCTION 'RS_TABLE_LIST_CREATE'

EXPORTING

TABLE_NAME = DATABROWSE-TABLENAME

GENERATION_FORCED = DATABROWSE-GEN_FLAG.

CLEAR DATABROWSE-GEN_FLAG.

Max

[Former Member]

c

Message was edited by: pradeep palagiri

[Former Member]

thanks shekar and max.

'RS_TABLE_LIST_CREATE' helped me.