Print settings for ALV report

I have a ALV report output with LINE-SIZE 1023. But when I try to execute the report in background the output row is not coming in one line but in 2 lines. When we run the report in background I gave the printer as 'LOCL' (local) and displayed in spool. In the PRINT SETTINGS I don't see FORMAT for 65 X 1023. Do I need to create one? If yes, how to create it? Or if there is any other way go get all the cloumns in one row of a ALV output.
Thank you.

Hi,
Change the font on the X_65_255 paper size :-
This tip was taken from the SAP-R3 mailing list, and is by Sheila Tichener.
If you need to use a large line-size to get all your data in I know the sap version of X_65_255 for hp laser jet 4 gives an unnecessarily small font . You can change it in SPAD (or copy to Y_65_255) as follows.
Example:
Choose Device formats, Change
hplj4
x_65_255
Execute
Double click on printer initialisation
Change from:-
# select Courier 16.67 CPI normal font
e(s0p16.67h0s0b4099T
to:-
# select arial 24 cpi 15 point normal
e(s0p24h15v0s0b16602T
Also bold as follows:-
# select arial 24 cpi 15 point bold
e(s0p24h15v0s3b16602T
Also the error you get when changing a format in the output screen is only a warning and can be overidden by pressing the green tick.
If the sap standard formats don't fit your requirements you can create your own eg Y_65_170 . It seems to be the numbers in the name that somehow triggers which one the abap chooses
Regards
Sudheer

Similar Messages

Enhancing print functionality for ALV report

Our client requires a special Print at click button in few reports and screens in such a way that there is no effort in setting page sizes etc.
For one particular report, there are many columns. When I try to use List -> Print, only first few columns are printed. I want that all the columns are printed in landscape manner in different pages and the first column is repeated in both pages (it is frozen in report).
How to make these happen?

HI,
You can try following steps,
1) Goto transaction SPAD and create Page formate according to your requirement.
2) Create format and copy action from standard format.
3) create device type
4) assign that device type to custamize output type.
When ever you take print out of that ALV use your custamize Output Type

Default output device for ALV report

Dear friends,
Here there is a user requirement that he want print a particular ALV report in a
perticular output device. and want to fix that output device for that report instead of changing everytime.
Kindly suggest.
Regards,
Praveen Lobo

Hi,
This way system is expected to search for default printer. What I would recommend you to do is call transaction SP01 within the report and pass the initial screen parameter thru FM.
Hope this lead, help you solve your issue!
Reetesh

Can somebody give some real time questions for alv report

hi guru
can somebody give some real time questions for alv report.
answers also.
regards
subhasis.

hi,
The ALV is a set of function modules and classes and their methods which are added to program code. Developers can use the functionality of the ALV in creating new reports, saving time which might otherwise have been spent on report enhancement
The common features of report are column alignment, sorting, filtering, subtotals, totals etc. To implement these, a lot of coding and logic is to be put. To avoid that we can use a concept called ABAP List Viewer (ALV).
Using ALV, we can have three types of reports:
 1. Simple Report
 2. Block Report
 3. Hierarchical Sequential Report
Reward useful points
Siva

How many lines we can print using Non-alv report list ?

Hi Experts,
How many lines we can print using Non-alv report list ?
regards
vishnu

Hi,
It depends on the page size according to the page size we can set the no. of lines as follows,
REPORT program_name NO STANDARD PAGE HEADING
LINE-SIZE 290
LINE-COUNT 65.
Hope it helps you,
Regards,
Abhijit G. Borkar

HOWTO: Control Printer Attributes for a Report at Run Time Reports 6i

HOWTO: Control Printer Attributes for a Report at Run Time
Like page width , height etc
my problem is i had installed a printer and it is set for
printing different reports ( like invoice slips , legal size ,
A3 etc ) each time i have to manually set the page settup from
printer folder .instead if there is an option to set the printer
attributes from Reports 6i it is great
rajesh

All the Printer Setup(Page Height and Page Width) must be set in
the Reprot Program. These can be set at the Layout-Main Section
in the Object Navigator.
hth

TS3147 Where are all the print settings for my HP Officejet 5510 in Mac OS X 10.8.2? I can't find Normal, just Draft and Best.

Where are all the print settings for my HP Officejet 5510 in Mac OS X 10.8.2?? I only have Fast, Fast B & W, and Best. I want Normal so that it looks good but doesn't print so slowly. Help.

