anchor.diff:            <ls_tadir>-korrnum = '171000'.
           WHEN 'IEXT'.
             <ls_tadir>-korrnum = '150000'.
  +        WHEN 'PINF'.
  +          " PINF before exposed objects
  +          <ls_tadir>-korrnum = '130000'.
           WHEN OTHERS.
             <ls_tadir>-korrnum = '100000'.
         ENDCASE.
  
positive.code:           <ls_tadir>-korrnum = '220000'.
          WHEN 'IDOC'.
            <ls_tadir>-korrnum = '200000'.
          WHEN 'WDCA'.
            <ls_tadir>-korrnum = '174000'.
          WHEN 'WDYA'.
  
negative.code:           <ls_tadir>-korrnum = '999000'.
          WHEN 'DOMA'.
            <ls_tadir>-korrnum = '900000'.
          WHEN 'SPRX'.
            <ls_tadir>-korrnum = '850000'.
          WHEN 'WEBI'.
            <ls_tadir>-korrnum = '840000'.
          WHEN 'PARA'.
            " PARA after DTEL
            <ls_tadir>-korrnum = '810000'.
  