thanks Ranjana, in this case I think no need to use read statement can you please check and let me know
LOOP AT T_VBAK INTO W_VBAK.
READ TABLE T_VBAP INTO W_VBAP WITH KEY
VBELN = W_VBAK-VBELN
WERKS = ' '.
IF SY-SUBRC = 0.
* PERFORM POST_SALES_ORDER.
SELECT * FROM VBAP INTO TABLE LT_VBAP
WHERE VBELN EQ W_VBAK-VBELN
AND werks = ''."FNY4918 -21/06/2013
SELECT * FROM VBPA INTO TABLE LT_VBPA
WHERE VBELN EQ W_VBAK-VBELN.
SELECT SINGLE * FROM YOTCD_E017_STATU INTO YOTCD_E017_STATU
WHERE AUART EQ W_VBAK-AUART AND
VKORG EQ W_VBAK-VKORG AND
VTWEG EQ W_VBAK-VTWEG.
IF SY-SUBRC EQ 0.
*Read Ship-to-party
READ TABLE LT_VBPA WITH KEY VBELN = W_VBAK-VBELN
POSNR = C_POSNR
PARVW = C_WE.
CALL FUNCTION 'YOTCE_DERIVE_SO_ITEM_PLANT'
EXPORTING
iv_kunnr = LT_VBPA-KUNNR
iv_vkorg = W_VBAK-VKORG
IV_VTWEG = W_VBAK-VTWEG
iv_spart = W_VBAK-SPART
IMPORTING
ev_werks = LV_WERKS_D
ev_vsart = LV_VSART_D
ev_traty = LV_TRATY_D
ev_userid = LV_USERID_D
ev_kcnovr = LV_KCNOVR_D
ev_vtweg = LV_VTWEG_D
ev_ship_cond = LV_SHIP_COND
TABLES
it_zvbap = LT_VBAP
it_ztline = LT_ZTLINE
EXCEPTIONS
PLANT_NOT_FOUND = 1
OTHERS = 2.