Export to Excel - Multiple Tables in a single details section

Hi All,
I have a set of reports where I am using a single details section to show multiple tables stacked over one another. That is, i have a table with three columns and two rows, followed by some white space and then another table with 4 columns and 1 row, followed by white space and then other tables.
When I export it to excel, I am getting the data but the ordering is in a reverse pivoted fashion:
Excel output:
CR_column1_Heading CR_Column2_Heading CR_Column1_Data CR_Column2_Data
Is there a way to control the sequence of fields displayed in excel while exporting?
Thanks.
- Atif.

@Carl,
It is printing like this.
HEADER1 HEADER2 HEADER3 DATA 1 DATA 2 DATA 3
I am getting all the columns and fields in excel, that is not a problem. However, the problem is whether i can control the order the fields are printed onto Excel.
Like what Ben is commenting:
HEADER1 DATA 1 HEADER2 DATA 2 HEADER3 DATA 3
However, I dont want to reorder the fields on the canvas as the format layout is predefined.
I tried searching through the Cystal SDK if there is a finer level of control but to no avail.
A work around under the above constraints would be simply amazing!
Thanks again and appreciate your response.
Regards,
Atif.

Similar Messages

Export Multiple tables into a single Excel Sheet

We have a use case where we need to export multiple tables into an excel sheet. The exportCollectionActionListener only allows one table (which is provided in the exportedId attribute) to be exported into Excel. So is there a method provided by adf to export more that one table into excel ?

dvohra,
I need to export multiple tables into a single excel sheet. These links only show how to export a single table to an excel sheet.
I have tried out this : http://iadvise.blogspot.com/2007/04/export-adf-table-to-excel.html. But i am not getting the popup to save the file. So i can't find out where the file got created.

Move data from multiple Tables to a Single Table & Convert the list to ALV.

Hi,
My aim is to get the list of Materials with their descriptions, with MRP Controller, with Unrestriced Qty. & the Reorder Qty. So, I have to fetch the data from different tables. But finally I am not able to copy or move the fetched data from multiple tables into the single final table.
Also tell me how to convert this list into ALV.
Below is the program code.
*& Report Y_REORDER_REPORT
REPORT Y_REORDER_REPORT.
tables : marc,makt, mard.
DATA: Begin of i_final occurs 0,
        matnr type marc-matnr,
        maktx type makt-maktx,
        DISPO type marc-DISPO,
        MINBE type marc-MINBE,
        LABST type mard-LABST,
      end of i_final.
DATA: Begin of i_marc occurs 0,
       matnr type marc-matnr,
       DISPO type marc-DISPO,
       MINBE type marc-MINBE,
      end of i_marc.
DATA: Begin of i_makt occurs 0,
       matnr type makt-matnr,
       maktx type makt-maktx,
      end of i_makt.
DATA: Begin of i_mard occurs 0,
       matnr type mard-matnr,
       LABST type mard-LABST,
       LGORT TYPE MARD-LGORT,
      end of i_mard.
SELECT matnr
        dispo
        minbe from marc
        into corresponding fields of table i_marc
        where dispo EQ 'STR'.
SORT I_MARC by MATNR.
WRITE: /10 'Material',
        75 'MRP',
        80 'Reorder Qty.'.
LOOP at i_marc.
Write: /10 i_marc-matnr,
        75 i_marc-dispo,
        80 i_marc-minbe.
ENDLOOP.
write: /.
SELECT matnr
        MAKTX from makt
        into corresponding fields of table i_makt
        for all entries in i_marc
        where matnr = i_marc-matnr.
LOOP at i_makt.
Write: /10 i_makt-matnr,
        30 i_makt-maktx.
ENDLOOP.
SELECT matnr
        LGORT
        LABST from mard
        into corresponding fields of table i_mard
        for all entries in i_marc
        where matnr = i_marc-matnr.
LOOP at i_mard.
Write: /10 i_mard-matnr,
        30 I_MARD-LGORT,
        40 i_mard-labst.
ENDLOOP.
move i_mard-matnr to i_final-matnr.
move i_marc-dispo to i_final-dispo.
move i_marc-minbe to i_final-minbe.
move i_makt-maktx to i_final-maktx.
move i_mard-labst to i_final-labst.
WRITE: /10 'Material',
        30 'Material Desc.',
        75 'MRP',
        80 'Reorder Qty.',
        105 'Current Stock'.
LOOP at i_final.
Write: /10 i_final-matnr,
        30 i_final-maktx,
        75 i_final-dispo,
        80 i_final-minbe,
        105 i_final-labst.
ENDLOOP.
*LOOP at i_mard.
*Write: /10 i_mard-matnr,
       30 i_makt-maktx,
       75 i_marc-dispo,
       80 i_marc-minbe,
       105 i_mard-labst.
