How can I change excel column header using Labile.

Dear Experts,
How can i change excel column header using LabVIEW.
Thanks for any and all help!
M.S.Sivaraj.
Sivaraj M.S
CLD

As I said in my previous post, column headers in Excel are merely row 1 cells. May be I missing something here, so please be more explicit with your question.
I guess you are using the Excel Report tools, and you want to modify an existing sheet. From my limited experience with the Excel Report tools, it is not possible to open an existing woorkbook (except as template...), so the answer to your question should be "Forget it"...
The work around is to use the example I pointed for you before, and either to write the whole new colum headers as a string array, starting in A1, or to write a single string to a given cell in row 1.
Hope this helps
Chilly Charly (aka CC)
E-List Master - Kudos glutton - Press the yellow button on the left...

Similar Messages

How can i change the column label text in a alv table display

how can i change the column label text in a alv table display??
A similar kinda of question was posted previuosly where the requirement was the label text was needed and following below code was given as solution :
* declare column, settings, header object
DATA: lr_column TYPE REF TO cl_salv_wd_column.
DATA: lr_column_settings TYPE REF TO if_salv_wd_column_settings.
DATA: lr_column_header type ref to CL_SALV_WD_COLUMN_HEADER.
get column by specifying column name.
lr_column = lr_column_settings->get_column( 'COLUMN_NAME1' ).
set Header Text as null
lr_column_header = lr_column->get_header( ).
lr_column_header->set_text( ' ' ).
My specific requirement is i have an input field on the screen and i want reflect that value as the column label for one of the column in the alv table. I have used he above code with slight modification in the MODIFYVIEW method of the view since it is a process after input. The component gets activated without any errors but while run time i get an error stating
"The following error text was processed in the system CDV : Access via 'NULL' object reference not possible."
i have checked in debugging and the error occured at the statement :
lr_column = lr_column_settings->get_column( 'CURRENT_YEAR' ).Please can you provide me an alternative for my requirement or correct me if i have done it wrong.
Thanks,
Suri

I found it myself how to do it. The error says that it is not able to find the reference object i.e it is asking us to refer to the table. The following piece of code will solve this problem. Have to implement this in WDDOMODIFYVIEW method of the view. This thing works comrades enjoy...
DATA : lr_cmp_usage TYPE REF TO if_wd_component_usage,
 lr_if_controller TYPE REF TO iwci_salv_wd_table,
 lr_cmdl TYPE REF TO cl_salv_wd_config_table,
 lr_col TYPE REF TO cl_salv_wd_column.
DATA : node_year TYPE REF TO if_wd_context_node,
 elem_year TYPE REF TO if_wd_context_element,
 stru_year TYPE if_alv_layout=>element_importing,
 item_year LIKE stru_year-i_current_year,
 lf_string TYPE char(x),
DATA: lr_column TYPE REF TO cl_salv_wd_column.
DATA: lr_column_header TYPE REF TO cl_salv_wd_column_header.
DATA: lr_column_settings TYPE REF TO if_salv_wd_column_settings.
Get the entered value from the input field of the screen
node_year = wd_context->get_child_node( name = 'IMPORTING_NODE' ).
elem_year = node_year->get_element( ).
elem_year->get_attribute(
 EXPORTING
 name = 'IMPORT_NODE-PARAMETER'
 IMPORTING
 value = L_IMPORT_PARAM ).
WRITE L_IMPORT_PARAM TO lf_string.
Get the reference of the table
lr_cmp_usage = wd_this->wd_cpuse_alv( ).
IF lr_cmp_usage->has_active_component( ) IS INITIAL.
 lr_cmp_usage->create_component( ).
ENDIF.
lr_if_controller = wd_this->wd_cpifc_alv( ).
lr_column_settings = lr_if_controller->get_model( ).
get column by specifying column name.
IF lr_column_settings IS BOUND.
 lr_column = lr_column_settings->get_column( 'COLUMN_NAME').
set Header Text as null
 lr_column_header = lr_column->get_header( ).
 lr_column_header->set_text( lf_string ).
endif.

How can I change Quotation EKPO-AGMEM using BAPI

How can I change Quotation EKPO-AGMEM using BAPI

As I said in my previous post, column headers in Excel are merely row 1 cells. May be I missing something here, so please be more explicit with your question.
I guess you are using the Excel Report tools, and you want to modify an existing sheet. From my limited experience with the Excel Report tools, it is not possible to open an existing woorkbook (except as template...), so the answer to your question should be "Forget it"...
The work around is to use the example I pointed for you before, and either to write the whole new colum headers as a string array, starting in A1, or to write a single string to a given cell in row 1.
Hope this helps
Chilly Charly (aka CC)
E-List Master - Kudos glutton - Press the yellow button on the left...

How can i get a file header using this method cl_gui_frontend_services= gui

