Need to print the company logo in alv report
Hi All ,
I am displaying an alv grid for some QM report .
I have used top-of-page event and 'REUSE_ALV_COMMENTARY_WRITE ' FM to display the logo and header . Every thing is working fine .
But when I am taking the print-out the logo is not getting printed . Except logo everything is coming in the print out.
So please help me if you have any idea ragarding how to print the logo in the report.
regards
Satish
print the logo is really simple, check this little sample:
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
EXPORTING
i_logo = 'Z_LOGO'
it_list_commentary = gt_list_top_of_page.
and how to upload the logo in this link:
uploading logo
regards
Edited by: Sebastian Bustamante on Sep 24, 2008 3:26 PM
Similar Messages
-
How to print the Grid title in ALV Report?
Hi All,
I write ALV Report.When i am going to print this report it is not printing the Grid Header(ie.Title ).even in Print Preview Also i m not getting the title.It shows the Gird with Values.How Can i print the title Also...
Regards,RaviHi,
u will declare the data as below like this
DATA: LIST_TOP_OF_PAGE TYPE SLIS_T_LISTHEADER,
TOP_OF_PAGE TYPE SLIS_FORMNAME VALUE 'TOP_OF_PAGE'.
DATA : ST_FIELDCAT TYPE SLIS_FIELDCAT_ALV,
IT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV,
ST_EVENT TYPE SLIS_ALV_EVENT,
IT_EVENT TYPE SLIS_T_EVENT.
DATA : ST_LIST TYPE SLIS_LISTHEADER,
IT_LIST TYPE SLIS_T_LISTHEADER,
IT_LIST1 TYPE SLIS_T_LISTHEADER,
IT_LIST2 TYPE SLIS_T_LISTHEADER.
START-OF-SELECTION.
IF G_FLAG = SPACE.
W_REPID = SY-REPID.
G_TOP_PAGE = 'TOP-PAGE'.
ST_LIST-INFO = ' Title Name '.
APPEND ST_LIST TO IT_LIST.
ST_LIST-INFO = ' second Name'.
APPEND ST_LIST TO IT_LIST.
ELSE.
ENDIF.
FORM TOP-PAGE .
DATA: V_LOGO(15).
V_LOGO = 'LOGO'.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
EXPORTING
IT_LIST_COMMENTARY = IT_LIST
I_LOGO = V_LOGO.
I_END_OF_LIST_GRID =
ENDFORM. "TOP-PAGE -
How to create transport request to transport company logo for ALV report
When I create company logo ZCOMP via transaction OAER, it works fine and it showed on my ALV Grid report. Is it possible to transport this Logo to QAS and PRD or I have to go to each client and create separately. I do not have authorization in PRD, therefore I like to do the transport.
Thanks.hi,
yes is possible
go to transaction OAER with
class name = 'your class name'
classtype = 'your class type'
object key = 'your object key'
execute program
set cursor on the picture that you want to transport then click on the last button on the gui status or press SHIFT+F12 or Document->transport.
now a popup appear for confirm the transport then u can create you Change Request.
Regards
Marco -
How to print a company logo on top right corner in pdf
Hello together,
how can I print a company logo in a PDF-Document (Print Version; 0Analysis_Pattern_Export) on the top right corner. I created a own web template which just contains the company logo and included this template in the ZAnalysis_Pattern_Export (a copy of 0Analysis_Pattern_Export). I don't know what I have to change to get this logo (I have the path of the MIME and all that...) at the top right corner in the PDF-Document. In the own template I can change it from left, through middle to right, but without any consequences to the final PDF-Document.
Thanks in advance and kind regards
BorisHello Beat,
thanks for your answer. But maybe I described it wrong. I have the logo still on my PDF-Document. I just want to have it on the top right corner and not, like it is now, on the left side of the paper. So the only question is how to move the logo to the top right corner?
Kind regards
Boris -
Changing the company logo CRM5.2
Hi, I want to change the company logo in CRM5.2 WebUI. I have no idea where to start. Appriciate any help!
Best regards EvaHi,
If logo is already imported in SAP then you can directly add in your smartform.
else import logo
> goto se78 or program RSTXLDMC to upload Logo>
for se78 -> goto SE78.----> expand graphics. double click on bmp images.
click on import graphic button--> browse your image location.--- > enter
in this way you can upload only bmp images.
If you want to upload .tiff images---- > you can use the std progran RSTXLDMC
You can upload any form of graphic by using tcode OAER.
program: RSTXLDMC , upload .tiff file from C drive . ( type = BMON/ BCOL , text id = ST ..., text = name..so10) INCLUDE name OBJECT ID STANDARD in layout set window .
Save a Logo using Paintshop Pro or Corel Draw as Tiff file. Use RSTXLDMC to convert the logo to standard text in SapScript. When the program is executed, the path and file name have to be correctly specified.
Process could be like the following:
Run RSTXLDMC
Enter file name C:\MAIL\COMPLOGO.TIF
Resolution for Tiff file
Absolute X-position
Absolute Y-position
Absolute positioning
Reserved height
Shift to right
UOM = CM
Text title
Line width for text = 132
Text name ZHEX-MACRO-COMPLOGO
Text ID ST
Text language = E
Postscript scaling
Width & Height according to PS scaling
Number of Tiff gray levels (2,4,9) 2
Then Create a new window 'COMP' with attributes;
Window COMP description Company Logo
Window type CONST
Left margin 7.00 CH window width 10.00 CH
Upper margin LN window height 8.00 LN
Finally in the text element , mention
/: INCLUDE 'ZHEX-MACRO-COMPLOGO' OBJECT TEXT ID ST LANGUAGE 'E'.
Please note that if object name is not indicated as 'ZHEX...', the logo may not be printed!
You will not be able to see the logo in a test print. The same will be printed in actual printout.
If you are using two logos in the same layout, the names of the logos should be unique. Say 'ZHEX-MACRO-LOGO1' and 'ZHEX-MACRO-LOGO2'. Else all the information will be overwritten.
If the logo is not EXACTLY TIFF 6.0 , the same will not be printed.
See OSS notes 5995, 18045, 39031 for some inputs. -
I need to print the FULL image as shown on the screen - the image is SQUARE (equal on all four sides). iPhoto keeps cropping it into a rectangle - this is not acceptable! How do I get what I see on the screen into print form?
Like Terence explained:
OT -
How to upload the Company logo in the Enterprise Portal
Hi,
I want to upload the company logo in the ESS (EP 7.0). Can anybody tell me the procedure for uploading the logo please.
Thanks & Regards
AmanHi Chris Solomon ,
Thanks for your reply,I want company logo on the right hand side of the screen example .
Working Time
Record Working Time logo
Release Working Time Data
Leave Request
Request leave and other types of absences.
Quota Overview
Request leave and other types of absences.
When user click on the Working time tab, Working time page will open and it will show all the links(see above) so I want company logo on the right hand side on the working time page . -
I need to print the footer in all pages except last page.
Hi,
I'm working on PO RTF template. I got one probelm, I need to print the footer in all pages except last page.
Can someone help me in this.
Thanks in advance.
Venki.This question has been answered already multiple times - please search the forum before posting a question - in case you did and you didn't find it - we added a feature
in 5.6.2 to solve this problem - It is described in the user guide in the RTF template section search for start@last-page:
Last Page Support
XML Publisher now has the ability to show content only on the last page. This is useful for documents such as checks, invoices or purchase orders where you want want content such as the check or a summary in a specific place only on the last page.
The basic command is:
<?start@last-page:body?>
<?end body?>
http://forums.oracle.com/forums/search.jspa?threadID=&q=%40last-page&objID=f245&dateRange=last90days&userID=&numResults=15&rankBy=9
Any content above or below these two tags will only appear on the last page of the document.
Hope that helps,
Klaus -
Settings in program RFF0GB_T for printing the company code address?
Hi All,
I want to print the company code address in the header window of the sapscript. I copied the F110_IN_AVIS to Z .
in the Program RFF0GB_T, the structure SADR whose fields are being used gets filled up if the finaa-nacha = 2 means of Fax type.
How do I change the settings or change in the program to change it to make it to print?
Please help
Rgds,
Madhuri
Edited by: madhuri sonawane on Dec 24, 2008 10:06 AMHello Chandra,
FYI, plz check the code. As per your stmt the config will populate the structure SADR. Plz see the code & clarify how & where the config comes into play.
INCLUDE RFFORI06.
PERFORM avis_schreiben.
FORM avis_schreiben.
IF finaa-nacha EQ '2' AND finaa-formc NE space.
PERFORM adresse_lesen USING t001-adrnr.
ENDIF.
ENDFORM.
INCLUDE RFFORI99.
* FORM ADRESSE_LESEN *
* Lesen einer Customizingadresse (z.B. Buchungskreisadresse) *
* Read customizing address (e.g. address of company code) *
* ADRNR - address number *
FORM adresse_lesen USING value(adrnr).
PERFORM addr_get USING 'CA01' adrnr.
ENDFORM.
* FORM GET_ADDR *
* Lesen einer Adresse *
* Read address *
* ADRGR - address group *
* ADRNR - address number *
FORM addr_get USING adrgr adrnr.
CHECK adrnr NE sadr-adrnr.
CLEAR addr1_sel.
addr1_sel-addrnumber = adrnr.
CALL FUNCTION 'ADDR_GET'
EXPORTING
address_selection = addr1_sel
address_group = adrgr
IMPORTING
address_value = addr1_val
sadr = sadr
EXCEPTIONS
OTHERS = 4. "SADR40A
IF sy-subrc NE 0.
CLEAR sadr.
ENDIF.
ENDFORM. " GET_ADDR
If you still think that SADR is populated through config, can you tell where exactly in FBZP do you config this ?
BR,
Suhas -
What is the Exact Size of the Company Logo?
Hi DBA's
Can anybody tell me What is the Exact Size of the Company Logo for my login page of the Ebussiness Suit R12.1.1.
Best Regards,
SGDo you mean Exact size in dimensions(width/height) or size of the picture?
For the size there is no max limit on the image but better to take the lightest image size in jpg, gif or png formats.
And for the dimensions there is no limit.
Edited by: $ami Malik on Mar 1, 2010 1:52 PM -
Can any one tell me how to include the company logo and some poictures into the Teststand report
1. Can any one tell me how to include the company logo and some pictures into the Teststand report?
2. How to include the waveforms into the report?http://zone.ni.com/devzone/cda/epd/p/id/3619
jigg
CTA, CLA
teststandhelp.com
~Will work for kudos and/or BBQ~ -
Shifting the Company Logo to the right hand side?
Hi Guys,
There is a requirement to put the Logo of the Company in the header on the Right Hand Side of the Self Service Page. The customer has already modified all the buttons.links etc.The last requirement was to shift the Company Logo to the right hand side.
Also there is a requirement to put the company on the Login Page.
Please suggest a suitable way to achieve this.
thanks a lot in advance.
regards,
HemHi Hem,
There is no standard functionality to move the company logo to right hand side.
But you can do a workaround,
Take a backup of your $COMMON_TOP/html/OA.jsp
add the following code
<img src="YourCompanyLogo.bmp" width="100%" height="100">
Under
<%@ page
language = "java"
contentType = "text/html"
errorPage = "OAErrorPage.jsp"
import = "oracle.apps.fnd.framework.webui.OAJSPHelper"
import = "oracle.apps.fnd.framework.webui.OAPageBean"
import = "oracle.apps.fnd.framework.webui.OAGenericDispatcher"
import = "oracle.cabo.ui.jsps.GenericEntry"
%>
YourCompanyLogo.bmp, should be in $COMMON_TOP/html,
But you can keep in $OA_MEDIA also, but you give the corresponding path.
goto your $COMMON_TOP/_pages/_oa__html/
remove the cache for OA.jsp, using
rm OA.
YourCompanyLogo.bmp should be an image which will have your company log in the right hand side.
And you can place a empty image for the standard image.
For changing the standard image, check this URL..
http://www.oracle.com/technology/tech/blaf/specs/branding.html
If you face any issues to do this please let me know.
Then bounce the apache.
Then check.
Thanks.
With Regards,
Kali.
OSSI. -
Why won't Contacts print the "company" field?
When trying to print a list from Contacts, it won't include the Company. I am using Mavericks 10.9.1. This problem doesn't exist on my old iMac with OS 10.6.8. Contacts on the Cloud will let me print the company field.
Hi,
Same problem here.
The printable lists from Contacts exclude the Company name. The photo also sometimes excludes, sometimes does not. Same with Nickname, and some other fields.
Yes, I check off the items in the Attributes selection when printing the list. The information is also excluded when choosing "Export as PDF..."
If I export the contact as a VCF, the information is exported. Re-importing it does not help, though. -
Need to display data on the right side in the header area of alv report.
hi experts,
I want to display data in the header area of alv report on the right side . I have already used function for events on the header side data is getting displayed on the left side .but i want data to be displayed on the right side.
regards,
andrews.Hi,
Hope this below code helps you.
Take care,
Çağatay.
* build header for alv
FORM top_of_page_split USING r_top TYPE REF TO cl_dd_document.
DATA: s_tab TYPE sdydo_text_table,
c_area TYPE REF TO cl_dd_area,
text TYPE sdydo_text_element.
TYPES: BEGIN OF tab_text,
text TYPE sdydo_text_element,
END OF tab_text.
DATA: i_text TYPE TABLE OF tab_text.
DATA: w_text TYPE tab_text.
CALL METHOD r_top->initialize_document.
CALL METHOD r_top->vertical_split
EXPORTING
split_area = r_top
split_width = '70%'
IMPORTING
right_area = c_area.
CONCATENATE sy-datum+4(2)
sy-datum+6(2)
sy-datum(4)
INTO date1.
CONCATENATE 'DATE' date1
INTO w_text-text
SEPARATED BY ':'.
APPEND w_text TO i_text.
CONCATENATE 'time:' sy-uzeit INTO w_text .
APPEND w_text TO i_text.
CONCATENATE 'uesr:' sy-uname INTO w_text .
APPEND w_text TO i_text.
CONCATENATE 'local date:' sy-datlo INTO w_text .
APPEND w_text TO i_text.
CONCATENATE 'time zone:' sy-zonlo INTO w_text .
APPEND w_text TO i_text.
s_tab[] = i_text[].
CALL METHOD c_area->add_text
EXPORTING
text_table = s_tab
fix_lines = 'X'
sap_fontsize = cl_dd_document=>medium
sap_emphasis = cl_dd_document=>strong.
CALL METHOD r_top->add_gap
EXPORTING
width = 60.
text = 'THIS IS REPORT HEADING'.
CALL METHOD r_top->add_text
EXPORTING
text = text
sap_emphasis = 'STRONG'.
CALL METHOD r_top->new_line.
CALL METHOD r_top->add_gap
EXPORTING
width = 70.
text = 'THIS IS REPORT HEADING1'.
CALL METHOD r_top->add_text
EXPORTING
text = text
sap_emphasis = 'STRONG'.
CALL METHOD r_top->new_line.
CALL METHOD r_top->add_gap
EXPORTING
width = 80.
text = 'THIS IS REPORT HEADING2'.
CALL METHOD r_top->add_text
EXPORTING
text = text
sap_emphasis = 'STRONG'.
CALL METHOD r_top->new_line.
text = 'Report Subheading1'.
CALL METHOD r_top->add_text
EXPORTING
text = text
sap_emphasis = 'NORMAL'.
CALL METHOD r_top->new_line.
text = 'Report Subheading2'.
CALL METHOD r_top->add_text
EXPORTING
text = text
sap_emphasis = 'NORMAL'.
CALL METHOD r_top->new_line.
text = 'Report Subheading3'.
CALL METHOD r_top->add_text
EXPORTING
text = text
sap_emphasis = 'NORMAL'.
CALL METHOD r_top->new_line.
ENDFORM. "TOP_OF_PAGE_SPLIT -
Plz send me the code of interctive ALV report
Hi
plz send me the code of interctive ALV report
thanks in advance
rachuHi
<u><b>For More alv report examples check these Tcodes <i>LIBS, BIBS</i>Here u can find more number of examples on alv reports of different kinds</b></u>
Check this sample code
TYPE-POOLS: SLIS.
*type declaration for values from ekko
TYPES: BEGIN OF I_EKKO,
EBELN LIKE EKKO-EBELN,
AEDAT LIKE EKKO-AEDAT,
BUKRS LIKE EKKO-BUKRS,
BSART LIKE EKKO-BSART,
LIFNR LIKE EKKO-LIFNR,
END OF I_EKKO.
DATA: IT_EKKO TYPE STANDARD TABLE OF I_EKKO INITIAL SIZE 0,
WA_EKKO TYPE I_EKKO.
*type declaration for values from ekpo
TYPES: BEGIN OF I_EKPO,
EBELN LIKE EKPO-EBELN,
EBELP LIKE EKPO-EBELP,
MATNR LIKE EKPO-MATNR,
MENGE LIKE EKPO-MENGE,
MEINS LIKE EKPO-MEINS,
NETPR LIKE EKPO-NETPR,
END OF I_EKPO.
DATA: IT_EKPO TYPE STANDARD TABLE OF I_EKPO INITIAL SIZE 0,
WA_EKPO TYPE I_EKPO .
*variable for Report ID
DATA: V_REPID LIKE SY-REPID .
*declaration for fieldcatalog
DATA: I_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV,
WA_FIELDCAT TYPE SLIS_FIELDCAT_ALV.
DATA: IT_LISTHEADER TYPE SLIS_T_LISTHEADER.
* declaration for events table where user comand or set PF status will
* be defined
DATA: V_EVENTS TYPE SLIS_T_EVENT,
WA_EVENT TYPE SLIS_ALV_EVENT.
* declartion for layout
DATA: ALV_LAYOUT TYPE SLIS_LAYOUT_ALV.
* declaration for variant(type of display we want)
DATA: I_VARIANT TYPE DISVARIANT,
I_VARIANT1 TYPE DISVARIANT,
I_SAVE(1) TYPE C.
*PARAMETERS : p_var TYPE disvariant-variant.
*Title displayed when the alv list is displayed
DATA: I_TITLE_EKKO TYPE LVC_TITLE VALUE 'FIRST LIST DISPLAYED'.
DATA: I_TITLE_EKPO TYPE LVC_TITLE VALUE 'SECONDRY LIST DISPLAYED'.
INITIALIZATION.
V_REPID = SY-REPID.
PERFORM BUILD_FIELDCATLOG.
PERFORM EVENT_CALL.
PERFORM POPULATE_EVENT.
START-OF-SELECTION.
PERFORM DATA_RETRIEVAL.
PERFORM BUILD_LISTHEADER USING IT_LISTHEADER.
PERFORM DISPLAY_ALV_REPORT.
*& Form BUILD_FIELDCATLOG
* Fieldcatalog has all the field details from ekko
FORM BUILD_FIELDCATLOG.
WA_FIELDCAT-TABNAME = 'IT_EKKO'.
WA_FIELDCAT-FIELDNAME = 'EBELN'.
WA_FIELDCAT-SELTEXT_M = 'PO NO.'.
APPEND WA_FIELDCAT TO I_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-TABNAME = 'IT_EKKO'.
WA_FIELDCAT-FIELDNAME = 'AEDAT'.
WA_FIELDCAT-SELTEXT_M = 'DATE.'.
APPEND WA_FIELDCAT TO I_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-TABNAME = 'IT_EKKO'.
WA_FIELDCAT-FIELDNAME = 'BUKRS'.
WA_FIELDCAT-SELTEXT_M = 'COMPANY CODE'.
APPEND WA_FIELDCAT TO I_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-TABNAME = 'IT_EKKO'.
WA_FIELDCAT-FIELDNAME = 'BUKRS'.
WA_FIELDCAT-SELTEXT_M = 'DOCMENT TYPE'.
APPEND WA_FIELDCAT TO I_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-TABNAME = 'IT_EKKO'.
WA_FIELDCAT-FIELDNAME = 'LIFNR'.
WA_FIELDCAT-NO_OUT = 'X'.
WA_FIELDCAT-SELTEXT_M = 'VENDOR CODE'.
APPEND WA_FIELDCAT TO I_FIELDCAT.
CLEAR WA_FIELDCAT.
ENDFORM. "BUILD_FIELDCATLOG
*& Form EVENT_CALL
* we get all events - TOP OF PAGE or USER COMMAND in table v_events
FORM EVENT_CALL.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
EXPORTING
I_LIST_TYPE = 0
IMPORTING
ET_EVENTS = V_EVENTS
* EXCEPTIONS
* LIST_TYPE_WRONG = 1
* OTHERS = 2
IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM. "EVENT_CALL
*& Form POPULATE_EVENT
* Events populated for TOP OF PAGE & USER COMAND
FORM POPULATE_EVENT.
READ TABLE V_EVENTS INTO WA_EVENT WITH KEY NAME = 'TOP_OF_PAGE'.
IF SY-SUBRC EQ 0.
WA_EVENT-FORM = 'TOP_OF_PAGE'.
MODIFY V_EVENTS FROM WA_EVENT TRANSPORTING FORM WHERE NAME =
WA_EVENT-FORM.
ENDIF.
READ TABLE V_EVENTS INTO WA_EVENT WITH KEY NAME = 'USER_COMMAND'.
IF SY-SUBRC EQ 0.
WA_EVENT-FORM = 'USER_COMMAND'.
MODIFY V_EVENTS FROM WA_EVENT TRANSPORTING FORM WHERE NAME =
WA_EVENT-NAME.
ENDIF.
ENDFORM. "POPULATE_EVENT
*& Form data_retrieval
* retreiving values from the database table ekko
FORM DATA_RETRIEVAL.
SELECT EBELN AEDAT BUKRS BSART LIFNR FROM EKKO INTO TABLE IT_EKKO.
ENDFORM. "data_retrieval
*& Form bUild_listheader
* text
* -->I_LISTHEADEtext
FORM BUILD_LISTHEADER USING I_LISTHEADER TYPE SLIS_T_LISTHEADER.
DATA HLINE TYPE SLIS_LISTHEADER.
HLINE-INFO = 'this is my first alv pgm'.
HLINE-TYP = 'H'.
ENDFORM. "build_listheader
*& Form display_alv_report
* text
FORM DISPLAY_ALV_REPORT.
V_REPID = SY-REPID.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
I_CALLBACK_PROGRAM = V_REPID
* I_CALLBACK_PF_STATUS_SET = ' '
I_CALLBACK_USER_COMMAND = 'USER_COMMAND'
I_CALLBACK_TOP_OF_PAGE = 'TOP_OF_PAGE'
I_GRID_TITLE = I_TITLE_EKKO
* I_GRID_SETTINGS =
* IS_LAYOUT = ALV_LAYOUT
IT_FIELDCAT = I_FIELDCAT[]
* IT_EXCLUDING =
* IT_SPECIAL_GROUPS =
* IT_SORT =
* IT_FILTER =
* IS_SEL_HIDE =
* i_default = 'ZLAY1'
I_SAVE = 'A'
* is_variant = i_variant
IT_EVENTS = V_EVENTS
TABLES
T_OUTTAB = IT_EKKO
* EXCEPTIONS
* PROGRAM_ERROR = 1
* OTHERS = 2
IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM. "display_alv_report
*& Form TOP_OF_PAGE
* text
FORM TOP_OF_PAGE.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
EXPORTING
IT_LIST_COMMENTARY = IT_LISTHEADER
* i_logo =
* I_END_OF_LIST_GRID =
ENDFORM. "TOP_OF_PAGE
*& Form USER_COMMAND
* text
* -->R_UCOMM text
* -->, text
* -->RS_SLEFIELDtext
FORM USER_COMMAND USING R_UCOMM LIKE SY-UCOMM
RS_SELFIELD TYPE SLIS_SELFIELD.
CASE R_UCOMM.
WHEN '&IC1'.
READ TABLE IT_EKKO INTO WA_EKKO INDEX RS_SELFIELD-TABINDEX.
PERFORM BUILD_FIELDCATLOG_EKPO.
PERFORM EVENT_CALL_EKPO.
PERFORM POPULATE_EVENT_EKPO.
PERFORM DATA_RETRIEVAL_EKPO.
PERFORM BUILD_LISTHEADER_EKPO USING IT_LISTHEADER.
PERFORM DISPLAY_ALV_EKPO.
ENDCASE.
ENDFORM. "user_command
*& Form BUILD_FIELDCATLOG_EKPO
* text
FORM BUILD_FIELDCATLOG_EKPO.
WA_FIELDCAT-TABNAME = 'IT_EKPO'.
WA_FIELDCAT-FIELDNAME = 'EBELN'.
WA_FIELDCAT-SELTEXT_M = 'PO NO.'.
APPEND WA_FIELDCAT TO I_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-TABNAME = 'IT_EKPO'.
WA_FIELDCAT-FIELDNAME = 'EBELP'.
WA_FIELDCAT-SELTEXT_M = 'LINE NO'.
APPEND WA_FIELDCAT TO I_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-TABNAME = 'I_EKPO'.
WA_FIELDCAT-FIELDNAME = 'MATNR'.
WA_FIELDCAT-SELTEXT_M = 'MATERIAL NO.'.
APPEND WA_FIELDCAT TO I_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-TABNAME = 'I_EKPO'.
WA_FIELDCAT-FIELDNAME = 'MENGE'.
WA_FIELDCAT-SELTEXT_M = 'QUANTITY'.
APPEND WA_FIELDCAT TO I_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-TABNAME = 'I_EKPO'.
WA_FIELDCAT-FIELDNAME = 'MEINS'.
WA_FIELDCAT-SELTEXT_M = 'UOM'.
APPEND WA_FIELDCAT TO I_FIELDCAT.
CLEAR WA_FIELDCAT.
WA_FIELDCAT-TABNAME = 'I_EKPO'.
WA_FIELDCAT-FIELDNAME = 'NETPR'.
WA_FIELDCAT-SELTEXT_M = 'PRICE'.
APPEND WA_FIELDCAT TO I_FIELDCAT.
CLEAR WA_FIELDCAT.
ENDFORM. "BUILD_FIELDCATLOG_EKPO
*& Form event_call_ekpo
* we get all events - TOP OF PAGE or USER COMMAND in table v_events
FORM EVENT_CALL_EKPO.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
EXPORTING
I_LIST_TYPE = 0
IMPORTING
ET_EVENTS = V_EVENTS
* EXCEPTIONS
* LIST_TYPE_WRONG = 1
* OTHERS = 2
IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM. "event_call_ekpo
*& Form POPULATE_EVENT
* Events populated for TOP OF PAGE & USER COMAND
FORM POPULATE_EVENT_EKPO.
READ TABLE V_EVENTS INTO WA_EVENT WITH KEY NAME = 'TOP_OF_PAGE'.
IF SY-SUBRC EQ 0.
WA_EVENT-FORM = 'TOP_OF_PAGE'.
MODIFY V_EVENTS FROM WA_EVENT TRANSPORTING FORM WHERE NAME =
WA_EVENT-FORM.
ENDIF.
ENDFORM. "POPULATE_EVENT
*& Form TOP_OF_PAGE
* text
FORM F_TOP_OF_PAGE.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
EXPORTING
IT_LIST_COMMENTARY = IT_LISTHEADER
* i_logo =
* I_END_OF_LIST_GRID =
ENDFORM. "TOP_OF_PAGE
*& Form USER_COMMAND
* text
* -->R_UCOMM text
* -->, text
* -->RS_SLEFIELDtext
*retreiving values from the database table ekko
FORM DATA_RETRIEVAL_EKPO.
SELECT EBELN EBELP MATNR MENGE MEINS NETPR FROM EKPO INTO TABLE IT_EKPO.
ENDFORM.
FORM BUILD_LISTHEADER_EKPO USING I_LISTHEADER TYPE SLIS_T_LISTHEADER.
DATA: HLINE1 TYPE SLIS_LISTHEADER.
HLINE1-TYP = 'H'.
HLINE1-INFO = 'CHECKING PGM'.
ENDFORM.
FORM DISPLAY_ALV_EKPO.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
* I_INTERFACE_CHECK = ' '
* I_BYPASSING_BUFFER = ' '
* I_BUFFER_ACTIVE = ' '
I_CALLBACK_PROGRAM = V_REPID
* I_CALLBACK_PF_STATUS_SET = ' '
* I_CALLBACK_USER_COMMAND = 'F_USER_COMMAND'
I_CALLBACK_TOP_OF_PAGE = 'TOP_OF_PAGE'
* I_CALLBACK_HTML_TOP_OF_PAGE = ' '
* I_CALLBACK_HTML_END_OF_LIST = ' '
* I_STRUCTURE_NAME =
* I_BACKGROUND_ID = ' '
I_GRID_TITLE = I_TITLE_EKPO
* I_GRID_SETTINGS =
* IS_LAYOUT =
IT_FIELDCAT = I_FIELDCAT[]
* IT_EXCLUDING =
* IT_SPECIAL_GROUPS =
* IT_SORT =
* IT_FILTER =
* IS_SEL_HIDE =
* I_DEFAULT =
I_SAVE = 'A'
* IS_VARIANT =
IT_EVENTS = V_EVENTS
TABLES
T_OUTTAB = IT_EKPO
EXCEPTIONS
PROGRAM_ERROR = 1
OTHERS = 2
IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM.
Try this links...
http://www.****************/Tutorials/ALV/ALVMainPage.htm
Simple ALV report
http://www.sapgenie.com/abap/controls/alvgrid.htm
http://wiki.ittoolbox.com/index.php/Code:Ultimate_ALV_table_toolbox
ALV
1. Please give me general info on ALV.
http://www.sapfans.com/forums/viewtopic.php?t=58286
http://www.sapfans.com/forums/viewtopic.php?t=76490
http://www.sapfans.com/forums/viewtopic.php?t=20591
http://www.sapfans.com/forums/viewtopic.php?t=66305 - this one discusses which way should you use - ABAP Objects calls or simple function modules.
2. How do I program double click in ALV?
http://www.sapfans.com/forums/viewtopic.php?t=11601
http://www.sapfans.com/forums/viewtopic.php?t=23010
3. How do I add subtotals (I have problem to add them)...
http://www.sapfans.com/forums/viewtopic.php?t=20386
http://www.sapfans.com/forums/viewtopic.php?t=85191
http://www.sapfans.com/forums/viewtopic.php?t=88401
http://www.sapfans.com/forums/viewtopic.php?t=17335
4. How to add list heading like top-of-page in ABAP lists?
http://www.sapfans.com/forums/viewtopic.php?t=58775
http://www.sapfans.com/forums/viewtopic.php?t=60550
http://www.sapfans.com/forums/viewtopic.php?t=16629
5. How to print page number / total number of pages X/XX in ALV?
http://www.sapfans.com/forums/viewtopic.php?t=29597 (no direct solution)
6. ALV printing problems. The favourite is: The first page shows the number of records selected but I don't need this.
http://www.sapfans.com/forums/viewtopic.php?t=64320
http://www.sapfans.com/forums/viewtopic.php?t=44477
7. How can I set the cell color in ALV?
http://www.sapfans.com/forums/viewtopic.php?t=52107
8. How do I print a logo/graphics in ALV?
http://www.sapfans.com/forums/viewtopic.php?t=81149
http://www.sapfans.com/forums/viewtopic.php?t=35498
http://www.sapfans.com/forums/viewtopic.php?t=5013
9. How do I create and use input-enabled fields in ALV?
http://www.sapfans.com/forums/viewtopic.php?t=84933
http://www.sapfans.com/forums/viewtopic.php?t=69878
10. How can I use ALV for reports that are going to be run in background?
http://www.sapfans.com/forums/viewtopic.php?t=83243
http://www.sapfans.com/forums/viewtopic.php?t=19224
11. How can I display an icon in ALV? (Common requirement is traffic light icon).
http://www.sapfans.com/forums/viewtopic.php?t=79424
http://www.sapfans.com/forums/viewtopic.php?t=24512
12. How can I display a checkbox in ALV?
http://www.sapfans.com/forums/viewtopic.php?t=88376
http://www.sapfans.com/forums/viewtopic.php?t=40968
http://www.sapfans.com/forums/viewtopic.php?t=6919
Reward all helpful answers
Regards
Pavan
Message was edited by:
Pavan praveen
Maybe you are looking for
-
Doubt in Integration Scenario Creation
Hi All, My scenario is file to Idoc.Need to create a Integration Scenario. I have stored all the Interface and Mapping objects in teh same Software Component Version (say SWCA). So in Integration Scenario, What will be the Sender and Receiver Softwar
-
I am seeking advice about which cable to use to connect my wife's and my phones to our PC. We have a 3100 and a 3120 and our PC is running XP(SP2). Should we use the DKU-5 or would we be better using the CA-42 cable? Thanks
-
Why to save standard texts in customization requests only?
Hi Experts, I have copied standard text of SAP SCRIPTfrom one system to other development system through the report RSTXSCRP.But I want to save the standard text in Transport Request. I have tried to do it by using report RSTXTRAN.But Its asking for
-
Portlet API: JSR 168 / 286 vs Vendor Extensions
Currently evaluating Websphere 5.1 vs WebLogic 8.1 Portal software. It seems like both IBM and BEA push you towards using their Portal extensions as "value add" features. I am really interested in sticking to JSR 168 for portability. Does anyone have
-
Problems with iWork '09 in Mountain Lion
After installing Mountain Lion, I've got problems using the iWork '09 applications. I tried to update them, but it's still not possible to open or create a document. Would anyone have tips/ideas about this?