Coding - where is the error?

Question

Hello,
in transformation I have following coding:
      CLASS routine IMPLEMENTATION
CLASS lcl_transform IMPLEMENTATION.
   METHOD compute_YBV2LIEGR.
  IMPORTING
    request     type rsrequest
    datapackid  type rsdatapid
    SOURCE_FIELDS-/BIC/YBV2HPTLF TYPE /BIC/OIYBV2HPTLF
   EXPORTING
     RESULT type tys_TG_1-/BIC/YBV2LIEGR
     DATA:
       MONITOR_REC    TYPE rsmonitor.
$$ begin of routine - insert your code only below this line        -
*--  fill table "MONITOR" with values of structure "MONITOR_REC">
*-   to make monitor entries
    ... "to cancel the update process
   raise exception type CX_RSROUT_ABORT.
     ... "to skip a record
   raise exception type CX_RSROUT_SKIP_RECORD.
     ... "to clear target fields
   raise exception type CX_RSROUT_SKIP_VAL.
if SOURCE_FIELDS-/BIC/YBV2HPTLF = '90118255'.
       RESULT = '10'.
     elseif SOURCE_FIELDS-/BIC/ZZHPTLF = 'CL500115'.
       RESULT = '10'.
    elseif SOURCE_FIELDS-/BIC/ZZHPTLF = '90051227'.
       RESULT = '20'.
     elseif  SOURCE_FIELDS-/BIC/ZZHPTLF = '90806180'.
       RESULT = '30'.
elseif SOURCE_FIELDS-/BIC/ZZHPTLF = '90031'.
       RESULT = '80'.
     else.
       result = '90'.
       clear RESULT.
       endif.
     endif.
For CL500115 result is 10. That works. For the others it does not work.
Why?
Any idea. The target object is defined as char 2.

Answer 1

Hi
Could you plz place the Code in between and check :
$$ begin of routine - insert your code only below this line -
"Plz put the code here"
*-- fill table "MONITOR" with values of structure "MONITOR_REC">
*- to make monitor entries
... "to cancel the update process
raise exception type CX_RSROUT_ABORT.
... "to skip a record
raise exception type CX_RSROUT_SKIP_RECORD.
... "to clear target fields
raise exception type CX_RSROUT_SKIP_VAL.
Regards,
Aparna