Internal table in routine of infocube

Hi
Plz can anybody let me know simple scenario for where we use the internal table in the routine IN BW SIDE. Let me say i have 3 characteristic like CID,PID AND SRID and keyfigures like qty , revenue and amount.
Thanx & Regards,
RaviCHandra
Please search the forum before posting a thread.
Edited by: Pravender on Jan 29, 2012 9:38 PM

Standard Internal Tables
Standard tables have a linear index. You can access them using either the index or the key. If you use the key, the response time is in linear relationship to the number of table entries. The key of a standard table is always non-unique, and you may not include any specification for the uniqueness in the table definition.
This is the quickest way to access table entries.
Hashed Internal Tables
Hashes tables have no internal linear index. You can only access hashed tables by specifying the key. The response time is constant, regardless of the number of table entries, since the search uses a hash algorithm. The key of a hashed table must be unique, and you must specify UNIQUE in the table definition.
This table type is particularly suitable if you want mainly to use key access for table entries. You cannot access hashed tables using the index. When you use key access, the response time remains constant, regardless of the number of table entries. As with database tables, the key of a hashed table is always unique. Hashed tables are therefore a useful way of constructing and using internal tables that are similar to database tables.
Regards
KP

Similar Messages

End Routine ABAP to read from Internal table and do calculation.

Hi All...
I have completed some coding in a start routine to extract some fields from a DSO containing Master Data (Stock Age) into an internal table (the internal table has been defined in the global declarations area) which will then be read in the end routine.
(the internal table will be read) at loadtime in the end routine and used in a calculation as described below.
I.E
GLOBAL DATA DECLARATION
Data: ITAB1 TYPE TABLE OF /BIC/DSOTAB
(DSOTAB has 3 fields PLANT, STYLE, 1STDATE (1STDATE IS A DATE FIELD)
The start routine has the following code:
IF ITAB1 IS INITIAL.
SELECT /BIC/PLANT /BIC/STYLE /BIC/1STDATE
 FROM /BIC/DSOTAB
 INTO CORRESPONDING FIELDS OF TABLE ITAB1.
This is working fine when run under simulation i.e ITAB1 is filled no problem.
I then need to do a calculation in the end routine.
1. First I have to find the record in the internal table using the key of PLANT AND STYLE from the RESULT_PACKAGE.
The code i am using now is as follows....
 READ TABLE ITAB1 TRANSPORTING NO FIELDS WITH KEY
 /BIC/PLANT = <result_fields>-/BIC/PLANT /BIC/STYLE =
 <result_fields>-/BIC/STYLE.
Once this record has been read I then have to perform the following calculation using the following additional fields
<result_fields>-/BIC/DYS1ST is a NUMC field in the <result_fields> that will be be filled by the result of the calculation described below.
<result_fields>-CALDAY is a date field which is already populated in the <result-fields> which is used in the calculation below.
The Calculation required is a difference in days between two dates
DYS1ST = CALDAY - 1STRED.
The code i am using is
If sy-subrc = 0.
 <result_fields>-/BIC/DYS1ST = <result_fields>-CALDAY -
 i_t_1stred_dso-/BIC/1STRED.
So the whole section of code inside the LOOP at RESULT PACKAGE looks like this in the end routine
 READ TABLE ITAB1 TRANSPORTING NO FIELDS WITH KEY
 /BIC/PLANT = <result_fields>-/BIC/PLANT /BIC/STYLE =
 <result_fields>-/BIC/STYLE.
IF sy-subrc = 0.
 <result_fields>-/BIC/DYS1ST = <result_fields>-CALDAY -
 i_t_1stred_dso-/BIC/1STRED.
Im getting the error
"ITAB1 " is a table without a header line and therefore has no component called "/BIC/1STRED
Please can someone advise as to what I need to do to get this fixed please.
Thanks in advance
Stevo:)

