anchor.diff:        ENDIF.
   
         IF NOT it_tpool[] IS INITIAL.
  -        INSERT textpool is_progdir-name
  +        INSERT TEXTPOOL is_progdir-name
             FROM it_tpool
             LANGUAGE sy-langu
             STATE 'I'.
  
positive.code: 
  * convert bit string to xstring
      CLEAR lv_x.
      do strlen( lv_result ) times.
        lv_offset = sy-index - 1.
        IF lv_result+lv_offset(1) = '1'.
          SET bit ( lv_offset mod 8 ) + 1 of lv_x.
        ENDIF.
        IF ( lv_offset + 1 ) MOD 8 = 0.
          CONCATENATE rv_xstring lv_x INTO rv_xstring IN BYTE MODE.
  
negative.code:     lo_obj = cl_abap_conv_in_ce=>create(
          input    = lv_xstring
          encoding = 'UTF-8' ).
      lv_len = xstrlen( lv_xstring ).
  
      lo_obj->read( EXPORTING n    = lv_len
                    IMPORTING data = lv_string ).
  