Hi All,
help me please...
i dont know y this report cannot view the longtext description..
mayb wrong at area select single...
pls help me...
i want display smvanart and snunr from table vimimv and vimi01 with long text from as xmbez at table tiv2G and tiv0A...
thanks all..
TABLES: VIMIMV,
TIV2G,
TIV0A,
VIMI01.
DATA: BEGIN OF ITAB OCCURS 0,
BUKRS LIKE VIMIMV-BUKRS,
SMIVE LIKE VIMIMV-SMIVE,
DMIBEG LIKE VIMIMV-DMIBEG,
DMIEND LIKE VIMIMV-DMIEND,
SMVANART LIKE VIMIMV-SMVANART,
SWENR LIKE VIMIMV-SWENR,
SMENR LIKE VIMIMV-SMENR,
KUNNR LIKE VIMIMV-KUNNR,
SNUNR LIKE VIMI01-SNUNR,
xmbez LIKE TIV2G-xmbez,
END OF ITAB.
data: count type i.
data: bil type count.
data: w_smvanart like tiv2G-xmbez.
data: w_snunr like TIV0A-xmbez.
START-OF-SELECTION.
select vimi01swenr vimimvbukrs vimimvsmive vimimvdmibeg vimimvdmiend vimimvsmvanart vimimv~swenr
vimimvkunnr vimimvsmenr vimi01snunr vimi01smenr into corresponding fields of table itab from
( vimi01 inner join vimimv on vimi01swenr = vimimvswenr ).
write:/10(45) 'LEASE OUT DETAILS REPORT'. "title report
Loop at ITAB.
SELECT single xmbez into w_smvanart FROM tiv2G where xmbez = itab-smvanart .
itab-smvanart = w_smvanart.
Select single xmbez into w_snunr from TIV0A where xmbez = itab-snunr.
itab-snunr = w_snunr.
modify itab.
clear: w_smvanart,w_snunr.
ENDLOOP.
write:/10 sy-uline(254). "sy-Uline creates a horizontal line
write:/10 sy-vline, "sy-vline creates a vertical line
(3) 'BIL' COLOR COL_HEADING, sy-vline, "COLOR changes background colour
(8) 'CUSTOMER' COLOR COL_HEADING, sy-vline,
(18) 'LO #' COLOR COL_HEADING, sy-vline,
(10)'RENTAL BEGIN' COLOR COL_HEADING, sy-vline,
(10) 'RENTAL END' COLOR COL_HEADING, sy-vline,
(18) 'ADJ TYPE' COLOR COL_HEADING, sy-vline,
(18) 'USAGE TYPE' COLOR COL_HEADING, sy-vline.
write:/10 sy-uline(254).
count = 0.
LOOP AT ITAB.
count = count + 1.
write:/10 sy-vline,
(3)count,sy-vline,
(8)ITAB-KUNNR,sy-vline,
(18)ITAB-SMIVE,sy-vline,
(10)ITAB-DMIBEG,sy-vline,
(10)ITAB-DMIEND,sy-vline,
(18)ITAB-SMVANART,sy-vline,
(18)ITAB-SNUNR,sy-vline.
ENDLOOP.
Bluesky
