Editable records in list output.

dear gurus,
i have a small query regarding lists.
how can we make the list output entries editable and once i edit a field it has to be updated in the internal table and a new list should be shown with the changes made in the list.
any sort of help is higly appreciated.
Message was edited by:
vara prasad reddy sanam

Here is the simple example...
REPORT demo_list_format_input.
WRITE 'Please fill in your name before printing:'.
WRITE / ' Enter name here ' INPUT ON.
ULINE.
WRITE 'You can overwrite the following line:'.
FORMAT INPUT ON INTENSIFIED OFF.
ULINE.
FORMAT INPUT OFF INTENSIFIED ON.
Thanks,
Santosh

Similar Messages

Condition Record for picking Output List

Dear All
Kindly let me know where do we maintain condition record for Picking Output list.
Where do we define a new Output Type for Picking List
Regards
Srihari

Hi Srihari,
I think i have got the question rightly interpreted.
All you want is to maintain condition records for picking ouptut ... correct ?
You can do it through transaction VP01SHP ....(dont try to find it in easy access..atleast I could not locate it)
Under TCD VP01SHP > V4 you will be able to maintain condition records for all condition types that have been configured for picking.
Hope this helps you .... if yes then pls reward liberally !!
KInd Regards
Sachin Bhonsle

How to get the record selected in ztable based record in the output of alv

Hi All,
I have developed a report, it is displaying the output in ALV format.The list contained some 20 fields along with MATERIAL and BATCH. I have provided menu bar as extras -> ztable(it also contained MATERIAL and BATCH). But I have some issue when I select any record in the output then go to
path extras -> ztable, it has to select the record in ztable based MATERIAL and BATCH which i have selected in the output, then can you please provide solution for the above problem.
Thanks in advance

Hi Dolly,
you can do this by,
data: index_rows type lvc_t_row,
      index like line of index_rows.
* Get Selected rows from alv grid
clear index_rows. refresh index_rows.
"When you choose extras->ztable
call method alv_grid->get_selected_rows
           importing
                 et_index_rows = index_rows.
* Now delete those rows from the ALV grid
loop at index_rows into index.
    read table itab index index-index. "Lets say itab is the table you are displaying
    if sy-subrc = 0.
     perform bdc_sm30. "do simple bdc for sm30 with tab name and selected values
    endif.
endloop.
Regards,
Manoj Kumar P
Edited by: Manoj Kumar on Feb 23, 2009 2:49 PM

Pre Flight Record Check List Alesis Firewire, Creative Sound Card, Adobe Audition

I was having many crashes on my computer, Windows Vista, so I made a check list to put a stop to all the crashes. This is what has worked for me I hope it works to you. Just so you all know since the recording I do is for the church radio shows that we produce. We start and end with a prayer. God Bless
Pre Flight Record Check List: To RECORD
Disconnect all Periphials
Reboot: Computer
Printer: OFF (not connected to recording copmptuer)
Speakers: All OFF
Closet Light: OFF
Cell Phones: OFF
Lockdown Internet
Disable Firewall
Computer Volume Settings: Alesis Microphone
2 Ch, 16 Bit, 44,100 Hz Cd Quality
* Do not allow applications to take control
Level- 100
Alesis Control Panel
Sample Rate: 44.1 Khz
Buffer 256
Rate: Any
System Sound: enable
System Latency: High
Open Adobe Software: Multitrack View
Adobe Audio Hardware Setup
Edit View: Alesis 44,100 Hz, Buffer Size: 256
Multimix View: Creative
Surround Encoder: Creative
Adobe Multi Track:
Monitoring: External
Adobe Edit Mode: Record in this mode
Click New: for Settings
Sample Rate:44100
* Stereo
* 16 Bit
Alesis Multimix 12
Main Mix
x- Pressed
x-Not Pressed
Alt 3/4
x-Pressed
x-Not Pressed
x-Not Pressed
x-Not Pressed
Sound Check:
Level
Pot: 1
Pot: 3
Main Mix:
ALT: 3/4

Alesis stuff is generally pretty good and the Alesis is correct in that it is generally accepted that the TI chips are better and it is good advice.
PCI-e firewire800 card at ARC...
http://www.arc.com.au/?IOFIREPCIE1394B
I paid a $104 AUS it is now $77.90 (go figure)
Unfortunately there is no image on the web site. Without pulling my PC out I'm pretty sure it has 2 outputs and 2 inputs but don't quote me on that.
You should be able to pick something like this up anywhere in the world pretty cheap.
If it was me I would say that it would be a small investment and worth it to see if you can get the Alesis stuff stabalised.

Enable or disable particular record in list item based on a corresponding c

Hi,
How can i Enable or disable property of particular record in list item (multi record) based on a corresponding check box(multi record) ,
e.g Form Structure:
if press a button then record should populate where multi_post_query
if my_check_box = 1 then
my_list_item disable to update;
else
my_list_item enable to update;
end if;
now wanted result is like below
my_check_box ---- my_list_item
+----------------------enable
+----------------------enable
+----------------------enable
_----------------------Disable
_----------------------Disable
Here "+" means checked,"_" means unchecked and "enable" means updatable "Disable" means not updatable
the pseudo code is like,
if my_check_box = 1 then
my_list_item enable to update;
else
my_list_item disable to update;
end if;
Note: my_check_box is not updatable
please tell me which trigger and where I should create
Thanks
Edited by: 838602 on Feb 21, 2011 11:12 PM
Edited by: 838602 on Feb 22, 2011 1:40 AM