Hi,
You will have to do few changes in your code as below,
GLOBAL DATA DECLARATION
Data: ITAB1 TYPE standard TABLE OF /BIC/DSOTAB.
After that declare a workarea to read the values.
DATA: i_wa_itab1 type /bic/dsotab.
(DSOTAB has 3 fields PLANT, STYLE, 1STDATE (1STDATE IS A DATE FIELD)
The start routine has the following code:
IF ITAB1 IS INITIAL.
SELECT /BIC/PLANT /BIC/STYLE /BIC/1STDATE
FROM /BIC/DSOTAB
INTO CORRESPONDING FIELDS OF TABLE ITAB1.
This is working fine when run under simulation i.e ITAB1 is filled no problem.
I then need to do a calculation in the end routine.
1. First I have to find the record in the internal table using the key of PLANT AND STYLE from the RESULT_PACKAGE.
The code i am using now is as follows....
READ TABLE ITAB1 TRANSPORTING NO FIELDS WITH KEY
/BIC/PLANT = <result_fields>-/BIC/PLANT /BIC/STYLE =
<result_fields>-/BIC/STYLE.
Once this record has been read I then have to perform the following calculation using the following additional fields
<result_fields>-/BIC/DYS1ST is a NUMC field in the <result_fields> that will be be filled by the result of the calculation described below.
<result_fields>-CALDAY is a date field which is already populated in the <result-fields> which is used in the calculation below.
The Calculation required is a difference in days between two dates
DYS1ST = CALDAY - 1STRED.
The code i am using is
If sy-subrc = 0.
<result_fields>-/BIC/DYS1ST = <result_fields>-CALDAY -
i_t_1stred_dso-/BIC/1STRED.
So the whole section of code inside the LOOP at RESULT PACKAGE looks like this in the end routine
READ TABLE ITAB1 into i_wa_itab1 WITH KEY
/BIC/PLANT = <result_fields>-/BIC/PLANT /BIC/STYLE =
<result_fields>-/BIC/STYLE.
IF sy-subrc = 0.
<result_fields>-/BIC/DYS1ST = <result_fields>-CALDAY -
i_wa_itab1-/BIC/1STRED.
Once you do this changes, your code will work fine.
Regards,
Durgesh.

How to declare a internal table in start routine i.e. transformations

Hi Gurus,
How to define an internal table in a start rotuine?
any help greatly appreciated.
Best Regards,
Reddy.

Hi,
types: begin of str,
field1 type c,
field2 type c,
end of str.
data : itab type table of str with header line.
the above code should be inserted where it says insert code below this. this will be like a global decleration. this table will be available for all the routines that you write in the transformation.
All the best !!
Regards
Aparna

Using internal tables in BI 7 Start routines

Hi All
I tried searching for using internal tables in a start routine in BI 7 could not find the right pointers.
This is what I am trying to do is the following:
In a DSO ZSD_O01 I have a sales order and sales order item number and this DSO also contains the Contract number and the contract Item number.
The DSO structure is as follows:
/BIC/AZSD_O0100
DOC_NUMBER
ITEM
CONTRACT
CITEMNUM
I want to read the data in this DSO into a internal table. But the key fields in this DSO is DOC_NUMBER and ITEM so I want to read this data into a internal table only for the first data package into the internal table. Thereafter I want to lookup into the internal table given the doc_number and ITEM to find the CONTRACT and CITEMNUM.
Can any of you kindly show me how to :
- Read data from a DSO into a internal table
- Read the internal table for the first data package
- How do I make the access in the internal table fast when my lookup in the internal table is not on the
DSO key columns but on a different key column
Appreciate your help
Thanks
Karen

Hi Karen ,
It will be helpful if you tell your requirement as the approach you suggested is not looks convincing .May be their is some easy way and we can suggest you better approach
-how to check for source_package = 1
You need to hard code it .
We decide package size at DTP level so you can declare a global variable .let say you have 50000 size of your package then use global variable as counter and read only when record_count is <= 50000 .
-how to declare the internal table so the values in it exists between different data packages
Declare a global table and select data into it .A global table retain data across the packages .
- The key on which I need to lookup in the internal table is not the key fields as in the DSO
Its ok .Let say you are doing lookup on A B and C field of DSO1 and the values may duplicate in your source .then you just need to read the internal table having data from DSO2 with key field A B C .
Better if you set them as semantic keys at DTP level so that all duplicate entries of A B C will appear in same package .
global Declarations
In your start routine you will have this following code :
TYPES:
 tyt_SC_1 TYPE STANDARD TABLE OF tys_SC_1
 WITH NON-UNIQUE DEFAULT KEY.
$$ begin of global - insert your declaration only below this line -
... insert your code here
$$ end of global - insert your declaration only before this line -
One question
Why you want to populate values for 1 source package only not for all ?This will be helpful to understand your requirement and may be we can fulfill it in some other manner .
Regards,
Jaya Tiwari

Internal table on Start Routine

Hello
I have 5 key figures. They have an standard routine with a select statement. Basically they have to read an external DSO and get some fields values.
As all of them have the same SELECT statement I think it would be better to replace this with a select in the Start Routine, in order to improve performance. But unfortunatelly I'm not an abap programmer.
How could this be replaced in the Start routine ?
select single EXRATEXACC DOC_CURRCY NETVAL_INV
      into (h_rate, h_dcurr, h_inv)
      from /bic/azsdbiio100
       where BILL_NUM eq SOURCE_FIELDS-/BIC/ZREFDOC
       and BILL_ITEM eq SOURCE_FIELDS-/BIC/ZREFDOCLN
       and COMP_CODE eq SOURCE_FIELDS-COMP_CODE.
if sy-subrc ne 0. " Not found
        select single EXRATEXACC DOC_CURRCY NETVAL_INV
        into (h_rate, h_dcurr, h_inv)
        from /bic/azsdbiio100
         where DOC_NUMBER eq SOURCE_FIELDS-DOC_NUMBER
         and S_ORD_ITEM eq SOURCE_FIELDS-S_ORD_ITEM
         and COMP_CODE eq SOURCE_FIELDS-COMP_CODE.
     if sy-subrc eq 0.
          h_flag = 'X'. " Document found
     endif.
else.
     h_flag = 'X'. "Document found.
endif.
if h_flag = 'X'.
        if h_dcurr ne SOURCE_FIELDS-CURRENCY.
          if h_rate lt 0.
            h_rate = h_rate * ( -1 ).
            clear h_amount.
            if h_inv ne 0.
              h_amount = h_inv.
            else.
              h_amount = SOURCE_FIELDS-/BIC/ZG_AVV104 * h_rate.
            endif.
          elseif h_rate gt 0.
            if h_inv ne 0.
              h_amount = h_inv.
            else.
              h_amount = SOURCE_FIELDS-/BIC/ZG_AVV104 / h_rate.
            endif.
          else.
            h_amount = SOURCE_FIELDS-/BIC/ZG_AVV104.
          endif.
        else.
          h_amount = SOURCE_FIELDS-/BIC/ZG_AVV104.
        endif.
        RESULT = h_amount.
        CURRENCY = h_dcurr.
      endif.
    endif.

Hi,
what you need to do first is to define internal tables in the start routine for each individual routine with the key fields. So look at the different SELECT SINGLE statements and build up the internal table(s). So for the first one you need to define an internal table with fields BILL_NUM, BILL_ITEM, COMP_CODE (your key) and EXRATEXACC, DOC_CURRCY and NETVAL_INV. I don't know if you can combine the two select single statements, that will depend on if BILL_NUM is the same type of field as DOC_NUMBER.
After declaration of the internal tables you can fill the bales by doing a SELECT instead of select single INTO the internal table.
In the individual update rules you can do a READ TABLE (internal table) WITH KEY yyyyyy
In this way you only have to access the DB once per data package and read from the internal memory for each record, which will definitely improve performance.
Hope this helps!

Accessing Global Internal Table in Field Routine Level

I am working on a transformation. I have created a Global Internal Table with the structure of my Source Target + extra fields not in my source target. In the start routine of the transformation I am first copying all corresponding fields from SOURCE_PACKAGE to internal table and then finally doing a lot of manipulations and modifying and appending the internal table with data now ready for populating to target.
I want to populate the target fields at field routine level by the data present in the Global internal table. Can you please tell me how to code here. If data was being read by SOURCE_PACKAGE, I would have read the value of SOURCE_FIELDS - (Value). But incase of value to be read from Global Internal Table, can I refer to the internal table work area directly. Thanks.
Global Internal Table - G_ITAB
Work Area - WA_G_ITAB
Is the below correct ?
Result = WA_G_ITAB-(Field Name).

Let me understand this with an example as I am still not clear. Suppose I am loading to a DSO having 17 Key Fields say K1, K2, K3.........K17.
And if the 3.5x logic is
DATA : L1 LIKE COMM_STRUCTURE-amt.
CLEAR L1 .
IF COMM_STRUCTURE-CHK = '222'
OR COMM_STRUCTURE-CHK = '333' .
L1 = COMM_STRUCTURE-amt .
ENDIF.
RESULT = L1 .
Can you tell me the code of the above in BI7 at field level routine now. Please note I need to take data from G_ITAB internal table and that the DSO has 17 key fields?

Passing internal table to FORM routine

Hi friends,
how do i do the following:
i have an internal table with data and i want the internal table to be passed in a FORM routine, as i need to do some operations on the data within the table, so what i need is how to do the FORM test_itab USING ... statement.
thanks for your help,
points will be awarded instantly!
clemens

Hi,
Below will give you a detailed over view of how to achive the following.
If you specify the addition TABLES, each table parameter t1 t2 ... for the subroutine called that is defined with the addition TABLES to the FORM statement must be assigned an internal table itab as the actual parameter. The assignment of the actual parameters to the formal parameters takes place using their positions in the lists t1 t2 ... and itab1 itab2 ... .
You can only specify standard tables for itab. Transfer takes place by means of a reference. If a specified table itab has a header line, this is also transferred; otherwise, the header line in the corresponding table parameter t is blank when it is called.
Note
Use of table parameters in the interface for subroutines is obsolete but a large number of subroutines have not yet been converted to appropriately typed USING or CHANGING parameters, so that they must still be supplied with data by the TABLES addition to the PERFORM statement.
Example
Static call of the internal subroutine select_sflight transferring a table parameter.
PARAMETERS: p_carr TYPE sflight-carrid,
            p_conn TYPE sflight-connid.
DATA sflight_tab TYPE STANDARD TABLE OF sflight.
PERFORM select_sflight TABLES sflight_tab
                       USING p_carr p_conn.
FORM select_sflight TABLES flight_tab LIKE sflight_tab
                    USING f_carr TYPE sflight-carrid
                           f_conn TYPE sflight-connid.
SELECT *
         FROM sflight
         INTO TABLE flight_tab
         WHERE carrid = f_carr AND
               connid = f_conn.
ENDFORM.
Thanks,
Samantak
Rewards points for useful answers.

Start routine internal table data is inaccessible.

Hi Guru,
I have written a small code in start routine using internal tables. The internal table has 4 fields. Intially first 3 fields are populated from ods for only the records in the data package. Then the 4th field is modified using loop on internal table. Then a sort is done on internal table and deleting the adjacent records. Now the data is read from internal table in updates rules. But data is not populating for the fields in listcube. I guess the loop on internal table is not modifying the internal table, below is the code.
Types: BEGIN OF ITAB1,
doc_no LIKE /BIC/AZFGLO10100-AC_DOC_NO,
item_no LIKE /BIC/AZFGLO10100-ITEM_NUM,
taxjur LIKE /BIC/AZFGLO10100-TAXJURCODE,
z_len TYPE I,
END OF ITAB1.
DATA ITAB_01 TYPE TABLE OF ITAB1 WITH HEADER LINE.
DATA LEN TYPE I.
DATA: str1 TYPE string,
str2 TYPE string,
doc like /BIC/AZFGLO10100-AC_DOC_NO,
item like /BIC/AZFGLO10100-ITEM_NUM,
jur like /BIC/AZFGLO10100-TAXJURCODE.
***filling the internal table with the contents of
select AC_DOC_NO ITEM_NUM TAXJURCODE into
corresponding fields of itab_01
from /BIC/AZFGLO10100
FOR ALL ENTRIES IN DATA_PACKAGE
WHERE AC_DOC_NO = DATA_PACKAGE-AC_DOC_NO
AND ITEM_NUM = DATA_PACKAGE-ITEM_NUM.
endselect.
SORT ITAB_01 ASCENDING BY doc_no ITEM_NO ASCENDING.
loop at itab_01.
doc = itab_01-doc_no.
item = itab_01-item_no.
TAX = itab_01-taxjur.
len = STRLEN(tax).
itab_01-z_len = len.
modify itab_01 transporting z_len where
doc_no = doc and item_no = item.
ENDLOOP.
***what I am doing here I am keep only the records in itab which has minimum
tax jurisdiction length for a line item in a document*****
SORT ITAB_01 DESCENDING BY doc_no z_len ASCENDING.
DELETE ADJACENT DUPLICATES FROM itab_01 comparing doc_no.
and for zlenght object I am writing the followoing code in update rules.
read table itab_01 with key doc_no = COMM_STRUCTURE-AC_DOC_NO
BINARY SEARCH.
if sy-subrc = 0.
RESULT = itab_01-z_len.
endif.
But the field z_len field is blank for all fields.
Any help is really appreciated.
Thanks,
Raj

hi Ravi,
try to give same field name in internal table and /BIC/AZFGLO10100, change the code accordingly
Types: BEGIN OF ITAB1,
AC_DOC_NO LIKE /BIC/AZFGLO10100-AC_DOC_NO,
ITEM_NUM LIKE /BIC/AZFGLO10100-ITEM_NUM,
TAXJURCODE LIKE /BIC/AZFGLO10100-TAXJURCODE,
z_len TYPE I,
END OF ITAB1.
DATA ITAB_01 TYPE TABLE OF ITAB1 WITH HEADER LINE.
***filling the internal table with the contents of
select AC_DOC_NO ITEM_NUM TAXJURCODE into
corresponding fields of itab_01
from /BIC/AZFGLO10100
FOR ALL ENTRIES IN DATA_PACKAGE
WHERE AC_DOC_NO = DATA_PACKAGE-AC_DOC_NO
AND ITEM_NUM = DATA_PACKAGE-ITEM_NUM.
endselect.

How to pass internal table to form routine..?

Gurus,
I am creating a custom Function module in which i have declared few perform statements and passing internal table to it..but when i declare the form it gives me error that the internal table is unknown...Can u please suggest me what am i doing wrong...
DATA: Begin of tb_set_values occurs 0.
 include structure rgsb4.
DATA: End of tb_set_values.
PERFORM read_sets_with_values USING wa_setheader CHANGING tb_set_values[].
FORM read_sets_with_values USING value(rwa_setheader) LIKE setheader
 CHANGING rtb_set_values LIKE tb_set_values[].
DATA: v_setid TYPE setid.
*DATA: Begin of rtb_set_values occurs 0.
 include structure rgsb4.
*DATA: End of rtb_set_values.
CALL FUNCTION 'G_SET_GET_ID_FROM_NAME'
 EXPORTING
 SHORTNAME = rwa_setheader-setname
 IMPORTING
 NEW_SETID = v_setid.
CALL FUNCTION 'G_SET_GET_ALL_VALUES'
 EXPORTING
 SETNR = v_setid
 TABLES
 SET_VALUES = rtb_set_values.
ENDFORM.
What can be the error..please help

Well actually, I just tested it and it works fine as you have written it in my test program, so not sure what you are doing wrong. This was tested in NW 7.0
REPORT rich_0001.
DATA: setheader TYPE string.
DATA: wa_setheader TYPE string.
DATA: BEGIN OF tb_set_values OCCURS 0.
 INCLUDE STRUCTURE t000. "<<-- Test with T000 instead "rgsb4.
DATA: END OF tb_set_values.
SELECT * INTO TABLE tb_set_values FROM t000.
PERFORM read_sets_with_values USING wa_setheader
 CHANGING tb_set_values[].
*& Form read_sets_with_values
* text
* -->VALUE(RWA_SETHEADER) text
* -->RTB_SET_VALUES text
FORM read_sets_with_values USING value(rwa_setheader) LIKE setheader
 CHANGING rtb_set_values LIKE tb_set_values[].
DATA: ls_set_values LIKE LINE OF rtb_set_values.
LOOP AT rtb_set_values INTO ls_set_values.
 WRITE:/ ls_set_values.
ENDLOOP.
ENDFORM. "read_sets_with_values
Regards,
RIch Heilman

Internal table in a form routine

Hi,
I have a problem when I try to use an internal table to pass it into a form/Perform subroutine.
Here is my code :
DATA: BEGIN OF i_table_exple OCCURS 0,
    ncont TYPE char18,
    cdmvt TYPE char1,
   END OF i_table_exple.
perform test_form using i_table_exple.
form test_form using i_table like i_table_exple.
loop at i_table.
    write : / i_table-ncont.
    write : / i_table-cdmvt.
endloop.
endform.
when I try to activate it, I have an error : "i_table" is neither specified under "tables" nor is it defined as an internal table
I think the way I pass my table to the form is not correct, but I don't know how to deal with it.

Try the following code:
TYPES: BEGIN OF t_table_exple ,
ncont TYPE char18,
cdmvt TYPE char1,
END OF t_table_exple.
DATA : i_table_exple TYPE t_table_exple OCCURS 0 WITH HEADER LINE.
perform test_form tables i_table_exple.
form test_form table i_table like i_table_exple.
loop at i_table.
write : / i_table-ncont.
write : / i_table-cdmvt.
endloop.
endform.

Need Clarification On Internal tables in Start Routine

Hi,
I have intenal table some IT_A which deletes the requests which are populated in to it.
Now I need to populate requests into IT_A from another internal table like IT_B which are of different structure.
I have three fields in common in both internal tables like RNR,Timestamp n SID with different field names
I Need Clarification that if i move the contents of the three fields to IT_A from IT_B by spcifying these three fields.Will the internal table IT_A deletes the Requests?
Thanks,
Sriram.

Hi Sriram,
As mentioned IT_A deleted the request loaded into it.
if you move the contents of the three fields to IT_A from IT_B by spcifying the three fields after the deletion step for internal table IT_A takes place then it wont get deleted.
But it would be deleted if the the contents are moved before the deletion step takes place
regards,
mahesh

How do we pass values and Internal tables to Sub-routines

how do we pass values and Internal tables to Sub-routines

Hi,
You can use the USING..or TABLES..or Changing addition..
Check this example.
DATA: T_MARA TYPE STANDARD TABLE OF MARA.
PERFORM DISPLAY USING T_MARA.
FORM DISPLAY USING LT_MARA LIKE T_MARA.
DATA: WA TYPE MARA.
LOOP AT LT_MARA INTO WA.
WRITE: / WA-MATNR.
ENDLOOP.
ENDFORM.
Thanks
Naren

Using an internal table from a strt rountine in an update rule

I created a start routine and i now want to take the value from the internal table and set my result to it in my update rule. I try that and it says it isn't a header table but I defined it this way. here is the code
DATA: T_BILL_DATA LIKE STANDARD TABLE OF /BIC/AZBIL_O5300,
 Ls_data like line of T_BILL_DATA.
$$ end of global - insert your declaration only before this line -
FORM compute_key_field
TABLES MONITOR STRUCTURE RSMONITOR "user defined monitoring
USING COMM_STRUCTURE LIKE /BIC/CS2LIS_12_VCSCL
 RECORD_NO LIKE SY-TABIX
 RECORD_ALL LIKE SY-TABIX
 SOURCE_SYSTEM LIKE RSUPDSIMULH-LOGSYS
CHANGING RESULT LIKE /BIC/VZSD_C51T-SALESORG
 RETURNCODE LIKE SY-SUBRC
 ABORT LIKE SY-SUBRC. "set ABORT <> 0 to cancel update
$$ begin of routine - insert your code only below this line -
fill the internal table "MONITOR", to make monitor entries
result value of the routine
READ TABLE T_BILL_DATA WITH KEY
DOC_NUMBER = COMM_STRUCTURE-DOC_NUMBER
S_ORD_ITEM = COMM_STRUCTURE-S_ORD_ITEM
REFER_DOC = COMM_STRUCTURE-DELIV_NUMB
REFER_ITM = COMM_STRUCTURE-DELIV_ITEM
BINARY SEARCH.
RESULT = T_BILL_DATA-SALESORG.

Hi LMM,
The definition is not correct, your table doesn't have header line.
try this,
DATA: T_BILL_DATA LIKE STANDARD TABLE OF /BIC/AZBIL_O5300 with header line.
Hope it helps.
Thanks,
Soumya

Internal table in sap script

Hello All ,
I have got a internal table with tracking numbers and I want to print all the numbers in that internal table on sap script.
Please advise.
Thanks
Moderator message: please search for available information before asking.
locked by: Thomas Zloch on Sep 13, 2010 1:09 PM

Hi,
You can create a sub-routine and pass all the table entries in variables and then you can print them.

Internal table in BI7

Hi,
Can some send steps to create internal table and steps for filling the table in BI7?
Thanks and Regards,
Pooja

Hi Pooja,
The IT_TEST is the internla table and WA_TEST is work area here.
Pl go thru the Below Code.I am trying to populate Branch from Customer Table.
$$ begin of global - insert your declaration only below this line -
TYPES : BEGIN OF TY_CUSTOMER,
               /BIC/CUSTOMER TYPE /BIC/CUSTOMER-/BIC/CUSTOMER,
               /BIC/BRANCH TYPE /BIC/CUSTOMER-/BIC/BRANCH,
            END OF TY_CUSTOMER.
   DATA :   IT_TEST    TYPE STANDARD TABLE OF TY_CUSTOMER,
             WA_TEST    TYPE TY_CUSTOMER.
$$ begin of routine - insert your code only below this line        *-
Start Routines
    IF SOURCE_PACKAGE[] IS NOT INITIAL.
      SELECT     /BIC/BRANCH
                 INTO CORRESPONDING FIELDS OF TABLE IT_TEST
                  FROM u201CMaster Tableu201D
                  FOR ALL ENTRIES IN SOURCE_PACKAGE
                  WHERE /BIC/CUSTOMER = SOURCE_PACKAGE-/BIC/CUSTOMER AND
                  OBJVERS = C_A.
    ENDIF.
    IF NOT IT_TEST IS INITIAL.
      SORT IT_TEST BY /BIC/CUSTOMER.
    ENDIF.
Transfer ROutine
Source Field = Customer
Target Field = Branch
    READ TABLE IT_TEST INTO WA_TEST WITH KEY /BIC/CUSTOMER(Field) =
    SOURCE_FIELDS-/BIC/CUSTOMER
    BINARY SEARCH.
    IF SY-SUBRC = 0.
      RESULT = WA_TEST-/BIC/BRANCH.
    ENDIF.
Rgds
SVU

Internal table in routine of infocube

Similar Messages

Maybe you are looking for