facing problem in getting data in different field
hi,
i have made a report in ALV format. n the whole code is this..
TABLES: VBAK,vbap.
type-pools: slis. "ALV Declarations
SELECT-OPTIONS:
s_sales for vbak-kunnr obligatory,
s_date for VBAK-audat obligatory.
*Data Declaration
*----
types: begin of s_sales,
kunnr like vbak-kunnr,
ernam like VBRP-ernam,
audat like VBAK-audat,
aufnr like VBAK-aufnr,
KBMENG like vbap-KWMENG,
matnr like vbap-matnr,
matwa like vbap-matkl,
end of s_sales.
DATA: IT_VBAKUK TYPE STANDARD TABLE OF s_sales INITIAL SIZE 0,
WA_sales TYPE s_sales.
*ALV data declarations.
data: fieldcatalog type slis_t_fieldcat_alv with header line,
gd_tab_group type slis_t_sp_group_alv,
gd_layout type slis_layout_alv,
gd_repid like sy-repid.
**************************************************************************
*start-of-selection.
START-OF-SELECTION.
perform data_retrieval.
perform build_fieldcatalog.
perform build_layout.
perform display_alv_report.
&----
*& Form build_fieldcatalog
&----
text
----
form build_fieldcatalog.
fieldcatalog-fieldname = 'KUNNR'.
fieldcatalog-seltext_m = 'Customer Code'.
fieldcatalog-col_pos = 1.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
fieldcatalog-fieldname = 'ernam'.
fieldcatalog-seltext_m = 'Customer Name'.
fieldcatalog-col_pos = 2.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
fieldcatalog-fieldname = 'stadat'.
fieldcatalog-seltext_m = 'Order Date'.
fieldcatalog-col_pos = 3.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
fieldcatalog-fieldname = 'aufnr'.
fieldcatalog-seltext_m = 'Order No'.
fieldcatalog-col_pos = 4.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
fieldcatalog-fieldname = 'KWMENG'.
fieldcatalog-seltext_m = 'Quantity'.
fieldcatalog-col_pos = 5.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
fieldcatalog-fieldname = 'matnr'.
fieldcatalog-seltext_m = 'Material Code'.
fieldcatalog-col_pos = 6.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
fieldcatalog-fieldname = 'matkl'.
fieldcatalog-seltext_m = 'Material Description'.
fieldcatalog-col_pos = 7.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
endform. "build_fieldcatalog
&----
*& Form build_layout
&----
text
----
form build_layout.
gd_layout-no_input = 'X'.
gd_layout-colwidth_optimize = 'X'.
endform. "build_layout
&----
*& Form display_alv_report
&----
text
----
form display_alv_report.
gd_repid = sy-repid.
call function 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
i_callback_program = gd_repid
is_layout = gd_layout
it_fieldcat = fieldcatalog[]
i_save = 'X'
TABLES
t_outtab = IT_VBAKUK
EXCEPTIONS
program_error = 1
others = 2.
if sy-subrc <> 0.
endif.
endform. " DISPLAY_ALV_REPORT
&----
*& Form data_retrieval
&----
text
----
form data_retrieval.
select vbakkunnr VBakernam VBAkaudat vbakaufnr vbapKWMENG vbapmatnr vbap~matkl
up to 10 rows
from vbak inner join vbap on vbakvbeln = vbapvbeln
into table IT_VBAKUK.
endform. "data_retrieval
When a execute this query it get this result:
Customer code Customer No. Order Date *Order No. * *Quantity * Material code Material Description
0000001390 0000001390 0000001390 0000001390 0000001390 0000001390 0000001390
0000001175 0000001175 0000001175 0000001175 0000001175 0000001175 0000001175
0000001175 0000001175 0000001175 0000001175 0000001175 0000001175 0000001175
0000001175 0000001175 0000001175 0000001175 0000001175 0000001175 0000001175
0000001175 0000001175 0000001175 0000001175 0000001175 0000001175 0000001175
0000001001 0000001001 0000001001 0000001001 0000001001 0000001001 0000001001
0000002200 0000002200 0000002200 0000002200 0000002200 0000002200 0000002200
0000002200 0000002200 0000002200 0000002200 0000002200 0000002200 0000002200
0000002200 0000002200 0000002200 0000002200 0000002200 0000002200 0000002200
0000002200 0000002200 0000002200 0000002200 0000002200 0000002200 0000002200
You can see in all column data is repeating even tough i have given different field name...
Kindly give me solution of this problem.
Thanks n Regards.
Vikranth Reddy replied
Please debug your code and post only the relevant portions of the code where you are facing problem
Former Member replied
Hi ,
maintain the all the field names and table names in capital letters.
thanks
Guest replied
hi,
i have these field:
*select VBAK~KUNNR VBAK~ERNAM VBAK~AUDAT VBAK~AUFNR VBAP~KWMENG VBAP~MATNR VBAP~MATKL
up to 10 rows
from VBAK inner join VBAP on VBAK~VBELN = VBAP~VBELN
into table IT_VBAKUK.
endform.*
I want to add these field in my parameter by using WHERE clause but don't know how to restrict these field using where clause.
Kindly give me some example related to this.
Regards
Former Member replied
Hi,
If you want to restrict the values using where clause use the syntax below.
select VBAKKUNNR VBAKERNAM VBAKAUDAT VBAKAUFNR VBAPKWMENG VBAPMATNR VBAP~MATKL
up to 10 rows
from VBAK inner join VBAP on VBAKVBELN = VBAPVBELN
into table IT_VBAKUK
Where VBAK~KUNNR = P_KUNNR and
VBAK~AUFNR = P_AUFNR. Like that you can restrict the values.
Matthew Billingham repliedThese forums don't exist to teach you how to program. Thread locked.