*ENDLOOP.
Regards,
Vishal

Change like this,
SELECT matnr
lgort
labst FROM mard
INTO CORRESPONDING FIELDS OF TABLE i_mard
FOR ALL ENTRIES IN i_marc
WHERE matnr = i_marc-matnr.
LOOP AT i_mard.
   WRITE: /10 i_mard-matnr,
   30 i_mard-lgort,
   40 i_mard-labst.
ENDLOOP.
LOOP AT i_marc.
   READ TABLE i_mard WITH KEY matnr = i_marc-matnr.
   READ TABLE i_makt WITH KEY matnr = i_marc-matnr.
   MOVE i_mard-matnr TO i_final-matnr.
   MOVE i_marc-dispo TO i_final-dispo.
   MOVE i_marc-minbe TO i_final-minbe.
   MOVE i_makt-maktx TO i_final-maktx.
   MOVE i_mard-labst TO i_final-labst.
   APPEND i_final.
ENDLOOP.
WRITE: /10 'Material',
30 'Material Desc.',
75 'MRP',
80 'Reorder Qty.',
105 'Current Stock'.

Export to excel pivot table is incorrect

Hi All,
I have a problem when export Discoverer Plus report to Excel Pivot table...
My problem is calculation field (ex. Average salary per employee) in pivot table shown incorrect
data.
May someone has any idea for this problem and how to solve it.
Thanks,
Mcka
Remark: I have info. about Discoverer version that I use
OracleBI Discoverer 10g (10.1.2.2)
Oracle Business Intelligence Discoverer Plus 10g (10.1.2.54.25)
Discoverer Model - 10.1.2.54.25
Discoverer Server - 10.1.2.54.25
End User Layer - 5.1.1.0.0.0
End User Layer Library - 10.1.2.54.25

Have anybody share idea about this problem ?

Export to excel iview table data of a standard application with out BAPI

Hi All,
I am Editing Standard Application. In that i need to add a button, on clicking that the data present in that iview table to be exported to excel.
The table contains editable & non editable fields. The context attributes are under in different nodes. OADP is used to get all the attribute values of the table.
We have faced problems in identifying OADP attributes. Because of this, we have used seperate BAPI to group all the attributes of the table. By using this BAPI, We are successful in exporting the table data to excel
Could you please provide a solution to export the table data to excel from iview directly with out going to BAPI.
Thanks,

Hi Challa,
We have a similar requirement and are not able to find the node or attributes of the planning table.
Can you let us know how you went about doing this? Which are the nodes or attributes? Any help is appreciated..
Thanks & Regards,
Malita Fernandes

Numbers: Copy/Paste from multiple tables into 1 single Table?

I would appreciate some guidance in creating a copy/paste script from multiple numbers tables into a different single table within the same numbers document.
The columns in the source table are in different positions to the destination table.
So for example, i would want to copy…
Sheet 1, Table 1 Cell A3 copy to Sheet 2 Table Z Cell B2
Sheet 1, Table 1 Cell B3 copy to Sheet 2 Table Z Cell C2
Sheet 1, Table 1 Cell C3 copy to Sheet 2 Table Z Cell E2
Sheet 1, Table 1 Cell D3 copy to Sheet 2 Table Z Cell F2
Sheet 1, Table 1 Cell E3 copy to Sheet 2 Table Z Cell G2
Sheet 1, Table 1 Cell G3 copy to Sheet 2 Table Z Cell I2
Sheet 1, Table 1 Cell J3 copy to Sheet 2 Table Z Cell H2
and repeat the copy/paste on subsequent rows of each table until there is an empty row in Sheet 1 Table 1 (or if this is difficult, say set the repeat to a max of 30 rows).
The script would then need to move on to Sheet 1 Table 2, and do the same copying to Sheet 2 Table Z (from where the previous copy/paste finished in Table Z).
Repeat process would finalise with Sheet 1 Table 6.
The Paste part would need to be pasting values, as the cells in the source tables do contain some formulas.
At the moment this is all done manually and does take some to to undertake.
If anyone can help, i would be very grateful.
Thanks,
Colin

Interceptor,
are you trying to aggregate data from severl tables into a single table? If so you whould be able to do this without a script. The function indirect() will allow you to construct the proper formula, which you may fill over (in the same row) to the appropriate cells, then fill down.
Here is a small example:
There are three data tables ("Table 1", "Table 2", and "Table 3"). And a summary "Table Z"
In table Z make the first row a header (as shown):
Use column A to enter the Sheet name and colomn B to enter the table name.
In row 1 (the header), enter the cells you want to get
in cell C2 type (or copy and paste from here) the formula:
=INDIRECT($A2&"::"&$B2&"::"&C$1)
now select cell C2, copy now select cell C2 thru H2, paste
now select the cells C2 thu H2, hover the corsor over the bottom edge of the selection, and drag the yellow cirlc down as needed to fill the formula down.
Update the sheet and table names as needed for each row

