아시는 분도 계시겠지만 모르시는 분을 위해 올립니다.
FI에서 전표번호 더블클릭시 (전표번호 + 라인아이템) 해당 라인 아이템으로 Direct가는 쏘스 입니다.
현업에서 이렇게 해달라구 해써 짜증내다가 함 찾아보았습니다.
REPORT YMS02.
TABLES: BKPF, BSEG.
DATA: LINE LIKE SY-TABIX,
TCODE LIKE SY-TCODE VALUE 'FB03'.
PARAMETERS: P_BUKRS LIKE BKPF-BUKRS,
P_BELNR LIKE BKPF-BELNR,
P_GJAHR LIKE BKPF-GJAHR,
P_BUZEI LIKE BSEG-BUZEI.
data : begin of buztab occurs 30,
bukrs like bseg-bukrs,
belnr like bseg-belnr,
gjahr like bseg-gjahr,
buzei like bseg-buzei,
flaen(1) type c, " X = Posten geaendert
end of buztab.
BUZTAB-BUKRS = P_BUKRS.
BUZTAB-BELNR = P_BELNR.
BUZTAB-GJAHR = P_GJAHR.
BUZTAB-BUZEI = P_BUZEI.
BUZTAB-FLAEN = 'X'.
APPEND BUZTAB.
call dialog 'RF_ZEILEN_ANZEIGE'
exporting
buztab " Line Item List
line " Total Line Count
tcode " Transaction code - FB03
x_nochange from 'X'.
FI에서 전표번호 더블클릭시 (전표번호 + 라인아이템) 해당 라인 아이템으로 Direct가는 쏘스 입니다.
현업에서 이렇게 해달라구 해써 짜증내다가 함 찾아보았습니다.
REPORT YMS02.
TABLES: BKPF, BSEG.
DATA: LINE LIKE SY-TABIX,
TCODE LIKE SY-TCODE VALUE 'FB03'.
PARAMETERS: P_BUKRS LIKE BKPF-BUKRS,
P_BELNR LIKE BKPF-BELNR,
P_GJAHR LIKE BKPF-GJAHR,
P_BUZEI LIKE BSEG-BUZEI.
data : begin of buztab occurs 30,
bukrs like bseg-bukrs,
belnr like bseg-belnr,
gjahr like bseg-gjahr,
buzei like bseg-buzei,
flaen(1) type c, " X = Posten geaendert
end of buztab.
BUZTAB-BUKRS = P_BUKRS.
BUZTAB-BELNR = P_BELNR.
BUZTAB-GJAHR = P_GJAHR.
BUZTAB-BUZEI = P_BUZEI.
BUZTAB-FLAEN = 'X'.
APPEND BUZTAB.
call dialog 'RF_ZEILEN_ANZEIGE'
exporting
buztab " Line Item List
line " Total Line Count
tcode " Transaction code - FB03
x_nochange from 'X'.