Monday, 12 December 2011

Feching classification data in migo transaction

        CALL FUNCTION 'BAPI_OBJCL_GETCLASSES'
          EXPORTING
            objectkey_imp   = wa_ausp-objek
            objecttable_imp = 'MCH1'
            classtype_imp   = '023'
          TABLES
            alloclist       = it_alloclist
            return          = it_return.
        READ TABLE it_alloclist INTO wa_alloclist INDEX 1.
        IF wa_alloclist-classnum = 'HITCO_BATCH'.
          CALL FUNCTION 'CLAF_CLASSIFICATION_OF_OBJECTS'
            EXPORTING
              class              = 'HITCO_BATCH'
              classtype          = '023'
              features           = 'X'
              object             = wa_ausp-objek
              objecttable        = 'MCH1'
            TABLES
              t_class            = it_class
              t_objectdata       = it_objectdata
            EXCEPTIONS
              no_classification  = 1
              no_classtypes      = 2
              invalid_class_type = 3
              OTHERS             = 4.

No comments:

Post a Comment