Multiple Table Mapping To Single Entity in Workshop 8.1

I've taken a test run on creating entity beans with workshop 8.1, although mapping
an CMP entity to a single database table looks to be relatively straightforward,
I can't seem to find a way to map multiple database tables to a single CMP entity
(at least not via workshop). Do I have to manually modify the deployment descriptors
after building with workshop?

Thanks, John.
Jingwei
"John Reynolds" <[email protected]> wrote:
>
Jingwei Zhang <[email protected]> wrote:
Is there any example of using ejbgen to map single EJB to multiple tables?
Jingwei... I found this at: http://www.beust.com/cedric/ejbgen/#multiple-table-mapping
By default, Entity beans are mapped to one table, with the attribute
table-name
on the tag @ejbgen:entity. If you want to map your Entity bean to more
than one
table, you can use the table-name attribute on individual @ejbgen:cmp-fields.
All the CMP fields that do not have a table-name attribute will use the
table
specified on @ejbgen:entity (which can therefore be considered as the
"default"
table).
If you want to map an Entity bean to several tables, you need to specify
a comma-separated
list of tables in the table-name attribute (and also on column). For
example:
* @ejbgen:cmp-field
* column = "bal1, bal2"
* table-name = "Table1, Table2"
Make sure that the number of tables matches the number of columns, and
that the
columns exist in the corresponding table (for example, in the example
above, Table1
must contain column bal1, and Table2, bal2).

Single row editing for multiple tables in a single page

Hi!
I have split a table with many many columns into more tables with a lower number of columns. There is an ID column (sequence generated) that is Primary Key common for all tables. Obviously, the relationship between these tables is 1 to 1, so its not about having to build master-detail pages.
What I need now is to edit all these tables in a single page: one single row from each table. The Automated Row Fetch & Automatic Row Processing (DML) processes used for the old table must be replaced by something else.
Is there a way to use in a single page more pairs of such processes for more tables?
I want to avoid manually writing processes with lot of PL/SQL code to handle row fetch & update.
Keep in mind that the page will have an ID item that can be used to identify unique rows in all my tables.
Thanks,
Sorin

I have split a table with many many columns into more tables with a lower number of columns
IMHO that is a very bad idea. There is nothing wrong with having many columns in a table. If you would like to split them to better "categorize" them, just create views on the table and expose different subsets of the columns.
I want to avoid manually writing processes with lot of PL/SQL code to handle row fetch & update.
That is unavoidable given how you have designed the underlying tables.
You could try creating a view that joins all the tables by the PK and creating a form based on that view. Then write a INSTEAD OF trigger on the view that "doles out" the DML on the view to each of the underlying tables.

Adding Sum Totals from Multiple Tables in A single Document

Hello All,
I'm having trouble adding sum totals from multiple tables I've created in a Pages 09 doc. I putting together a spreadsheet for cost projections for a house remodel. I created tables for each room of the house. At the bottom of the document I'd like to have another table that takes the totals from each individual room and adds them up. Problem appears to be that each table has the same x/y axis labels so row and column numbers/letters are repeated so the final table can't quantify thing correctly.
Any easy solutions? I can't find anything that's helped in my search efforts.
Thanks,
Josefis

Jerry,
Thanks for the feedback. I thought that might be the case. And you were correct to assume I was more comfortable in Pages. I'm halfway through converting everything to numbers. In the end it will work great too. Just some different formatting/design choices to be made as numbers doesn't appear to be as versatile in the same way pages is with design. So far it looks pretty good though.
Thanks again,
Josefis

Multiple master regions for single detail

I am trying to created a master / detail with spry. the problem is that I need to have the master area grouped in three different sections separated by titles and each title would have styling including background image.
I can think of two different ways of doing it but each one has it's own problems:
1. create mulitiple master regions with different data sources that would update a single detail region. I simply do not know how to do this.
2. add styl sheet to the .html that has the data table for the dataset. the problem is that the dataset only caries the data through but not the styling associated with it.
I am new to this and any kind of help is realy appreciated.
thanks in advance

I didn't see any multiple dataset detail regions in your page.
Also this might a other solution for you, the Spry DataSet Shell;
It allows you to swap between different datasets.
http://labs.adobe.com/technologies/spry/samples/data_region/DataSetShellSample.html
http://labs.adobe.com/technologies/spry/samples/data_region/DataSetShell_accordion.html

