메뉴 건너뛰기

SAP 한국 커뮤니티

<img src=3.gif>f4메쏘드에서 인터널 테이블에 값이 안들어가요 ㅠ

오렌지겅주님 2011.03.25 17:37 조회 수 : 2016

저번에 메쏘드 안탄다고 질문 올려놨었는데


 


이번에는 메쏘드는 타는데 인터널 테이블에 값이 안들어가서


 


no values found라는 에러가 뜨네요 ㅠㅠㅠ 코드좀 봐주세요 ㅠㅠ


 


 


==


 

FORM on_f4 USING  p_fieldname TYPE lvc_fname
                  p_es_row_no TYPE lvc_s_roid
                  p_er_event_data TYPE REF TO cl_alv_event_data
                  p_et_bad_cells TYPE lvc_t_modi.

  FIELD-SYMBOLS: <lt_f4> TYPE lvc_t_modi.

  DATA: ls_f4            TYPE lvc_s_modi,
        l_class          TYPE zeclass. " TYPE 에 DATA ELEMENT씀

  ASSIGN p_er_event_data->m_data->* TO <lt_f4>.
  ls_f4-fieldname = p_fieldname.
  ls_f4-row_id    = p_es_row_no-row_id.

  READ TABLE itab INDEX ls_f4-row_id.


  CASE p_fieldname.
    WHEN 'CLASS'.
      PERFORM f4_class CHANGING l_class." 여기 perform문 코딩은 밑에
      IF l_class IS NOT INITIAL.
        MOVE  l_class  TO itab-class.
        MODIFY itab INDEX ls_f4-row_id.
      ENDIF.
  ENDCASE.

  p_er_event_data->m_event_handled = 'X'.
*  PERFORM grid_f4 CHANGING gt_f4.
*
*  CALL METHOD G_GRID->REGISTER_F4_FOR_FIELDS
*    EXPORTING
*      IT_F4 = gt_f4.

  CALL METHOD g_grid->refresh_table_display
    EXPORTING
      is_stable      = gt_stbl
      i_soft_refresh = c_x
    EXCEPTIONS
      finished       = 1
      OTHERS         = 2.
  IF sy-subrc <> 0.
  ENDIF.


ENDFORM.                   


 


 


== 위에있는 perform 문 코딩


 


 

FORM f4_class CHANGING p_class.

  DATA : BEGIN OF lt_f4 OCCURS 0,
        class      LIKE  zbasis-class,
        text1(12)  TYPE c,
         END OF lt_f4,

         lt_ret   LIKE ddshretval  OCCURS 0 WITH HEADER LINE.


  MOVE : 'O'      TO lt_f4-class,
         'OA'     TO lt_f4-text1.
  APPEND lt_f4.    CLEAR lt_f4.

  MOVE : 'S'      TO lt_f4-class,
         'Server' TO lt_f4-text1.
  APPEND lt_f4.    CLEAR lt_f4.

  MOVE : 'D'      TO lt_f4-class,
         'Disk'   TO lt_f4-text1.
  APPEND lt_f4.    CLEAR lt_f4.

  MOVE : 'N'       TO lt_f4-class,
         'Network' TO lt_f4-text1.
  APPEND lt_f4.    CLEAR lt_f4.

  MOVE : 'W'      TO lt_f4-class,
         'Work station' TO lt_f4-text1.
  APPEND lt_f4.    CLEAR lt_f4.

  CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
      retfield        = 'CLASS'
      dynpprog        = sy-repid
      dynpnr          = sy-dynnr
      dynprofield     = 'ITAB-CLASS'
      value_org       = 'C'
    TABLES
      value_tab       = lt_f4
      return_tab      = lt_ret
    EXCEPTIONS
      parameter_error = 1
      no_values_found = 2
      OTHERS          = 3.
  IF sy-subrc <> 0.
  ELSE .
    MOVE lt_ret-fieldval TO p_class.
  ENDIF.


ENDFORM.                                                    " F4_CLASS
 


 


뭐가 잘못됬는지 모르겠어요 ㅠㅠ


 


마지막에    


 


CALL METHOD g_grid->refresh_table_display
    EXPORTING
      is_stable      = gt_stbl
      i_soft_refresh = c_x
    EXCEPTIONS
      finished       = 1
      OTHERS         = 2.
  IF sy-subrc <> 0.
  ENDIF.


이부분의 gt_stbl 에 값이 들어있어야 하는건가요? gt_stbl이 비어있던데..


 


도와주세요 아밥님들~ㅠㅠ

번호 제목 글쓴이 날짜 조회 수
6427 현재 시간을 가져올려면 어떻게 해야하나요? [1] 노력&성장 2007.07.19 5883
6426 [요청]BAPI BAPI_GOODSMVT_CREATE 펑션의 기본적인 사용법 [1] 댕댕 2008.05.05 5862
6425 [요청]스마트폼 - 페이지 번호 매기기. [2] JiruMi 2009.03.17 5856
6424 <b>[완료]</b><b>[완료]</b><b>[완료]</b><b>[완료]</b>특정 글자 뒤의 내용을 가져 오는 법 문의. 2006.12.02 5842
6423 <img src=3.gif>엑셀 매크로를 이용하여 양식을 출력하는 방법 좀 알려주세요..ㅜㅜ [3] 싼타 2010.08.19 5820
6422 <img src=3.gif border=0> MOD 와 DIV에 대해 설명 좀 부탁드립니다.. [2] 용군 2009.06.04 5802
6421 <b>[완료]</b>[re] 탐색도움말 [23] sapjoy 2006.12.11 5773
6420 <img src=3.gif>Runtime Error->OBJECTS_OBJREF_NOT_ASSIGNED [2] 써언 2011.02.09 5764
6419 Background (Batch Job) 에 설정한 Selection Screen의 Variant 는 어디서 볼수 있을까요? [1] file 김윤승 2007.07.21 5761
6418 [질문] transporting의 역활 좀 알고 싶습니다. [3] 나도아밥퍼 2007.06.13 5745
6417 [요청]group by 에러입니다. 답변 부탁 드려요 [2] file 안녕나야 2008.10.21 5742
6416 [ERROR] READ_REPORT_LINE_TOO_LONG 해결 방법좀 알려주세요. [7] file D.Y.Kim 2007.07.24 5729
6415 <img src=3.gif>팝업으로 만든 스크린에서 데이터를 조회 & GUI STATUS 만드는 과정에 대해서 질문합니다. [3] file Fjohnny 2011.01.21 5720
6414 <b>[완료]</b>[re] BDC 수행 중 에러가 발생합니다. [17] ECBASE 2006.12.02 5719
6413 [re] <img src=1.gif border=0>싱글쿼테이션으로 구분된 TXT 파일 업로드 관련 [6] StoryGuy97™ 2009.09.29 5655
6412 <img src=2.gif>Generic Object Service를 사용해서 CBO프로그램에 파일 Attach & Mail 전송 ? [9] 찬호사랑 2010.04.26 5625
6411 <img src=3.gif>엑셀 다운로드 질문 엑셀 열리지 않고 자동으로 되도록. [5] 돌맹이 2010.10.28 5619
6410 <img src=2.gif>alv에서 필드명은 가운데정렬하고 아래의 데이터는 오른쪽정렬로 하려면 어떻게해야하나요. [4] 마늘맛쿨피스 2010.08.11 5615
6409 RAISING exception 궁금. [3] 아밥퍼 2007.05.23 5582
6408 null 값 체크 [6] 강진규 2007.05.22 5572