Hi Abdetu,
I created WHEN-NEW-RECORD-INSTANCE Trigger at data block level
And I need should work like below pseudo code (sorry for previous pseudo code)
if my_check_box = 1 then
my_list_item disable to update;
else
my_list_item enable to update;
end if;
so change code as
IF :MULTI.PROTECTED_FIELD = 1 THEN
SET_ITEM_PROPERTY ('MULTI.ACTION',REQUIRED , PROPERTY_FALSE );
SET_ITEM_PROPERTY('MULTI.ACTION',NAVIGABLE,PROPERTY_FALSE);
SET_ITEM_PROPERTY ('MULTI.ACTION' ,UPDATE_ALLOWED,PROPERTY_FALSE);
SET_ITEM_PROPERTY ('MULTI.ACTION' ,INSERT_ALLOWED,PROPERTY_FALSE);
:multi.action := 0;
ELSE
SET_ITEM_PROPERTY ('MULTI.ACTION',REQUIRED , PROPERTY_TRUE);
SET_ITEM_PROPERTY('MULTI.ACTION',NAVIGABLE,PROPERTY_TRUE);
SET_ITEM_PROPERTY ('MULTI.ACTION' ,UPDATE_ALLOWED,PROPERTY_TRUE);
SET_ITEM_PROPERTY ('MULTI.ACTION' ,INSERT_ALLOWED,PROPERTY_TRUE);
END IF;
Sorry, still I am not getting desired o/p. even i check item (ACTION) level Trigger
Note: my_check_box is not updatable
that would assign at time of button press (post query) as i mentioned
Edited by: 838602 on Feb 22, 2011 1:41 AM

Problem while saving list output as local file.

Hi Gurus!
i want to save the list output of classical report into excel but complete data is not coming into excel file.
[SYSTEM - > LIST ->SAVE -> LOCAL ->SPREADSHEET ]
when same output is transfer to unconverted file [notepad ] then completed data is coming.
please help me ,
points sure!
Rahul
Message was edited by:
rahul deshmukh

Yes Rahul, I know that and you have to do the formating. This is how you can do.
Open the unconverted file in Excel format.
Select the first column and then goto Data - Text to Columns , a pop up will come.
Select Delimited, then press next.
Then selct the delimeter that is used in the unconverted file to seperate two columns. Say for example if ' | ' is used then in others write ' | ' and press next.
IN the data preview section select all the columns and then select text radio button on top and press finish finally.
Now u will get the proper format of the file. Delete all the empty rows and columns that u don't want.
Reward if you find it useful.
Regards.
Akhil.

Regarding Downloading of Report[List] output into Excel Sheet

Hi All,
Hi i have written one Classical report. I got the output Correctly.
Now i want to download that data into Excel Sheet in excatly the way it displayed in List[Report] output.
I had followed the path System->List->Save->LocalFile->Spread Sheet and tried to download the same.
Though it is downloaded it has not come in exact format.
Now what i want is to add a button above that report & write a program in that to download that data into Excel Sheet.
Can anybody tell me how can solve this issue. If i follow above procedure will the data[List Output] be downloaded into exact format into excel.
If anybody knows other way please sujjest.
Thanks in advance.
Thanks & Regards,
Prasad.

Hi Prasad,
I have done a program which downloads the output in the excel sheet in the correct format.
Just check the program. The code given in bold is what you have to use.
REPORT zexp MESSAGE-ID f4 LINE-SIZE 195.
 Tables Used ***********************************
TABLES : bseg, bkpf, bsak, lfa1, payr .
Declaring Internal Tables **************************
DATA :
Internal table to hold header data *************
BEGIN OF header OCCURS 0,
 ext_date(10) TYPE c,
 delimit(1) TYPE c,
 ext_time(8) TYPE c,
END OF header,
Internal table to hold detail info **************
BEGIN OF i_data OCCURS 0,
 belnr LIKE bsak-belnr,
 gjahr LIKE bsak-gjahr,
 bukrs LIKE bsak-bukrs,
 bldat LIKE bsak-bldat,
 xblnr LIKE bsak-xblnr,
 blart LIKE bsak-blart,
 augdt LIKE bsak-augdt,
 augbl LIKE bsak-augbl,
 wrbtr LIKE bsak-wrbtr,
 shkzg LIKE bsak-shkzg,
 lifnr LIKE bsak-lifnr,
 name1 LIKE lfa1-name1,
 chect LIKE payr-chect,
 status(1) TYPE c,
END OF i_data,
Internal table to to collect *****************
BEGIN OF i_data1 OCCURS 0,
 belnr LIKE bsak-belnr,
 gjahr LIKE bsak-gjahr,
 bukrs LIKE bsak-bukrs,
 bldat LIKE bsak-bldat,
 xblnr LIKE bsak-xblnr,
 blart LIKE bsak-blart,
 augdt LIKE bsak-augdt,
 augbl LIKE bsak-augbl,
 wrbtr LIKE bsak-wrbtr,
 shkzg LIKE bsak-shkzg,
 lifnr LIKE bsak-lifnr,
 name1 LIKE lfa1-name1,
 sortl LIKE lfa1-sortl,
 chect LIKE payr-chect,
 status(1) TYPE c,