How can I sort multiple tables on a single page as if they were one continuous table?

I have a single narrow column of numbers that cover multiple pages. I would like to do either of the following: break that long single column into multiple colums that fit on one page and are still able to be sorted in that arrangement OR sort the long column as it is (spread out over multiple pages) and then break that long sorted column down into multiple segments that can be placed onto a single page.
I have been sorting the long single column, then copy and pasting sections from the column onto a new page so that I can print them on a single page.
I am hoping there is a more elegant method to do this.

Hi Walt,
Sorting is one of the things that changed between Numbers '09 and Numbers 3. If you are on Mountain Lion I want to assume you are using '09. Is that true?
This will work in '09 and 3. Table one is a single column with entries 1-89.
A2 ==INDEX(Table 1 :: $A,ROW())
B2 =INDEX(Table 1 :: $A,ROW()+35)
C2 =INDEX(Table 1 :: $A,ROW()+70)
The formulas are filled down.
You can adjust the formulas in B and C to reflect how many rows fit on your page.
quinn

How to save multiple tables on one single save button in JDeveloper.

hi all,
i have two tables on a JSF page.
the parent and child tables has 1 to many relationship.
its like for department id i have many employee_id's.
in my scenario ,
i have to give values to both parent and child tables at a time on one single click on add button. and after clicking on one single save button i should be able to commit the data into database for both the tables at a time.
its similar like a hire a person in fusion applications , when you clinked on hire person. all the related tables populated to give data and on one single save committing data to database.
please help in this. and its my urgent requirement for my application design.
am beginner to the J Developer Tool and ADF.
regards,
M vijayalakshmi.

I assume you are using ADF BC as your business components. Now if both your Master and Chail VO are instances of the same AM, the commit operation of the AM will take care of it. You just have to drag and drop the commit operation as a Save button in your page

CS4-connecting to multiple tables within a single Indesign doc.

Hi!
I recently downloaded Datalinker, a plugin for Indesign that lets you connect to databases. I created a table in indesign and pulled in data from one table in the database. The problem I'm having is if I create another table in the same indesign document and want to access a different table in the database, I can't get that to work. It seems like it only wants to be able to connect to one table at a time per document?
Does anyone know a different way to go about doing this?
Thanks!

Have you contacted Teacup? They're very good about responding.
Bob

ACCESSING MULTIPLE TABLES THRU ONE SELECT STATEMENTS

How to access multiple tables through one single select statement and also using where condition in it for multiple fields which are from different tables. please give me any example from any tables ....thanks in advance

See the below example code :
REPORT ZMM_COST no standard page heading
                        line-size 255
                        message-id zwave .
type-pools
type-pools : slis.
Tables
tables : mara,
         makt,
         mbew,
         konp,
         pgmi,
         marc,
         RMCP3,
         sscrfields,
         mvke.
Internal Table for MARC and MARA
data : begin of i_join occurs 0,
       matnr like mara-matnr, " Material #
       meins like mara-meins, " Unit of Measure
       werks like marc-werks, " Plant
       zzdept like marc-zzdept," Department
       end of i_join.
Internal table for PGMI
data : begin of i_pgmi occurs 0,
       werks like pgmi-werks, " Plant,
       nrmit like pgmi-nrmit, " Material #
       wemit like pgmi-wemit, " Plant
       end of i_pgmi.
Internal Table for MBEW
data i_mbew like mbew occurs 0 with header line.
Internal Table for Output
data : begin of i_output occurs 0 ,
       matnr like mara-matnr, " Material #
       maktx like makt-maktx, " Material Desc
       VPRSV like mbew-VPRSV, " Price Control Indicator
       VERPR like mbew-VERPR, " Moving Avg Price
       meins like mara-meins, " Base Unit of Measure
       STPRS like mbew-STPRS, " Standard Price
       LPLPR like mbew-LPLPR, " Current Planned Price
       ZPLPR like mbew-ZPLPR, " Future Planned Price
       VPLPR like mbew-VPLPR, " Previous Planned Price
       kbetr like konp-kbetr, " Sales Price
       KMEIN like konp-KMEIN, " Sales Unit
       margin(5) type p decimals 2,
       vmsta like mvke-vmsta, " Material Status.
       end of i_output.
Internal Table for A004
data : i_a004 like a004 occurs 0 with header line.
Variables
data : wa_lines type i,
       wa_maktx type makt-maktx,
       v_flag type c.
ALV Function Module Variables
DATA: g_repid like sy-repid,
      gs_layout type slis_layout_alv,
      g_exit_caused_by_caller,
      gs_exit_caused_by_user type slis_exit_by_user.
