2017년 5월 24일 수요일

[ABAP] 프로그램간의 테이블 전달

1. 호출 하는 프로그램

  SUBMIT ZSD003 USING SELECTION-SCREEN '1000'
  WITH S_ERDAT IN S_ERDAT
  ....   <-- 전달할 Select-options 값
  AND RETURN.

  CLEAR GT_ZPP003GT_ZPP003[].     <-- 전달 받을 테이블 초기화
  "전달받을메모리 변수에서 내부 테이블로 전달
  IMPORT GT_ZPP003 FROM MEMORY ID 'ZPP003'.
  FREE MEMORY ID 'ZPP003'.            <-- 메모리 변수 초기화

2. 호출 받는 프로그램
  CLEAR GS_ZPP003GT_ZPP003[].
  "프로그램 실행 결과를 넘겨줄 프로그램과 동일한 구조를 가지는 테이블로 결과 입력
  LOOP AT GT_DATA.                   
    CLEAR GS_ZPP003.
    MOVE-CORRESPONDING GT_DATA TO GS_ZPP003.
    APPEND GS_ZPP003 TO GT_ZPP003.
  ENDLOOP.
  EXPORT GT_ZPP003 TO MEMORY ID 'ZPP003'.

댓글 없음:

댓글 쓰기