BP CVI_MAPPING 045 error

 Sometimes when tansfer Number Range of vendor/Customer to target client, Number range with the default value maybe overlap the Number range  to be transfered. So we should delete the default Number range and then thansfer to target system.

Phisical Inventory (棚卸）

MI01

MI04

MI07

ME21N ME045 Error

 Function MEX_FELDAUSWAHL_SACHKONTO

Table TMODP 

Condition:SPRAS='J' , FAUNA = 'SKB1-FAUS1'

Compare: FAUS1 of Table T162K and T004F 

  DO 50 TIMES VARYING L1 FROM T162K-FAUS1(1) NEXT T162K-FAUS1+1(1)
                         range t162k-faus1
              VARYING L2 FROM T004F-FAUS1(1) NEXT T004F-FAUS1+1(1)
                         range t004f-faus1
              VARYING L3 FROM STRING(1) NEXT STRING+1(1)
                         range string.
    COUNT = COUNT + 1.
* Finanzposition, Finanzstelle und Geldgeber nach Rücksprache mit
* Holger Jung zu 3.0 nicht verproben, da nicht in Kontierung pflegbar,
* sondern nur über Sonderlocke
* CHECK COUNT NE 20.   "Finanzposition
* CHECK COUNT NE 49.   "Finanzstelle
* CHECK COUNT NE 50.   "Geldgeber

   CHECK COUNT GE 9.  "Materialnummer (Stelle 9) bewußt mit reingenommen
    UNPACK COUNT TO MODIF.
    IF  L1 = '+'
    AND L2 = '-'.
      TMODP-MODIF = MODIF.
      PERFORM FELDAUSWAHL_FEHLER.
    ENDIF.
    IF  L1 = '-'
    AND L2 = '+'.
      TMODP-MODIF = MODIF.
*   PERFORM FELDAUSWAHL_FEHLER.      "nicht mehr ab 4.0B TK  89897
    ENDIF.
*    CHECK COUNT NE 20.                 "Finanzposition      "173298
*    CHECK COUNT NE 49.                 "Finanzstelle        "173298
*    CHECK COUNT NE 50.                 "Geldgeber           "173298
    IF  L1 = '.'                       "ab Release 2.1
    AND L2 = '-'.
      TMODP-MODIF = MODIF.
      perform check_t162x using tmodp-modif.  "4.6A TK
      if sy-subrc eq 0.                "4.6A TK
        PERFORM FELDAUSWAHL_FEHLER.
      endif.                           "4.6A TK
    ENDIF.
    IF  L1 = '.' OR
        L1 = SPACE.
      L3 = L2.
    ELSE.
      L3 = L1.
    ENDIF.
  ENDDO.

*------- ... Geschaeftsbereiche bilanzfaehig ? -------------------------
  IF  T001-XGSBE   NE SPACE
  AND STRING+32(1) EQ '-'.
    STRING+32(1) = '.'.
  ENDIF.

Maintenance Status Group of Account No.

OBC4     (FS00----->TAB Create / bank / interest: Click Field status Group)

Maintenance Account Asignment Categories

OME9

NG Pattern: (L1 T162F, L2 T004F)

    IF  L1 = '+'
    AND L2 = '-'.
      TMODP-MODIF = MODIF.
      PERFORM FELDAUSWAHL_FEHLER.
    ENDIF.

    IF  L1 = '.'                       "ab Release 2.1
    AND L2 = '-'.
      TMODP-MODIF = MODIF.
      perform check_t162x using tmodp-modif.  "4.6A TK
      if sy-subrc eq 0.                "4.6A TK
        PERFORM FELDAUSWAHL_FEHLER.
      endif.                           "4.6A TK
    ENDIF.

Set Break Point at

FORM feldauswahl_fehler.


  SELECT SINGLE * FROM tmodp WHERE spras = sy-langu
                             AND   fauna = 'SKB1-FAUS1'
                             AND   modif = tmodp-modif.
  IF sy-subrc EQ 0.
    MESSAGE e045 WITH skb1-saknr t162k-knttp tmodp-ftext.
  ELSE.
    MESSAGE e045 WITH skb1-saknr t162k-knttp tmodp-modif.
  ENDIF.

ENDFORM.                               " FE