DATA: gt_fieldcat    type slis_t_fieldcat_alv,
      gs_print       type slis_print_alv,
      gt_events      type slis_t_event,
      gt_list_top_of_page type slis_t_listheader,
      g_status_set   type slis_formname value 'PF_STATUS_SET',
      g_user_command type slis_formname value 'USER_COMMAND',
      g_top_of_page type slis_formname value 'TOP_OF_PAGE',
      g_top_of_list type slis_formname value 'TOP_OF_LIST',
      g_end_of_list type slis_formname value 'END_OF_LIST',
      g_variant LIKE disvariant,
      g_save(1) TYPE c,
      g_tabname_header TYPE slis_tabname,
      g_tabname_item   TYPE slis_tabname,
      g_exit(1) TYPE c,
      gx_variant LIKE disvariant.
data : gr_layout_bck type slis_layout_alv.
Selection-screen
selection-screen : begin of block blk with frame title text-001.
parameters : p_werks like marc-werks default '1000' obligatory.
select-options : s_dept for marc-zzdept obligatory,
                 s_matnr for mara-matnr,
                 s_mtart for mara-mtart,
                 s_vprsv for mbew-VPRSV,
                 s_PRGRP for RMCP3-PRGRP MATCHCODE OBJECT MAT2 ,
                 s_vmsta for mvke-vmsta.
selection-screen: end of block blk.
*SELECTION-SCREEN BEGIN OF BLOCK b3 WITH FRAME TITLE text-003.
*PARAMETERS: p_vari LIKE disvariant-variant.
*SELECTION-SCREEN END OF BLOCK b3.
At slection screen events                                            *
*-- Process on value request
*AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_vari.
PERFORM f4_for_variant.
Initialization                                                       *
Initialization.
g_repid = sy-repid.
sscrfields-functxt_01 = 'Clear Selection'.
selection-screen function key 1.
AT SELECTION-SCREEN.
case sscrfields-ucomm.
when 'Clear Selection' or 'FC01'.
clear: s_matnr,
       p_werks.
refresh: s_matnr,
         s_dept,
         s_mtart,
         s_vprsv,
         s_PRGRP,
         s_vmsta.
endcase.
Start-of-selection.
start-of-selection.
Clear the all data.
perform clear_data.
Get the data from PGMI Table
perform get_pgmi.
Get the data from MARC and MARA Table
perform get_mara_marc.
Get the data from MBEW Table
perform get_mbew.
Move the data into OUTPUT Table
perform move_output_internal.
*end-of-selection.
end-of-selection.
if not i_output[] is initial.
ALV Function Module
    perform print_alv.
endif.
*&      Form get_pgmi
      Select the data from PGMI Table
FORM get_pgmi.
clear v_flag.
If Product group has a value at Selection-screen.
if not s_prgrp is initial.
    select werks nrmit wemit from pgmi into table i_pgmi
                             where prgrp in s_prgrp
                             and   werks = p_werks
                             and   wemit = p_werks.
    v_flag = 'X'.
endif.
ENDFORM.                    " get_pgmi
*&      Form get_mara_marc
      Select the data from MARA and MARC
FORM get_mara_marc.
if v_flag = 'X'.
    select amatnr ameins bwerks bzzdept into table i_join
           from mara as a inner join marc as b on amatnr = bmatnr
           for all entries in i_pgmi
                                     where a~matnr in s_matnr
                                     and   b~werks = p_werks
                                     and   b~zzdept in s_dept
                                     and   a~mtart in s_mtart
                                     and   a~matnr = i_pgmi-nrmit
                                     and   b~werks = i_pgmi-werks.
else.
Get the data from MARA and MARC Table
    select amatnr ameins bwerks bzzdept into table i_join
           from mara as a inner join marc as b on amatnr = bmatnr
                                     where a~matnr in s_matnr
                                     and   b~werks = p_werks
                                     and   b~zzdept in s_dept
                                     and   a~mtart in s_mtart.
endif.
clear wa_lines.
describe table i_join lines wa_lines.
if wa_lines is initial.
    message i000(zwave) with 'List contains no data'.
    stop.
endif.
sort i_join by matnr werks zzdept.
ENDFORM.                    " get_mara_marc
*&      Form get_mbew
      Select the data from MBEW Table
FORM get_mbew.
Get the data from MBEW.
select * from mbew into table i_mbew
           for all entries in i_join
           where matnr = i_join-matnr.
clear wa_lines.
describe table i_mbew lines wa_lines.
if wa_lines is initial.
    message i000(zwave) with 'List contains no data'.
    stop.
endif.
sort i_mbew by matnr bwkey.
ENDFORM.                    " get_mbew
*&      Form move_output_internal
     Final Results
