가끔가다가 필요한 경우가 많았는데 정말 좋은 정보 감사합니다.

이렇게 파일로 정리해주셔서 감사합니당~

전 주로 /H로 디버그찍고 okcode를 바꿔주는식으로 하는데, 이런방법도 있었네요.

좋은정보 감사합니다.

어제 방금 이런 경우에 부딪혓는데 고맙습니다. ㅎㅎ

해결책이있었네요

저는 첫번째 방법을 주로 사용했었는데..두번째는 어떻게 하는지 모르겠네요;;

조회하기전에 /h걸고 들어가서 소스의 제일위로 이동해서 콘트롤+F로 AUTH를 두번찾고 거기에 중단점 설정하는거아닌가요?

왜 중단점이 안걸리는지..;;

버전마다 AUTH의 위치가 달라져서 그런걸까요?? 흠..

좋은 정보같아요.

감사합니다..몰랐던 정보네용

간단 프로그램 : 참고하세요.

 

REPORT  YSE11.

*사용시 주의바랍니다.
*STANDARD TABLE도 CONTROL가능합니다.
*변경된 이력은 Request가 관리되지 않으므로 주의바랍니다.

TABLES: dd02l.

DATA: g_tabname(30)  TYPE c          VALUE '/1BCDWB/DB',
      action         TYPE sy-ucomm   VALUE 'ANZE',
      global_auth(4) TYPE c,
      g_data_exit    LIKE rs38l-name VALUE 'UPDA'.

DATA: mem_id(16) VALUE 'TABELLENANZEIGER'.

SELECTION-SCREEN BEGIN OF BLOCK b01 WITH FRAME TITLE text-100.
PARAMETERS: tabname  LIKE databrowse-tablename MEMORY ID dtb.
SELECTION-SCREEN END OF BLOCK b01.
*------------------------------------------------------------
* PBO
*------------------------------------------------------------

AT SELECTION-SCREEN ON VALUE-REQUEST FOR tabname.
  PERFORM f4_objname.

AT SELECTION-SCREEN.
  IF tabname(1) <> 'Y' AND tabname(1) <> 'Z'.
*    MESSAGE e416(mo) WITH tabname.
  ENDIF.

  SELECT * FROM  dd02l
           WHERE  tabname  = tabname
           AND    as4local = 'A'
           AND   ( tabclass  <> 'INTTAB' AND tabname <> 'APPEND' AND
                   tabclass  <> 'VIEW' ).
    EXIT.
  ENDSELECT.

  IF sy-subrc <> 0.  MESSAGE e402(mo) WITH tabname.  ENDIF.

START-OF-SELECTION.

  CONCATENATE g_tabname tabname INTO g_tabname.
  dd02l-mainflag = 'X'.
  EXPORT action dd02l-mainflag global_auth
                TO MEMORY ID mem_id.

  SUBMIT (g_tabname) VIA SELECTION-SCREEN AND RETURN.

*&---------------------------------------------------------------------*
*&      Form  F4_OBJNAME
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
FORM f4_objname.

  DATA: dnum   LIKE d020s-dnum,
        repid  like sy-repid.

  dnum = sy-dynnr.  repid = sy-repid.
  CALL FUNCTION 'RS_HELP_HANDLING'
       EXPORTING
            dynpfield = 'TABNAME'
            dynpname  = dnum
            object    = 'TB  '
            progname  = repid
            suppress_selection_screen = 'X'.

ENDFORM.                    " F4_OBJNAME

감사합니다

감사합니다

ㅇㅇ

해봐야 겠네요~ 감사감사합니다~^^

좋은글 감사해요

왜 안되는지ㅠㅠ

감사합니다.