DATA : it_t001l LIKE t001l OCCURS 0 WITH HEADER LINE.
DATA : BEGIN OF itab OCCURS 0,
werks TYPE werks_d,
lgort TYPE lgort_d,
lgobe TYPE lgobe,
matnr TYPE matnr,
END OF itab.
** 전, 늘 이렇게 써 왔는데요 ==> 이렇게 쓰지 말고.............................................
** LOOP AT it_t001l.
** itab-lgobe = it_t001l-lgobe.
** MODIFY itab TRANSPORTING lgobe WHERE werks = it_t001l-werks
** AND lgort = it_t001l-lgort.
** ENDLOOP.
** 이렇게 써야해요..............................................
CLEAR itab[].
SELECT * FROM mard INTO CORRESPONDING FIELDS OF TABLE itab
CLEAR it_t001l[].
SELECT * INTO TABLE it_t001l FROM t001l CLIENT SPECIFIED
WHERE mandt = sy-mandt.
SORT itab BY werks lgort.
SORT it_t001l BY werks lgort.
LOOP AT it_t001l.
READ TABLE itab WITH KEY werks = it_t001l-werks
lgort = it_t001l-lgort
BINARY SEARCH.
CHECK sy-subrc IS INITIAL.
LOOP AT itab FROM sy-tabix.
IF itab-werks <> it_t001l-werks OR
itab-lgort <> it_t001l-lgort.
EXIT.
ENDIF.
itab-lgobe = it_t001l-lgobe.
MODIFY itab.
ENDLOOP.
ENDLOOP.
* BINARY SEARCH 하실땐 반드시 SORT 부터 하시구요....
댓글 6
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
167 | ABAP TIP [4] | 둘리67 | 2007.10.03 | 5994 |
166 | 너무도 당연해서 가끔 잊곤하는 공기와 같은 존재 'F1' key [5] | 백혜정 | 2007.09.19 | 4078 |
165 | AT 구문에 대한 설명입니다. [6] | 김창훈 | 2007.08.16 | 5787 |
164 | 제가 모은 팁들입니다. [62] | 풍운사랑 | 2007.09.07 | 5590 |
163 | OK Code Values... 흠,,, [1] | 김창훈 | 2007.08.31 | 4694 |
162 | Image를 화면에 보여주는 방법 [1] | 정두영 | 2007.08.30 | 6165 |
161 | 테이블 update 프로그램 [4] | sapjoy | 2007.08.29 | 4803 |
160 | System field 정리한 내용이에요 [4] | 김창훈 | 2007.08.21 | 5523 |
159 | 조회조건 동적으로 보이기 [5] | 신종철™ | 2007.08.20 | 4835 |
158 | 스페이스를 2자리로 먹을때 1자리로 먹게 바꾸기 [1] | 신종철™ | 2007.08.20 | 3998 |
157 | ABAP 문법 2nd [8] | 아일락 | 2007.08.20 | 3955 |
156 | ABAP 문법 1st [13] | 아일락 | 2007.08.20 | 4593 |
155 | 엑셀 65000 라인초과시 사용 유틸 [5] | GG | 2007.08.19 | 5335 |
154 | 플랜트로 회사코드와 기준통화 찾기 [8] | 김창훈 | 2007.08.16 | 5649 |
153 | 속도개선하기....INDEX를 이렇게도 쓰네용~~ [9] | 김창훈 | 2007.08.14 | 5422 |
» | 텍스트반영시(자재명,저장위치명 기타등등) 속도개선 방법 [6] | 김창훈 | 2007.08.14 | 6045 |
151 | ALV 중간 집계 하기 [3] | 신종철 | 2007.08.10 | 4825 |
150 | 4.6에서 ALV 필드 변경 안될때 버퍼 지우는 방법 | 신종철 | 2007.08.10 | 4802 |
149 | ABAP System Fields | 홍성현 | 2007.08.09 | 3932 |
148 | SAP Icon 출력 [3] | 홍성현 | 2007.08.09 | 6603 |