Transfer tables between 2 clients (mandants)

Question

Hi every one.
I want to transfer data i have in some tables from client (mandant) 305 to another another to create an environnement of test with real data so we can test new programs in real conditions.
For the moment here's what i did :
I used RFC on just one table. And this works.
BUT the problem is that to work, we need to declare the table in the parameters of the function.
So Is there any way to avoid that declaration ? Because i have like 500 tables to transfer, and i 'm sure there's a better way than mine to do that. But as i just started on SAP and ABAP, can't figure it out.
My solution for the moment will the same but with a loop on all the tables i need to trasfer the data ... but i'll have to decalare the 500 tables in the parameters of my function :s
Maybe there's another solution to communicate between mandants so if you have, ideas, documentation, links etc,  it will be really helpful
thx a lot !
REPORT ZTESTHDAFUNC .
DATA : t_ZVOITSUPOFF LIKE ZVOITSUPOFF OCCURS 0 WITH HEADER LINE.
CALL FUNCTION 'ZTESTHDAFUNC' DESTINATION 'DO2_305'
  TABLES ZVOITSUPOFF  = t_ZVOITSUPOFF.
CALL FUNCTION 'ZTESTHDAFUNCW'
TABLES ZVOITSUPOFF  = t_ZVOITSUPOFF.
CALL FUNCTION 'ZTESTHDAINSERT'
TABLES ZVOITSUPOFF = t_ZVOITSUPOFF.
FUNCTION ZTESTHDAFUNC.
select *
  from ZVOITSUPOFF
  into table ZVOITSUPOFF
  WHERE ZIDENT_CANAL = 'FFR'.
ENDFUNCTION.
FUNCTION ZTESTHDAINSERT.
LOOP AT ZVOITSUPOFF.
  INSERT INTO ZVOITSUPOFF VALUES ZVOITSUPOFF.
ENDLOOP.
ENDFUNCTION.

Answer 1

Hi Helder,
Let me explain you the implication whatz gonna happen if you use the following loop.
LOOP AT tab_info.
ASSIGN COMPONENT tab_info-fieldname OF STRUCTURE <wa> TO <value>.
MOVE string+tab_info-offset(tab_info-intlen) TO <value>.
ENDLOOP.
Say if I have 20 fields in my table with 2000 records, for this one table, the processor would loop for 40000 times. Which is surely pretty huge time.
Now coming to option b), it is pretty simpler. The table which I was referring is not required as we created it for a specific requirement.
List all the tables which you need for data transfer. Let us assume here as we had done and we came up with two. They are:
ZTESTA
ZTESTB
The function module has the following interface parameters:
FUNCTION zrfc_read_table.
IMPORTING
tabname TYPE dd02l-tabname
TABLES
t_ztesta
t_ztestb.
All that you do in your FM is:
FIELD-SYMBOLS: <fs_table> TYPE STANDARD TABLE.
DATA: l_inttab TYPE char64.
CONCATENATE 'T_'
            tabname
       INTO l_inttab.
ASSIGN (l_inttab) TO  <fs_table>
SELECT * FROM (tabname) INTO TABLE <fs_table>.
ENDFUNCTION.
Now in your original program:
*After selecting all the tables you want(here in this case
*you would have only ZTESTA and ZTESTB in MY_TABLES)
TYPE-POOLS: abap.
DATA :  table TYPE REF TO data,
        WA TYPE REF TO DATA,
        it_param TYPE STANDARD TABLE OF
                         abap_func_parmbind,
        wa_param TYPE abap_func_parmbind.
FIELD-SYMBOLS : <FS> TYPE STANDARD TABLE,
                <WA> TYPE ANY.
LOOP AT MY_TABLES.
  CREATE DATA table TYPE STANDARD TABLE OF
         (MY_TABLES-TABNAME).
  CREATE DATA WA TYPE (MY_TABLES-TABNAME).
  ASSIGN WA->* TO <WA>.
  ASSIGN TABLE->* TO <fs>
Pass the interface parameters dynamically using
it_parm  which is of type abap_func_parmbind(4.7) or
abap_parmbind(4.6c) in type-pools abap.(I am not sure if
we can do it in a version less than 4.7). Let me know
in case you dont know how to pass interface parameters
to a function module dynamically.
  CALL FUNCTION 'ZRFC_READ_TABLE' DESTINATION 'DO2_305'
    PARAMETER-TABLE
      it_parm.
  IF sy-subrc <> 0.
     MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
     WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
  ENDIF.
  LOOP AT <fs> INTO <wa>.
   INSERT (MY_TABLES-TABNAME) FROM <WA>.
  ENDLOOP.
ENDLOOP.
Here you need not have to loop no. of rows * no.of columns. Also your FM is quicker as it is just one select statement and do not do anything else.
All that you need to do is to identify all the tables and add tables parameters as t_<tabname>. But the code nover change.
Regards,
Srikanth