CREATE OBJECT

[Former Member]

hi

can any boby tell me what is 'BCALV_GRID_DEMO_0100_CONT1' in g_container type scrfname value 'bcalv_grid_demo_0100_cont1'.

2) what is instance fillerwhile creating an object

3) how to find out an enhancement any procedure is there?

thance in advance

kanny

[Former Member]

Hi,

Thats the container value referring to the screen name.

Objects are always instantiated by their instance.

Use the following pgm to find user-exits for a transaction.

This should help ur need, reward points.

Source Code to find User Exits 1
************************************************************************
* REPORT YSMOD2
*
* SELECTION TEXTS : INPUT1 ----> Enter search term for Trxn.
*                   INPUT2 ----> Enter type of exit
************************************************************************
REPORT YSMOD2 .

TABLES: MODSAP, MODACT, TSTC.

PARAMETERS: INPUT1 LIKE TSTC-TCODE DEFAULT ' ',
            INPUT2 LIKE MODSAP-TYP DEFAULT ' '.

DATA: SEARCH1(6),
      SEARCH2(3),
      SEARCH3 LIKE MODSAP-MEMBER.
DATA : FIRST_ROW VALUE 'Y'.

CONCATENATE: '%' INPUT1 '%' INTO SEARCH1,
             '%' INPUT2     INTO SEARCH2.

SELECT * FROM TSTC WHERE TCODE LIKE SEARCH1.
  FIRST_ROW = 'Y'.
  CHECK TSTC-PGMNA NE SPACE.
  CONCATENATE '%' TSTC-PGMNA '%' INTO SEARCH3.
  SELECT * FROM MODSAP WHERE TYP LIKE SEARCH2
                       AND MEMBER LIKE SEARCH3.
    SELECT SINGLE * FROM MODACT WHERE MEMBER = MODSAP-NAME.
    IF FIRST_ROW EQ 'Y'.
      WRITE: /0 TSTC-TCODE, 6 TSTC-PGMNA, 16 MODSAP-NAME, 32 MODSAP-TYP,
                                       45 MODSAP-MEMBER, 70 MODACT-NAME.
      FIRST_ROW = 'N'.
    ELSE.
WRITE: /16 MODSAP-NAME, 32 MODSAP-TYP, 45 MODSAP-MEMBER, 70 MODACT-NAME.
    ENDIF.
    CLEAR : MODSAP, MODACT.
  ENDSELECT.
  IF SY-SUBRC NE 0.
    WRITE : /0 TSTC-TCODE, 6 TSTC-PGMNA, 30 'No exits found'.
  ENDIF.
  CLEAR TSTC.
ENDSELECT.

END-OF-SELECTION.
  CLEAR: SEARCH1, SEARCH2, SEARCH3.

Regards