Quantcast
Channel: SCN: Message List
Viewing all articles
Browse latest Browse all 3316

Re: BAPI Function for EG70 change rate data

$
0
0

   In our case we modified the gas procedure and VCF index. lwa_obj and lwa_auto were obtained by calling FM  ISU_O_DEVICERATE_OPEN

 

     lwa_obj-contr-general-wmode = '2'.

     lwa_obj-auto-contr-okcode   = 'SAVE'.

     lwa_auto-contr-okcode       = 'SAVE'.

 

*   Update REG_ALL with new value

*   Copy the data from one table to another.

     lwa_obj1-obj-reg_all[] = lwa_obj-obj-reg_all[].

     SORT lwa_auto-reg  BY bis ab.

     SORT lwa_obj1-obj-reg_all BY bis ab.


*   Delete all the old entries and future entries i.e.

*   Select only that time slice which is current time period

     DELETE lwa_obj1-obj-reg_all WHERE bis < sy-datum OR ab GT sy-datum.

 

 

     READ TABLE lwa_obj1-obj-reg_all INTO lwa_ob INDEX 1.

     IF sy-subrc = 0.

 

       lwa_ob-thgver       x_thgver.             " Gas procedure

       lwa_ob-zuszahlzw  x_zuszahl.            " VCF Index

       lwa_ob-zwnabr = ' '.

 

 

       MODIFY lwa_obj-obj-reg_all FROM lwa_ob

         TRANSPORTING thgver zuszahlzw zwnabr WHERE bis = lwa_ob-bis AND ab = lwa_ob-ab .

 

 

       MODIFY lwa_obj-obj-reg FROM lwa_ob INDEX 1

         TRANSPORTING thgver zuszahlzw.

 

 

       MODIFY lwa_auto-reg FROM lwa_ob                       "INDEX 1.

       TRANSPORTING thgver zuszahlzw WHERE bis = lwa_ob-bis AND ab = lwa_ob-ab.

 

Once this is done call  ISU_S_DEVICERATE_CHANGE passing the auto and obj fields with flags for no dialog, prorate and update online.


Viewing all articles
Browse latest Browse all 3316

Trending Articles