END OF i_data1,
String variables for formatting file data *************
 fidoc_year TYPE string,
 comp_code TYPE string,
 check_numbr TYPE string,
 vendor TYPE string,
 inv_date TYPE string,
 inv_nbr TYPE string,
 paid_dat TYPE string,
 inv_amt TYPE string,
 status TYPE string,
 ref_doc TYPE string,
************Internal table to store the file contents **************
BEGIN OF i_final_file OCCURS 0,
 record(300) TYPE c,
END OF i_final_file,
Internal table to store the list of allowed document types ****
BEGIN OF i_doctype OCCURS 0,
 blart LIKE bsak-blart,
END OF i_doctype,
Internal table to hold vendor information ************
BEGIN OF i_lfa1 OCCURS 0,
 lifnr LIKE lfa1-lifnr,
 name1 LIKE lfa1-name1,
 sortl LIKE lfa1-sortl,
END OF i_lfa1,
Internal table to hold check information *************
BEGIN OF i_payr OCCURS 0,
 chect LIKE payr-chect,
 vblnr LIKE payr-vblnr,
 gjahr LIKE payr-gjahr,
 zbukr LIKE payr-zbukr,
END OF i_payr.
Data declarations **************************
DATA : ws_stblg TYPE bkpf-stblg,
 todate TYPE bsak-augdt,
 fromdate TYPE bsak-augdt,
 w_day LIKE dtresr-weekday,
 day LIKE scal-indicator,
 d TYPE n,
 e_date LIKE sy-datum,
 e_time LIKE sy-uzeit,
 dd(2) TYPE c,
 mm(2) TYPE c,
 yy(4) TYPE c,
 hh(2) TYPE c,
 min(2) TYPE c,
 sec(2) TYPE c.
DATA : wa_filepath(50) TYPE c,
 wa_filename(50) TYPE c,
 wa_c_filename(100) TYPE c,
 arch_path(50) TYPE c.
* Data for downloading to list
DATA : list LIKE TABLE OF abaplist WITH HEADER LINE.
DATA : BEGIN OF list_asc OCCURS 0,
msg(300) TYPE c,
END OF list_asc.
DATA: BEGIN OF i_invoiceheader OCCURS 0,
name(30) TYPE c,
END OF i_invoiceheader.
RANGES dates FOR bkpf-budat.
Selection Screen ************************
SELECTION-SCREEN SKIP 2.
SELECT-OPTIONS:
 s_bukrs FOR bkpf-bukrs ,
 s_blart FOR bkpf-blart ,
 s_augdt FOR bsak-augdt. " memory id todat TO fromdat.
PARAMETERS :submit AS CHECKBOX DEFAULT ' ' .
* Download list to file.
AT USER-COMMAND.
CASE sy-ucomm.
 WHEN 'LIST'.
 PERFORM download.
 WHEN 'BACK'.
 EXIT.
ENDCASE.
----
 FORM download *