FORM move_output_internal.
loop at i_join.
    clear wa_maktx.
Compare the data with MVKE Table
    select single vmsta from mvke into mvke-vmsta
                             where matnr = i_join-matnr
                             and   vkorg = '0001'
                             and   vtweg = '01'
                             and   vmsta in s_vmsta.
    if sy-subrc ne 0.
      continue.
    else.
      i_output-vmsta = mvke-vmsta.
    endif.
    read table i_mbew with key matnr = i_join-matnr
                               bwkey = i_join-werks
                               binary search.
    if sy-subrc eq 0.
Price Control Indicator
      i_output-VPRSV = i_mbew-VPRSV.
Moving Average Price
      i_output-VERPR = i_mbew-VERPR / i_mbew-peinh.
Standard Price
      i_output-STPRS = i_mbew-STPRS / i_mbew-peinh.
Current Planned Price
      i_output-LPLPR = i_mbew-LPLPR / i_mbew-peinh.
Future Planned Price
      i_output-ZPLPR = i_mbew-ZPLPR / i_mbew-peinh.
Previous Planned Price
      i_output-VPLPR = i_mbew-VPLPR / i_mbew-peinh.
Base Unit of Measure - Added by Seshu 01/09/2007
      i_output-meins = i_join-meins.
    else.
      continue.
    endif.
Get the sales Price.
    perform get_sales_data.
    if i_mbew-VPRSV = 'V'.
Get the Percentage of Margin
      if i_output-kbetr ne '0.00'.
        i_output-margin = ( ( i_output-kbetr - i_mbew-VERPR )
                           / i_output-kbetr ) * 100 .
      endif.
    else.
Get the Percentage of Margin
      if i_output-kbetr ne '0.00'.
        i_output-margin = ( ( i_output-kbetr - i_output-stprs )
                           / i_output-kbetr ) * 100 .
      endif.
    endif.
Get the material Description from MAKT Table
    select single maktx from makt into wa_maktx
                             where matnr = i_join-matnr
                             and   spras = 'E'.
    if sy-subrc eq 0.
      i_output-matnr = i_join-matnr.
      i_output-maktx = wa_maktx.
    endif.
    append i_output.
    clear : i_output,
            i_join,
            i_mbew.
endloop.
ENDFORM.                    " move_output_internal
*&      Form get_sales_data
      Get the Sales Price for each material
FORM get_sales_data.
Get the data from A004 table to get KNUMH
Added new field Sales Unit - Seshu 01/09/2006
refresh : i_a004.
clear :   i_a004.
data : lv_kbetr like konp-kbetr," Condition value
         lv_KPEIN like konp-kpein , "per
         lv_KMEIN like konp-KMEIN. " Sales Unit
select * from a004 into table i_a004
                          where matnr = i_join-matnr
                          and   vkorg = '0001'
                          and   vtweg = '01'.
if sy-subrc eq 0.
    sort i_a004 by DATAB descending.
Get the Latetest Date
    read table i_a004 with key matnr = i_join-matnr
                               vkorg = '0001'
                               vtweg = '01'
                               binary search.
Get the Sales Value
    select single kbetr KPEIN KMEIN from konp
             into (lv_kbetr,lv_KPEIN, lv_KMEIN)
                             where knumh = i_a004-knumh
                             and   kappl = i_a004-kappl
                             and   kschl = i_a004-kschl.
    if sy-subrc eq 0.
      i_output-kbetr = lv_kbetr / lv_KPEIN.
      i_output-KMEIN = lv_KMEIN.
    endif.
endif.
clear : lv_kbetr,
          lv_kpein,
          lv_KMEIN.
ENDFORM.                    " get_sales_data
*&      Form print_alv
      ALV Function Module
