user command 에서 결과화면에 나온 예를 들어 자재코드를 더블클릭하면 콜트랜잭션하는 이벤튼데 ..
거기서 더블클릭한 자재코드가 안들어가고 무조건 마지막 라인값이 들어가 있습니다.
왜그런건가여 ~
->>소스 <<-
CASE P_UCOMM.
WHEN 'PICK'.
CHECK P_SELFIELD-VALUE IS NOT INITIAL.
IF P_SELFIELD-FIELDNAME = 'BANFN'.
SET PARAMETER ID 'BAN' FIELD IT_DATA-BANFN.
CALL TRANSACTION 'ME53N' AND SKIP FIRST SCREEN.
ELSEIF P_SELFIELD-FIELDNAME = 'MATNR'.
SET PARAMETER ID 'MAT' FIELD IT_DATA-MATNR.
SET PARAMETER ID 'WRK' FIELD IT_DATA-WERKS.
CALL TRANSACTION'MD04' AND SKIP FIRST SCREEN.
ELSEIF P_SELFIELD-FIELDNAME = 'LABST' .
SET PARAMETER ID 'MAT' FIELD IT_DATA-MATNR.
SET PARAMETER ID 'WRK' FIELD IT_DATA-WERKS.
CALL TRANSACTION 'MMBE' AND SKIP FIRST SCREEN.
ENDIF.
ENDCASE.
댓글 3
-
엉큼고냥이
2008.06.19 19:49
-
엉큼고냥이
2008.06.19 20:05
모듈풀프로그램이시면...
스크린 PAI에 모듈추가하시고
EX)
module get_cursor_field.
field-symbols: <fs>. "필드심볼선언하시구요
data : w_fname(40), "커서가 놓인 필드이름
w_line like sy-tabix,
module get_cursor_field input.
clear: w_fname, w_line.
get cursor field w_fname line w_line.
assign w_fname to <fs>.
endmodule. " get_cursor_field INPUT
-
랑랑이
2008.06.19 20:35
해결됐습니다 ㅎㅎ 감사합니다~ ㅎㅎ
현재 라인값을 읽는게 빠진거 같네요^^
ex) read table it_data index rs_selfield-tabindex.