Skip to Content
2
Former Member
Aug 08, 2007 at 09:16 AM

Loading data from 1st dso to 2nd dso giving errors due to endroutine

15 Views

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[].