FORM print_alv.
Fill the Fiedlcat
PERFORM fieldcat_init using gt_fieldcat[].
gr_layout_bck-edit_mode = 'D'.
gr_layout_bck-colwidth_optimize = 'X'.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
   EXPORTING
   I_INTERFACE_CHECK                 = ' '
   I_BYPASSING_BUFFER                =
   I_BUFFER_ACTIVE                   = ' '
     I_CALLBACK_PROGRAM                = g_repid
   I_CALLBACK_PF_STATUS_SET          = ' '
     I_CALLBACK_USER_COMMAND           = g_user_command
   I_CALLBACK_TOP_OF_PAGE            = ' '
   I_CALLBACK_HTML_TOP_OF_PAGE       = ' '
   I_CALLBACK_HTML_END_OF_LIST       = ' '
   I_STRUCTURE_NAME                  =
   I_BACKGROUND_ID                   = ' '
   I_GRID_TITLE                      =
   I_GRID_SETTINGS                   =
    IS_LAYOUT                         = gr_layout_bck
      IT_FIELDCAT                       = gt_fieldcat[]
   IT_EXCLUDING                      =
   IT_SPECIAL_GROUPS                 =
   IT_SORT                           =
   IT_FILTER                         =
   IS_SEL_HIDE                       =
   I_DEFAULT                         = 'X'
    I_SAVE                            = g_save
    IS_VARIANT                        =
   IT_EVENTS                         =
   IT_EVENT_EXIT                     =
   IS_PRINT                          =
   IS_REPREP_ID                      =
   I_SCREEN_START_COLUMN             = 0
   I_SCREEN_START_LINE               = 0
   I_SCREEN_END_COLUMN               = 0
   I_SCREEN_END_LINE                 = 0
   IT_ALV_GRAPHICS                   =
   IT_ADD_FIELDCAT                   =
   IT_HYPERLINK                      =
   I_HTML_HEIGHT_TOP                 =
   I_HTML_HEIGHT_END                 =
   IT_EXCEPT_QINFO                   =
IMPORTING
   E_EXIT_CAUSED_BY_CALLER           =
   ES_EXIT_CAUSED_BY_USER            =
    TABLES
      T_OUTTAB                          = i_output
   EXCEPTIONS
     PROGRAM_ERROR                     = 1
     OTHERS                            = 2
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM.                    " print_alv
*&      Form fieldcat_init
      Fieldcat
FORM fieldcat_init USING e01_lt_fieldcat type slis_t_fieldcat_alv.
DATA: LS_FIELDCAT TYPE SLIS_FIELDCAT_ALV.
Material #
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'MATNR'.
LS_FIELDCAT-ref_fieldname = 'MATNR'.
LS_FIELDCAT-ref_tabname = 'MARA'.
LS_FIELDCAT-TABNAME    = 'I_OUTPUT'.
ls_fieldcat-seltext_L = 'Material'.
ls_fieldcat-seltext_M = 'Material'.
ls_fieldcat-seltext_S = 'Material'.
APPEND LS_FIELDCAT TO E01_LT_FIELDCAT.
Material Description
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'MAKTX'.
LS_FIELDCAT-OUTPUTLEN    = 35.
LS_FIELDCAT-TABNAME    = 'I_OUTPUT'.
ls_fieldcat-seltext_L = 'Description'.
APPEND LS_FIELDCAT TO E01_LT_FIELDCAT.
Price Indicator
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'VPRSV'.
LS_FIELDCAT-OUTPUTLEN    = 7.
LS_FIELDCAT-TABNAME    = 'I_OUTPUT'.
ls_fieldcat-seltext_L = 'Price Control Indicator'.
APPEND LS_FIELDCAT TO E01_LT_FIELDCAT.
Moving Avg Price
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'VERPR'.
LS_FIELDCAT-OUTPUTLEN    = 11.
LS_FIELDCAT-TABNAME    = 'I_OUTPUT'.
ls_fieldcat-seltext_L = 'Moving Avg Price'.
APPEND LS_FIELDCAT TO E01_LT_FIELDCAT.
Base Unit of Measure
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'MEINS'.
LS_FIELDCAT-OUTPUTLEN    = 7.
LS_FIELDCAT-TABNAME    = 'I_OUTPUT'.
ls_fieldcat-seltext_L = 'Base Unit'.
APPEND LS_FIELDCAT TO E01_LT_FIELDCAT.
Standard Price
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'STPRS'.
LS_FIELDCAT-OUTPUTLEN    = 11.
LS_FIELDCAT-TABNAME    = 'I_OUTPUT'.
ls_fieldcat-seltext_L = 'Standard Price'.
APPEND LS_FIELDCAT TO E01_LT_FIELDCAT.
Current Planned Price
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'LPLPR'.
LS_FIELDCAT-OUTPUTLEN    = 11.
LS_FIELDCAT-TABNAME    = 'I_OUTPUT'.
ls_fieldcat-seltext_L = 'Current Planned Price'.
APPEND LS_FIELDCAT TO E01_LT_FIELDCAT.
Future Planned Price
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'ZPLPR'.
LS_FIELDCAT-OUTPUTLEN    = 11.
LS_FIELDCAT-TABNAME    = 'I_OUTPUT'.
ls_fieldcat-seltext_L = 'Future Planned Price'.
APPEND LS_FIELDCAT TO E01_LT_FIELDCAT.
Previous Planned Price
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'VPLPR'.
LS_FIELDCAT-OUTPUTLEN    = 11.
LS_FIELDCAT-TABNAME    = 'I_OUTPUT'.
ls_fieldcat-seltext_L = 'Previous Planned Price'.
APPEND LS_FIELDCAT TO E01_LT_FIELDCAT.
Sales Price
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'KBETR'.
LS_FIELDCAT-OUTPUTLEN    = 13.
LS_FIELDCAT-TABNAME    = 'I_OUTPUT'.
ls_fieldcat-seltext_L = 'Sales Price'.
APPEND LS_FIELDCAT TO E01_LT_FIELDCAT.
Sales Unit
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'KMEIN'.
LS_FIELDCAT-OUTPUTLEN    = 7.
LS_FIELDCAT-TABNAME    = 'I_OUTPUT'.
ls_fieldcat-seltext_L = 'Sales Unit'.
APPEND LS_FIELDCAT TO E01_LT_FIELDCAT.
% of Gross Margin
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'MARGIN'.
LS_FIELDCAT-OUTPUTLEN    = 13.
LS_FIELDCAT-TABNAME    = 'I_OUTPUT'.
ls_fieldcat-seltext_L = '% of Gross Margin'.
APPEND LS_FIELDCAT TO E01_LT_FIELDCAT.
Material Status
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'VMSTA'.
LS_FIELDCAT-OUTPUTLEN    = 13.
LS_FIELDCAT-TABNAME    = 'I_OUTPUT'.
ls_fieldcat-seltext_L = 'Material Status'.
APPEND LS_FIELDCAT TO E01_LT_FIELDCAT.
ENDFORM.                    " fieldcat_init
**&      Form f4_for_variant
      text
