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

Re: Insert entries into ADRCT table

$
0
0

Hi,

 

Later I did research on this issue & able to find out that we can use the FM: ADDR_SAVE_INTERN to delete, update and save data in multiple address related tables.

   FORM modify_data_adrct USING p_lt_adrct TYPE gty_adrct_t "ls_adrct TYPE gty_adrct

  p_lv_type TYPE c.

  DATA : lv_langu TYPE laiso ##needed,

* ls_adrct TYPE gty_adrct,

  lt_return TYPE STANDARD TABLE OF bapiret2, ##needed

  lt_adrct_d TYPE TABLE OF adrct,

  lt_adrct_u TYPE TABLE OF adrct,

  lt_adrct_i TYPE TABLE OF adrct,

  lt_adrc TYPE TABLE OF adrc,

  lt_adrp TYPE TABLE OF adrp,

  lt_adcp TYPE TABLE OF adcp,

  lt_adrt TYPE TABLE OF adrt,

  lt_adr2 TYPE TABLE OF adr2,

  lt_adr3 TYPE TABLE OF adr3,

  lt_adr4 TYPE TABLE OF adr4,

  lt_adr5 TYPE TABLE OF adr5,

  lt_adr6 TYPE TABLE OF adr6,

  lt_adr7 TYPE TABLE OF adr7,

  lt_adr8 TYPE TABLE OF adr8,

  lt_adr9 TYPE TABLE OF adr9,

  lt_adr10 TYPE TABLE OF adr10,

  lt_adr11 TYPE TABLE OF adr11,

  lt_adr12 TYPE TABLE OF adr12,

  lt_adr13 TYPE TABLE OF adr13,

  lt_adrcomc TYPE TABLE OF adrcomc,

  lt_adrg TYPE TABLE OF adrg,

  lt_adrgp TYPE TABLE OF adrgp,

  lt_adrv TYPE TABLE OF adrv,

  lt_adrvp TYPE TABLE OF adrvp.

 

  IF p_lv_type = 'U'.

  lt_adrct_u = p_lt_adrct.

  ELSEIF p_lv_type = 'I'.

  lt_adrct_i = p_lt_adrct.

  ENDIF.

 

  CALL FUNCTION 'ADDR_SAVE_INTERN'

  TABLES

  adrc_d = lt_adrc

  adrc_u = lt_adrc

  adrc_i = lt_adrc

  adrct_d = lt_adrct_d

  adrct_u = lt_adrct_u

  adrct_i = lt_adrct_i

  adrp_d = lt_adrp

  adrp_u = lt_adrp

  adrp_i = lt_adrp

  adcp_d = lt_adcp

  adcp_u = lt_adcp

  adcp_i = lt_adcp

  adrt_d = lt_adrt

  adrt_u = lt_adrt

  adrt_i = lt_adrt

  adr2_d = lt_adr2

  adr2_u = lt_adr2

  adr2_i = lt_adr2

  adr3_d = lt_adr3

  adr3_u = lt_adr3

  adr3_i = lt_adr3

  adr4_d = lt_adr4

  adr4_u = lt_adr4

  adr4_i = lt_adr4

  adr5_d = lt_adr5

  adr5_u = lt_adr5

  adr5_i = lt_adr5

  adr6_d = lt_adr6

  adr6_u = lt_adr6

  adr6_i = lt_adr6

  adr7_d = lt_adr7

  adr7_u = lt_adr7

  adr7_i = lt_adr7

  adr8_d = lt_adr8

  adr8_u = lt_adr8

  adr8_i = lt_adr8

  adr9_d = lt_adr9

  adr9_u = lt_adr9

  adr9_i = lt_adr9

  adr10_d = lt_adr10

  adr10_u = lt_adr10

  adr10_i = lt_adr10

  adr11_d = lt_adr11

  adr11_u = lt_adr11

  adr11_i = lt_adr11

  adr12_d = lt_adr12

  adr12_u = lt_adr12

  adr12_i = lt_adr12

  adr13_d = lt_adr13

  adr13_u = lt_adr13

  adr13_i = lt_adr13

  adrcomc_d = lt_adrcomc

  adrcomc_u = lt_adrcomc

  adrcomc_i = lt_adrcomc

  adrg_d = lt_adrg

  adrg_u = lt_adrg

  adrg_i = lt_adrg

  adrgp_d = lt_adrgp

  adrgp_u = lt_adrgp

  adrgp_i = lt_adrgp

  adrv_d = lt_adrv

  adrv_u = lt_adrv

  adrv_i = lt_adrv

  adrvp_d = lt_adrvp

  adrvp_u = lt_adrvp

  adrvp_i = lt_adrvp

* ADRU_D =

* ADRU_U =

* ADRU_I =

  EXCEPTIONS

  database_error = 1

  internal_error = 2

  OTHERS = 3.

  IF sy-subrc <> 0.

  ROLLBACK WORK.

  gv_fail = abap_true.

  ENDIF.

 

ENDFORM.  

 

 

Here only lt_adrct_i have data, rest are blank internal table as I wanted to insert data only in adrct table.


Viewing all articles
Browse latest Browse all 8653

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>