topic doesnt appear the Classification View for a material in Application Development and Automation Discussions

doesnt appear the Classification View for a material

Former Member — Thu, 30 Jan 2014 18:40:09 GMT

I have made this.

    "Classification
            CLEAR class.
            class-object = bapi_head-material.
            class-objecttable = 'MARA'.
            class-classnum = 'ZPERU_TIPO_ARTÍCUL'.
            class-classtype = '001'.

            CALL FUNCTION 'BAPI_OBJCL_CREATE'
              EXPORTING
                OBJECTKEYNEW    = class-object
                OBJECTTABLENEW = class-objecttable
                CLASSNUMNEW     = class-classnum
                CLASSTYPENEW    = class-classtype
              TABLES
                RETURN          = returnmessages.

The problem is that doesn't appear the view for this material, what else do I have to do?

Thanks

Re: doesnt appear the Classification View for a material

FredericGirod — Thu, 30 Jan 2014 19:15:30 GMT

Maybe you need more something like that :

*---------------------------------------------------------------------*
* Form P_CHARGEMENT. *
*---------------------------------------------------------------------*
*---------------------------------------------------------------------*

FORM p_chargement.

DATA : w_classtype    TYPE klassenart ,
         w_nametable    TYPE tabelle ,
         w_objectname   TYPE objnum ,
         w_key          TYPE cuobj ,
         w_flag_error   TYPE char1 ,

is_classdetail TYPE bapi1003_basic ,

         it_libelle    TYPE tt_bapi1003_catch   WITH HEADER LINE ,
         it_charact    TYPE tt_bapi1003_charact WITH HEADER LINE ,
         it_return     TYPE tt_bapiret2         WITH HEADER LINE .

* Boucle sur la table des données.

LOOP AT itg_data.

* Initialisation.

    MOVE : '022'          TO w_classtype ,
           'MARA'         TO w_nametable ,
           itg_data-matnr TO w_objectname .
    CLEAR : w_key, it_return, w_flag_error.
    REFRESH it_return.

* Verifie si une clef existe pour l'article en cours.

    CALL FUNCTION 'BAPI_OBJCL_GET_KEY_OF_OBJECT'
      EXPORTING
        objectname         = w_objectname
        objecttable        = w_nametable
        classtype          = w_classtype
        create_missing_key = 'X'
      IMPORTING
        clobjectkeyout     = w_key
      TABLES
        return             = it_return.

* Verifie si presence d'erreur(s).

    LOOP AT it_return WHERE type EQ 'E'.
      MOVE 'X' TO w_flag_error.
    ENDLOOP.
    IF w_flag_error EQ 'X'.
      LOOP AT it_return.
        PERFORM p_edition_erreur USING it_return.
      ENDLOOP.
      CHECK 1 EQ 2.
    ENDIF.

* Initialisation.

CLEAR it_return.
REFRESH it_return.

* Créé l'affectation.

    CALL FUNCTION 'BAPI_OBJCL_CREATE_KEY'
      EXPORTING
        clobjectkey_new = w_key
        classnum_new    = itg_data-classnum
        status          = '1'
      TABLES
        return          = it_return.

* Verifie si presence d'erreur(s).

    LOOP AT it_return WHERE type EQ 'E'.
      MOVE 'X' TO w_flag_error.
    ENDLOOP.
    IF w_flag_error IS INITIAL.
      CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
        EXPORTING
          wait = 'X'.
    ENDIF.

* Edition des données.

    WRITE : /1 'Affectation pour la class et l''article :' ,
               itg_data-classnum COLOR 3 ,
               itg_data-matnr    COLOR 3 .
    SKIP 1.
    LOOP AT it_return.
      PERFORM p_edition_erreur USING it_return.
    ENDLOOP.
    SKIP 2.

ENDLOOP.

ENDFORM. " P_CHARGEMENT.

regards

Fred

Re: doesnt appear the Classification View for a material

Former Member — Thu, 30 Jan 2014 20:01:39 GMT

Hello,

I have the following message, please help me

this is my code

   *            "Classification
            CLEAR class.
            class-object = bapi_head-material.
            class-objecttable = 'MARA'.
            class-classnum = 'ZPERU_TIPO_ARTÍCUL'.
            class-classtype = '001'.

            CALL FUNCTION 'BAPI_OBJCL_CREATE'
              EXPORTING
                OBJECTKEYNEW    = class-object
                OBJECTTABLENEW = class-objecttable
                CLASSNUMNEW     = class-classnum
                CLASSTYPENEW    = class-classtype
                STATUS          = '1'
                KEYDATE         = SY-DATUM
              TABLES
                RETURN          = returnmessages.