Hi,
Change the print settings manually by clicking the lowest drop-down within the print dialog (e.g. the application name, Copies & Pages within MSOffice.
Select Type/Quality and set the print quality as Normal.
You may seve the settings as a Preset from the Presets drop-down menu.
Shlomi

Picking up the printer settings for Double or single sided?

Hi All,
Do anyone have a solution for picking up the printer settings for the PO SAPscript so that if the printer can do double sided it should print double sided but if it can only do single sided, it should print single sided?
Thanks & Regards,
Sudheer.

Hi Frank
1. To change it manually you have to deselect the following option:
Edit>Preferences>Type> Use Typographer's Quotes.
2. To access the option through vb script use the following syntax:
Document.TextPreference.TypographersQuotes
May be this will help you.

Best printer settings for the Officejet 8625 for glossy label printing

best printer settings for the Officejet 8625 for glossy label printing. The black does not appear dark black ......just shades of gray

pendavinci
Welcome to the HP Community Forum.
The following might be helpful to resolve the issue:
Printing Labels_Business-Cards_Cards
See the section on Printing and Printing Preferences
Click the Kudos Thumbs-Up to show you appreciate the help.
Click Accept as Solution when the Answer provides a Fix or Workaround!
I am pleased to provide assistance on behalf of HP. I do not work for HP.
Kind Regards,
Dragon-Fur

Help with print settings for Panoramas

Hi,
I use an Epson 2880 and I am trying to figure out the print settings for doing an 11 x 34in panorama print on 13" roll paper from Aperture 3.0.3. I finally got it to do one print properly, but the setup was totally counter intuitive and I can't reproduce it. I tried using "Custom" Paper size and setting it to 13" x 36", then using the landscape mode and setting the Image Size to 11 x 34". Any way I did this ended up with the image printing the wrong way on the paper. So I went back and picked "Roll" paper. This leaves only one field to fill in, which I presume is the paper width (it really didn't make this obvious in the dialogue.). Then I set the mode to Portrait, and made sure that the settings for the Image size were 11 x 34. It then printed fine. But when I went back to print another file, even though I had saved the settings, now I am presented with only one box for specifying the Image Size and there is no way to get it right again. HELP! The settings for this kind of print in Photoshop is also counterintuitive, but when you get it set right, and you know the settings, no problem reproducing it. I think maybe there is a bug in AP3 with regard to this sort of setup.

Hey BaByPaW1990,
Welcome to the BlackBerry Support Community Forums.
Thanks for the question.
You can get your APN settings from your network service provider, also make sure you have a BlackBerry data plan.
Let me know if you have any more questions.
Cheers.
-ViciousFerret
Come follow your BlackBerry Technical Team on Twitter! @BlackBerryHelp
Be sure to click Like! for those who have helped you.
Click Accept as Solution for posts that have solved your issue(s)!

Send some sample program for ALV reports

Hi all ,
send some sample program for ALV reports for learing purpose
tahnks.

Hi ,
Resource Master
Program YPPCRR *
Program type Report Program *
Title Resource Master Dara for Updation *
Author Naga Raju *
Requested By Balaji *
Date Written 24.05.2007 *
Specification Id F2-DP-FS-2-0002 *
Transport Request *
On-line Documentation
Description
This Program updates the Location Mater through the Transaction
/SAPAPO/LOC3 Based on the User Selection
Update
Reset
No Action
Output
ALV List output of the main Program
ALV List output of the Error Log
REPORT YPPCRR NO STANDARD PAGE HEADING
 LINE-SIZE 120
 LINE-COUNT 62(4)
 MESSAGE-ID yap..
Global data
Include where all the data declarations are coded.
INCLUDE YPPCRR_data.
*Initialization
INITIALIZATION.
perform init_variant.
Constants
CONSTANTS: c_formname_top_of_page TYPE slis_formname
VALUE 'F_TOP_OF_PAGE'.
Selection-Screen
SELECTION-SCREEN : BEGIN OF BLOCK b1 WITH FRAME TITLE text-040.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS:p_prs RADIOBUTTON GROUP ztyp USER-COMMAND ucom DEFAULT 'X'.
SELECTION-SCREEN COMMENT 3(28) text-003.
position 40.
parameters: p_file1 TYPE rlgrap-filename.
SELECTION-SCREEN END OF LINE.
skip 5.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: p_aps RADIOBUTTON GROUP ztyp.
SELECTION-SCREEN COMMENT 3(28) text-004.
position 40.
parameters: p_file2 type rlgrap-filename.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK b1.
AT SELECTION-SCREEN .
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file1.
CALL FUNCTION 'KD_GET_FILENAME_ON_F4'
 EXPORTING
 program_name = syst-repid
DYNPRO_NUMBER = SYST-DYNNR
 field_name = p_file1
STATIC = ' '
MASK = ' '
 CHANGING
 file_name = p_file1
EXCEPTIONS
MASK_TOO_LONG = 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.
START-OF-SELECTION.
if p_prs = 'X'.
 PERFORM f_read_datum1 TABLES t_res_head
 USING p_file1
 CHANGING w_subrc.
elseif p_aps = 'X'.
 PERFORM f_read_datum2 TABLES t_res_head
 USING p_file2
 CHANGING w_subrc.
endif.
IF w_subrc = 0.
Validations
PERFORM VALIDATION.
PERFORM display_alv.
IF SY-UCOMM = '&F03'
or SY-UCOMM = '&F12'
or SY-UCOMM = '&F15'.
LEAVE LIST-PROCESSING.
ELSE.
ENDIF.
ELSE.
Message s100 with text-002.
ENDIF.
END-OF-SELECTION.
Forms part*
INCLUDE YPPCRR_forms.
*& Include YPPCRR_DATA
Type-Pools
TYPE-POOLS: slis.
*TYPES
DATA: BEGIN OF tl_res_head.
 INCLUDE STRUCTURE ypp_res_head.
DATA: END OF tl_res_head.
DATA: BEGIN OF tl_res_head_val.
 INCLUDE STRUCTURE ypp_resv.
DATA: END OF tl_res_head_val.
DATA : BEGIN OF ty_errlog ,
 counter type i,
 type(2) ,
 name(10) TYPE c,
 vrsioid(22) TYPE c,
 restype TYPE c,
 message(80) TYPE c,
 END OF ty_errlog.
Global Variables
DATA : gc_flag(1) TYPE c,
 w_val_err_flag(1) type c.
DATA: w_filename TYPE rlgrap-filename,
 w_subrc TYPE sy-subrc,
 w_t_res_head TYPE slis_t_fieldcat_alv,
 wa_t_res_head TYPE slis_fieldcat_alv.
DATA : wa_date(10) TYPE c,
 wa_time(10) TYPE c,
 wa_title(40) TYPE c,
 wa_type(4) TYPE c .
DATA: BAPI_RUN_YES_NO TYPE C.
*Structure
*INTERNAL TABLES USED BY ALV
DATA:
it_fieldcat_alv TYPE slis_t_fieldcat_alv,
IT_FIELDCAT_ALV_ERR TYPE SLIS_T_FIELDCAT_ALV,
it_status TYPE slis_formname VALUE 'F_MAIN',
it_user_command TYPE slis_formname VALUE 'F_USER_COMMAND',
it_events TYPE slis_t_event,
it_event_exit TYPE slis_t_event_exit,
it_list_comments TYPE slis_t_listheader,
it_excluding TYPE slis_t_extab,
it_sort TYPE slis_t_sortinfo_alv.
*Internal Table Declarations
DATA : BEGIN OF t_imex OCCURS 0 ,
 string(256) TYPE c,
 END OF t_imex.
DATA : fcode TYPE TABLE OF sy-ucomm.
DATA : fcode_bdc TYPE TABLE OF sy-ucomm.
DATA : fcode_error TYPE TABLE OF sy-ucomm.
DATA : fcode_final TYPE TABLE OF sy-ucomm.
STRUCTURE and WORKARES
*Internal Table Declarations
DATA : t_res_head like tl_res_head occurs 0 WITH HEADER LINE.
DATA : t_res_head_val like tl_res_head_val occurs 0 with header line.
data :l_res_head LIKE LINE OF t_res_head.
DATA : w_file TYPE string.
*DATA : wa_vrsioid(22) type c,
 wa_locno(20) type c,
 wa_calendar(2) type c,
 wa_planner(3) type c.
DATA: T_RETURN LIKE BAPIRET2 OCCURS 0 WITH HEADER LINE.
DATA: RESOURCE_HEAD LIKE BAPI10004RESHEAD OCCURS 0 WITH HEADER LINE,
 RESOURCE_HEAD_X LIKE BAPI10004RESHEADX OCCURS 0 WITH HEADER LINE,
 RESOURCE_TEXT LIKE BAPI10004RESTEXT OCCURS 0 WITH HEADER LINE,
 RESOURCE_TEXT_X LIKE BAPI10004RESTEXTX OCCURS 0 WITH HEADER LINE.
data : t_errlog like ty_errlog occurs 0 with header line.
DATA : wk_lines TYPE i,
 wk_errlines TYPE i,
 wk_count TYPE i.
DATA: g_tabname TYPE slis_tabname VALUE 'T_RES_HEAD'.
Variables to be used by ALV
DATA:
wk_variant LIKE disvariant,
wx_variant LIKE disvariant,
wk_variant_save(1) TYPE c,
wk_exit(1) TYPE c,
wk_repid LIKE sy-repid,
wk_user_specific(1) TYPE c,
wk_callback_ucomm TYPE slis_formname,
wk_callback_status TYPE slis_formname,
wk_callback_status1 TYPE slis_formname,
wk_print TYPE slis_print_alv,
wk_layout TYPE slis_layout_alv,
wk_html_top_of_page TYPE slis_formname,
wk_fieldcat_alv LIKE LINE OF it_fieldcat_alv,
wk_excluding LIKE LINE OF it_excluding,
wk_events LIKE LINE OF it_events,
wk_event_exit LIKE LINE OF it_event_exit,
wk_list_comments LIKE LINE OF it_list_comments,
wk_list1_comments LIKE LINE OF it_list_comments,
wk_list2_comments LIKE LINE OF it_list_comments,
wk_sort LIKE LINE OF it_sort.
*DATA :gc_delete_flag(1).
*& Include YAPOLOC_FORMS
FORM display_alv .
PERFORM f_fieldcat_build.
PERFORM f_event_build.
PERFORM f_exclude_build.
PERFORM f_print_build.
PERFORM f_layout_build.
PERFORM f_display_data.
ENDFORM. " display_alv
*& Form f_fieldcat_build
 text
FORM f_fieldcat_build .
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
 EXPORTING
 i_program_name = wk_repid
 i_structure_name = 'YPP_RESV'
 i_inclname = wk_repid
 CHANGING
 ct_fieldcat = it_fieldcat_alv.
ENDFORM. " F_FIELDCAT_BUILD
*& Form F_EVENT_BUILD
 text
> p1 text* < p2 text
FORM f_event_build .
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
 EXPORTING
 i_list_type = 0
 IMPORTING
 et_events = it_events.
READ TABLE it_events WITH KEY
name = slis_ev_top_of_page INTO wk_events.
IF sy-subrc = 0.
 MOVE c_formname_top_of_page TO wk_events-form.
 MODIFY it_events FROM wk_events INDEX sy-tabix.
ENDIF.
ENDFORM. " F_EVENT_BUILD
*& Form F_EXCLUDE_BUILD
 text
--> p1 text
<-- p2 text
FORM f_exclude_build .
wk_excluding = '&GRAPH'. "Graphic
APPEND wk_excluding TO it_excluding.
ENDFORM. " F_EXCLUDE_BUILD
*& Form F_PRINT_BUILD
 text
--> p1 text
<-- p2 text
FORM f_print_build .
wk_print-no_print_listinfos = 'X'.
ENDFORM. " F_PRINT_BUILD
*& Form F_LAYOUT_BUILD
 text
--> p1 text
<-- p2 text
FORM f_layout_build .
wk_layout-zebra = 'X'.
WK_LAYOUT-COLWIDTH_OPTIMIZE = 'X'.
wk_layout-detail_popup = 'X'.
wk_layout-detail_initial_lines = 'X'.
wk_layout-detail_titlebar = 'Details '.
ENDFORM. " F_LAYOUT_BUILD
*& Form F_DISPLAY_DATA
 text
--> p1 text
<-- p2 text
FORM f_display_data .
wk_callback_ucomm = 'CALLBACK_UCOMM'.
IF sy-ucomm = 'UPD' OR sy-ucomm = space .
 wk_callback_status = 'CALLBACK_STATUS'.
ENDIF.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
 EXPORTING
 i_background_id = 'SIWB_WALLPAPER'
 i_callback_program = wk_repid
 i_callback_html_top_of_page = 'HTML_TOP_OF_PAGE'
 i_callback_pf_status_set = wk_callback_status
 i_callback_user_command = wk_callback_ucomm
 it_sort = it_sort
 i_default = 'X'
 i_save = 'A'
 is_variant = wk_variant
 is_layout = wk_layout
 it_fieldcat = it_fieldcat_alv
 it_events = it_events
 it_event_exit = it_event_exit
 it_excluding = it_excluding
 is_print = wk_print
 TABLES
 t_outtab = t_res_head_val.
ENDFORM. " F_DISPLAY_DATA
ALV for Error Log
*& Form display_alv_ERR
 text
--> p1 text
<-- p2 text
FORM display_alv_err .
PERFORM f_fieldcat_build_err.
PERFORM f_event_build_err.
PERFORM f_exclude_build_err.
PERFORM f_print_build_err.
PERFORM f_layout_build_err.
PERFORM f_display_data_err.
ENDFORM. " display_alv_ERR
*& Form F_FIELDCAT_BUILD_err
 text
--> p1 text
<-- p2 text
FORM f_fieldcat_build_err .
BREAK-POINT.
REFRESH it_fieldcat_alv.
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
 EXPORTING
 i_program_name = wk_repid
 i_internal_tabname = 'TY_ERRLOG'
i_structure_name = 'YPP_ERR_LOG'
 i_inclname = wk_repid
 CHANGING
 ct_fieldcat = it_fieldcat_alv_err.
LOOP AT it_fieldcat_alv INTO wk_fieldcat_alv.
 CASE wk_fieldcat_alv-fieldname.
 WHEN 'COUNTER'.
 wk_fieldcat_alv-seltext_s = text-023.
 wk_fieldcat_alv-seltext_m = text-023.
 wk_fieldcat_alv-seltext_l = text-023.
 wk_fieldcat_alv-reptext_ddic = text-023.
 wk_fieldcat_alv-edit = 'X'.
 WHEN 'TYPE'.
 wk_fieldcat_alv-seltext_s = text-009.
 wk_fieldcat_alv-seltext_m = text-009.
 wk_fieldcat_alv-seltext_l = text-009.
 wk_fieldcat_alv-reptext_ddic = text-009.
 wk_fieldcat_alv-edit = 'X'.
 WHEN 'NAME'.
 wk_fieldcat_alv-seltext_s = text-010.
 wk_fieldcat_alv-seltext_m = text-010.
 wk_fieldcat_alv-seltext_l = text-010.
 wk_fieldcat_alv-reptext_ddic = text-010.
 wk_fieldcat_alv-edit = 'X'.
 WHEN 'VRSIOID'.
 wk_fieldcat_alv-seltext_s = text-011.
 wk_fieldcat_alv-seltext_m = text-011.
 wk_fieldcat_alv-seltext_l = text-011.
 wk_fieldcat_alv-reptext_ddic = text-011.
 wk_fieldcat_alv-edit = 'X'.
 WHEN 'RESTYPE'.
 wk_fieldcat_alv-seltext_s = text-012.
 wk_fieldcat_alv-seltext_m = text-012.
 wk_fieldcat_alv-seltext_l = text-012.
 wk_fieldcat_alv-reptext_ddic = text-012.
 wk_fieldcat_alv-edit = 'X'.
 WHEN 'MESSAGE'.
 wk_fieldcat_alv-seltext_s = text-013.
 wk_fieldcat_alv-seltext_m = text-013.
 wk_fieldcat_alv-seltext_l = text-013.
 wk_fieldcat_alv-reptext_ddic = text-013.
 wk_fieldcat_alv-edit = 'X'.
 WHEN OTHERS.
 ENDCASE.
 MODIFY it_fieldcat_alv FROM wk_fieldcat_alv.
ENDLOOP.
ENDFORM. " F_FIELDCAT_BUILD_err
*& Form F_EVENT_BUILD_err
 text
--> p1 text
<-- p2 text
FORM f_event_build_err .
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
 EXPORTING
 i_list_type = 0
 IMPORTING
 et_events = it_events.
READ TABLE it_events WITH KEY name = slis_ev_top_of_page
 INTO wk_events.
IF sy-subrc = 0.
 MOVE c_formname_top_of_page TO wk_events-form.
 MODIFY it_events FROM wk_events INDEX sy-tabix.
ENDIF.
ENDFORM. " F_EVENT_BUILD_err
*& Form F_EXCLUDE_BUILD_err
 text
--> p1 text
<-- p2 text
FORM f_exclude_build_err .
wk_excluding = '&GRAPH'. "Graphic
APPEND wk_excluding TO it_excluding.
ENDFORM. " F_EXCLUDE_BUILD_err
*& Form F_PRINT_BUILD_err
 text
--> p1 text
<-- p2 text
FORM f_print_build_err .
wk_print-no_print_listinfos = 'X'.
ENDFORM. " F_PRINT_BUILD_err
*& Form F_LAYOUT_BUILD_err
 text
--> p1 text
<-- p2 text
FORM f_layout_build_err .
wk_layout-zebra = 'X'.
WK_LAYOUT-COLWIDTH_OPTIMIZE = 'X'.
wk_layout-detail_popup = 'X'.
wk_layout-detail_initial_lines = 'X'.
wk_layout-detail_titlebar = 'Details '.
ENDFORM. " F_LAYOUT_BUILD_err
*& Form F_DISPLAY_DATA_err
 text
--> p1 text
<-- p2 text
FORM f_display_data_err .
wk_callback_ucomm = 'CALLBACK_UCOMM'.
IF SY-UCOMM ne '&F03'.
wk_callback_status = 'CALLBACK_STATUS'.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
 EXPORTING
 i_background_id = 'SIWB_WALLPAPER'
 i_callback_program = wk_repid
 i_callback_pf_status_set = wk_callback_status
 i_callback_user_command = wk_callback_ucomm
 it_sort = it_sort
 i_default = 'X'
 i_save = 'A'
 is_variant = wk_variant
 is_layout = wk_layout
 it_fieldcat = it_fieldcat_alv_err
 it_events = it_events
 it_event_exit = it_event_exit
 it_excluding = it_excluding
 is_print = wk_print
 TABLES
 t_outtab = t_errlog.
 KEEP EERRLOG BUTTON
SET PF-STATUS 'ZSTANDARD' EXCLUDING 'UPD' IMMEDIATELY.
ENDFORM. "f_display_data_err
**& Form F_TOP_OF_PAGE
 text
FORM f_top_of_page.
CLEAR: it_list_comments[],
 wk_list_comments,
 wk_list1_comments,
 wk_list2_comments.
wk_list_comments-typ = 'H'. "H=Header,S=Selection, A=Action
wk_list_comments-key = ''.
CASE sy-ucomm.
 WHEN ''.
 wk_list_comments-info = text-030.
 WHEN 'UPD'.
 IF t_errlog[] IS INITIAL.
 wk_list_comments-info = text-031.
 ELSE.
 wk_list_comments-info = text-032.
 ENDIF.
 WHEN 'ERRLOG'.
 wk_list_comments-info = text-032.
 WHEN '&F03'.
 wk_list_comments-info = text-031.
 WHEN '&F15'.
 wk_list_comments-info = text-031.
 WHEN '&F12'.
 wk_list_comments-info = text-031.
ENDCASE.
APPEND wk_list_comments TO it_list_comments.
WRITE sy-datum TO wa_date.
WRITE sy-uzeit TO wa_time.
wk_list_comments-typ = 'S'. "H=Header, S=Selection, A=Action
wk_list_comments-key = ''.
wk_list_comments-info = 'User:'.
wk_list1_comments-info = sy-uname.
CONCATENATE wk_list_comments wk_list1_comments
INTO wk_list2_comments.
APPEND wk_list2_comments TO it_list_comments.
wk_list_comments-typ = 'S'. "H=Header, S=Selection, A=Action
wk_list_comments-key = ''.
wk_list_comments-info = ' Run Date : '.
wk_list1_comments-info = wa_date.
CONCATENATE wk_list_comments wk_list1_comments
INTO wk_list2_comments .
APPEND wk_list2_comments TO it_list_comments.
wk_list_comments-typ = 'S'. "H=Header, S=Selection, A=Action
wk_list_comments-key = ''.
wk_list_comments-info = 'Run Time : '.
wk_list1_comments-info = wa_time.
CONCATENATE wk_list_comments wk_list1_comments
INTO wk_list2_comments .
APPEND wk_list2_comments TO it_list_comments.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
 EXPORTING
 I_LOGO = 'ENJOYSAP_LOGO'
 it_list_commentary = it_list_comments.
ENDFORM. "F_TOP_OF_PAGE
 FORM USER_COMMAND_SAMPLE *
--> UCOMM *
--> SELFIELD *
FORM callback_ucomm USING ucomm LIKE sy-ucomm
 selfield TYPE slis_selfield.
DATA: v_langu(2) ,
 v_loctype TYPE /sapapo/c_loctype.
data err_flg(1).
IF bapi_run_yes_no IS INITIAL.
 CASE sy-ucomm.
 WHEN 'UPD'.
 bapi_run_yes_no = 'X'.
 LOOP AT t_res_head_val WHERE val_err_msg EQ space.
 v_langu = 'EN'.
 refresh tables
 REFRESH : resource_head ,
 resource_head_x ,
 resource_text ,
 resource_text_x,
 t_return.
 CLEAR : resource_head ,
 resource_head_x ,
 resource_text ,
 resource_text_x,
 t_return .
 resource_head-resource = t_res_head-name .
 resource_head-restype = t_res_head-restype.
 resource_head-location = t_res_head-locno.
 CLEAR : v_loctype .
 SELECT SINGLE loctype FROM /sapapo/loc CLIENT SPECIFIED
 INTO v_loctype
 WHERE mandt = sy-mandt
 AND locno = t_res_head-locno.
 resource_head-loctype = v_loctype.
 resource_head-calendar = t_res_head-calendar.
 resource_head-type = t_res_head-type.
 IF t_res_head-type = '03'.
 resource_head-dimension_bucket = t_res_head-dimension_bucket.
 ELSE.
 resource_head-dimension_bucket = space.
 ENDIF.
 APPEND resource_head.
 CLEAR resource_head.
 resource_head_x-resource = t_res_head-name.
 resource_head_x-restype = 'X'.
 resource_head_x-location = 'X'.
 resource_head_x-loctype = 'X'.
 resource_head_x-calendar = 'X'.
 resource_head_x-type = 'X'.
 IF t_res_head-type = '03'.
 resource_head_x-dimension_bucket = 'X'.
 ELSE.
 resource_head_x-dimension_bucket = space.
 ENDIF.
 APPEND resource_head_x.
 CLEAR resource_head_x.
 resource_text-resource = t_res_head-name.
 resource_text-langu = v_langu.
 resource_text-res_short_text = t_res_head-text.
 APPEND resource_text.
 CLEAR resource_text.
 resource_text_x-resource = t_res_head-name.
 resource_text_x-langu = v_langu.
 resource_text_x-res_short_text = 'X'.
 APPEND resource_text_x.
 CLEAR resource_text_x.
 call bapi
 CALL FUNCTION 'BAPI_RSSRVAPS_SAVEMULTI_30A'
 EXPORTING
 logical_system = 'AD2CLNT200'
 business_system_group = 'BSG001'
 commit_control = 'E'
 NO_CREATE = ' '
 TABLES
 resource_head = resource_head
 resource_head_x = resource_head_x
 resource_text = resource_text
 resource_text_x = resource_text_x
 return = t_return.
 IF sy-subrc = 0.
 LOOP AT t_return WHERE type = 'E'
 OR type = 'A'.
 MOVE t_res_head_val-counter TO t_errlog-counter.
 MOVE t_res_head_val-type TO t_errlog-type.
 MOVE t_res_head_val-name TO t_errlog-name.
 MOVE t_res_head_val-vrsioid TO t_errlog-vrsioid.
 MOVE t_res_head_val-restype TO t_errlog-restype.
 MOVE t_return-message TO t_errlog-message.
 APPEND t_errlog.
 CLEAR t_errlog..
 ENDLOOP.
IF not t_errlog[] is initial..
 IF sy-subrc = 0.
 ERROR POP UP
 MESSAGE text-007 type 'I'.
 ELSE.
 err_flg = 'X'.
 SUCC POP UP
 MESSAGE text-008 type 'I'.
 ENDIF.
 ELSE. "NE 0
 LOOP AT t_return WHERE type = 'E'
 OR type = 'A'.
 MOVE t_res_head_val-counter TO t_errlog-counter.
 MOVE t_res_head_val-type TO t_errlog-type.
 MOVE t_res_head_val-name TO t_errlog-name.
 MOVE t_res_head_val-vrsioid TO t_errlog-vrsioid.
 MOVE t_res_head_val-restype TO t_errlog-restype.
 MOVE t_return-message TO t_errlog-message.
 APPEND t_errlog.
 CLEAR t_errlog..
 ENDLOOP.
 IF sy-subrc = 0.
 ELSE.
 MOVE t_res_head_val-counter TO t_errlog-counter.
 MOVE t_res_head_val-type TO t_errlog-type.
 MOVE t_res_head_val-name TO t_errlog-name.
 MOVE t_res_head_val-vrsioid TO t_errlog-vrsioid.
 MOVE t_res_head_val-restype TO t_errlog-restype.
 MOVE 'Error in Creation' TO t_errlog-message.
 APPEND t_errlog.
 CLEAR t_errlog..
 ENDIF.
 ENDIF.
 ENDLOOP.
 gc_flag = 'X'.
 REFRESH fcode.
 if err_flg = 'X'.
 MESSAGE text-008 type 'I'.
 endif.
 ENDCASE.
ENDIF.
IF NOT t_errlog[] IS INITIAL.
 wk_list_comments-info = text-032.
 APPEND wk_list_comments TO it_list_comments.
 APPEND 'UPD' TO fcode_error.
 APPEND 'ERRLOG' TO fcode_error.
 SET PF-STATUS 'ZSTANDARD' EXCLUDING fcode_error.
 PERFORM display_alv_err.
ELSE.
ENDIF.
ENDFORM. "CALLBACK_UCOMM=
*& Form CALLBACK_STATUS
 text
 -->RT_EXTAB text
FORM callback_status USING rt_extab TYPE slis_t_extab.
IF bapi_run_yes_no IS NOT INITIAL .
 IF t_errlog[] IS INITIAL.
 REFRESH fcode.
 APPEND 'UPD' TO fcode.
 APPEND 'ERRLOG' TO fcode.
 SET PF-STATUS 'ZSTANDARD' EXCLUDING 'ERRLOG'.
 SET PF-STATUS 'ZSTANDARD' EXCLUDING fcode IMMEDIATELY .
 ENDIF.
ELSE.
 SET PF-STATUS 'ZSTANDARD' EXCLUDING 'ERRLOG' IMMEDIATELY .
ENDIF.
ENDFORM. "CALLBACK_STATUS
*& Form CALLBACK_STATUS1
 text
 -->RT_EXTAB text
FORM callback_status1 USING rt_extab TYPE slis_t_extab.
SET PF-STATUS 'ZSTANDARD' EXCLUDING 'UPD'.
ENDFORM. " CALLBACK_STATUS
*& Form CALLBACK_STATUS2
 text
 -->RT_EXTAB text
FORM callback_status2 USING rt_extab TYPE slis_t_extab.
REFRESH fcode_final.
IF sy-ucomm NE '&F03'.
 APPEND 'UPD' TO fcode_final.
 APPEND 'ERRLOG' TO fcode_final.
 SET PF-STATUS 'ZSTANDARD' EXCLUDING fcode_final.
ELSE.
 SET PF-STATUS 'ZSTANDARD' EXCLUDING 'UPD'.
ENDIF.
ENDFORM. "CALLBACK_STATUS2
*& Form callback_ucomm_E
 text
 -->UCOMM text
 -->SELFIELD text
FORM callback_ucomm_e USING ucomm LIKE sy-ucomm
 selfield TYPE slis_selfield.
CASE sy-ucomm.
 WHEN 'ERRLOG' .
 PERFORM display_alv_err.
 WHEN '&F03'.
 SET PF-STATUS 'ZSTANDARD' EXCLUDING 'UPD' IMMEDIATELY .
 PERFORM display_alv .
ENDCASE.
ENDFORM. "CALLBACK_UCOMM=
*& Form init_variant
 text
--> p1 text
<-- p2 text
FORM init_variant .
CLEAR: wk_variant.
wk_repid = sy-repid.
wk_variant-report = wk_repid.
wk_variant-username = sy-uname.
wk_variant_save = 'A'. "All types
ENDFORM. " init_variant
*& Form f_read_datum1
 text
 -->P_T_RES_HEAD text
 -->P_P_FILE1 text
 <--P_W_SUBRC text
FORM f_read_datum1 TABLES p_t_res_head STRUCTURE ypp_res_head
 USING p_p_file1
 CHANGING p_w_subrc.
DATA : iexcel LIKE zexcel_read OCCURS 0 WITH HEADER LINE.
CLEAR p_w_subrc.
CALL FUNCTION 'ZALSM_EXCEL_TO_INTERNAL_TABLE'
 EXPORTING
 filename = p_p_file1
 i_begin_col = 1
 i_begin_row = 1
 i_end_col = 62
 i_end_row = 50000
 TABLES
 intern = iexcel
 EXCEPTIONS
 inconsistent_parameters = 1
 upload_ole = 2
 OTHERS = 3.
IF sy-subrc <> 0.
 p_w_subrc = 0 .
 MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
 WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
LOOP AT iexcel WHERE row > 2.
 IF iexcel-col = '0001'.
 p_t_res_head-type = iexcel-value.
 ENDIF.
 IF iexcel-col = '0002'.
 p_t_res_head-name = iexcel-value.
 ENDIF.
 IF iexcel-col = '0003'.
 p_t_res_head-vrsioid = iexcel-value.
 ENDIF.
 IF iexcel-col = '0004'.
 p_t_res_head-restype = iexcel-value.
 ENDIF.
 IF iexcel-col = '0005'.
 p_t_res_head-locno = iexcel-value.
 ENDIF.
 IF iexcel-col = '0006'.
 p_t_res_head-tzone = iexcel-value.
 ENDIF.
 IF iexcel-col = '0007'.
 p_t_res_head-calendar = iexcel-value.
 ENDIF.
 IF iexcel-col = '0008'.
 p_t_res_head-planner = iexcel-value.
 ENDIF.
 IF iexcel-col = '0009'.
 p_t_res_h

Is it possible to specify print settings for web pages?

Is it possible to specify print settings for web pages designed in Muse? For example, can you exclude background images from printing?

Hello,
You can define Print Setting to page By Defining CSS Style in page Header by typing Style tag.
you can go to Page > Page Properties > Metadata > HTML for <Head>.
you can refer to the link below for more details about Print properties in CSS.
http://www.smashingmagazine.com/2011/11/24/how-to-set-up-a-print-style-sheet/
Regards
Vivek

Problem in Print Out of ALV report

Dear All..
I am trying to take print out of an ALV report. there are 36 columns in my report. when i try to take print out, warning appears which says system cannot print the last 277 columns of report.
i have tried using different formats for printer like :
Format                  Description
X_PAPER                 ABAP/4 list: Default list formatting
X_SPOOLERR          ABAP list: Spooler problem report
ZX_65_284               65 Rows and 285 Columns
X_65_255                ABAP/4 list: At least 65 rows with a maximum number of c
X_65_200                ABAP list: at least 65 lines with 200 columns (not for a
X_58_170                ABAP/4 list: At least 58 rows by 170 columns
X_65_132                ABAP list: At least 65 rows by 132 columns
X_90_120                ABAP list: At least 90 rows by 120 columns
X_44_120                ABAP/4 list: At least 44 rows by 120 columns
X_65_80                 ABAP/4 list: At least 65 rows by 80 columns
but every time the same message appears even on A3 size paper..
i am using REUSE_ALV_GRID_DISPLAY to display ALV.
Please help to to take out prints(can be in condensed mode) so that all columns appear on the print out..

HI sujeet,
Thanks for ur response. i had already checked the printer settings.. i think there is no problem with this. Can u Please suggest something else. thanks
Hiii jyojit..
Thanks for reply. I had already checked the said check box in spool admin. but the problem still exists. Please suggest something to get rid of the problem.

How to set the default print format for the report

Hi,
In ALV report , i want to defalut specific print format and printer for background processing .
Any clues!!!!!!!!!
Regards
Swatantra

Hi
Please check below code:
DATA: PRIPAR TYPE PRI_PARAMS,
 ARCPAR TYPE ARC_PARAMS,
 LAY TYPE PRI_PARAMS-PAART,
 LINES TYPE PRI_PARAMS-LINCT,
 ROWS TYPE PRI_PARAMS-LINSZ.
DATA: val(1).
CALL FUNCTION 'GET_PRINT_PARAMETERS'
EXPORTING
 destination = 'LOCL' " <--- Printer Name
 no_dialog = 'X'
 immediately = ' '
IMPORTING
 out_archive_parameters = arcpar
 out_parameters = pripar
 valid = val
EXCEPTIONS
 archive_info_not_found = 1
 invalid_print_params = 2
 invalid_archive_params = 3
 OTHERS = 4.
IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
*** Specifying the page formats
 pripar-linct = 65.
 pripar-linsz = 190.
 pripar-paart = 'X_65_132'.
CALL FUNCTION 'GET_PRINT_PARAMETERS'
EXPORTING
 in_archive_parameters = arcpar
 in_parameters = pripar
 no_dialog = 'X'
* list_name = 'Testing Purpose Only' "l_list
IMPORTING
 out_archive_parameters = arcpar
 out_parameters = pripar
 valid = val
EXCEPTIONS
 archive_info_not_found = 1
 invalid_print_params = 2
 invalid_archive_params = 3
 OTHERS = 4.
IF sy-subrc EQ 0.
NEW-PAGE PRINT ON
NEW-SECTION
PARAMETERS pripar
ARCHIVE PARAMETERS arcpar
NO DIALOG.
ELSE.
write:/ 'Unable to create spool'.
ENDIF.
So now a spool is created with the required print parameters...
The list that is created from here will be in the spool.
Once the list is completed, close it with NEW-PAGE PRINT OFF.
Hope this helps.
Regards
Eswar

Reg : Print Issue in ALV Report

Hi Experts,
I have created an ALV Report for USER Requirement and it is working fine. While taking printout the SORTED Field is not working, it gets repeated in the Print... How to rectify..?

hi,
did u use SORT-UP equal to 'X'?
wa_sort-up = c_x.
ags.

Print settings for ALV report

Similar Messages

Maybe you are looking for