Application Development Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 

RV_Condition_Copy Scale ID, Scale item number and Amount insert ?

Former Member
0 Kudos

Hi Team,

DATA: LS_KOMG TYPE KOMG.

LS_KOMG-TPLST = '1000'.
LS_KOMG-LZONEA = 'AE00000001'.
LS_KOMG-LZONEZ = 'AE00000002'.
LS_KOMG-TDLNR = '0000100035'.
LS_KOMG-ROUTE = '000001'.

DATA: LT_KOMV TYPE TABLE OF KOMV.

DATA: ls_condscale TYPE condscale,
lt_condscale TYPE TABLE OF condscale.

ls_Condscale-kopos = '01'.
ls_condscale-KNUMH = '0000138697'.
*ls_Condscale-klfn1 = '00001'.
ls_Condscale-kbetr = '31.00'.
ls_Condscale-UPDKZ = 'X'.
ls_Condscale-RV13AKONWA = 'USD'.

APPEND ls_condscale to lt_condscale.
clear: ls_condscale.
ls_Condscale-kopos = '01'.
ls_condscale-KNUMH = '0000138697'.
*ls_Condscale-klfn1 = '00002'.
ls_Condscale-kbetr = '32.00'.
ls_Condscale-UPDKZ = 'X'.
ls_Condscale-RV13AKONWA = 'USD'.


APPEND ls_condscale to lt_condscale.
clear: ls_condscale.
ls_Condscale-kopos = '01'.
ls_condscale-KNUMH = '0000138697'.
*ls_Condscale-klfn1 = '00003'.
ls_Condscale-kbetr = '33.00'.
ls_Condscale-UPDKZ = 'X'.
ls_Condscale-RV13AKONWA = 'USD'.



APPEND ls_condscale to lt_condscale.
clear: ls_condscale.


CALL FUNCTION 'RV_CONDITION_COPY'
EXPORTING
application = 'F'
condition_table = '581'
condition_type = 'ZB00'
DATE_FROM = '20180421'
DATE_TO = '99891231'
* ENQUEUE = ' '
* I_KOMK = ' '
* I_KOMP = ' '
key_fields = LS_KOMG
MAINTAIN_MODE = 'A'
* NO_AUTHORITY_CHECK = ' '
* NO_FIELD_CHECK = ' '
* SELECTION_DATE = '00000000'
* KEEP_OLD_RECORDS = ' '
* MATERIAL_M =
* USED_BY_IDOC = ' '
* I_KONA =
* OVERLAP_CONFIRMED = ' '
NO_DB_UPDATE = space
* USED_BY_RETAIL = ' '
* IMPORTING
* E_KOMK =
* E_KOMP =
* NEW_RECORD =
* E_DATAB =
* E_DATBI =
* E_PRDAT =
TABLES
copy_records = LT_KOMV
COPY_STAFFEL = lt_condscale
* COPY_RECS_IDOC =
EXCEPTIONS
OTHERS = 14
.
IF sy-subrc <> 0.
MESSAGE 'ERROR' TYPE 'E'.
ENDIF.
call function 'RV_CONDITION_SAVE'.
call function 'RV_CONDITION_RESET'.
COMMIT WORK.

ls_komg part is working fine, but lt_condscale part is not working....its not updating any scale information on VFSCAR1 Table

0 REPLIES 0