03-12-2009 5:46 AM
Hi All,
is there any FM or method to read the data of classification tab in T-Code MSC2N. I need the value of product grade which comes in this tab.
Thanks in adv.
03-12-2009 5:52 AM
CALL FUNCTION 'QMSP_MATERIAL_BATCH_CLASS_READ'
EXPORTING
I_MATNR = gt_SOitems-matnr
I_CHARG = gt_SOitems-charg
I_WERKS = gt_soitems-WERKS
I_MARA_LEVEL = 'X'
I_NO_DIALOG = 'X'
I_DATUV = SY-DATUM
IMPORTING
E_CLASS = LV_CLASS
E_KLART = LV_KLART
E_OBTAB = LV_OBTAB
E_OBJEC = LV_OBJEC
EXCEPTIONS
NO_CLASS = 1
INTERNAL_ERROR_CLASSIF = 2
NO_CHANGE_SERVICE = 3
OTHERS = 4.
IF SY-SUBRC = 0. " If Class...etc found
*--Get classification information
CALL FUNCTION 'BAPI_OBJCL_GETDETAIL'
EXPORTING
OBJECTKEY = LV_OBJEC
OBJECTTABLE = LV_OBTAB
CLASSNUM = LV_CLASS
CLASSTYPE = LV_KLART
KEYDATE = SY-DATUM
LANGUAGE = SY-LANGU
TABLES
ALLOCVALUESNUM = LT_ALLOC_VALUES_NUM
ALLOCVALUESCHAR = LT_ALLOCVALUESCHAR
ALLOCVALUESCURR = LT_ALLOCVALUESCURR
RETURN = LT_RETURN.