FORM download.
if s_augdt is initial.
dates-sign = 'I'.
dates-option = 'BT'.
dates-low = '20050901'.
dates-high = '20050920'.
APPEND dates.
else.
dates = s_augdt.
append dates.
endif.
/* Submit the same program .
SUBMIT zexp WITH s_augdt IN dates
 EXPORTING LIST TO MEMORY
 AND RETURN.
CALL FUNCTION 'LIST_FROM_MEMORY'
 TABLES
 listobject = list
 EXCEPTIONS
 not_found = 1.
CALL FUNCTION 'LIST_TO_ASCI'
EXPORTING
LIST_INDEX = -1 "LIST_INDEX SY-LSIND.
TABLES
listasci = list_asc
listobject = list.
PERFORM download_file.
ENDFORM.
 FORM download_file *
FORM download_file.
DATA fname TYPE rlgrap-filename VALUE 'c:\audit_report.xls'.
DATA ftype TYPE rlgrap-filetype VALUE 'DAT'.
DATA numeric_data(10) TYPE c VALUE '0123456789'.
*Table structure should match with list output.
DATA : BEGIN OF i_data1 OCCURS 0,
 belnr(12) TYPE c,
 gjahr(6) TYPE c,
 bukrs(8) TYPE c,
 chect(13) TYPE c,
 lifnr(12) TYPE c,
 name1(37) TYPE c,
 bldat(14) TYPE c,
 xblnr(18) TYPE c,
 augdt(14) TYPE c,
 wrbtr(17) TYPE c,
 status(4) TYPE c,
 augbl(18) TYPE c,
 sortl(17) TYPE c,
 END OF i_data1.
Header record of the excel sheet.
PERFORM fill_header.
LOOP AT list_asc.
Reads lines starting from the first record in the report. All informatory statements in the report are not read.
 IF list_asc+1(10) CO numeric_data.
 i_data1 = list_asc .
 APPEND i_data1.
 ENDIF.
ENDLOOP.
Call the download function.
CALL FUNCTION 'DOWNLOAD'
 EXPORTING
 filename = fname
 filetype = ftype
 TABLES
 data_tab = i_data1
 FIELDNAMES = i_invoiceheader.
ENDFORM.
 FORM fill_header *
FORM fill_header.
i_invoiceheader-name = 'Doc Number'.
APPEND i_invoiceheader.
i_invoiceheader-name = 'Fsc Year'.
APPEND i_invoiceheader.
i_invoiceheader-name = 'Cmp Code'.
APPEND i_invoiceheader.
i_invoiceheader-name = 'Check No'.
APPEND i_invoiceheader.
i_invoiceheader-name = 'Vendor No'.
APPEND i_invoiceheader.
i_invoiceheader-name = 'Entered by'.
APPEND i_invoiceheader.
i_invoiceheader-name = 'Doc Date'.
APPEND i_invoiceheader.
i_invoiceheader-name = 'Ref Doc No'.
APPEND i_invoiceheader.
i_invoiceheader-name = 'Clearing Date'.
APPEND i_invoiceheader.
i_invoiceheader-name = 'Amount'.
APPEND i_invoiceheader.
i_invoiceheader-name = 'Status'.
APPEND i_invoiceheader.
i_invoiceheader-name = 'Clearing Doc No'.
APPEND i_invoiceheader.
i_invoiceheader-name = 'Sort field'.
APPEND i_invoiceheader.
ENDFORM. " fill_header
 Initialization *************************
INITIALIZATION.
To initialize the date parameter on the selection screen.
The date by default ranges from previous Monday to Sunday.
todate = sy-datum.
CALL FUNCTION 'DATE_COMPUTE_DAY'
 EXPORTING
 date = todate
 IMPORTING
 day = day.
d = day.
if d < 4.
 todate = sy-datum - d - 4 .
else.
 todate = sy-datum - d + 3 .
endif.
fromdate = todate - 6.
MOVE: 'BT' TO s_augdt-option,
 fromdate TO s_augdt-low,
 todate TO s_augdt-high.
APPEND s_augdt.
Start of Selection **************************
START-OF-SELECTION.
Checking the validity of the inputted dates ****************
IF s_augdt-low > sy-datum OR s_augdt-high > sy-datum.
 MESSAGE i999 WITH 'You cannot input future date'.
 EXIT.
ENDIF.
IF NOT s_bukrs IS INITIAL.
MESSAGE i999 WITH 'Program will run with input parameters in screen!!'.
ENDIF.
Initialize the header data ***********************
e_time = sy-uzeit.
MOVE e_time+0(2) TO hh.
MOVE e_time+2(2) TO min.
MOVE e_time+4(2) TO sec.
CONCATENATE hh min sec INTO header-ext_time SEPARATED BY ':'.
e_date = sy-datum.
MOVE e_date+0(4) TO yy.
MOVE e_date+4(2) TO mm.
MOVE e_date+6(2) TO dd.
CONCATENATE mm dd yy INTO header-ext_date SEPARATED BY '/'.
header-delimit = '~'.
APPEND header.
List allowed document types **********************
PERFORM fill_doc_types.
**To select the documents within the range of week or as inputted **
IF s_augdt IS INITIAL.
 MOVE: 'I' TO s_augdt-sign,
 'BT' TO s_augdt-option,
 fromdate TO s_augdt-low,
 todate TO s_augdt-high.
 APPEND s_augdt.
ENDIF.
Selecting the records from the database ****************
IF s_bukrs IS INITIAL AND s_blart IS INITIAL.
Select all documents of company code 1000, *********
4200 and 8000, and allowed document types *********
 SELECT belnr gjahr augdt augbl bukrs
 blart bldat xblnr lifnr wrbtr shkzg
 FROM bsak INTO CORRESPONDING FIELDS OF TABLE i_data
 FOR ALL ENTRIES IN i_doctype
 WHERE blart EQ i_doctype-blart
 AND augdt IN s_augdt
 AND ( bukrs = '1000' OR bukrs ='4200' OR
 ( bukrs = '8000' AND blart NE 'ZP' ) ).
 loop at i_data.
Exclude reversed documents
 select single stblg into ws_stblg
 from bkpf
 where bukrs = i_data-bukrs
 and gjahr = i_data-gjahr
 and belnr = i_data-belnr.
 if not ws_stblg is initial.
 delete i_data.
 endif.
 endloop.
ELSEIF s_blart IS INITIAL.
Select all documents of allowed document types ******
 and inputted company code ************
 SELECT belnr gjahr augdt augbl bukrs
 blart bldat xblnr lifnr wrbtr shkzg
 FROM bsak INTO CORRESPONDING FIELDS OF TABLE i_data
 FOR ALL ENTRIES IN i_doctype
 WHERE blart EQ i_doctype-blart
 AND augdt IN s_augdt
 AND bukrs IN s_bukrs .
 LOOP AT i_data.
Exclude documents of type ZP
for company code 8000.
 IF i_data-bukrs = '8000' AND i_data-blart = 'ZP'.
 DELETE i_data.
 continue.
 ENDIF.
Exclude reversed documents
 select single stblg into ws_stblg
 from bkpf
 where bukrs = i_data-bukrs
 and gjahr = i_data-gjahr
 and belnr = i_data-belnr.
 if not ws_stblg is initial.
 delete i_data.
 continue.
 endif.
 ENDLOOP.
 READ TABLE i_data INDEX 1.
 IF sy-subrc NE 0.
 MESSAGE i999 WITH 'No records have been selected'.
 EXIT.
 ENDIF.
ELSE.
Select the documents matching the company codes *****
and document types inputted in the selection screen ****
 SELECT belnr gjahr augdt augbl bukrs bldat xblnr
 blart lifnr wrbtr shkzg
 FROM bsak INTO CORRESPONDING FIELDS OF TABLE i_data
 WHERE bukrs IN s_bukrs AND blart IN s_blart
 AND augdt IN s_augdt.
 SORT i_data BY blart.
 LOOP AT i_data.
Filtering the records selected
based on the document type
 READ TABLE i_doctype WITH KEY blart = i_data-blart.
 IF sy-subrc NE 0.
 DELETE i_data.
 continue.
 ENDIF.
Exclude documents of type ZP
for company code 8000.
 IF i_data-bukrs = '8000' AND i_data-blart = 'ZP'.
 DELETE i_data.
 continue.
 ENDIF.
Exclude reversed documents.
 select single stblg into ws_stblg
 from bkpf
 where bukrs = i_data-bukrs
 and gjahr = i_data-gjahr
 and belnr = i_data-belnr.
 if not ws_stblg is initial.
 delete i_data.
 continue.
 endif.
 ENDLOOP.
 READ TABLE i_data INDEX 1.
 IF sy-subrc NE 0.
 MESSAGE i999 WITH 'No records have been selected'.
 EXIT.
 ENDIF.
ENDIF.
IF sy-subrc NE 0.
 MESSAGE i999 WITH 'No records have been selected'.
 EXIT.
ENDIF.
credit/debit identification ***********************
LOOP AT i_data.
 IF i_data-shkzg EQ 'H'.
 i_data-wrbtr = i_data-wrbtr * 1.
 ELSEIF i_data-shkzg EQ 'S'.
 i_data-wrbtr = i_data-wrbtr * -1.
 ENDIF.
 MODIFY i_data.
ENDLOOP.
for summarizing ******************************
LOOP AT i_data.
 MOVE-CORRESPONDING i_data TO i_data1.
 COLLECT i_data1.
ENDLOOP.
Vendor informations and Check Informations *****************
SELECT lifnr name1 sortl
 FROM lfa1
 APPENDING CORRESPONDING FIELDS OF TABLE i_lfa1
 FOR ALL ENTRIES IN i_data1
 WHERE lifnr = i_data1-lifnr.
SELECT chect vblnr gjahr zbukr FROM payr APPENDING CORRESPONDING
 FIELDS OF TABLE i_payr FOR ALL ENTRIES
 IN i_data1 WHERE vblnr = i_data1-augbl
 AND gjahr = i_data1-augdt(4)
 AND zbukr = i_data1-bukrs.
SORT i_data1 BY augbl gjahr bukrs lifnr.
SORT i_payr BY vblnr gjahr zbukr.
SORT i_lfa1 BY lifnr.
LOOP AT i_data1.
 READ TABLE i_payr WITH KEY vblnr = i_data1-augbl
 gjahr = i_data1-gjahr
 zbukr = i_data1-bukrs.
 IF sy-subrc EQ 0.
 i_data1-chect = i_payr-chect.
 ENDIF.
 READ TABLE i_lfa1 WITH KEY lifnr = i_data1-lifnr.
 IF sy-subrc EQ 0.
 i_data1-name1 = i_lfa1-name1.
 i_data1-sortl = i_lfa1-sortl.
 ENDIF.
 i_data1-status = 'X'.
 MODIFY i_data1.
ENDLOOP.
**The records are sorted by clearing date, check number and doc type**
SORT i_data1 BY augdt chect blart.
**********The header record is outputted on the screen****************
PERFORM write_header.
********Data is moved to internal table in the file format *************
PERFORM move_data.
Line items are outputted on the screen *********************
PERFORM write_output.
*& Form write_header &*
*& This outputs the header information to screen &*
FORM write_header.
SKIP.
 SET PF-STATUS 'LIST'.
Outputting the header information *********************
WRITE : / 'Extraction Date : ' , header-ext_date.
WRITE : / 'Extraction Time : ' , header-ext_time.
FORMAT COLOR 1." INTENSIFIED.
SKIP.
ULINE AT 0(190) NO-GAP.
Outputting line level information **********************
WRITE:/ sy-vline NO-GAP,
 (10) 'DOC NUMBER',
 sy-vline NO-GAP,
 (4) 'F-YR',
 sy-vline NO-GAP,
 (6) 'C-CODE',
 sy-vline NO-GAP,
 (10) 'CHECK NUM',
 sy-vline NO-GAP,
 (10) 'VENDOR NUM',
 sy-vline NO-GAP,
 (35) 'VENDOR NAME',
 sy-vline NO-GAP,
 (12) 'INVOICE DATE',
 sy-vline NO-GAP,
 (16) 'INVOICE NUMBER',
 sy-vline NO-GAP,
 (12) 'PAID DATE',
 sy-vline NO-GAP,
 (15) 'INVOICE AMOUNT',
 sy-vline NO-GAP,
 (2) 'SC',
 sy-vline NO-GAP,
 (16) 'REFERENCE FI DOC',
 sy-vline NO-GAP,
 (15) 'SORT FIELD',
 sy-vline NO-GAP.
ULINE AT 0(190) NO-GAP.
ENDFORM. " write_header
*& FORM MOVE_DATA &*
*& Formats data in internal table as is required in the file &*
FORM move_data.
LOOP AT i_data1.
Document number and fiscal year should be separted by '|' *****
 CONCATENATE i_data1-belnr i_data1-gjahr INTO fidoc_year
 SEPARATED BY '|'.
 MOVE i_data1-bukrs TO comp_code.
 MOVE i_data1-chect TO check_numbr.
Vendor number and vendor name should be separted by '|' *****
 CONCATENATE i_data1-lifnr i_data1-name1 INTO vendor
 SEPARATED BY '|'.
 SHIFT vendor LEFT DELETING LEADING '0'.
 SHIFT vendor RIGHT DELETING TRAILING space.
Date fields converted to MM/DD/YYYY format ****************
 MOVE i_data1-bldat+0(4) TO yy.
 MOVE i_data1-bldat+4(2) TO mm.
 MOVE i_data1-bldat+6(2) TO dd.
 CONCATENATE mm dd yy INTO inv_date SEPARATED BY '/'.
 MOVE i_data1-xblnr TO inv_nbr.
 SHIFT inv_nbr RIGHT DELETING TRAILING space.
 MOVE i_data1-augdt+0(4) TO yy.
 MOVE i_data1-augdt+4(2) TO mm.
 MOVE i_data1-augdt+6(2) TO dd.
 CONCATENATE mm dd yy INTO paid_dat SEPARATED BY '/'.
 MOVE i_data1-wrbtr TO inv_amt.
 CONDENSE inv_amt.
 SHIFT inv_amt RIGHT DELETING TRAILING space.
 MOVE i_data1-status TO status.
 MOVE i_data1-augbl TO ref_doc.
 CONCATENATE fidoc_year
 comp_code
 check_numbr
 vendor
 inv_date
 inv_nbr
 paid_dat
 inv_amt
 status
 ref_doc
 INTO i_final_file-record SEPARATED BY '~'.
 APPEND i_final_file.
ENDLOOP.
ENDFORM. " MOVE_DATA
*& Form write_output &*
*& Outputs all data to screen &*
FORM write_output.
LOOP AT i_data1.
 FORMAT COLOR 2 INTENSIFIED.
Outputting line level information *******************
 WRITE : / sy-vline NO-GAP,
 (10) i_data1-belnr,
 sy-vline NO-GAP,
 (4) i_data1-gjahr,
 sy-vline NO-GAP,
 (6) i_data1-bukrs,
 sy-vline NO-GAP,
 (10) i_data1-chect,
 sy-vline NO-GAP,
 (10) i_data1-lifnr,
 sy-vline NO-GAP,
 (35) i_data1-name1,
 sy-vline NO-GAP,
 (12) i_data1-bldat MM/DD/YYYY,
 sy-vline NO-GAP,
 (16) i_data1-xblnr,
 sy-vline NO-GAP,
 (12) i_data1-augdt MM/DD/YYYY,
 sy-vline NO-GAP,
 (15) i_data1-wrbtr,
 sy-vline NO-GAP,
 (2) i_data1-status,
 sy-vline NO-GAP,
 (16) i_data1-augbl,
 sy-vline NO-GAP,
 (15) i_data1-sortl,
 sy-vline NO-GAP.
ENDLOOP.
ULINE AT 0(190) NO-GAP.
ENDFORM. " write_output
In the program, I am downloading only the list.. The description of report outputted in the beginning of the report is not downloaded to excel.
What has to be taken into consideration is that, the structure of the table i_data1 which contains the data to be downloaded to the table.
I hope that this will help you.
Regards,
Susmitha

Export Simple list output to Excel sheet.

Hi gurus,
I have a list output as follows.
A main header
Sub header 1
table entries.
sub header 2.
table entries ,......etc.
now i want to export the same format to an excel sheet which need to sent as a mail attachment.
Is there any FM for this ? i dont want the format to be disturbed.
can headers and other entries defferentiated with colors ?
kindly help on this.
Edited by: deepan adhi on Oct 4, 2009 9:52 AM

write the list to memory,
and the read this memory into an internal table. this will be exactly the same way as its printed on your screen. download it.
or
create an internal table of type string, add pass data from your final internal table in the exact way you are putting it in the output.
and download this string internal table.

List output for LSMW

Hi all,
I have a recuirment to create a LSMW and i need to list output as the summary section with the following details.
Report run by :
Report date :
totla number of records uploaded:
total number of records successfully loaded
total number of records erroreouns :
Is this possible to do in the LSMW or can anyone give your approach to goahead with this type of scenario.
Regards,
Madhavi

yes and no.
You can certainly add info about the user and the date.
you can do this with small coding at processing time END_OF_PROCESSING
You cannot give any info about :
totla number of records uploaded:
total number of records successfully loaded
total number of records erroreouns :
Because the only place you can add your own coding is the conversion program (fieldmapping and migration rules), this is long before you actually post the records to the data base.
LSMW is a cockpit for migration. Once you have created the batch input, you can leave LSMW and process the batch input in SM35. once you created the IDOCs, you can go to BD87 to process it. This is not really a natural part of LSMW, LSMW uses and combines standard processes that existed already long before LSMW.

Problem with the ABAP List output while running program in background.

Hi ,
This is Sudhir S . I am trying to run a report in background which has 60 columns , but only 13 are displayed when we view it through the spool abap list .
But when I run in foreground all the 60 columns are displayed. Since the data which I am trying to fetch is large I am running the report as a background job .
I just need to know what can be done to get the 60 columns in spool abap list output.
waiting for your reply.
<removed by moderator>
With Regards
Sudhir S
Edited by: Thomas Zloch on Oct 6, 2010 1:51 PM - please do something else while waiting, all posts have the same priority here

Hi,
Check if SAP note 1226758 resolves this problem.
Regards,
Aidan

Edit a picking list with VL01N.

Hi everybody,
I need some help to edit PICKING LIST and not a delivbrey inbound when I create an inbound delivery.
My problem is when I want to edit a picking list with a storage location MM &WM, I have an error, "Delivery 0082010157 does not contain items to be picked". Consequently I can't print it? And I can't begin ma picking without this list!!
I customize NACE.
First I put the application V2( Shipping). I Took the output type EK00
Then I use the application the procedure V10000
In the procedure I affect the condition type EK00 WITH the REQUIREMENT WM Transfer order
I check all the point and the error message is always here, why?
In the other hand, why I just have a storage location MM without WM, I can edit this piscking list.
The problem is because of wm statuts!!
Somebody could help me, please how could I do to print

Hi,
thanks, but the Delivery item category is actived for picking.
Hav you got other point of custumising that I could check?
Thanks for your help.
Kari

Printing the list output.

Hi All,
I want to print the output of the report. I am printing it using NEW-PAGE PRINT ON . and concluded by NEW-PAGE PRINT OFF. I am doing this under the usercommand. The problem is,, when I say print,(user command), I can print the output but the it is leading to the previous screen. I want to be in the same screen after my printing. I am pasting the code also. Can any one suggest me, where I am doing the mistake.
<REMOVED BY MODERATOR>
CASE P_UCOMM1.
 WHEN 'PRINT11'.
 CALL FUNCTION 'GET_PRINT_PARAMETERS'
 EXPORTING
 COPIES = '1'
 DESTINATION = 'LOCL'
 IMMEDIATELY = 'X'
 LINE_COUNT = 25
 LINE_SIZE = 132
 NO_DIALOG = 'X'
 USER = SY-UNAME
 ABAP_LIST = 'X'
 IMPORTING
 OUT_PARAMETERS = L_PARAMS
 VALID = L_VALID.
&--'REUSE_ALV_HIERSEQ_LIST_DISPLAY'--
 DATA:FLAG(1).
 CLEAR FLAG.
 IF L_VALID <> SPACE.
 NEW-PAGE PRINT ON PARAMETERS L_PARAMS NO DIALOG.
 CALL FUNCTION 'REUSE_ALV_HIERSEQ_LIST_DISPLAY'
 EXPORTING
 I_CALLBACK_PROGRAM = GD_REPID
 I_CALLBACK_PF_STATUS_SET = 'PF_STATUS_SET1'
 I_CALLBACK_USER_COMMAND = 'EXEC'
 IS_LAYOUT = M_LAYOUT
 IT_FIELDCAT = I_FLDCATALOG
 IT_EVENTS = I_EVENTS
 I_TABNAME_HEADER = 'I_MHEAD'
 I_TABNAME_ITEM = 'I_MITEM'
 IS_KEYINFO = M_KEYINFO
 TABLES
 T_OUTTAB_HEADER = I_MHEAD
 T_OUTTAB_ITEM = I_MITEM.
 REFRESH I_FLDCATALOG.
 CLEAR M_LAYOUT.
 CLEAR M_KEYINFO.
 NEW-PAGE PRINT OFF.
 CLEAR L_PARAMS.
 CLEAR L_VALID.
 ENDIF.
 LOOP AT I_HITEM INTO W_HITEM.
 IF W_HITEM-CHECK = 'X'.
 W_HITEM-PFLAG = 'PRINTED'.
 MODIFY I_HITEM FROM W_HITEM INDEX SY-TABIX TRANSPORTING PFLAG
 ENDIF.
 ENDLOOP.
 IF SY-SUBRC = 0.
 LOOP AT I_PFLAG INTO W_PFLAG.
 UPDATE RESB SET WEMPF = 'X'
 WHERE AUFNR = W_PFLAG-AUFNR
 AND MATNR = W_PFLAG-MATNR
 AND DUMPS = 'X'.
 COMMIT WORK.
 WAIT UP TO 1 SECONDS.
 ENDLOOP.
 ENDIF.
ENDCASE.
Thanks
Ramesh.
Message was edited by:
 Alvaro Tejada Galindo

Hi,
When you get the list output .
click on print button to print it. A dialog box will come.
In that dialog box, there will be settings button . when you click on this button, you will get many options and the value of those options that can be set defualt for that report output.
In that there is s option of printer , select that option and enter a value and then set that as default.
I hope this will solve your problem.
For any more help, please revert back.
Thanks and regards
Gurpreet Singh

LIST output and event handling in OO ALV

Hi Guys,
I am creating an ALV Report using cl_gui_alv_grid.
after the list is displayed i can change the display t output list from the ALV toolbar.
1. how can i shot list output by default.
2. why does hotspot event not work when the display is switched to list output.
3. how can i display the subtotal on all pages of the list.
Regards,
Tarun Bahal

Hi,
for your questions
1. To shortlist thefields in output
    In the fieldcatalog merge,select the fields which are to be populated in the outputlist.There standard list you can display.
On that you can select the fields in ALV toolbar.
2.To which field you need to HOTSPOT click, for that field in fieldcatalogue merge
   select the hotspot = 'X'.
for example
If gs_fieldcat-fieldname = 'MATNR'.
gs_fieldcat-table_name = 'MARA'.
gs_fieldcat-ref_field = 'MATNR'.
Gs_fieldcat-hotspot = 'X'.
append gs_fieldcat to gt_fieldcat.
endif.
this will hotspot on the field material number.
After declaring this you need to maintain the hotspot click event.
~~~~~~~~~
CLASS lcl_event_receiver DEFINITION.
PUBLIC SECTION.
    METHODS:
    handle_hotspot_click
        FOR EVENT HOTSPOT_CLICK OF cl_gui_alv_grid
            IMPORTING e_row e_column.
PRIVATE SECTION.
ENDCLASS.
CLASS lcl_event_receiver IMPLEMENTATION.
METHOD hotspot_click.
    DATA: ls_sflight LIKE LINE OF gt_sflight.
read selected row from internal table gt_sflight
    READ TABLE gt_sflight INDEX e_row-index INTO ls_sflight.
select corresponding lines of table sbook
    PERFORM select_table_sbook USING ls_sflight
                               CHANGING gt_sbook.
call dialog screen and display new alv control
    CALL SCREEN 101 STARTING AT 10 5.
ENDMETHOD.                           "handle_double_click
ENDCLASS.
This is very important after defining the events,you need to set the event before calling grid display.
CREATE OBJECT event_receiver.
    SET HANDLER event_receiver->handle_double_click FOR grid1.
for your reference you check the standard program BCALV_GRID_03**
There they have declared Double click, in your case you maintain with
HOTSPOT CLICK **.
3. If you want subtotal on the field, sort that filed for sort structure.
    and for which field do you need total, for that field do-sum = 'X'
    in the fieldcatalogue merge.
gs_sort-fieldname ='MATNR'
gs_sort-up = 'X'.
gs_sort-subtot = 'X'.
append gs_sort to gt_sort.
for calculating the total to the field
gs_fieldcat-table_name = 'MARA'.
gs_fieldcat-ref_field = 'NTGEW'.(Gross weight)
Gs_fieldcat-dosum = 'X'.
append gs_fieldcat to gt_fieldcat.
endif.
For every new material
it calculates the subtotal on Gross weight.(because for NTGEW is gross weight).
and also it will show the grand total too.
Hope this will solve your problem
Dont forget to Reward pointsHi,
for your questions
1. To shortlist thefields in output
    In the fieldcatalog merge,select the fields which are to be populated in the outputlist.There standard list you can display.
On that you can select the fields in ALV toolbar.
2.To which field you need to HOTSPOT click, for that field in fieldcatalogue merge
   select the hotspot = 'X'.
for example
If gs_fieldcat-fieldname = 'MATNR'.
gs_fieldcat-table_name = 'MARA'.
gs_fieldcat-ref_field = 'MATNR'.
Gs_fieldcat-hotspot = 'X'.
append gs_fieldcat to gt_fieldcat.
endif.
this will hotspot on thefield material number.
3. If you want subtotal on the field, sort that filed for sort structure.
    and for which field do you need total, for that field do-sum = 'X'
    in the fieldcatalogue merge.
gs_sort-fieldname ='MATNR'
gs_sort-up = 'X'.
gs_sort-subtot = 'X'.
append gs_sort to gt_sort.
for calculating the total to the field
gs_fieldcat-table_name = 'MARA'.
gs_fieldcat-ref_field = 'NTGEW'.(Gross weight)
Gs_fieldcat-dosum = 'X'.
append gs_fieldcat to gt_fieldcat.
endif.
For every new material
it calculates the subtotal on Gross weight.(because for NTGEW is gross weight).
and also it will show the grand total too.
Hope this will solve your problem
Dont forget to Reward points
Edited by: varisetty madhavi on Mar 7, 2008 6:48 AM

Editing Record.

Its a simple business directory whereby i've set two forms
up, an add new record, and an edit record using PHP.
To edit a record i choose the record for a drop down
list/menu and then amend the data. However, which ever record i
select to edit on from the drop menu and then Submit it, it will
only amendment the details of the last record which was added.
Therefore its all a bit wrong.
Whys is doing this and not changing the record i've
selected?

You need to check what value you are passing to the form that
is holding the
ID of the record that you intend to update.
Paul Whitham
Certified Dreamweaver MX2004 Professional
Adobe Community Expert - Dreamweaver
Valleybiz Internet Design
www.valleybiz.net
"GD WebDev" <[email protected]> wrote in
message
news:e4sgcg$pbj$[email protected]..
> Its a simple business directory whereby i've set two
forms up, an add new
> record, and an edit record using PHP.
>
> To edit a record i choose the record for a drop down
list/menu and then
> amend
> the data. However, which ever record i select to edit on
from the drop
> menu and
> then Submit it, it will only amendment the details of
the last record
> which was
> added.
>
> Therefore its all a bit wrong.
>
> Whys is doing this and not changing the record i've
selected?
>

Refreshing the list output upon clicking a push button

Hi All,
 How do i refresh the list output(not ALV) already displayed upon clicking a push -button under AT USER-COMMAND ,if at all it is feasible ?
 Any pointers will be rewarded with points.......
Regards
jaman
Message was edited by:
 ABAP Techie
Message was edited by:
 ABAP Techie
Message was edited by:
 ABAP Techie
Message was edited by:
 ABAP Techie

Hi,
Try with the method "refresh_table_display".
It has the syntax very similar to creating the table. It has two parameters. In the first one, you can mention if you want to refresh only the data (the icons are not refreshed)
Regards,
Bhaskar

Editable records in list output.

Similar Messages

Maybe you are looking for