HOW TO HIDE SELECTION SCREEN

Question

HI ALL,
  I HAVE TWO SEPARATE SELECTION SCREEN IN MY PROGRAM,ONE OF MY OWN GENERATED AND OTHER ONE IS SELF GENERATED SCREEN OF THE BDC.
  NOW I WANT TO HIDE THE SELECTION SCREEN FOR THE BDC. HOW CAN I GO FOR IT.
THANKS AND REGARDS,
SUGEET.

Answer 1

Hi again,
1. ur requirement is NOT USING bdcrecX1 SCREEN.
  I suppose u are using CALL TRANSACTION for this.
2. so what we should do (i also did the same)
3.  just  declare important variables
   in your program at the top.
DATA:   bdcdata LIKE bdcdata    OCCURS 0 WITH HEADER LINE.
      messages of call transaction
DATA:   messtab LIKE bdcmsgcoll OCCURS 0 WITH HEADER LINE.
      error session opened (' ' or 'X')
4. and copy the routines FORM (from bdcrecx1)
   just like :
       Start new transaction according to parameters                 *
FORM bdc_transaction
tables bdcmsg structure yhrs_bdcmsg
USING tcode  p_param1 p_param2 showflag.
  DATA: l_mstring(480).
  REFRESH messtab.
  clear bdcmsg.
  refresh bdcmsg.
  CALL TRANSACTION tcode USING bdcdata
                   MODE   ctumode
                   UPDATE 'S'
                   MESSAGES INTO messtab.
  LOOP AT messtab.
    SELECT SINGLE * FROM t100 WHERE sprsl = messtab-msgspra
                              AND   arbgb = messtab-msgid
                              AND   msgnr = messtab-msgnr.
    IF sy-subrc = 0.
      l_mstring = t100-text.
      IF l_mstring CS '&1'.
        REPLACE '&1' WITH messtab-msgv1 INTO l_mstring.
        REPLACE '&2' WITH messtab-msgv2 INTO l_mstring.
        REPLACE '&3' WITH messtab-msgv3 INTO l_mstring.
        REPLACE '&4' WITH messtab-msgv4 INTO l_mstring.
      ELSE.
        REPLACE '&' WITH messtab-msgv1 INTO l_mstring.
        REPLACE '&' WITH messtab-msgv2 INTO l_mstring.
        REPLACE '&' WITH messtab-msgv3 INTO l_mstring.
        REPLACE '&' WITH messtab-msgv4 INTO l_mstring.
      ENDIF.
      CONDENSE l_mstring.
      IF showflag = 'X'.
       WRITE: / messtab-msgtyp, p_param1, p_param2, l_mstring.
      endif.
        move-corresponding messtab to bdcmsg.
        bdcmsg-mstr1 = l_mstring.
        append bdcmsg.
    ELSE.
      IF showflag = 'X'.
       WRITE: / messtab.
      endif.
        move-corresponding messtab to bdcmsg.
        bdcmsg-mstr1 = l_mstring.
        append bdcmsg.
      ENDIF.
  ENDLOOP.
  SKIP.
  REFRESH bdcdata.
ENDFORM.                    "BDC_TRANSACTION
       Start new screen                                              *
FORM bdc_dynpro USING program dynpro.
  CLEAR bdcdata.
  bdcdata-program  = program.
  bdcdata-dynpro   = dynpro.
  bdcdata-dynbegin = 'X'.
  APPEND bdcdata.
ENDFORM.                    "BDC_DYNPRO
       Insert field                                                  *
FORM bdc_field USING fnam fval.
  CLEAR bdcdata.
  bdcdata-fnam = fnam.
  bdcdata-fval = fval.
  APPEND bdcdata.
ENDFORM.                    "BDC_FIELD
5. Make all this in your own Z Include.
6. I have used this approach and it works fantastic.
regards,
amit m.