10-16-2008 6:41 AM
Dear Expert,
I have made this line rejection report, I am facing one problem in my report in final table(lt_final) where ANZFEHLER = 1. it is not showing data during f8, where as if i ANZFEHLER = 2 then it shows data, Can u plz guide me where is the problem........
Sending my report also........
&----
*& Report ZQI_LINEREJECTION
*&
&----
*&
*& Changed by Shelly Malik, Dated : 3 oct, 2008
&----
REPORT zqi_linerejection.
TYPE-POOLS:slis.
TYPES: BEGIN OF tw_mara,
matnr TYPE matnr,
meins TYPE meins,
END OF tw_mara.
TYPES: BEGIN OF tw_qmel,
qmnum TYPE qmnum,"Notification No
qmtxt TYPE qmtxt,"Short Text
erdat TYPE erdat,
matnr TYPE matnr,
prueflos TYPE qplos,"Inspection Lot Number
END OF tw_qmel.
TYPES: BEGIN OF tw_mard,
lgort TYPE lgort_d,
matnr TYPE matnr,
END OF tw_mard.
DATA: lt_mard TYPE TABLE OF tw_mard,
lw_mard TYPE tw_mard..
DATA: lf_ven TYPE lifnr,
lf_name TYPE name1_gp.
TYPES: BEGIN OF tw_qmfe,
qmnum TYPE qmnum,"Notification No
fenum TYPE felfd,"Item Number in Item Record
fetxt TYPE fetxt,"Notification Item Short Text
fegrp TYPE fegrp,"Code Group - Problem
fecod TYPE fecod,"Problem or Damage Code
"fecod TYPE fecod, "Problem or Damage Code
anzfehler TYPE qanzfehl4,"Number of Defects Found
END OF tw_qmfe.
TYPES: BEGIN OF tw_qpct,
codegruppe TYPE qcodegrp, "Code Group
code TYPE qcode, "Code
kurztext TYPE qtxt_code,
END OF tw_qpct.
TYPES: BEGIN OF tw_final,
erdat TYPE erdat,
lgort TYPE lgort_d,
prueflos TYPE qplos,
qmnum TYPE qmnum,
matnr TYPE matnr,
maktx TYPE maktx,
anzfehler TYPE qanzfehl4,"Number of Defects Found
codegruppe TYPE qcodegrp, "Code Group
kurztext TYPE kurztext,
fetxt TYPE fetxt,
lifnr TYPE lifnr,
name1 TYPE name1_gp,
box,
END OF tw_final.
DATA:lf_matn TYPE matnr,
lf_maktx TYPE maktx,
lf_mtart TYPE mtart,
lf_budat TYPE budat,
lt_mara TYPE TABLE OF tw_mara,
lw_mara TYPE tw_mara,
*lt_qals TYPE TABLE OF tw_qals,
*lw_qals TYPE tw_qals,
lt_qmel TYPE TABLE OF tw_qmel,
lw_qmel TYPE tw_qmel,
lt_qmfe TYPE TABLE OF tw_qmfe,
lw_qmfe TYPE tw_qmfe,
lt_final TYPE TABLE OF tw_final,
lw_final TYPE tw_final,
lt_qpct TYPE TABLE OF tw_qpct,
lw_qpct TYPE tw_qpct.
Alv Parameters*********************
DATA: lw_field TYPE slis_fieldcat_alv,
lt_field TYPE TABLE OF slis_fieldcat_alv,
lw_layo TYPE slis_layout_alv,
lf_rep TYPE sy-repid.
***************************************************
************Added by shelly Malik*******************
DATA : gd_tab_group TYPE slis_t_sp_group_alv,
gd_repid LIKE sy-repid,
gt_events TYPE slis_t_event,
gd_prntparams TYPE slis_print_alv.
**********************************************************
DATA : lf_lgort TYPE lgort_d,
lf_lifnr TYPE lifnr.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-000.
PARAMETERS: pa_werks TYPE werks_d OBLIGATORY,
pa_lgort TYPE lgort_d MATCHCODE OBJECT zlgort OBLIGATORY.
SELECT-OPTIONS: so_matnr FOR lf_matn," OBLIGATORY,
so_budat FOR lf_budat DEFAULT '20080908'," OBLIGATORY,
so_mtart FOR lf_mtart,
so_lifnr FOR lf_lifnr.
" so_lgort FOR lf_lgort." OBLIGATORY.
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-001.
PARAMETERS : p1_but RADIOBUTTON GROUP g1 DEFAULT 'X',
p2_but RADIOBUTTON GROUP g1.
SELECTION-SCREEN END OF BLOCK b2.
INITIALIZATION.
so_mtart-low = 'FERT'.
so_mtart-high = 'ZBOP'.
so_mtart-sign = 'I'.
so_mtart-option = 'BT'.
APPEND so_mtart.
*******Added by shelly Malik************
AT SELECTION-SCREEN.
IF pa_werks = 'RILL'.
*IF so_budat-low LT '20080908'.
*MESSAGE 'Posting Date should be start from 08/09/2008 Please write 08/09/2008 to any date'
TYPE 'E'.
*ENDIF.
ENDIF.
START-OF-SELECTION.
PERFORM radiobutton-selection.
lf_rep = sy-repid.
PERFORM build_feildcat.
***********************************************************
PERFORM build_layout.
PERFORM build_events.
PERFORM build_print_params.
PERFORM display_final.
&----
*& Form FETCH_MARA
&----
text
----
--> p1 text
<-- p2 text
----
FORM fetch_mara .
SELECT matnr
meins FROM mara INTO TABLE lt_mara WHERE matnr IN so_matnr AND
mtart IN so_mtart.
ENDFORM. " FETCH_MARA
&----
*& Form FETCH_QMEL
&----
text
----
--> p1 text
<-- p2 text
----
FORM fetch_qmel .
SORT lt_mard BY matnr.
IF lt_mard IS NOT INITIAL.
SELECT qmnum
qmtxt
erdat
matnr
prueflos
FROM qmel INTO TABLE lt_qmel FOR ALL ENTRIES IN lt_mard
WHERE erdat IN so_budat
AND matnr EQ lt_mard-matnr.
" AND mawerk EQ pa_werks . "erdat IN so_budat .
ENDIF.
IF sy-subrc EQ 0.
SORT lt_qmel.
SELECT qmnum
fenum
fetxt
fegrp
fecod
anzfehler FROM qmfe INTO TABLE lt_qmfe FOR ALL ENTRIES IN lt_qmel
WHERE qmnum EQ lt_qmel-qmnum.
ENDIF.
ENDFORM. " FETCH_QMEL
&----
*& Form FETCH_QTXT_CODE
&----
text
----
--> p1 text
<-- p2 text
----
FORM fetch_qtxt_code .
IF lt_qmfe IS NOT INITIAL.
SORT lt_qmfe.
SELECT codegruppe
code
kurztext FROM qpct INTO TABLE lt_qpct FOR ALL ENTRIES IN lt_qmfe WHERE
codegruppe EQ lt_qmfe-fegrp
AND code
EQ lt_qmfe-fecod
AND sprache EQ 'EN'.
ENDIF.
ENDFORM. " FETCH_QTXT_CODE
&----
*& Form FILL_FINAL
&----
text
----
--> p1 text
<-- p2 text
----
FORM fill_final .
*LOOP AT lt_qals INTO lw_qals.
LOOP AT lt_qmel INTO lw_qmel.
*READ TABLE lt_qmel INTO lw_qmel WITH KEY prueflos = lw_qals-prueflos.
*IF sy-subrc EQ 0.
LOOP AT lt_qmfe INTO lw_qmfe WHERE qmnum = lw_qmel-qmnum.
READ TABLE lt_qpct INTO lw_qpct WITH KEY codegruppe = lw_qmfe-fegrp
code = lw_qmfe-fecod.
IF sy-subrc EQ 0.
*READ TABLE lt_qpct INTO lw_qpct WITH KEY codegruppe = lw_qmfe-fegrp
code = lw_qmfe-fecod.
IF sy-subrc EQ 0. .
SELECT SINGLE maktx FROM makt INTO lf_maktx WHERE matnr EQ lw_qmel-matnr.
IF sy-subrc EQ 0.
SELECT SINGLE lgort FROM mard INTO lf_lgort WHERE matnr EQ lw_qmel-matnr
AND werks EQ pa_werks
AND lgort EQ pa_lgort .
MOVE : lw_qmel-matnr TO lw_final-matnr,
lw_qmel-prueflos TO lw_final-prueflos,
lw_qmel-qmnum TO lw_final-qmnum,
lw_qmel-erdat TO lw_final-erdat,
lf_maktx TO lw_final-maktx,
lf_lgort TO lw_final-lgort,
lw_qmfe-anzfehler TO lw_final-anzfehler,
lw_qmfe-fetxt TO lw_final-fetxt,
lw_qpct-kurztext TO lw_final-kurztext,
lw_qpct-codegruppe TO lw_final-codegruppe .
SELECT SINGLE lifnum FROM viqmel INTO lf_ven WHERE qmnum EQ lw_qmel-qmnum
AND lifnum IN so_lifnr.
IF sy-subrc EQ 0.
SELECT SINGLE name1 FROM lfa1 INTO lf_name WHERE lifnr EQ lf_ven.
IF sy-subrc EQ 0.
lw_final-lifnr = lf_ven.
lw_final-name1 = lf_name.
ENDIF.
ENDIF.
APPEND lw_final TO lt_final.
CLEAR: lw_final,lw_qmfe,lf_maktx,
lw_qpct.
*ENDIF.
ENDIF.
ENDIF.
ENDLOOP.
*READ TABLE lt_qmfe INTO lw_qmfe WITH KEY qmnum = lw_qmel-qmnum.
*IF sy-subrc EQ 0.
*ENDIF.
*ENDIF.
CLEAR lw_qmel.
ENDLOOP.
CASE pa_werks.
WHEN 'RILL'.
DELETE lt_final WHERE lifnr0(1) = 'H' OR lifnr0(1) = 'M' OR lifnr IS INITIAL.
WHEN 'RILH'.
DELETE lt_final WHERE lifnr0(1) = 'S' OR lifnr0(1) = 'M'.
WHEN 'RILM'.
DELETE lt_final WHERE lifnr0(1) = 'H' OR lifnr0(1) = 'S'.
ENDCASE.
ENDFORM. " FILL_FINAL
&----
*& Form BUILD_FEILDCAT
&----
text
----
--> p1 text
<-- p2 text
----
FORM build_feildcat .
DATA: col_pos TYPE i .
col_pos = 1.
**********Added by shelly malik************
IF p1_but = 'X'.
lw_field-col_pos = col_pos.
lw_field-fieldname = 'PRUEFLOS'.
lw_field-ref_fieldname = 'PRUEFLOS'.
lw_field-tabname = 'LT_FINAL'.
lw_field-ref_tabname = 'QALS'.
lw_field-no_out = 'X'.
lw_field-emphasize = 'X'.
lw_field-key = 'X'.
fieldcatalog-do_sum = 'X'.
fieldcatalog-no_zero = 'X'.
APPEND lw_field TO lt_field.
CLEAR lw_field.
col_pos = col_pos + 1.
ELSE.
lw_field-col_pos = col_pos.
lw_field-fieldname = 'PRUEFLOS'.
lw_field-ref_fieldname = 'PRUEFLOS'.
lw_field-tabname = 'LT_FINAL'.
lw_field-ref_tabname = 'QALS'.
lw_field-emphasize = 'X'.
lw_field-key = 'X'.
*lw_fieldcat-no_out = 'X'.
APPEND lw_field TO lt_field.
CLEAR lw_field.
col_pos = col_pos + 1.
ENDIF.
*********added by shelly malik************
lw_field-col_pos = col_pos.
lw_field-fieldname = 'QMNUM'.
lw_field-ref_fieldname = 'QMNUM'.
lw_field-tabname = 'LT_FINAL'.
lw_field-ref_tabname = 'QMEL'.
lw_field-emphasize = 'X'.
lw_field-key = 'X'.
APPEND lw_field TO lt_field.
CLEAR lw_field.
col_pos = col_pos + 1.
lw_field-col_pos = col_pos.
lw_field-fieldname = 'ERDAT'.
lw_field-ref_fieldname = 'ERDAT'.
lw_field-tabname = 'LT_FINAL'.
lw_field-ref_tabname = 'QMEL'.
lw_field-emphasize = 'X'.
lw_field-key = 'X'.
APPEND lw_field TO lt_field.
CLEAR lw_field.
col_pos = col_pos + 1.
lw_field-col_pos = col_pos.
lw_field-fieldname = 'MATNR'.
lw_field-ref_fieldname = 'MATNR'.
lw_field-tabname = 'LT_FINAL'.
lw_field-ref_tabname = 'MARA'.
lw_field-emphasize = 'C310'.
*lw_field-key = 'X'.
APPEND lw_field TO lt_field.
CLEAR lw_field.
col_pos = col_pos + 1.
lw_field-col_pos = col_pos.
lw_field-fieldname = 'LIFNR'.
lw_field-ref_fieldname = 'LIFNR'.
lw_field-tabname = 'LT_FINAL'.
lw_field-ref_tabname = 'LFA1'.
APPEND lw_field TO lt_field.
CLEAR lw_field.
col_pos = col_pos + 1.
lw_field-col_pos = col_pos.
lw_field-fieldname = 'NAME1'.
lw_field-ref_fieldname = 'NAME1'.
lw_field-tabname = 'LT_FINAL'.
lw_field-ref_tabname = 'LFA1'.
APPEND lw_field TO lt_field.
CLEAR lw_field.
col_pos = col_pos + 1.
lw_field-col_pos = col_pos.
lw_field-fieldname = 'LGORT'.
lw_field-ref_fieldname = 'LGORT'.
lw_field-tabname = 'LT_FINAL'.
lw_field-ref_tabname = 'MARD'.
APPEND lw_field TO lt_field.
CLEAR lw_field.
col_pos = col_pos + 1.
lw_field-col_pos = col_pos.
lw_field-fieldname = 'MAKTX'.
lw_field-ref_fieldname = 'MAKTX'.
lw_field-tabname = 'LT_FINAL'.
lw_field-ref_tabname = 'MAKT'.
APPEND lw_field TO lt_field.
CLEAR lw_field.
col_pos = col_pos + 1.
lw_field-col_pos = col_pos.
lw_field-fieldname = 'CODEGRUPPE'.
lw_field-ref_fieldname = 'CODEGRUPPE'.
lw_field-tabname = 'LT_FINAL'.
lw_field-ref_tabname = 'QPCT'.
*lw_field-seltext_m = 'CODEGROUP'.
*lw_field-seltext_l = 'CODEGROUP'.
*lw_field-seltext_s = 'CODEGROUP'.
APPEND lw_field TO lt_field.
CLEAR lw_field.
col_pos = col_pos + 1.
lw_field-col_pos = col_pos.
lw_field-fieldname = 'ANZFEHLER'.
lw_field-ref_fieldname = 'ANZFEHLER'.
lw_field-tabname = 'LT_FINAL'.
lw_field-ref_tabname = 'QMFE'.
APPEND lw_field TO lt_field.
CLEAR lw_field.
col_pos = col_pos + 1.
lw_field-col_pos = col_pos.
lw_field-fieldname = 'KURZTEXT'.
lw_field-ref_fieldname = 'KURZTEXT'.
lw_field-tabname = 'LT_FINAL'.
lw_field-ref_tabname = 'QPCT'.
APPEND lw_field TO lt_field.
CLEAR lw_field.
col_pos = col_pos + 1.
lw_field-col_pos = col_pos.
lw_field-fieldname = 'FETXT'.
*lw_field-ref_fieldname = 'FETEXT'.
lw_field-seltext_l = 'Reason for Rejection'.
lw_field-tabname = 'LT_FINAL'.
*lw_field-ref_tabname = 'QMFE'.
APPEND lw_field TO lt_field.
CLEAR lw_field.
col_pos = col_pos + 1.
lw_layo-colwidth_optimize = 'X'.
lw_layo-zebra = 'X'.
lw_layo-box_fieldname = 'BOX'.
lw_layo-box_tabname = 'LT_FINAL'.
ENDFORM. " BUILD_FEILDCAT
&----
*& Form DISPLAY_FINAL
&----
text
----
--> p1 text
<-- p2 text
----
FORM display_final .
*DELETE ADJACENT DUPLICATES FROM lt_final COMPARING erdat matnr.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
I_INTERFACE_CHECK = ' '
I_BYPASSING_BUFFER = ' '
I_BUFFER_ACTIVE = ' '
i_callback_program = lf_rep
I_CALLBACK_PF_STATUS_SET = ' '
i_callback_user_command = 'USER_COMMAND'
i_callback_top_of_page = 'TOP-OF-PAGE'
I_CALLBACK_HTML_TOP_OF_PAGE = ' '
I_CALLBACK_HTML_END_OF_LIST = ' '
I_STRUCTURE_NAME =
I_BACKGROUND_ID = ' '
I_GRID_TITLE = outtext
I_GRID_SETTINGS =
is_layout = lw_layo
it_fieldcat = lt_field
IT_EXCLUDING =
it_special_groups = gd_tab_group
IT_SORT =
IT_FILTER =
IS_SEL_HIDE =
i_default = 'X'
i_save = 'X'
IS_VARIANT =
it_events = gt_events
IT_EVENT_EXIT =
is_print = gd_prntparams
IS_REPREP_ID =
I_SCREEN_START_COLUMN = 0
I_SCREEN_START_LINE = 0
I_SCREEN_END_COLUMN = 0
I_SCREEN_END_LINE = 0
I_HTML_HEIGHT_TOP = 0
I_HTML_HEIGHT_END = 0
IT_ALV_GRAPHICS =
IT_HYPERLINK =
IT_ADD_FIELDCAT =
IT_EXCEPT_QINFO =
IR_SALV_FULLSCREEN_ADAPTER =
IMPORTING
E_EXIT_CAUSED_BY_CALLER =
ES_EXIT_CAUSED_BY_USER =
TABLES
t_outtab = lt_final
EXCEPTIONS
PROGRAM_ERROR = 1
OTHERS = 2
.
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM. " DISPLAY_FINAL
&----
*& Form FETCH_MARD
&----
text
----
--> p1 text
<-- p2 text
----
FORM fetch_mard .
IF NOT lt_mara IS INITIAL.
SORT lt_mara BY matnr.
SELECT lgort
matnr FROM mard
INTO TABLE lt_mard
FOR ALL ENTRIES IN lt_mara
WHERE werks EQ pa_werks
AND lgort EQ pa_lgort
AND matnr EQ lt_mara-matnr.
ENDIF.
IF sy-subrc EQ 0.
SORT lt_mard BY matnr.
ENDIF.
ENDFORM. " FETCH_MARD
&----
*& Form RADIOBUTTON-SELECTION
&----
FORM radiobutton-selection .
PERFORM fetch_mara.
PERFORM fetch_mard.
*PERFORM fetch_qals.
PERFORM fetch_qmel.
PERFORM fetch_qtxt_code.
PERFORM fill_final.
IF p1_but = 'X'.
PERFORM fetch_line_rejection_data.
ELSE.
PERFORM fetch_defect_recording_data.
ENDIF.
ENDFORM. " RADIOBUTTON-SELECTION
&----
*& Form FETCH_LINE_REJECTION_DATA
&----
text
----
--> p1 text
<-- p2 text
----
FORM fetch_line_rejection_data .
SORT lt_final BY prueflos..
DELETE lt_final WHERE prueflos <> '000000000000'.
ENDFORM. " FETCH_LINE_REJECTION_DATA
&----
*& Form FETCH_DEFECT_RECORDING_DATA
&----
text
----
--> p1 text
<-- p2 text
----
FORM fetch_defect_recording_data .
SORT lt_final BY prueflos..
DELETE lt_final WHERE prueflos = '000000000000'.
ENDFORM. " FETCH_DEFECT_RECORDING_DATA
&----
*& Form BUILD_LAYOUT
&----
FORM build_layout .
lw_layo-no_input = 'X'.
lw_layo-colwidth_optimize = 'X'.
lw_layo-totals_text = 'Totals'(201).
lw_layo-totals_only = 'X'.
lw_layo-nosubtotal = 'X'.
lw_layo-f2code = 'DISP'. "Sets fcode for when double
"click(press f2)
lw_layo-zebra = 'X'.
lw_layo-group_change_edit = 'X'.
lw_layo-header_text = 'helllllo'.
lw_layo-no_hline = 'X'.
ENDFORM. " BUILD_LAYOUT
&----
*& Form BUILD_EVENTS
&----
text
----
--> p1 text
<-- p2 text
----
FORM build_events .
data: ls_event type slis_alv_event.
call function 'REUSE_ALV_EVENTS_GET'
exporting
i_list_type = 0
importing
et_events = gt_events[].
read table gt_events with key name = slis_ev_end_of_page
into ls_event.
if sy-subrc = 0.
move 'END_OF_PAGE' to ls_event-form.
append ls_event to gt_events.
endif.
read table gt_events with key name = slis_ev_end_of_list
into ls_event.
if sy-subrc = 0.
move 'END_OF_LIST' to ls_event-form.
append ls_event to gt_events.
endif.
ENDFORM. " BUILD_EVENTS
&----
*& Form BUILD_PRINT_PARAMS
&----
text
----
--> p1 text
<-- p2 text
----
FORM build_print_params .
gd_prntparams-reserve_lines = '15'. "Lines reserved for footer
gd_prntparams-no_coverpage = 'X'.
ENDFORM. " BUILD_PRINT_PARAMS
----
Form TOP-OF-PAGE *
----
ALV Report Header *
----
FORM top-of-page.
*ALV Header declarations
DATA: t_header TYPE slis_t_listheader,
wa_header TYPE slis_listheader,
t_line LIKE wa_header-info,
ld_lines TYPE i,
ld_linesc(10) TYPE c.
data : v_plant(10) type c.
v_plant = 'PLANT :'.
Title
if p1_but = 'X'.
wa_header-typ = 'H'.
wa_header-info = 'LINE REJECTION REPORT '.
APPEND wa_header TO t_header.
CLEAR wa_header.
else.
wa_header-typ = 'H'.
wa_header-info = 'DEFECT RECORDING REPORT '.
APPEND wa_header TO t_header.
CLEAR wa_header.
endif.
Date
wa_header-typ = 'S'.
wa_header-key = 'Date: '.
CONCATENATE sy-datum+6(2) '.'
sy-datum+4(2) '.'
sy-datum(4) INTO wa_header-info. "todays date
APPEND wa_header TO t_header.
CLEAR: wa_header.
wa_header-typ = 'S'.
wa_header-key = 'Plant: '.
wa_header-info = pa_werks.
APPEND wa_header TO t_header.
CLEAR wa_header.
Total No. of Records Selected
DESCRIBE TABLE lt_final LINES ld_lines.
if ld_lines is not initial.
ld_linesc = ld_lines.
CONCATENATE 'Total No. of Records Selected: ' ld_linesc
INTO t_line SEPARATED BY space.
wa_header-typ = 'A'.
wa_header-info = t_line.
APPEND wa_header TO t_header.
CLEAR: wa_header, t_line.
else.
wa_header-typ = 'A'.
wa_header-info = 'Oops No Record Found.....'.
APPEND wa_header TO t_header.
CLEAR: wa_header, t_line.
endif.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
EXPORTING
it_list_commentary = t_header.
i_logo = 'Z_LOGO'.
ENDFORM.
&----
*& Form END_OF_PAGE
&----
form END_OF_PAGE.
data: listwidth type i,
ld_pagepos(10) type c,
ld_page(10) type c.
write: sy-uline(100).
skip.
write:/40 'Page:', sy-pagno .
endform.
&----
*& Form END_OF_LIST
&----
form END_OF_LIST.
data: listwidth type i,
ld_pagepos(10) type c,
ld_page(10) type c.
skip.
write:/40 'Page:', sy-pagno .
endform.
10-16-2008 6:45 AM
hi,
you are using so many conditions in your program like deleting data related to some plants ,appending somw materials......,so may be some condition is not getting data for that.
also if there is problem in program then we can check but with data you can only check it in debugging mode,where it is going wrong.
10-16-2008 6:45 AM
hi,
you are using so many conditions in your program like deleting data related to some plants ,appending somw materials......,so may be some condition is not getting data for that.
also if there is problem in program then we can check but with data you can only check it in debugging mode,where it is going wrong.
10-16-2008 6:46 AM
shelly Malik,
We've something like debug in ABAP?
And in future please put your codes surrounded for better visibility.