Hi Experts,
How can i get a file header using this method cl_gui_frontend_services=>gui_download
Thanks
Basu

Hi,
You can use the FM - GUI_DOWNLOAD to specify the headers. It can be done in the following manner -
TYPES: BEGIN OF ty_head, "Structure for header
 h(10) TYPE c,
 END OF ty_head.
DATA: it_head TYPE TABLE OF ty_head WITH HEADER LINE.
"Adding header details
it_head-h = 'Field1'.
APPEND it_head.
it_head-h = 'Field2'.
APPEND it_head.
it_head-h = 'Field3'.
APPEND it_head.
it_head-h = 'Field4'.
APPEND it_head.
CALL FUNCTION 'GUI_DOWNLOAD'
EXPORTING
 filename = p_file
 filetype = 'ASC'
 write_field_separator = 'X'
 header = '00' "<= note this
TABLES
 data_tab = it_tab
 fieldnames = it_head[] "<= Pass your header table here
EXCEPTIONS
 OTHERS = 1.
Hope this helps.
Regards,
Himanshu

HT204411 My boss gave ma a gift card but I can not use it in my country, how can I change country to star using it?

My boss gave ma a gift card but I can not use it in my country, how can I change country to star using it?

You cannot change your iTunes country unless you are really moving to another country, nor can you change country association for a gift card. Give it as a gift to a friend who lives in the country of origin for the card.

How can I change the running head on the title page only?

For APA formatting the running head needs to run throughout a paper, but only on the title page is it preceeded by "Running Head:". How can I change the running head on this page only?

Menu > Insert > Section Break
Click your cursor in the new (2nd) section.
Menu > View > Show Inspector
Inspector > Layout > Section > Page Numbers > uncheck Continue from previous section
Menu is the menu at the top of your screen when you are in Pages, or anywhere else on the Mac. very hard to miss.
Yes that is kind of a dumb question.
Peter

How can i change mx:Label /Label using css?

Dear Experts,
It is funny that <mx:Label> </mx:Label> doesn't have property to change the background color.
Does anyone know how can i change <mx:Label></Label> using css?
Regards,
Man Pak Hong, Dave
[email protected]