*FORM f4_for_variant.
CALL FUNCTION 'REUSE_ALV_VARIANT_F4'
        EXPORTING
             is_variant          = g_variant
             i_save              = g_save
             i_tabname_header    = g_tabname_header
             i_tabname_item      = g_tabname_item
          it_default_fieldcat =
        IMPORTING
             e_exit              = g_exit
             es_variant          = gx_variant
        EXCEPTIONS
             not_found = 2.
IF sy-subrc = 2.
   MESSAGE ID sy-msgid TYPE 'S'      NUMBER sy-msgno
           WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ELSE.
   IF g_exit = space.
     p_vari = gx_variant-variant.
   ENDIF.
ENDIF.
*ENDFORM.                    " f4_for_variant
*&      Form clear_data
      Clear the Internal table
FORM clear_data.
clear : i_output,
          i_join,
          i_mbew,
          i_a004,
          i_pgmi.
refresh : i_output,
             i_join,
             i_mbew,
             i_a004,
             i_pgmi.
ENDFORM.                    " clear_data
      FORM USER_COMMAND                                             *
FORM user_command USING r_ucomm LIKE sy-ucomm
            rs_selfield TYPE slis_selfield.                 "#EC CALLED
CASE R_UCOMM.
    WHEN '&IC1'.
      read table i_output index rs_selfield-tabindex.
      SET PARAMETER ID 'MAT' FIELD i_output-matnr.
      SET PARAMETER ID 'WRK' FIELD p_werks.
      if not i_output-matnr is initial.
        call transaction 'MD04' and skip first screen.
      endif.
ENDCASE.
ENDFORM.
Reward Points if it is helpful
Thanks
Seshu

Loading multiple tables with SQL Loader

Hi,
I want to load multiple tables from a single data file using SQL Loader.
Here's the basic idea of what I want. Let's say I have two tables, table =T1
and table T2:
SQL> desc T1;
COL1 VARCHAR2(20)
COL2 VARCHAR2(20)
SQL> desc T2;
COL1 VARCHAR2(20)
COL2 VARCHAR2(20)
COL3 VARCHAR2(20)
My data file, test.dat, looks like this:
AAA|KBA
BBR|BBCC|CCC
NNN|BBBN|NNA
I want to load the first record into T1, and the second and third record load into T2. How do I set up my control file to do that?
Thank!

Tough Job
LOAD DATA
truncate
INTO table t1
when col3 = 'dummy'
FIELDS TERMINATED BY '|'
TRAILING NULLCOLS
(col1,col2,col3 filler char nullif col3='dummy')
INTO table t2
when col3 != 'dummy'
FIELDS TERMINATED BY '|'
(col1,col2,col3 nullif col3='dummy')
This will load t2 tbl but not t1.
T1 Filler col3 is not accepting nullif. Its diff to compare columns have null using when condition. If i find something i will let you know.
Can you seperate records into 2 file. Will a UNIX command work for you which will seperate 2col and 3col record types for you. and then you can execute 2 controlfiles on it.
Thanks,
http://www.askyogesh.com

Export to Excel - Multiple Tables in a single details section

Similar Messages

Maybe you are looking for