BAPI_PO_CREATE1 Dienstleistungsbestellung - Kontierungsprobl

Code: Alles auswählen.

*     Kontierungen füllen
      CLEAR: ls_acc,
             ls_accx.

      ls_acc-po_item     = ls_mepo-ebelp.
      ls_accx-po_item    = ls_mepo-ebelp.
      ls_acc-serial_no   = 01.
      ls_accx-serial_no  = 01.
      ls_acc-creat_date  = ls_ekko_alv-aedat.
      ls_accx-creat_date = 'X'.
      ls_acc-quantity    = ls_mepo-menge.
      ls_accx-quantity   = 'X'.
      ls_acc-gl_account  = ls_mepo-sakto.
      ls_accx-gl_account = 'X'.
      ls_acc-DISTR_PERC  =  0.
      ls_accx-DISTR_PERC =  0.

      CASE ls_mepo-knttp.
        WHEN 'K'.
          ls_acc-costcenter   = lv_platzhalter.
          ls_accx-costcenter  = lv_platzhalter. "'X'.
        WHEN 'F' OR 'Z'.
          ls_acc-orderid      = lv_platzhalter.
          ls_accx-orderid     = 'X'.
        WHEN 'A'.
          ls_acc-asset_no     = lv_platzhalter.
          ls_accx-asset_no    = 'X'.
          ls_acc-sub_number   = ls_mepo-anln2.
          ls_accx-sub_number  = 'X'.
        WHEN 'P'.
          ls_acc-wbs_element  = lv_platzhalter.
          ls_accx-wbs_element = 'X'.
      ENDCASE.

      APPEND ls_acc  TO lt_acc.
      APPEND ls_accx TO lt_accx.