메뉴 건너뛰기

SAP 한국 커뮤니티

두개의 cbo테이블에서 모든 필드를 가져와서 화면 상,하로 나누어서


보여주는 alv를 작성했습니다.


 


출력까지는 되는데 칼럼마다 정리를 좀 하려 하니


필드수가 4~50개가 되다보니 하나씩 만들기도 힘들고해서..


 


 교재 소스참고해서 구조를 기본으로 부분 편집하는부분을 해봤는데


 


아래 소스대로 실행하면 필드 카탈로그를 찾을수 없다는 오류가 발생합니다.


 


어디가 문제가 있는지 잘모르겠습니다.. 지적좀 부탁드리겠습니다..


 


*&---------------------------------------------------------------------*
* intenel table
*&---------------------------------------------------------------------*
DATA : it_zmmpr TYPE TABLE OF zmmpr001.
DATA : it_zep   TYPE TABLE OF zep_single_log.
DATA : gt_zmmpr TYPE TABLE OF zmmpr001 WITH HEADER LINE.
DATA : gt_zep   TYPE TABLE OF zep_single_log WITH HEADER LINE.
*&---------------------------------------------------------------------*
* Alv variants
*&---------------------------------------------------------------------*
DATA : g_grid   TYPE REF TO cl_gui_alv_grid,
          g_grid2  TYPE REF TO cl_gui_alv_grid.
DATA : con1_ref TYPE REF TO cl_gui_custom_container,
       con2_ref TYPE REF TO cl_gui_custom_container.
DATA : zmmpr_cat TYPE lvc_t_fcat,
       zep_cat   TYPE lvc_t_fcat.
DATA : gs_layout TYPE lvc_s_layo.
DATA : gt_fieldcat TYPE lvc_s_fcat OCCURS 0 WITH HEADER LINE,
       ls_fieldcat TYPE lvc_s_fcat.
*&---------------------------------------------------------------------*
*&      Form  data_display
*&---------------------------------------------------------------------*
FORM data_display .
  PERFORM setting_layout USING gs_layout.
  PERFORM setting_catalog.
  PERFORM getting_catalog.
  CALL SCREEN 100.
ENDFORM.                    " data_display
*&---------------------------------------------------------------------*
*&      Module  init_con1  OUTPUT
*&---------------------------------------------------------------------*
MODULE init_con1 OUTPUT.
  IF con1_ref IS INITIAL.
    CREATE OBJECT con1_ref
       EXPORTING
       container_name = 'CON1'.


    CREATE OBJECT g_grid
       EXPORTING
       i_parent = con1_ref.


    CALL METHOD g_grid->set_table_for_first_display
      EXPORTING
*        i_structure_name = 'ZMMPR001'
        is_layout        = gs_layout
      CHANGING
        it_fieldcatalog  = gt_fieldcat[]
        it_outtab        = gt_zmmpr[].
  ENDIF.
ENDMODULE.                 " init_con1  OUTPUT
*&---------------------------------------------------------------------*
*&      Module  init_con2  OUTPUT
*&---------------------------------------------------------------------*
MODULE init_con2 OUTPUT.
  IF con2_ref IS INITIAL.
    CREATE OBJECT con2_ref
       EXPORTING
       container_name = 'CON2'.


    CREATE OBJECT g_grid2
       EXPORTING
       i_parent = con2_ref.


    CALL METHOD g_grid2->set_table_for_first_display
      EXPORTING
*        i_structure_name = 'ZEP_SINGLE_LOG'
        is_layout        = gs_layout
      CHANGING
        it_fieldcatalog  = gt_fieldcat[]
        it_outtab        = gt_zep[].
  ENDIF.
ENDMODULE.                 " init_con2  OUTPUT
*&---------------------------------------------------------------------*
*&      Form  setting_catalog
*&---------------------------------------------------------------------*
FORM setting_catalog .
  ls_fieldcat-fieldname = 'SINGLEPK'.
  ls_fieldcat-coltext   = 'Single PK'.
  ls_fieldcat-just      = 'C'.
  ls_fieldcat-just      = 'X'.
  APPEND ls_fieldcat TO gt_fieldcat.


  ls_fieldcat-fieldname = 'ZYEAR'.
  ls_fieldcat-coltext   = '발생년도'.
  ls_fieldcat-just      = 'C'.
  APPEND ls_fieldcat TO gt_fieldcat.
