L_TO_CREATE_TR - TR 로 TO 생성 (예제 코드 포함)

안녕하세요 파피킴입니다.

오늘은 TR 을 이용하여 TO 를 생성하는 펑션을 가지고 왔습니다.

티코드로는 LT04 이죠~

DATA : lt_trite        TYPE l03b_trite_t WITH HEADER LINE,
             lv_tanum   TYPE ltak-tanum,
             lt_ltak         TYPE TABLE OF ltak_vb WITH HEADER LINE,
             lt_ltap_vb   TYPE TABLE OF ltap_vb WITH HEADER LINE.

lt_trite-tbpos = '1'.              " TR 품목 번호
lt_trite-anfme = '1'.             " 수량
lt_trite-altme = 'EA'.           " 단위
lt_trite-vltyp = '저장 유형'.  " 원시 저장 유형
lt_trite-vlpla = '저장 빈'.      " 원시 빈
lt_trite-vlenr = '저장 단위'.  " 원시 저장 단위
lt_trite-nltyp = '저장 유형'.  " 목적 저장 유형
lt_trite-nlpla = '저장 빈'.      " 목적 빈
lt_trite-nlenr = '저장 단위'.  " 목적 저장 단위
APPEND lt_trite.

CALL FUNCTION 'L_TO_CREATE_TR'
    EXPORTING
        i_lgnum                         = '창고 번호'         " 창고 번호
        i_tbnum                         = 'TR 번호'  " TR 번호
        i_squit                           = ' '           " 즉시 확정
        it_trite                            = lt_trite[]
    IMPORTING
        e_tanum                         = lv_tanum
    TABLES
        t_ltak                               = lt_ltak
        t_ltap_vb                         = lt_ltap_vb
    EXCEPTIONS
        foreign_lock                               = 1
        qm_relevant                               = 2
        tr_completed                              = 3
        xfeld_wrong                                = 4
        ldest_wrong                                = 5
        drukz_wrong                               = 6
        tr_wrong                                      = 7
        squit_forbidden                          = 8
        no_to_created                             = 9
        update_without_commit            = 10
        no_authority                                = 11
        preallocated_stock                     = 12
        partial_transfer_req_forbidden = 13
        input_error                                   = 14
        OTHERS                                       = 15.

IF sy-subrc IS INITIAL.
    MESSAGE s000 WITH 'SUCCESS' lv_tanum.
ELSE.
    MESSAGE ID sy-msgid TYPE 'S' NUMBER sy-msgno
                       WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4
                       DISPLAY LIKE 'E'.
ENDIF.

 

위 코드는 미확정 TO 를 생성하고 있습니다.

함수의 파라미터 i_squit 에 ' ' 빈 값이 아닌 'X' 값을 준다면 TO 가 확정된 상태로 생성이 된답니다.

혹시 질문이 있으시다면 댓글 부탁드립니다~

이상 샙가능의 파피킴이었습니다.