Loading data from 1st dso to 2nd dso giving errors due to endroutine
Hi Friends,
I am loading the data from 1st DSO to 2nd DSO ,while loading the data from 1st DSO to 2nd DSO I applied some logic in my transformation in endroutine .Now while loading data into 2nd DSO Iam getting the following errors in monitor screen,
I checked it by debug mode the final data in endroutine ie in source_package
populating the data correclty
<b>Data package1 : Errors during processing
Update to 2nd dso :
Exceptions in subset :Write data package
Processing terminiated</b>
Can you pls suggest anyone what might be the problem ? Your answers are higly appreciable and points will be awarded
Best Regards,
Govind.
Here is my code in endroutine also for ur reference
data : e_s_result type tys_TG_1.
data : e_t_result type tyt_TG_1.
data : e_s_result1 type tys_TG_1.
data : e_t_result1 type tyt_TG_1.
data : cnt1 type n.
data : /BIC/YMATERL type /BIC/OIYMATERL.
data : curtdp1(6) type c.
data : mat type /BIC/OIYMATERL.
data : idx like sy-tabix.
data : begin of i_s_tdp,
/BIC/Y10DAYPRD type /BIC/OIY10DAYPRD,
/BIC/YV2TDP type /BIC/OIYV2TDP,
/BIC/YV3TDP type /BIC/OIYV3TDP,
end of i_s_tdp.
data : i_t_tdp like table of i_s_tdp.
data : i_t_tdp1 like table of i_s_tdp.
data : RESULT_PACKAGE1 like RESULT_PACKAGE.
DATA : /BIC/YCURTDP TYPE /BIC/OIYCURTDP.
break-point.
RESULT_PACKAGE1[] = RESULT_PACKAGE[].
SORT RESULT_PACKAGE1[] BY /BIC/YMATERL .
SORT RESULT_PACKAGE[] BY /BIC/YMATERL .
DELETE ADJACENT DUPLICATES FROM RESULT_PACKAGE1
COMPARING /BIC/YMATERL.
select /BIC/Y10DAYPRD /BIC/YV2TDP /BIC/YV3TDP into table i_t_tdp
from /BIC/PY10DAYPRD
where OBJVERS = 'A'.
LOOP AT RESULT_PACKAGE1 into e_s_result1.
cnt1 = 0.
LOOP AT RESULT_PACKAGE into e_s_result WHERE /BIC/YMATERL =
e_s_result1-/BIC/YMATERL .
if cnt1 >= '9'.
exit.
endif.
ENDLOOP.
if cnt1 >= '9'.
curtdp1 = e_s_result-/BIC/YCURTDP.
mat = e_s_result-/BIC/YMATERL.
UPDATE /BIC/PYDP_LOKUP SET /BIC/YCURTDP = CURTDP1 /BIC/YDPFLAG
= 'F' WHERE /BIC/YDP_LOKUP = mat.
read table i_t_tdp with key
/BIC/YV2TDP = E_S_RESULT-/BIC/YFORTDP
transporting no fields.
IF SY-SUBRC = 0.
MOVE 'V2' TO E_S_result-/BIC/YVERSION .
append e_s_result to e_t_result.
ENDIF.
read table i_t_tdp with key
/BIC/YV3TDP = E_S_RESULT-/BIC/YFORTDP
transporting no fields.
IF SY-SUBRC = 0.
MOVE 'V3' TO E_S_result-/BIC/YVERSION .
append e_s_result to e_t_result.
ENDIF.
else.
UPDATE /BIC/PYDP_LOKUP SET /BIC/YCURTDP = CURTDP1
/BIC/YDPFLAG = 'P' WHERE /BIC/YDP_LOKUP = mat.
read table i_t_tdp with key
/BIC/YV2TDP = E_S_RESULT-/BIC/YFORTDP
transporting no fields.
IF SY-SUBRC = 0.
MOVE 'V2' TO E_S_result-/BIC/YVERSION .
append e_s_result to e_t_result.
ENDIF.
read table i_t_tdp with key
/BIC/YV3TDP = E_S_RESULT-/BIC/YFORTDP
transporting no fields.
IF SY-SUBRC = 0.
MOVE 'V3' TO E_S_result-/BIC/YVERSION .
append e_s_result to e_t_result.
ENDIF.
endif.
ENDLOOP.
insert lines of e_t_result[] into table RESULT_PACKAGE[].