I think you have set the backgroundcolor for Label in Flex4...? In Flex3 doesn'y allow to set the background color directly...However you can use this work around if you want to set the background color.
You can also set the color for textField in the code below by using the textField styleSheet property.
<?xml version="1.0" encoding="utf-8"?><mx:Application xmlns:mx="http://www.adobe.com/2006/mxml" layout="absolute" creationComplete="applyBGtoLabel()">
<mx:Script>
<![CDATA[
import mx.controls.Text;
private function applyBGtoLabel():void{
var textField:TextField = new TextField();textField = myLabel.mx_internal::getTextField();
textField.background =
true;textField.backgroundColor = 0xFF0000;
]]>
</mx:Script>
<mx:Label id="myLabel" text="Apply a background color for me....please" height="25" />
</mx:Application>
Thanks ,
Bhasker Chari.S

How can i bring the column heading downloaded in excel sheet?

hi all,
I am using FM SAP_CONVERT_TO_XLS_FORMAT to downloading populated internal table data into excel sheet by using filename type rlgrap-filename.
Now I need the column heading(field name) for downloaded data in excel sheet.
pls tell me how can i merge the col heading with data perfectly. Is there any FM fulfills this requirement.
pls give me a suitable approch.
Thanks
PRR

HI,
Go thru this code.
REPORT ZRMM0056 NO STANDARD PAGE HEADING
 MESSAGE-ID ZZ
 LINE-SIZE 300
 LINE-COUNT 65.
Program : ZRMM0056
Title : Non Inventory PO's
Description : Non Inventory Purchase Orders details with
 Vendor and Invoice Receipts and Goods Receipts.
Input :
 Select-options : 1. G/L Account No
 Parameters : 1.File Paths for the Excel sheet
 Others (Specify):
Output : Extract Files in the application server
 Report :
Hear Ticket # : 113392
Created by : Srinivas Rao.M
Created on : 12/15/2005
Version : 1
Request : D10K944304
Transaction Code : Z420
Change History *
Date Programmer Search String Description *
12/19/2005 Srinivas D10K944316 Removed Purchasing document
 Company code and Plant from
 Select-Options and Inculded
 G/L Account No and changed
 code accordingly.
T A B L E S *
TABLES: EKBE, " History of Purchasing Document
 EKPO, " Purchasing Document Item
 EKKO, " Purchasing Document Header
 LFA1, " Vendor master (general section)
 EKKN. " Account Assignment in Purchasing Doc
 INTERNAL TABLES
*--Internal table to store Purchasing document header data
DATA : BEGIN OF IT_POHEADER OCCURS 0,
 EBELN LIKE EKKO-EBELN, "Purchasing document
 AEDAT LIKE EKKO-AEDAT, "Created on
 ERNAM LIKE EKKO-ERNAM, "Created by
 LIFNR LIKE EKKO-LIFNR, "Vendor
 END OF IT_POHEADER.
*--Internal table to store Purchasing document Item data
DATA : BEGIN OF IT_POITEM OCCURS 0,
 EBELN LIKE EKPO-EBELN, "Purchasing document
 EBELP LIKE EKPO-EBELP, "Item Number
 MATNR LIKE EKPO-MATNR, "Material number
 BUKRS LIKE EKPO-BUKRS, "Company code
 WERKS LIKE EKPO-WERKS, "Plant
 MATKL LIKE EKPO-MATKL, "Material Group
 MENGE LIKE EKPO-MENGE, "Order Quantity
 NETPR LIKE EKPO-NETPR, "Net Price
 PEINH LIKE EKPO-PEINH, "Price unit
 NETWR LIKE EKPO-NETWR, "Net Value
 END OF IT_POITEM.
*--Internal table to hold final display data.
DATA : BEGIN OF IT_FINAL OCCURS 0,
 EBELN LIKE EKKO-EBELN, "Purchasing document
 EBELP LIKE EKPO-EBELP, "Item Number
 AEDAT LIKE EKKO-AEDAT, "Created on
 ERNAM LIKE EKKO-ERNAM, "Created by
 MATNR LIKE EKPO-MATNR, "Material number
 BUKRS LIKE EKPO-BUKRS, "Company code
 WERKS LIKE EKPO-WERKS, "Plant
 MATKL LIKE EKPO-MATKL, "Material Group
 MENGE LIKE EKPO-MENGE, "Order Quantity
 NETPR LIKE EKPO-NETPR, "Net Price
 PEINH LIKE EKPO-PEINH, "Price unit
 NETWR LIKE EKPO-NETWR, "Net Value
 LIFNR LIKE EKKO-LIFNR, "Vendor
 NAME1 LIKE LFA1-NAME1, "Vendor Name
 GSBER LIKE EKKN-GSBER, "Business area
*--IR details
 IR_BELNR LIKE EKBE-BELNR, "IR-Number of Material Document
 IR_BUZEI LIKE EKBE-BUZEI, "IR-Item in material Document
 IR_BUDAT LIKE EKBE-BUDAT, "IR-Posting date
 IR_MENGE LIKE EKBE-MENGE, "IR-Quantity
*--GR details
 GR_BELNR LIKE EKBE-BELNR, "GR-Number of Material Document
 GR_BUZEI LIKE EKBE-BUZEI, "GR-Item in material Document
 GR_BUDAT LIKE EKBE-BUDAT, "GR-Posting date
 GR_MENGE LIKE EKBE-MENGE, "GR-Quantity
 END OF IT_FINAL.
*--Internal table to store History per Purchasing Document data
DATA : BEGIN OF IT_HISTORY OCCURS 0,
 EBELN LIKE EKBE-EBELN, "Purchasing document
 EBELP LIKE EKBE-EBELP, "Item
 VGABE LIKE EKBE-VGABE, "Trans/Event type
 BELNR LIKE EKBE-BELNR, "Number of Material Document
 BUZEI LIKE EKBE-BUZEI, "Item in material Document
 BUDAT LIKE EKBE-BUDAT, "Posting date
 MENGE LIKE EKBE-MENGE, "Quantity
 BEWTP LIKE EKBE-BEWTP, "Posting history category
 END OF IT_HISTORY.
*--Internal table to store vendor name.
DATA : BEGIN OF IT_VENDOR OCCURS 0,
 LIFNR LIKE LFA1-LIFNR, "Vendor Number
 NAME1 LIKE LFA1-NAME1, "Vendor Name
 END OF IT_VENDOR.
*--Internal table to store Business area for Purchasing document
DATA : BEGIN OF IT_BUSINESS OCCURS 0,
 EBELN LIKE EKKN-EBELN, "Purchasing document
 EBELP LIKE EKKN-EBELP, "Purchasing Item
 SAKTO LIKE EKKN-SAKTO, "G/L Account No
 GSBER LIKE EKKN-GSBER, "Business area
 END OF IT_BUSINESS.
DATA : BEGIN OF FIELDNAMES OCCURS 0,
 TEXT(40),
 END OF FIELDNAMES.
 VARIABLES DECLARATION *
DATA: V_FILE LIKE IBIPPARMS-PATH, "File path
 V_FLD LIKE DYNPREAD-FIELDNAME, "Dynpread fieldname
 V_FLAG(1) VALUE SPACE. "FLAG VARIABLE
 SELECTION-SCREEN *
SELECTION-SCREEN BEGIN OF BLOCK S1 WITH FRAME TITLE TEXT-001.
*--Begin of change D10K944316
SELECT-OPTIONS : S_SAKTO FOR EKKN-SAKTO. "G/L Accoun no.
*--End of change D10K944316
SELECTION-SCREEN END OF BLOCK S1.
SELECTION-SCREEN BEGIN OF BLOCK S2 WITH FRAME TITLE TEXT-002.
PARAMETERS : P_EXCEL AS CHECKBOX DEFAULT ' ' . " download to excel
PARAMETERS : C_FILE(128) DEFAULT : 'C:\ZRMM0056.xls'.
SELECTION-SCREEN END OF BLOCK S2.
A T S E L E C T I O N - S C R E E N *
AT SELECTION-SCREEN ON VALUE-REQUEST FOR C_FILE.
*-Form to get file path for download of data
PERFORM GET_FILE_PATH.
AT SELECTION-SCREEN.
PERFORM SCREEN_VALIDATIONS.
START-OF-SELECTION
START-OF-SELECTION.
*--Extract Purchasing document header data.
 PERFORM GET_PO_HEADER_DATA.
*--Extract Purchasing document Item data.
 IF NOT IT_BUSINESS[] IS INITIAL.
 PERFORM GET_PO_ITEM_DATA.
*--Get complete required data in final internal table
 PERFORM GET_FINAL_DATA.
 ENDIF.
END-OF-SELECTION
END-OF-SELECTION.
IF V_FLAG IS INITIAL.
*--Display Purchasing document details
 IF NOT IT_FINAL[] IS INITIAL.
 PERFORM DISPLAY_PODATA.
 IF P_EXCEL = 'X'.
*--To down load data to excel sheet
 PERFORM DOWN_LOAD_TO_EXCEL.
 ENDIF.
 ENDIF.
ELSE.
 MESSAGE I001(ZZ) WITH 'No data found'(003).
ENDIF.
TOP-OF-PAGE
TOP-OF-PAGE.
*--To display page header
PERFORM PAGE_HEADER.
*& Form GET_PO_HEADER_DATA
 To Get Purchasing header data
FORM GET_PO_HEADER_DATA .
*--To extract Business Area details
 CLEAR IT_BUSINESS.
 REFRESH IT_BUSINESS.
 SELECT EBELN "Purchasing document
 EBELP "Purchasing document item
 SAKTO "G/L Account no
 GSBER "Business area
 FROM EKKN
 INTO TABLE IT_BUSINESS
 WHERE SAKTO IN S_SAKTO.
IF SY-SUBRC <> 0.
 V_FLAG = 'X'.
 MESSAGE I001(ZZ) WITH
 'No data selected for the given selection criteria'(004).
 STOP.
ELSE.
*--To extract Purchasing document details with respect
to G/L Account no
 CLEAR IT_POHEADER.
 REFRESH IT_POHEADER.
 SELECT EBELN "Purchasing document
 AEDAT "Created on
 ERNAM "Created by
 LIFNR "Vendor
 FROM EKKO
 INTO TABLE IT_POHEADER
 FOR ALL ENTRIES IN IT_BUSINESS
 WHERE EBELN = IT_BUSINESS-EBELN.
 IF NOT IT_POHEADER[] IS INITIAL.
 CLEAR IT_VENDOR.
 REFRESH IT_VENDOR.
*--Extracting Vendor details
 SELECT LIFNR "Vendor #
 NAME1 "Name
 FROM LFA1
 INTO TABLE IT_VENDOR
 FOR ALL ENTRIES IN IT_POHEADER
 WHERE LIFNR = IT_POHEADER-LIFNR.
 ENDIF.
ENDIF.
ENDFORM. " GET_PO_HEADER_DATA
*& Form GET_PO_ITEM_DATA
 To extract Purchasing document item data
FORM GET_PO_ITEM_DATA .
CLEAR IT_POITEM.
REFRESH IT_POITEM.
 SELECT EBELN "Purchasing document
 EBELP "Item Number
 MATNR "Material number
 BUKRS "Company code
 WERKS "Plant
 MATKL "Material Group
 MENGE "Order Quantity
 NETPR "Net Price
 PEINH "Price unit
 NETWR "Net Value
 FROM EKPO
 INTO TABLE IT_POITEM
 FOR ALL ENTRIES IN IT_BUSINESS
 WHERE EBELN = IT_BUSINESS-EBELN
 AND EBELP = IT_BUSINESS-EBELP.
IF NOT IT_POITEM[] IS INITIAL.
 CLEAR IT_HISTORY.
 REFRESH IT_HISTORY.
 SELECT EBELN "Purchasing document
 EBELP "Item
 VGABE "Trans/Event type
 BELNR "Number of Material Document
 BUZEI "Item in material Document
 BUDAT "Posting date
 MENGE "Quantity
 BEWTP "Posting history category
 FROM EKBE
 INTO TABLE IT_HISTORY
 FOR ALL ENTRIES IN IT_POITEM
 WHERE EBELN = IT_POITEM-EBELN
 AND EBELP = IT_POITEM-EBELP
 AND ( VGABE = '1' OR VGABE = '2' ) "1 = GR , 2 = IR
 AND ( BEWTP = 'Q' OR BEWTP = 'E' ). "Q = GR , R = IR
 IF SY-SUBRC = 0.
 SORT IT_HISTORY BY EBELN EBELP.
 ENDIF.
ENDIF.
ENDFORM. " GET_PO_ITEM_DATA
*& Form GET_FILE_PATH
 Select file path
FORM GET_FILE_PATH .
CLEAR V_FILE.
MOVE 'p_flname' TO V_FLD.
MOVE C_FILE TO V_FILE.
CALL FUNCTION 'F4_FILENAME'
 EXPORTING
 PROGRAM_NAME = SYST-CPROG
 DYNPRO_NUMBER = SYST-DYNNR
 FIELD_NAME = V_FLD
 IMPORTING
 FILE_NAME = V_FILE
 EXCEPTIONS
 OTHERS = 1.
MOVE V_FILE TO C_FILE.
ENDFORM. " GET_FILE_PATH
*& Form PAGE_HEADER
 To Print page header and other details
FORM PAGE_HEADER .
*--Page Header
ULINE AT /1(300).
FORMAT COLOR 1.
WRITE:/ 'Run Date:'(005), SY-DATUM, 45 'Stanley Works'(006),
 100 'Page No:'(007), SY-PAGNO LEFT-JUSTIFIED, 298 ''.
WRITE:/ 'Run Time:'(008), SY-UZEIT, 43 SY-TITLE, 100 SY-UNAME, 298 ''.
WRITE:/ 'Source :'(009), SY-SYSID, 100 SY-CPROG, 298 ''.
FORMAT COLOR OFF.
ULINE AT /1(300).
FORMAT COLOR 4.
WRITE : / SY-VLINE , (10) 'Purchasing Doc'(010),
 SY-VLINE, (5) 'Item'(011),
 SY-VLINE, (10) 'Created On'(012),
 SY-VLINE, (7) 'Crea By'(013),
 SY-VLINE, (10) 'Material'(014),
 SY-VLINE, (6) 'Com cd'(015),
 SY-VLINE, (5) 'Plant'(016),
 SY-VLINE, (10) 'Mat Group'(017),
 SY-VLINE, (13) 'Order Qty'(018),
 SY-VLINE, (11) 'Net Price'(019),
 SY-VLINE, (10) 'Price Unit'(020),
 SY-VLINE, (13) 'Net Value'(021),
 SY-VLINE, (8) 'Bus Area'(022),
 SY-VLINE, (10) 'Vendor'(023),
 SY-VLINE, (28) 'Vendor Name'(024),
*--IR details
 SY-VLINE, (10) 'IR-Mat Doc'(025),
 SY-VLINE, (5) 'IR-It'(026),
 SY-VLINE, (9) 'IR-Post dt'(027),
 SY-VLINE, (13) 'IR-Quantity'(028),
*--GR details
 SY-VLINE, (10) 'GR-Mat Doc'(029),
 SY-VLINE, (5) 'GR-It'(030),
 SY-VLINE, (9) 'GR-Post dt'(031),
 SY-VLINE, (13) 'GR-Quantity'(032), SY-VLINE.
FORMAT COLOR OFF.
ULINE AT /1(300).
ENDFORM. " PAGE_HEADER
*& Form SCREEN_VALIDATIONS
 Selection screen validations
FORM SCREEN_VALIDATIONS .
*--Validation for G/L Account No
IF NOT S_SAKTO IS INITIAL.
 SELECT SAKNR UP TO 1 ROWS
 INTO EKKN-SAKTO
 FROM SKA1 WHERE
 SAKNR IN S_SAKTO.
 ENDSELECT.
 IF SY-SUBRC <> 0.
 MESSAGE E001(ZZ) with 'Please enter a valid G/L Account no'(048).
 ENDIF.
ENDIF.
*--Validation for Excel file path
IF P_EXCEL = 'X'.
 IF C_FILE = ' '.
 MESSAGE E001(ZZ) with 'Please enter a valid Excle Path'(035).
 ENDIF.
ENDIF.
ENDFORM. " SCREEN_VALIDATIONS
*& Form DISPLAY_PODATA
 To Display Purchasing Document details
FORM DISPLAY_PODATA .
FORMAT COLOR 2.
SORT IT_FINAL BY EBELN EBELP AEDAT BUKRS WERKS.
LOOP AT IT_FINAL.
 WRITE : / SY-VLINE ,(10) IT_FINAL-EBELN, "Purchasing Doc
 SY-VLINE, (5) IT_FINAL-EBELP, "Item
 SY-VLINE, (10) IT_FINAL-AEDAT, "Created On
 SY-VLINE, (7) IT_FINAL-ERNAM, "Created By
 SY-VLINE, (10) IT_FINAL-MATNR, "Material
 SY-VLINE, (6) IT_FINAL-BUKRS, "Company code
 SY-VLINE, (5) IT_FINAL-WERKS, "Plant
 SY-VLINE, (10) IT_FINAL-MATKL, "Material Group
 SY-VLINE, (13) IT_FINAL-MENGE, "#EC UOM_IN_MES
 "Order Qty
 SY-VLINE, (11) IT_FINAL-NETPR, "#EC UOM_IN_MES
 "Net Price
 SY-VLINE, (10) IT_FINAL-PEINH, "#EC UOM_IN_MES
 "Price Unit
 SY-VLINE, (13) IT_FINAL-NETWR, "#EC UOM_IN_MES
 "Net Value
 SY-VLINE, (8) IT_FINAL-GSBER, "Bus Area
 SY-VLINE, (10) IT_FINAL-LIFNR, "Vendor
 SY-VLINE, (28) IT_FINAL-NAME1, "Vendor name
*--IR details
 SY-VLINE, (10) IT_FINAL-IR_BELNR, "IR-Mat Doc
 SY-VLINE, (5) IT_FINAL-IR_BUZEI, "IR-It
 SY-VLINE, (9) IT_FINAL-IR_BUDAT, "IR-Post dt
 SY-VLINE, (13) IT_FINAL-IR_MENGE, "#EC UOM_IN_MES
 "IR-Quantity
*--GR details
 SY-VLINE, (10) IT_FINAL-GR_BELNR, "GR-Mat Doc
 SY-VLINE, (5) IT_FINAL-GR_BUZEI, "GR-It
 SY-VLINE, (9) IT_FINAL-GR_BUDAT, "GR-Post dt
 SY-VLINE, (13) IT_FINAL-GR_MENGE, SY-VLINE.
 "#EC UOM_IN_MES
 "GR-Quantity
ENDLOOP.
FORMAT COLOR OFF.
ENDFORM. " DISPLAY_PODATA
*& Form DOWN_LOAD_TO_EXCEL
 text
FORM DOWN_LOAD_TO_EXCEL .
REFRESH FIELDNAMES.
FIELDNAMES-TEXT = TEXT-010.
APPEND FIELDNAMES.CLEAR FIELDNAMES.
FIELDNAMES-TEXT = TEXT-011.
APPEND FIELDNAMES.CLEAR FIELDNAMES.
FIELDNAMES-TEXT = TEXT-012.
APPEND FIELDNAMES.CLEAR FIELDNAMES.
FIELDNAMES-TEXT = 'Created By'(036).
APPEND FIELDNAMES.CLEAR FIELDNAMES.
FIELDNAMES-TEXT = TEXT-014.
APPEND FIELDNAMES.CLEAR FIELDNAMES.
FIELDNAMES-TEXT = 'Company Code'(037).
APPEND FIELDNAMES.CLEAR FIELDNAMES.
FIELDNAMES-TEXT = TEXT-016.
APPEND FIELDNAMES.CLEAR FIELDNAMES.
FIELDNAMES-TEXT = 'Material Group'(038).
APPEND FIELDNAMES.CLEAR FIELDNAMES.
FIELDNAMES-TEXT = 'Order Quantity'(039).
APPEND FIELDNAMES.CLEAR FIELDNAMES.
FIELDNAMES-TEXT = TEXT-019.
APPEND FIELDNAMES.CLEAR FIELDNAMES.
FIELDNAMES-TEXT = TEXT-020.
APPEND FIELDNAMES.CLEAR FIELDNAMES.
FIELDNAMES-TEXT = TEXT-021.
APPEND FIELDNAMES.CLEAR FIELDNAMES.
FIELDNAMES-TEXT = 'Business Area'(040).
APPEND FIELDNAMES.CLEAR FIELDNAMES.
FIELDNAMES-TEXT = TEXT-023.
APPEND FIELDNAMES.CLEAR FIELDNAMES.
FIELDNAMES-TEXT = TEXT-024.
APPEND FIELDNAMES.CLEAR FIELDNAMES.
FIELDNAMES-TEXT = 'IR Material Doc'(041).
APPEND FIELDNAMES.CLEAR FIELDNAMES.
FIELDNAMES-TEXT = 'IR Item'(042).
APPEND FIELDNAMES.CLEAR FIELDNAMES.
FIELDNAMES-TEXT = 'IR Posting Date'(043).
APPEND FIELDNAMES.CLEAR FIELDNAMES.
FIELDNAMES-TEXT = TEXT-028.
APPEND FIELDNAMES.CLEAR FIELDNAMES.
FIELDNAMES-TEXT = 'GR Material Doc'(044).
APPEND FIELDNAMES.CLEAR FIELDNAMES.
FIELDNAMES-TEXT = 'GR Item'(045).
APPEND FIELDNAMES.CLEAR FIELDNAMES.
FIELDNAMES-TEXT = 'GR Posting Date'(046).
APPEND FIELDNAMES.CLEAR FIELDNAMES.
FIELDNAMES-TEXT = TEXT-032.
APPEND FIELDNAMES.CLEAR FIELDNAMES.
*--FM to download data to Excel sheet
CALL FUNCTION 'WS_DOWNLOAD'
 EXPORTING
 FILENAME = C_FILE
 FILETYPE = 'DAT'
 TABLES
 DATA_TAB = IT_FINAL
 FIELDNAMES = FIELDNAMES
 EXCEPTIONS
 FILE_OPEN_ERROR = 1
 FILE_WRITE_ERROR = 2
 INVALID_FILESIZE = 3
 INVALID_TABLE_WIDTH = 4
 INVALID_TYPE = 5
 NO_BATCH = 6
 UNKNOWN_ERROR = 7
 GUI_REFUSE_FILETRANSFER = 8
 OTHERS = 9.
IF SY-SUBRC <> 0.
 MESSAGE E001(ZZ) WITH 'Data could not downloaded'(047).
ENDIF.ENDFORM. " DOWN_LOAD_TO_EXCEL
*& Form GET_FINAL_DATA
 To Populate required data in final internal table
FORM GET_FINAL_DATA .
CLEAR IT_FINAL.
REFRESH IT_FINAL.
LOOP AT IT_POITEM.
 CLEAR IT_POHEADER.
 READ TABLE IT_POHEADER WITH KEY EBELN = IT_POITEM-EBELN.
 IF SY-SUBRC = 0.
 MOVE : IT_POHEADER-EBELN TO IT_FINAL-EBELN, "Purchasing Doc
 IT_POITEM-EBELP TO IT_FINAL-EBELP, "Item
 IT_POHEADER-AEDAT TO IT_FINAL-AEDAT, "Created On
 IT_POHEADER-ERNAM TO IT_FINAL-ERNAM, "Created By
 IT_POITEM-MATNR TO IT_FINAL-MATNR, "Material
 IT_POITEM-BUKRS TO IT_FINAL-BUKRS, "Company code
 IT_POITEM-WERKS TO IT_FINAL-WERKS, "Plant
 IT_POITEM-MATKL TO IT_FINAL-MATKL, "Material Group
 IT_POITEM-MENGE TO IT_FINAL-MENGE, "Order Qty
 IT_POITEM-NETPR TO IT_FINAL-NETPR, "Net Price
 IT_POITEM-PEINH TO IT_FINAL-PEINH, "Price Unit
 IT_POITEM-NETWR TO IT_FINAL-NETWR, "Net Value
 IT_POHEADER-LIFNR TO IT_FINAL-LIFNR. "Vendor
*--To Insert IR details
 CLEAR IT_HISTORY.
 READ TABLE IT_HISTORY WITH KEY EBELN = IT_POITEM-EBELN
 EBELP = IT_POITEM-EBELP
 VGABE = '2'
 BEWTP = 'Q'.
 IF SY-SUBRC = 0.
 MOVE :
 IT_HISTORY-BELNR TO IT_FINAL-IR_BELNR, "IR-Number of Mat Doc
 IT_HISTORY-BUZEI TO IT_FINAL-IR_BUZEI, "IR-Item in mat Doc
 IT_HISTORY-BUDAT TO IT_FINAL-IR_BUDAT, "IR-Posting date
 IT_HISTORY-BUDAT TO IT_FINAL-IR_MENGE. "IR-Quantity
 ENDIF.
*--To insert GR details
 CLEAR IT_HISTORY.
 READ TABLE IT_HISTORY WITH KEY EBELN = IT_POITEM-EBELN
 EBELP = IT_POITEM-EBELP
 VGABE = '1'
 BEWTP = 'E'.
 IF SY-SUBRC = 0.
 MOVE :
 IT_HISTORY-BELNR TO IT_FINAL-GR_BELNR, "IR-Number of Mat Doc
 IT_HISTORY-BUZEI TO IT_FINAL-GR_BUZEI, "IR-Item in mat Doc
 IT_HISTORY-BUDAT TO IT_FINAL-GR_BUDAT, "IR-Posting date
 IT_HISTORY-BUDAT TO IT_FINAL-GR_MENGE. "IR-Quantity
 ENDIF.
*--To insert Vendor details
 CLEAR IT_VENDOR.
 READ TABLE IT_VENDOR WITH KEY LIFNR = IT_POHEADER-LIFNR.
 IF SY-SUBRC = 0.
 MOVE : IT_VENDOR-NAME1 TO IT_FINAL-NAME1.
 ENDIF.
*--To insert Business area
 CLEAR IT_BUSINESS.
 READ TABLE IT_BUSINESS WITH KEY EBELN = IT_POITEM-EBELN
 EBELP = IT_POITEM-EBELP.
 IF SY-SUBRC = 0.
 MOVE : IT_BUSINESS-GSBER TO IT_FINAL-GSBER.
 ENDIF.
 APPEND IT_FINAL.
 CLEAR IT_FINAL.
 ENDIF.
ENDLOOP.
ENDFORM. " GET_FINAL_DATA
thanks
Sunil

How can I change a column to lower case?

I selected an entire column and discovered that it's already set at Format > Font > Capitalization > None
If I change "None" to "All Caps," it capitalizes everything. But when I change it back to "None," letters that were originally capitalized remain capitalized. How can I change EVERY letter in a column to lower case?
Thanks.

Format > Font > Capitalization changes how the text is displayed. But it doesn't change the actual text.
To change all letters to lower case you can use the LOWER() function in cells that refer to the original text. Then select the cells with the formula displaying the "recapitalized" text, command-c to copy, and Edit > Paste Formula Results to remove the formulas.
SG

How can i change the number im using for FaceTime?

Everytime i try to call someone on facetime it comes out as another number using the same apple id, how can i change that?

Hello Lazboy1,
The following article details both the processes for unlinking a phone number and correcting the lack of a phone number attached.
iOS 6 and OS X Mountain Lion: Link your phone number and Apple ID for use with FaceTime and iMessage
http://support.apple.com/kb/HT5538
Cheers,
Allen

How can I change the database & schema used by an Application?

Hi community,
I am very new on Essbase and I need help to find out how can I change the database connection (and schema) used by the database of an Application. The figure is that I need to point this database to a QA environment (currently it points to DEV).
If I do a right click over the properties of the database, I can see the following tabs: [ General ][ Dimensions ][ Statistics ][ Modifications ][ Compression ]. However, there is no option to change the database connection.
Is there a way to do this?
Thanks in advance for any help! Cheers!

Are you trying to change a database connection of Planning application?
Essbase application do not have a relational connection.
Regards
Celvin
http://www.orahyplabs.com

How can i join additional column without using a query

Hi,
I created a report using a base query; Now i want to add an additional coloumn to it without using another table i.e. from no new query; That additional column is complex computed value from different tables created for each record; How can i attach it to each record;
thanks in advance
prasanth

Add a formula column in your existing query.

How can I change a column name in table (JDeveloper 10.1.3.3)?

I'd like to change a table column name, for example instead of "FirstName" I'd like "Name".
Here is the preview: http://img208.imagevenue.com/img.php?image=86575_firstname_122_578lo.JPG
Thank You in advance!

Now I have following problem: When I change "Label text" to column which has "Combo box" (Department insted of DepartmentId) I do not have my combo box anymore, just DepartmentId (Number). I have created binding... (DepartmentId -> Department Name) Why is this happening?
http://img151.imagevenue.com/img.php?image=47670_firstname_122_862lo.JPG
Can I change my attribute name in data model?
BTW I use ADFBC Swing
Sorry on my bad English ...
thank you
Message was edited by:
user638810
Message was edited by:
user638810
Message was edited by:
user638810

How can I change the default header font in adobe acrobat?

Hi,
We run adobe acrobat 7 (ver 7.1.4) throughout the office.
We have a large number of pdf's to create from word documents and each one needs a header and footer.
For official reasons these must be in Times New Roman font and 10 point font size.
Adobe defaults to Arial 8-point.
Is there a way to change this default so that it does not have to be changed individually for each pdf?

You can save the settings and re-use the settings.

How can i add a table header using DefaultTableModel?

Im having problems finding examples of creating a table header using the DefaultTableModel. Can anyone point me in the right direction?
so far i am able to create a table and add rows, but i need the first row to be the header with title and i am not able to do that with this model.
Below is an excerpt of what i have thus far...
JTableHeader header = new JTableHeader();
        checkOutTable.setModel(tableModel);
        checkOutTable.setRowSelectionAllowed(true);
private DefaultTableModel tableModel = new DefaultTableModel(
            new Object [][] {
                    {"Item ID", "Title", "Type", "Serial ID", "Status", "Response", "Print"},
                new String [] {
                    "TITLE 1", "TITLE 2", "TITLE 3", "TITLE 4", "TITLE 5", "TITLE 6", "TITLE 7"
            ){Class[] types = new Class[] { java.lang.Object.class,
                    java.lang.Object.class, java.lang.Object.class,
                    java.lang.Object.class, java.lang.Object.class,
                    java.lang.Object.class, java.lang.Object.class };
            public Class getColumnClass(int columnIndex) {
                return types[columnIndex];
            }};

Use the constructor that takes a Vector of column names and a row count.
http://java.sun.com/j2se/1.4.2/docs/api/javax/swing/table/DefaultTableModel.html#DefaultTableModel(java.util.Vector,%20int)

How can I change excel column header using Labile.

Similar Messages

Maybe you are looking for