*
*  ls_fieldcat-fieldname = 'ZGROUP'.
*  ls_fieldcat-coltext   = '모듈구분자'.
*  ls_fieldcat-just      = 'C'.
*  APPEND ls_fieldcat TO gt_fieldcat.
*
*  ls_fieldcat-fieldname = 'EPPK'.
*  ls_fieldcat-coltext   = 'EP PK'.
*  ls_fieldcat-just      = 'C'.
*  APPEND ls_fieldcat TO gt_fieldcat.
*
*  ls_fieldcat-fieldname = 'ZMOD'.
*  ls_fieldcat-coltext   = '서브모듈'.
*  ls_fieldcat-just      = 'C'.
*  APPEND ls_fieldcat TO gt_fieldcat.
ENDFORM.                    " setting_catalog
*&---------------------------------------------------------------------*
*&      Form  getting_catalog
*&---------------------------------------------------------------------*
FORM getting_catalog .
  DATA : lt_fieldcat TYPE kkblo_t_fieldcat.


  CALL FUNCTION 'K_KKB_FIELDCAT_MERGE'
    EXPORTING
      i_tabname   = 'GT_ZEP'
    CHANGING
      ct_fieldcat = lt_fieldcat[].


  IF sy-subrc EQ 0.
    CALL FUNCTION 'LVC_TRANSFER_FROM_KKBLO'
      EXPORTING
        it_fieldcat_kkblo = lt_fieldcat[]
      IMPORTING
        et_fieldcat_lvc   = gt_fieldcat[].
  ENDIF.
ENDFORM.                    " getting_catalog

번호 제목 글쓴이 날짜 조회 수
3227 [요청]LEAVE TO LIST-PROCESSING. 관련 된거요 [2] 아바퍼 2009.02.18 8211
3226 <b>[완료]</b>생초보 질문 죄송합니다. 다들 조금은 하시는 질문들인데.. 전 ㅜㅜ;; [10] 생짜초보 2009.02.18 1218
3225 [요청]스플릿을 했는데 바가 안움직입니다. 왜 안되는지 모르겠네요 처서련 2009.02.17 1298
3224 [요청]간단한 변수 사용법에 관한 질문입니다. 도와주십시요 [2] 아바퍼 2009.02.17 1045
3223 [요청]펑션에 대해 질문 드리겠습니다. [1] Giant 2009.02.10 1028
3222 <b>[완료]</b>다이내믹 도큐먼트 관련 문의사항입니다 [1] 처서련 2009.02.17 1144
3221 [요청]long text 컬럼이 포함된 엑셀파일 업로드가 가능합니까? 노력&성장 2009.02.17 1668
3220 <b>[완료]</b>[re] long text 컬럼이 포함된 엑셀파일 업로드가 가능합니까? storyroom.net™ 2009.02.17 1286
3219 [요청]스마트폼 FORMATTING_ERROR 질문있습니다. dndb 2009.02.17 1827
3218 [요청]백그라운드 JOB에서 BDC 수행 질문입니다. file 아스라다 2009.02.16 1166
3217 <b>[완료]</b>파시블 엔트리에서 질문있습니다. [2] file 카츠 2009.02.16 1372
3216 <b>[완료]</b>클래스 어렵네요 ㅡㅡ 질문드립니다 도와주세요 [5] 아이쿠! 2009.02.16 1493
3215 <b>[완료]</b>LDB프로그램에 수정을 하려면 어떻게 하나요? [1] 하오 2009.02.16 1558
3214 [요청]Write 에서 입력 수정 가능하게 어떻게 하시는지요? [2] Zking 2009.02.16 1162
3213 [요청]구매요청 스탠다드에서 첨부파일 assign하는데 그 어사인된 파일 전송 ? [1] 풍운사랑 2009.02.16 1898
3212 [요청]SAP 에서 MS-SQL 접속... dbmssslib.dll [2] 도련님 2009.02.16 1472
3211 <b>[완료]</b>SELECT-OPTIONS에서 Start date와 End date의 날짜와 시간이 따라 적용되는 문제의 해결방법 [11] 째마니 2009.02.16 2291
3210 <b>[완료]</b>CHAR로 정의된 필드값에서 조건을 원하는 자리수 만 가져오는 방법 있을까요? [3] 박하사탕 2009.02.16 1341
3209 [요청]abap 프로그램 짠 소스코드를 export 할수 있나요? [4] mhkang 2009.02.14 2059
3208 [요청]덤프문제에 관해 질문을 드립니다. file 로미오 2009.02.13 1320