cancel
Showing results for 
Search instead for 
Did you mean: 

Need help for ABAP CODE

Aummad
Participant
0 Kudos

hi,

i need to reload the master data without FM, i put the comments on fm and relaod the data, now i having a problem, loading process is slow now as compair to before, when i was using with FM.i checked the manage of infoObject, it is show 1123455 records in "transfer" column and 0 record in "added" column, below is the start routine,

Please help me to fix that problem

IF NOT DATAPAK[] IS INITIAL.

LOOP AT DATAPAK INTO S_DATAPAK.

CLEAR V_INDEX.

V_INDEX = SY-TABIX.

  • IF S_DATAPAK-/BIC/ABRETPRI CO ' 0123456789.'.

  • CLEAR: V_AMOUNT, V_PRC.

  • V_AMOUNT = S_DATAPAK-/BIC/ABRETPRI.

  • CALL FUNCTION 'RSAR_CURRENCY_CONVERT'

  • EXPORTING

  • I_CURRENCY = S_DATAPAK-CURRENCY

  • CHANGING

  • C_AMOUNT = V_AMOUNT.

  • .

  • V_PRC = V_AMOUNT.

  • S_DATAPAK-/BIC/ABRETPRI = V_PRC.

  • ENDIF.

IF S_DATAPAK-/BIC/ABBLNKFLG IS INITIAL.

S_DATAPAK-/BIC/ABBLNKFLG = 'N'.

ENDIF.

TRANSLATE S_DATAPAK-/BIC/ABSZRANGE TO UPPER CASE

IF S_DATAPAK-CURRENCY IS INITIAL.

S_DATAPAK-CURRENCY = S_DATAPAK-WHLPRCCURR.

MODIFY DATAPAK FROM S_DATAPAK INDEX V_INDEX TRANSPORTING

/BIC/ABRETPRI /BIC/ABWHLPRCE /BIC/ABBLNKFLG

  • ENDIF.

*ENDLOOP.

ENDIF

Thanks

Accepted Solutions (0)

Answers (1)

Answers (1)

Former Member
0 Kudos

You need not use start routine to achieve this. Instead you can write transfer routines/formulas for those fields in UR.

Former Member
0 Kudos

Hey do u kno where to edit these routines? I am unable to find those abap programs of routines through se38.