Description
Following code can be used for modifying classification value in customer Master.
REPORT ZS1 no standard page heading line-size 500.
data: git_bapi1003 type table of bapi1003_alloc_values_num,
git_values_char type table of bapi1003_alloc_values_char,
git_values_curr type table of bapi1003_alloc_values_curr,
git_bapiret2 type table of bapiret2,
ls_bapiret2 type bapiret2.
data: gs_bapi1003 type bapi1003_alloc_values_num,
gs_values_char type bapi1003_alloc_values_char,
gs_values_curr type bapi1003_alloc_values_char,
gc_flag_x(1) type c value 'X'.
gs_values_char-charact = 'VIEWS_ID'. "Characteristics
gs_values_char-value_char = '012'. "characteristics value
append gs_values_char to git_values_char.
CALL FUNCTION 'BAPI_OBJCL_CHANGE'
EXPORTING
objectkey = '1100000028' "Customer
objecttable = 'KNA1'
classnum = 'CATALOG_VIEW_CUST' "Class Number
classtype = '011' "Class Type
* STATUS = '1'
* STANDARDCLASS =
* CHANGENUMBER =
* KEYDATE = SY-DATUM
* NO_DEFAULT_VALUES = ' '
* IMPORTING
* CLASSIF_STATUS =
tables
allocvaluesnumnew = git_bapi1003
allocvaluescharnew = git_values_char
allocvaluescurrnew = git_values_curr
return = git_bapiret2
.
call function 'BAPI_TRANSACTION_COMMIT'
exporting
wait = 'X'
importing
return = ls_bapiret2
.
No comments:
Post a Comment