How to display a report in a container

Hello All,
There are 2 scenarios:-
1) On left side navigation panel, I have a tree control. On double click on a node of a tree, I want to display a "report output" on the right panel. I have created the left panel and right panel by splitting the main custom container using splitter control. But I am not able to submit a report output on double click event of tree node as I dont know how to specify the parent container for the report.
2) I want to divide the custom container into 4 equal parts. Then each part should display four reports which are output of 4 different programs.
Kindly help me out with his issue.
Needless to say that points will be awarded
Thanks n Regards,
Abhishek

Hi Abhishek,
you can't run a program in an container. That's not possible. But you can handle your requirement using one of the following ways:
Way 1:
Call the program in the double click event handler method by using the the statement e.g. submit and return. The program is then called in a separate screen(not in the container).
Way 2:
Copy the functionnality of the program in e.g. function module(FM). This FM gets the input parameters, processes the input and returns the results. The results are displayed e.g. in an ALV Grid. The steps getting the display results and setting the display data for the ALV are handled in the double click event handler method.
Best Regards, Edemey

Similar Messages

How to Display Excel Report in Client machine in Forms11g

Hi All,
we are running database in Linux server and separate Linux Application Server , But my question is how to display the data to Excel Report in the Client machine
in Forms11g applications.
Plesase suggest any method.
Regards
Venkatesulu Gunisetty

You should use webutils.
For proper answer, place ur request here in oracle Forms Thread,
Forms

How to display multiple reports at the same time

Hi,
I'm trying to display multiple reports at the same time, each one in separates tabs or windows using Forms 11g 11.1.1.6
I have a button which has a call to a procedure which makes use of rp2rro library to show the specific reports, for example:
call_report('report1');
call_report('report2');
call_report('report3');
call_report('report4');
The main problem is that, just the last report is been displayed.
Is there some way to display report1, report2 etc in separate tabs or windows ??
Regards
Carlos

You shouldn't have a problem calling different reports at once. As long as you're using Forms 11g they show up in different windows.
The question is how you are calling the report.
Here is how I manipulate it.
After I pass parameters with the ADD_PARAMETER built-in I set some key values (destype, desformat, desname) with the RP2RRO's procedures.
Finally calling RP2RRO.RP2RRO_RUN_PRODUCT and then WEB.SHOW_DOCUMENT passing the correct procedure parameters the report comes up in a window. If you repeat the above changing the appropriate variables (the report_name in the RP2RRO_RUN_PRODUCT and so on) you can get multiple reports in different windows.

How to display a report in CrystalReportViewer when report is a Shortcut

Hello,
In BusinessObjects Enterprise XI R2, we have a shortcut to a report since we don't want to give a particular group of users access to the original folder. However, my objective is to display the "shortcut" report in a .NET web application.
What I'm running into seems to basically be permissions errors when setting the ReportSource of the CrystalReportViewer to the ID of the shortcut. In InfoView, the same user can click the shortcut and the report comes up with no problems.
So my question is how do I display this report in my application's viewer and still honor the privs of the shortcut, and of not the original report?
Partial code listing...
' load the report
Dim reportId As String = Me.SessionState.ReportId
myReportViewer.ReportSource = MyInfoStoreManager.GetReportSource(myEnterpriseSession, reportId)
myReportViewer.EnterpriseLogon = myEnterpriseSession
The relevant code in the GetReportSource method is below...
' retrieve the report from BOXI Infostore
Dim objReportFactoryService As EnterpriseService = myEnterpriseSession.GetService("PSReportFactory")
Dim objFactory As Viewing.PSReportFactory = CType(objReportFactoryService.Interface, Viewing.PSReportFactory)
Dim objReportSource As ISCRReportSource
objReportSource = objFactory.OpenReportSource(intReportId)
Return objReportSource
Thanks,
Horus

Since you're using XI Release 2, there'd be limited options. XI 3.x allow for greater control of rights inheritance, so you can specify no-view rights for the folder, but view rights for the contents of the folder.
So with XI Release 2, since you can't control inheritance, you'd restrict rights to the parent folder, but give each report within specific rights tailored to the User or UserGroup. If you have lots of reports, the rights admin overhead may be problematic, since you'd need to manage them per-object.
Sincerely,
Ted Ueda

How to display a screen in a container ?

Hi All,
I have an instance of a container lrc_cont_right type cl_gui_container and
a screen 0300.
How do I display this screen in the container ?
Regards,
Ashish

hi
if gc_container is initial.
 create object gc_container
 exporting
 container_name = <container_name>.
 create object gc_alv_boq
 exporting
 i_parent = gc_container.
 endif.
call method gc_alv_boq->set_table_for_first_display
exporting
* I_BUFFER_ACTIVE =
* I_BYPASSING_BUFFER =
* I_CONSISTENCY_CHECK =
* I_STRUCTURE_NAME =
* IS_VARIANT =
* I_SAVE =
* I_DEFAULT = 'X'
is_layout = gs_layout_boq
* IS_PRINT =
* IT_SPECIAL_GROUPS =
it_toolbar_excluding = gt_toolbar
* IT_HYPERLINK =
* IT_ALV_GRAPHICS =
* IT_EXCEPT_QINFO =
 changing
 it_outtab = <it_table>
 it_fieldcatalog = <field_cat>
* IT_SORT =
* IT_FILTER =
* EXCEPTIONS
* INVALID_PARAMETER_COMBINATION = 1
* PROGRAM_ERROR = 2
* TOO_MANY_LINES = 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.
regards
vivek

HOW TO DISPLAY BW REPORTS(LINKS) IN PORTAL??

Hi All,
I am haveing Links of BW Report i have to display those reports in portal
How can i achive this except URL IVIEW??
I want to know that is theare any inbuilt template of Iview or any othere method to display thease reports in portal??
Any help will be highly appretiated.
Thanks in Advance.
Vinit Soni

Hi Vinit,
After looking into ur BW url , i think u r not using webtemplates.
u can follow below steps
Creating an BEx Web Application iView :
1.Right-click on the iViews folder, and choose New → iView. The iView Wizard displays.
2.Select iView template create an iView from an existing iView template radio button.
3.Choose Next.
4.In the iView Wizard, select BEx Web Application iView radio button.
5.Choose Next.
6.Enter a name, iView ID and iView ID Prefix.
7.Choose Next.
8.Choose SAP BW2.x/3.x radio button from Version.
9.Choose Next.
10.Select the SAP BW system alias SAP_BW and in the BEx Web Application Query String, copy the query id from the URL of your desired query from the string text &INFOCUBE onwards (for example, &CMD=LDOC&INFOCUBE=0MKTG_C01&QUERY=ZMKTG_C01_Q7001).
11.Choose Next.
And also maku sure u have configured WAS settings in system object u have created
Hope this helps u
Regards
Krishna.

How to display abap reports in EP

Hi all,
I have developed new reports in R/3.
how to display these abap reports in EP...

Hi Rajasekaran,
Please follow these steps,
R/3 Side:
1)Create new T-CODE in SE93 .
2)Assign Ur Report Program to Ur T-code
Portal side:
Creating a System:
1)System Admin -> System Config ->System Landscape -->Create a New system
(from template)-> Select SAP system with dedicated Application Server ->fillup the following Properties in your system
Application Host : Ur R/3 server Host Ex (10.252.10.122)
SAP Client : ex (800)
SAP System ID (SID) :eg(ID3)
SAP System Number : Eg: (00)
Server Port :Eg :3200 (00= instance )
System Type : r/3
User Mapping Type :admin,user
2)Create alias for your system and set Usermapping .
3)Test Ur system .
Creating a Iview:
1)Create a Transaction Iview
2)Assign ur system alias to this Iview.
3)Assign u tcode to this Iview.
5)Preview
Regards,
Ramganesan K.

How to display a Report 9i from Forms if the Report has a Parameter Form?

Hi,
could some one please post me a code sample to show how to call a (paper layout, RDF) Report from Forms if I would like it to display the Report's parameter form first?
Thank you in advance.
Tamas Szecsy
I used the following code segment do achieve the job, but I get "REP-546: Warning: The value of restricted LOV parameter P_ALAL is not among the selectable values" message, even though I would like to specify the P_ALAL value on the report's parameter Form.
declare
paramlist_id ParamList;
tmp_riport_name varchar2(200);
report_id          report_object;
report_job_id varchar2(200);
tmp_id number;
begin
-- init
tmp_riport_name := null;
          -- parameter list
paramlist_id := get_parameter_list('mytmp_params');
if not id_null(paramlist_id) then
destroy_parameter_list(paramlist_id);
end if;
paramlist_id := Create_Parameter_List('mytmp_params');
add_parameter( paramlist_id, 'PARAMFORM', TEXT_PARAMETER, 'YES' );
          -- call report
report_id := find_report_object( 'DUMMY' );
if report_id.id is null then
     return;
end if;
-- display
set_report_object_property( report_id, report_execution_mode, runtime );
set_report_object_property( report_id, report_comm_mode, synchronous );
set_report_object_property( report_id, report_destype, 'preview' );
set_report_object_property( report_id, report_desformat, 'PDF' );
set_report_object_property( report_id, report_server, 'rep_geoias' );
     set_report_object_property( report_id, report_filename, :ALAP_REPORTS_NAME||'.rep' );
report_job_id := run_report_object( report_id, paramlist_id );
tmp_id := to_number(substr( report_job_id, length(name_in('rep_geoias'))+2 ));
web.show_document( '/reports/rwservlet/getjobid'||tmp_id||'?server=rep_geoias', '_blank' );
END;

I think you specified report object name incorrect.
in command line:
repid := FIND_REPORT_OBJECT('REPORT1');
Report1 must be name of report object in Form Builder.
However to call report from Oracle Form you must do more work. For example:
- Create report server name
- Adding some code to set property for report object base on report server you created.
Cheer!

How to display a report in tree format

hai can any one send me the code to display the report in a tree format
if i take example of customer numbers as tree branches and if i click each customer number the tree should expand showing all sales orders for a customer
ragrds
afzal

use FM HR_ALV_HIERSEQ_LIST_DISPLAY
there are 2 internal table , one for header and one for detail
below is code for reference
REPORT zinsd_quot_cont.
TYPES : BEGIN OF ty_vbak,
 vbeln TYPE vbeln_va,
 vkorg TYPE vkorg,
 vtweg TYPE vtweg,
 spart TYPE spart,
 vkbur TYPE vkbur,
 vkgrp TYPE vkgrp,
 angdt TYPE angdt_v,
 bnddt TYPE bnddt,
 kunnr TYPE kunnr,
 kwmeng TYPE kwmeng,
 meins TYPE meins,
 kunwe TYPE kunnr,
 name1 TYPE name1_gp ,
 name2 TYPE name1_gp ,
 sel(1),
 expand(1),
 salesdocument TYPE bapivbeln-vbeln,
 message TYPE bapi_msg,
 END OF ty_vbak.
DATA : w_vbak TYPE ty_vbak,
 t_vbak TYPE TABLE OF ty_vbak.
DATA : w_update TYPE ty_vbak,
 t_update TYPE TABLE OF ty_vbak.
TYPES : BEGIN OF ty_kna1,
 kunnr TYPE kunnr,
 name1 TYPE name1_gp ,
 END OF ty_kna1.
DATA : w_kna1 TYPE ty_kna1,
 t_kna1 TYPE TABLE OF ty_kna1.
TYPES : BEGIN OF ty_vbap,
 vbeln TYPE vbeln_va,
 posnr TYPE posnr_va,
 matnr TYPE matnr,
 matkl TYPE matkl,
 werks TYPE werks_ext,
 kwmeng TYPE kwmeng,
 meins TYPE meins,
 mvgr5 TYPE mvgr5,
 maktx TYPE maktx,
 END OF ty_vbap.
DATA : w_vbap TYPE ty_vbap,
 t_vbap TYPE TABLE OF ty_vbap.
TYPES : BEGIN OF ty_makt,
 matnr TYPE matnr,
 maktx TYPE maktx,
 END OF ty_makt.
DATA : w_makt TYPE ty_makt,
 t_makt TYPE TABLE OF ty_makt.
TYPES : BEGIN OF ty_sum,
 vbeln TYPE vbeln_va,
 kwmeng TYPE kwmeng,
 END OF ty_sum.
DATA : w_sum TYPE ty_sum,
 t_sum TYPE TABLE OF ty_sum.
TYPES : BEGIN OF ty_vbpa,
 vbeln TYPE vbeln,
 posnr TYPE posnr,
 parvw TYPE parvw,
 kunnr TYPE kunnr,
 END OF ty_vbpa.
DATA : w_vbpa TYPE ty_vbpa,
 t_vbpa TYPE TABLE OF ty_vbpa.
TYPES : BEGIN OF ty_vbup,
 vbeln TYPE vbeln,
 posnr TYPE posnr ,
 gbsta TYPE gbsta ,
 END OF ty_vbup.
DATA : w_vbup TYPE ty_vbup,
 t_vbup TYPE TABLE OF ty_vbup.
TYPE-POOLS slis.
DATA: t_fieldcatalog TYPE slis_t_fieldcat_alv,
 w_fieldcatalog TYPE slis_fieldcat_alv,
 w_layout TYPE slis_layout_alv,
 gs_keyinfo TYPE slis_keyinfo_alv.
DATA: g_tabname_header TYPE slis_tabname,
 g_tabname_item TYPE slis_tabname.
data definition
 Batchinputdata of single transaction
DATA: bdcdata LIKE bdcdata OCCURS 0 WITH HEADER LINE.
 messages of call transaction
DATA: messtab LIKE bdcmsgcoll OCCURS 0 WITH HEADER LINE.
DATA : g_lines TYPE i.
*Selection Screen
TABLES : vbak,vbap.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-000.
SELECT-OPTIONS s_vkorg FOR vbak-vkorg. " Sales Org
SELECT-OPTIONS s_vtweg FOR vbak-vtweg. " Dist Channel
SELECT-OPTIONS s_spart FOR vbak-spart. " Division
SELECT-OPTIONS s_vkbur FOR vbak-vkbur. " Sales Off
SELECT-OPTIONS s_vkgrp FOR vbak-vkgrp. " Sales Grp
SELECT-OPTIONS s_matkl FOR vbap-matkl. " Mat Grp
SELECT-OPTIONS s_werks FOR vbap-werks. " Plant
SELECT-OPTIONS s_period FOR vbak-angdt. " Sales Off
SELECTION-SCREEN END OF BLOCK b1.
START-OF-SELECTION.
PERFORM f_getdata.
PERFORM f_initdata.
END-OF-SELECTION.
PERFORM f_createalv.
PERFORM f_dispalv.
*& Form f_getdata
 text
--> p1 text
<-- p2 text
FORM f_getdata .
*Sales Header
SELECT
 vbeln
 vkorg
 vtweg
 spart
 vkbur
 vkgrp
 angdt
 bnddt
 kunnr
INTO TABLE t_vbak
FROM vbak
WHERE
 vkorg IN s_vkorg " Sales Org
 AND vtweg IN s_vtweg " Dist Channel
 AND spart IN s_spart " Division
 AND vkbur IN s_vkbur " Sales Off
 AND vkgrp IN s_vkgrp " Sales Grp
 AND angdt IN s_period
 AND bnddt IN s_period
 AND auart = 'ZQMO'
 AND vbtyp = 'B'.
*CUST NAME
SELECT
 kunnr
 name1
INTO TABLE t_kna1
FROM kna1
FOR ALL ENTRIES IN t_vbak
WHERE
 kunnr = t_vbak-kunnr
*Sales Item
SELECT
 vbeln
 posnr
 matnr
 matkl
 werks
 kwmeng
 meins
 mvgr5
INTO TABLE t_vbap
FROM vbap
FOR ALL ENTRIES IN t_vbak
WHERE
 vbeln = t_vbak-vbeln
 AND matkl IN s_matkl " Mat Grp
 AND werks IN s_werks " Plant
*Partners
SELECT
 vbeln
 posnr
 parvw
 kunnr
INTO TABLE t_vbpa
FROM vbpa
FOR ALL ENTRIES IN t_vbak
WHERE
 vbeln = t_vbak-vbeln.
IF t_vbpa[] IS NOT INITIAL.
 SELECT
 kunnr
 name1
 APPENDING TABLE t_kna1
 FROM kna1
 FOR ALL ENTRIES IN t_vbpa
 WHERE
 kunnr = t_vbpa-kunnr
ENDIF.
*Status - Sales Doc
SELECT
 vbeln
 posnr
 gbsta
INTO TABLE t_vbup
FROM vbup
FOR ALL ENTRIES IN t_vbap
WHERE
 vbeln = t_vbap-vbeln
 AND posnr = t_vbap-posnr
 AND gbsta NE 'C'.
SELECT
 matnr
 maktx
INTO TABLE t_makt
FROM makt
FOR ALL ENTRIES IN t_vbap
WHERE
 matnr = t_vbap-matnr
 AND spras = 'E'.
ENDFORM. " f_getdata
*& Form f_initdata
 text
--> p1 text
<-- p2 text
FORM f_initdata .
SORT t_vbap BY vbeln DESCENDING.
*delete all closed stat items
LOOP AT t_vbap INTO w_vbap.
 READ TABLE t_vbup INTO w_vbup
 WITH KEY
 vbeln = w_vbap-vbeln
 posnr = w_vbap-posnr.
 IF sy-subrc <> 0.
 DELETE t_vbap.
 CONTINUE.
 ELSE.
 READ TABLE t_makt INTO w_makt
 WITH
 KEY matnr = w_vbap-matnr.
 IF sy-subrc = 0.
 w_vbap-maktx = w_makt-maktx.
 MODIFY t_vbap FROM w_vbap.
 ENDIF.
 ENDIF.
ENDLOOP.
*find the total quantity
LOOP AT t_vbap INTO w_vbap.
 w_sum-vbeln = w_vbap-vbeln.
 w_sum-kwmeng = w_vbap-kwmeng.
 COLLECT w_sum INTO t_sum.
 CLEAR w_sum.
ENDLOOP.
*populate header
LOOP AT t_vbak INTO w_vbak.
Quantity - Total
 READ TABLE t_sum INTO w_sum
 WITH KEY
 vbeln = w_vbak-vbeln.
 IF sy-subrc = 0.
 w_vbak-kwmeng = w_sum-kwmeng.
 ELSE.
 CLEAR w_vbak-kwmeng.
 ENDIF.
UoM
 READ TABLE t_vbap INTO w_vbap
 WITH KEY
 vbeln = w_vbak-vbeln.
 IF sy-subrc = 0.
 w_vbak-meins = w_vbap-meins.
 ELSE.
 CLEAR w_vbak-meins.
 ENDIF.
Partner
 READ TABLE t_vbpa INTO w_vbpa
 WITH KEY
 vbeln = w_vbak-vbeln
 parvw = 'WE'.
 IF sy-subrc = 0.
 w_vbak-kunwe = w_vbpa-kunnr.
 ELSE.
 CLEAR w_vbak-kunwe.
 ENDIF.
SHIP TO PARTY NAME
 READ TABLE t_kna1 INTO w_kna1
 WITH KEY
 kunnr = w_vbak-kunwe.
 IF sy-subrc = 0.
 w_vbak-name2 = w_kna1-name1.
 ENDIF.
CUST NAM - SOLD TO PARTY
 READ TABLE t_kna1 INTO w_kna1
 WITH KEY
 kunnr = w_vbak-kunnr.
 IF sy-subrc = 0.
 w_vbak-name1 = w_kna1-name1.
 ENDIF.
 MODIFY t_vbak FROM w_vbak.
ENDLOOP.
DELETE t_vbak WHERE kwmeng IS INITIAL.
SORT t_vbak BY vbeln DESCENDING.
SORT t_vbap BY vbeln DESCENDING posnr ASCENDING.
ENDFORM. " f_initdata
*& Form f_createalv
 Create Field Cat.
--> p1 text
<-- p2 text
FORM f_createalv .
g_tabname_header = 't_vbak'.
g_tabname_item = 't_vbap' .
CLEAR gs_keyinfo.
gs_keyinfo-header01 = 'VBELN'.
gs_keyinfo-item01 = 'VBELN'.
*VBAK
w_fieldcatalog-fieldname = 'VBELN'.
w_fieldcatalog-tabname = 't_vbak'.
w_fieldcatalog-seltext_l = 'Sales Document'.
APPEND w_fieldcatalog TO t_fieldcatalog.
CLEAR: w_fieldcatalog.
w_fieldcatalog-fieldname = 'VKORG'.
w_fieldcatalog-tabname = 't_vbak'.
w_fieldcatalog-seltext_l = 'Sales Org'.
APPEND w_fieldcatalog TO t_fieldcatalog.
CLEAR: w_fieldcatalog.
w_fieldcatalog-fieldname = 'VTWEG'.
w_fieldcatalog-tabname = 't_vbak'.
w_fieldcatalog-seltext_l = 'Dist Channel'.
APPEND w_fieldcatalog TO t_fieldcatalog.
CLEAR: w_fieldcatalog.
w_fieldcatalog-fieldname = 'SPART'.
w_fieldcatalog-tabname = 't_vbak'.
w_fieldcatalog-seltext_l = 'Division'.
APPEND w_fieldcatalog TO t_fieldcatalog.
CLEAR: w_fieldcatalog.
w_fieldcatalog-fieldname = 'VKBUR'.
w_fieldcatalog-tabname = 't_vbak'.
w_fieldcatalog-seltext_l = 'Sales Office'.
APPEND w_fieldcatalog TO t_fieldcatalog.
CLEAR: w_fieldcatalog.
w_fieldcatalog-fieldname = 'VKGRP'.
w_fieldcatalog-tabname = 't_vbak'.
w_fieldcatalog-seltext_l = 'Sales GRP'.
APPEND w_fieldcatalog TO t_fieldcatalog.
CLEAR: w_fieldcatalog.
w_fieldcatalog-fieldname = 'KUNNR'.
w_fieldcatalog-tabname = 't_vbak'.
w_fieldcatalog-seltext_l = 'Sold to Party'.
APPEND w_fieldcatalog TO t_fieldcatalog.
CLEAR: w_fieldcatalog.
w_fieldcatalog-fieldname = 'NAME1'.
w_fieldcatalog-tabname = 't_vbak'.
w_fieldcatalog-outputlen = 35.
w_fieldcatalog-seltext_l = 'Sold to Party Code - Name'.
APPEND w_fieldcatalog TO t_fieldcatalog.
CLEAR: w_fieldcatalog.
w_fieldcatalog-fieldname = 'KUNWE'.
w_fieldcatalog-tabname = 't_vbak'.
w_fieldcatalog-seltext_l = 'Ship to Party'.
APPEND w_fieldcatalog TO t_fieldcatalog.
CLEAR: w_fieldcatalog.
w_fieldcatalog-fieldname = 'NAME2'.
w_fieldcatalog-tabname = 't_vbak'.
w_fieldcatalog-seltext_l = 'Ship Party Code - Name'.
w_fieldcatalog-outputlen = 35.
APPEND w_fieldcatalog TO t_fieldcatalog.
CLEAR: w_fieldcatalog.
w_fieldcatalog-fieldname = 'KWMENG'.
w_fieldcatalog-tabname = 't_vbak'.
w_fieldcatalog-seltext_l = 'Quantity'.
w_fieldcatalog-outputlen = 25.
APPEND w_fieldcatalog TO t_fieldcatalog.
CLEAR: w_fieldcatalog.
w_fieldcatalog-fieldname = 'MEINS'.
w_fieldcatalog-tabname = 't_vbak'.
w_fieldcatalog-seltext_l = 'UoM'.
APPEND w_fieldcatalog TO t_fieldcatalog.
CLEAR: w_fieldcatalog.
w_fieldcatalog-fieldname = 'SALESDOCUMENT'.
w_fieldcatalog-tabname = 't_vbak'.
w_fieldcatalog-seltext_l = 'Document'.
APPEND w_fieldcatalog TO t_fieldcatalog.
CLEAR: w_fieldcatalog.
w_fieldcatalog-fieldname = 'MESSAGE'.
w_fieldcatalog-tabname = 't_vbak'.
w_fieldcatalog-seltext_l = 'Log'.
APPEND w_fieldcatalog TO t_fieldcatalog.
CLEAR: w_fieldcatalog.
*VBAP
w_fieldcatalog-fieldname = 'POSNR'.
w_fieldcatalog-tabname = 't_vbap'.
w_fieldcatalog-seltext_l = 'POS'.
w_fieldcatalog-outputlen = 6.
APPEND w_fieldcatalog TO t_fieldcatalog.
CLEAR: w_fieldcatalog.
w_fieldcatalog-fieldname = 'MATNR'.
w_fieldcatalog-tabname = 't_vbap'.
w_fieldcatalog-seltext_l = 'Material'.
w_fieldcatalog-outputlen = 18.
APPEND w_fieldcatalog TO t_fieldcatalog.
CLEAR: w_fieldcatalog.
w_fieldcatalog-fieldname = 'MAKTX'.
w_fieldcatalog-tabname = 't_vbap'.
w_fieldcatalog-seltext_l = 'Material Desc'.
w_fieldcatalog-outputlen = 40.
APPEND w_fieldcatalog TO t_fieldcatalog.
CLEAR: w_fieldcatalog.
w_fieldcatalog-fieldname = 'MATKL'.
w_fieldcatalog-tabname = 't_vbap'.
w_fieldcatalog-seltext_l = 'Material Grp'.
w_fieldcatalog-outputlen = 9.
APPEND w_fieldcatalog TO t_fieldcatalog.
CLEAR: w_fieldcatalog.
w_fieldcatalog-fieldname = 'MVGR5'.
w_fieldcatalog-tabname = 't_vbap'.
w_fieldcatalog-seltext_l = 'MCNO'.
w_fieldcatalog-outputlen = 4.
APPEND w_fieldcatalog TO t_fieldcatalog.
CLEAR: w_fieldcatalog.
w_fieldcatalog-fieldname = 'WERKS'.
w_fieldcatalog-tabname = 't_vbap'.
w_fieldcatalog-seltext_l = 'Plant'.
w_fieldcatalog-outputlen = 91.
APPEND w_fieldcatalog TO t_fieldcatalog.
CLEAR: w_fieldcatalog.
w_fieldcatalog-fieldname = 'KWMENG'.
w_fieldcatalog-tabname = 't_vbap'.
w_fieldcatalog-seltext_l = 'Quantity'.
w_fieldcatalog-outputlen = 25.
APPEND w_fieldcatalog TO t_fieldcatalog.
CLEAR: w_fieldcatalog.
w_fieldcatalog-fieldname = 'MEINS'.
w_fieldcatalog-tabname = 't_vbap'.
w_fieldcatalog-seltext_l = 'UoM'.
APPEND w_fieldcatalog TO t_fieldcatalog.
CLEAR: w_fieldcatalog.
LAYOUT
w_layout-colwidth_optimize = 'X'.
w_layout-zebra = 'X'.
w_layout-expand_fieldname = 'EXPAND'.
w_layout-box_fieldname = 'SEL'.
w_layout-box_tabname = 't_vbak'.
ENDFORM. " f_createalv
*& Form f_dispalv
 Call ALV
--> p1 text
<-- p2 text
FORM f_dispalv .
CALL FUNCTION 'REUSE_ALV_HIERSEQ_LIST_DISPLAY'
 EXPORTING
 i_callback_program = sy-repid
 i_callback_pf_status_set = 'SET_PF_STATUS'
 i_callback_user_command = 'USER_COMMAND'
 is_layout = w_layout
 it_fieldcat = t_fieldcatalog
 IT_EXCLUDING =
 IT_SPECIAL_GROUPS =
 IT_SORT =
 IT_FILTER =
 IS_SEL_HIDE =
 I_SCREEN_START_COLUMN = 0
 I_SCREEN_START_LINE = 0
 I_SCREEN_END_COLUMN = 0
 I_SCREEN_END_LINE = 0
 I_DEFAULT = 'X'
 I_SAVE = ' '
 IS_VARIANT =
 IT_EVENTS =
 IT_EVENT_EXIT =
 i_tabname_header = g_tabname_header
 i_tabname_item = g_tabname_item
 is_keyinfo = gs_keyinfo
 TABLES
 t_outtab_header = t_vbak
 t_outtab_item = t_vbap
 EXCEPTIONS
 program_error = 1
 OTHERS = 2
IF sy-subrc <> 0.
ENDIF.
ENDFORM. " f_dispalv
*& Form set_pf_status
 PF stat
 -->RT_EXTAB text
FORM set_pf_status USING rt_extab TYPE slis_t_extab.
SET PF-STATUS 'ZINSD_QUOT_CONT_ST'.
ENDFORM. "set_pf_status
*& Form user_command
 Process List UCOMM
 -->R_UCOMM text
 -->RS_SELFIELD text
FORM user_command USING r_ucomm LIKE sy-ucomm
 rs_selfield TYPE slis_selfield.
REFRESH t_update.
IF r_ucomm = 'EXIT'.
 LEAVE PROGRAM.
ENDIF.
IF r_ucomm = 'EXECUTE'.
 LOOP AT t_vbak INTO w_update
 WHERE
 sel = 'X'
 AND salesdocument = ' '.
 APPEND w_update TO t_update.
 ENDLOOP.
 IF t_update[] IS NOT INITIAL.
 LOOP AT t_update INTO w_update.
 PERFORM f_bapi_contract_createfromdata USING w_update.
 PERFORM f_bdc_contract_from_quotation.
 MODIFY t_update FROM w_update.
 ENDLOOP.
 ELSE.
 ENDIF.
 PERFORM f_dispalv.
ENDIF.
IF r_ucomm = '&IC1'.
 IF rs_selfield-sel_tab_field = 't_vbak-VBELN'.
 SET PARAMETER ID 'AGN' FIELD rs_selfield-value.
 CALL TRANSACTION 'VA23' AND SKIP FIRST SCREEN.
 ENDIF.
 IF rs_selfield-sel_tab_field = 't_vbak-SALESDOCUMENT' AND
 rs_selfield-value NE ' '.
 SET PARAMETER ID 'KTN' FIELD rs_selfield-value.
 CALL TRANSACTION 'VA43' AND SKIP FIRST SCREEN.
 ENDIF.
ENDIF.
ENDFORM. "user_command
*& Form F_BAPI_CONTRACT_CREATEFROMDATA
 BAPI CALL
 -->P_W_UPDATE text
FORM f_bapi_contract_createfromdata USING p_w_update STRUCTURE w_update .
DATA : w_contract_header_in TYPE bapisdhd1 ,
 w_contract_header_inx TYPE bapisdhd1x ,
 t_contract_items_in TYPE TABLE OF bapisditm WITH HEADER LINE,
 t_contract_items_inx TYPE TABLE OF bapisditmx WITH HEADER LINE,
 t_contract_partners TYPE TABLE OF bapiparnr WITH HEADER LINE,
 t_return TYPE TABLE OF bapiret2 WITH HEADER LINE.
CLEAR : w_contract_header_in,
 w_contract_header_inx.
REFRESH : t_contract_items_in,
 t_contract_items_inx,
 t_contract_partners,
 t_return.
w_contract_header_in-doc_type = 'ZCNT'.
w_contract_header_in-sales_org = p_w_update-vkorg.
w_contract_header_in-distr_chan = p_w_update-vtweg.
w_contract_header_in-division = p_w_update-spart.
w_contract_header_in-ct_valid_f = p_w_update-angdt.
w_contract_header_in-ct_valid_t = p_w_update-bnddt.
w_contract_header_inx-doc_type = 'X'.
w_contract_header_inx-sales_org = 'X'.
w_contract_header_inx-distr_chan = 'X'.
w_contract_header_inx-division = 'X'.
w_contract_header_inx-ct_valid_f = 'X'.
w_contract_header_inx-ct_valid_t = 'X'.
LOOP AT t_vbap INTO w_vbap
WHERE
 vbeln = p_w_update-vbeln.
 t_contract_items_in-material = w_vbap-matnr.
 t_contract_items_in-plant = w_vbap-werks.
 t_contract_items_in-target_qty = w_vbap-kwmeng.
 t_contract_items_in-target_qu = w_vbap-meins.
 t_contract_items_in-ref_doc = w_vbap-vbeln.
 t_contract_items_in-ref_doc_it = w_vbap-posnr.
 t_contract_items_in-ref_doc_ca = 'B'.
 t_contract_items_in-prc_group5 = w_vbap-mvgr5.
 t_contract_items_inx-material = 'X'.
 t_contract_items_inx-plant = 'X'.
 t_contract_items_inx-target_qty = 'X'.
 t_contract_items_inx-target_qu = 'X'.
 t_contract_items_inx-ref_doc = 'X'.
 t_contract_items_inx-ref_doc_it = 'X'.
 t_contract_items_inx-ref_doc_ca = 'X'.
 t_contract_items_inx-prc_group5 = 'X'.
 APPEND t_contract_items_in.
 APPEND t_contract_items_inx.
ENDLOOP.
LOOP AT t_vbpa INTO w_vbpa
 WHERE
 vbeln = p_w_update-vbeln.
 AND posnr = w_vbap-posnr.
 t_contract_partners-partn_role = w_vbpa-parvw.
 t_contract_partners-partn_numb = w_vbpa-kunnr.
 t_contract_partners-itm_number = w_vbpa-posnr.
 APPEND t_contract_partners.
ENDLOOP.
CALL FUNCTION 'BAPI_CONTRACT_CREATEFROMDATA'
 EXPORTING
SALESDOCUMENTIN =
 contract_header_in = w_contract_header_in
 contract_header_inx = w_contract_header_inx
SENDER =
BINARY_RELATIONSHIPTYPE = ' '
INT_NUMBER_ASSIGNMENT = ' '
BEHAVE_WHEN_ERROR = ' '
LOGIC_SWITCH =
TESTRUN =
CONVERT = ' '
IMPORTING
 salesdocument = p_w_update-salesdocument
TABLES
 return = t_return
 contract_items_in = t_contract_items_in
 contract_items_inx = t_contract_items_inx
 contract_partners = t_contract_partners
CONTRACT_CONDITIONS_IN =
CONTRACT_CONDITIONS_INX =
CONTRACT_CFGS_REF =
CONTRACT_CFGS_INST =
CONTRACT_CFGS_PART_OF =
CONTRACT_CFGS_VALUE =
CONTRACT_CFGS_BLOB =
CONTRACT_CFGS_VK =
CONTRACT_CFGS_REFINST =
CONTRACT_DATA_IN =
CONTRACT_DATA_INX =
CONTRACT_TEXT =
CONTRACT_KEYS =
EXTENSIONIN =
PARTNERADDRESSES =
IF p_w_update-salesdocument NE ' ' .
 p_w_update-message = 'SUCCESS'.
ELSE.
 READ TABLE t_return INDEX 1.
 p_w_update-message = t_return-message.
ENDIF.
READ TABLE t_vbak INTO w_vbak
WITH KEY
vbeln = p_w_update-vbeln.
IF sy-subrc = 0.
 MODIFY t_vbak INDEX sy-tabix FROM p_w_update .
ENDIF.
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
 EXPORTING
 wait = 'X'.
ENDFORM. " F_BAPI_CONTRACT_CREATEFROMDATA
*& Form f_bdc_contract_from_Quotation
 BAPI CALL
 -->P_W_UPDATE text
FORM f_bdc_contract_from_quotation.
DATA : l_date TYPE char10.
REFRESH : messtab, bdcdata.
CLEAR : messtab, bdcdata.
PERFORM bdc_dynpro USING 'SAPMV45A' '0101'.
PERFORM bdc_field USING 'BDC_OKCODE'
 '=COPY'.
PERFORM bdc_field USING 'VBAK-AUART'
 'ZCNT'.
PERFORM bdc_dynpro USING 'SAPLV45C' '0100'.
PERFORM bdc_field USING 'BDC_OKCODE'
 '=RANG'.
PERFORM bdc_dynpro USING 'SAPLV45C' '0100'.
PERFORM bdc_field USING 'BDC_OKCODE'
 '=UEBR'.
PERFORM bdc_field USING 'LV45C-VBELN'
 w_update-vbeln.
PERFORM bdc_dynpro USING 'SAPMV45A' '4001'.
PERFORM bdc_field USING 'BDC_OKCODE'
 '=SICH'.
IF NOT w_update-angdt IS INITIAL.
 CALL FUNCTION 'CONVERT_DATE_TO_EXTERNAL'
 EXPORTING
 date_internal = w_update-angdt
 IMPORTING
 date_external = l_date
 EXCEPTIONS
 date_internal_is_invalid = 1
 OTHERS = 2.
 PERFORM bdc_field USING 'VBAK-GUEBG'
 l_date.
ENDIF.
IF NOT w_update-bnddt IS INITIAL.
 CALL FUNCTION 'CONVERT_DATE_TO_EXTERNAL'
 EXPORTING
 date_internal = w_update-bnddt
 IMPORTING
 date_external = l_date
 EXCEPTIONS
 date_internal_is_invalid = 1
 OTHERS = 2.
 PERFORM bdc_field USING 'VBAK-GUEEN'
 l_date.
ENDIF.
CALL TRANSACTION 'VA41' USING bdcdata
 MODE 'E'
 UPDATE 'S'
 MESSAGES INTO messtab.
break abap.
READ TABLE messtab WITH KEY msgid = 'V1'
 msgnr = '311'.
IF sy-subrc EQ 0.
 w_update-message = 'SUCCESS'.
 w_update-salesdocument = messtab-msgv2.
ELSE.
 READ TABLE messtab WITH KEY msgtyp = 'E'.
 IF sy-subrc EQ 0.
 DATA : l_info TYPE einfo.
 CLEAR l_info.
 l_info-msgid = messtab-msgid.
 l_info-msgty = messtab-msgtyp.
 l_info-msgno = messtab-msgnr.
 l_info-msgv1 = messtab-msgv1.
 l_info-msgv2 = messtab-msgv2.
 l_info-msgv3 = messtab-msgv3.
 l_info-msgv4 = messtab-msgv4.
 CALL FUNCTION 'MESSAGE_GET_TEXT'
 EXPORTING
 ieinfo = l_info
 ilangu = sy-langu
 IMPORTING
 etext = w_update-message
 EXCEPTIONS
 no_t100_found = 1
 OTHERS = 2.
 ENDIF.
ENDIF.
READ TABLE t_vbak INTO w_vbak WITH KEY vbeln = w_update-vbeln.
IF sy-subrc = 0.
 MODIFY t_vbak INDEX sy-tabix FROM w_update transporting message
 salesdocument.
ENDIF.
ENDFORM. " f_bdc_contract_from_Quotation
 Start new screen *
FORM bdc_dynpro USING program dynpro.
CLEAR bdcdata.
bdcdata-program = program.
bdcdata-dynpro = dynpro.
bdcdata-dynbegin = 'X'.
APPEND bdcdata.
ENDFORM. "bdc_dynpro
 Insert field *
FORM bdc_field USING fnam fval.
CLEAR bdcdata.
bdcdata-fnam = fnam.
bdcdata-fval = fval.
APPEND bdcdata.
ENDFORM. "bdc_field

How to display an HTML data which contains images in CR

Hi Experts,
I have a HTML file which contains images and text. I will store all this data in to the database as binary data(SQL server 2008). How can I display the whole data in report.
Thanks in advance,
Salah

hello all,
most times when HTML is stored in a database there are many tags that will not work. the tags that will work are very basic and limited to the formatting types that you can do within a Text Object...so not much.
if you need all of the HTML from a database interpreted, you need to activate pass-through html on your system. then if you put the field into a formula (one line in height) the HTML should be properly displayed. for more info on activating pass-through html see the beginning of the Users Guide for webelements that is in the main download [here|Crystal Reports webElements].
please note that there are some major limitations in this method:
1) you cannot print the html displayed when using the print button on the crystal reports toolbar as it will show up as text...you can try the browsers print functionality to see if that works for you
2) you can not export the report and see the html displayed...it will show up as text
3) pagination may not work for you...i.e. if you have an especially long section of html in your database, the page may not break where you want it to
best of luck,
jamie

How to display BIRT report on Tomcat server

Hi,
I am using BIRT to generates the report, i am having a BIRT file called Customers.rptdesign that i want to execute on Tomcat server, but not able to execute. On eclipse brouser its running very well and displaying reports in brouser but not in Tomcat.
Waiting for replies........

Well all you have to there is deploy the report with webapplication and write your custom classes which would compile the report and gives a HTML/PDF/RTF..... response for you accordingly.
please checkout the below link which gives an idea of how you can do that....
http://www.onjava.com/pub/a/onjava/2006/07/26/deploying-birt.html?page=2*
and here is an example of a Dynamic Servlet which could be configured accordingly to generate proper response for you accordingly by passing (Mapped) parameters to the report.
http://wiki.eclipse.org/Java-DynamicReport_Servlet_(BIRT)_*
and to get more insight information about how this framework creeps in and how is that we use its API and etc..
You may have a look at the below article
http://www.eclipsecon.org/summiteurope2006/presentations/ESE2006BIRT_The_Open_Source_Reporting_Framework.pdf_*
Hope this might help :)
REGARDS,
RaHuL

How to display Web reports in blackberry

Hi All,
I have to display the web reports avaialable on our portal on the blackberry.
How can I achieve it?
Should I install anything on my blackberry?
Should I develop web applications seperately for displaying on blackberry or can I use the existing once developed using WAD and that are available on our portal?
we are using BI 7.0 support pack 15.
can anyone please help me out?
Thanks
Prasad

Hi Prasad,
yes you can configure the blackberry device with the SAp platform to display reports.We do this with the help of crystal reports.The reports configuration is must to use them on your blackberry or PDAs.
The full report is not displayed in the device .So for this we need to configure the reports in parts.The are various browsers used to browse the report on the balckberries.They are mportfolios and Java and com parts viewer.There are documentation available on the SAP forum.Please get the instal;lation guide and you may configure the blackberry.
Anyhow if you have some problem fginding the document.Please let me know I will send the link to you.Pne note number is C201552.
Have a best day ahead.

How to displayed multiple report in View selector in OBIEE

I have one table in that AM and PM hours wise data is having.My requirement is if I select in filter AM or PM the respect data only displayed in the below report.How it is possible other wise how to use in View selector.
Edited by: user8035288 on Mar 23, 2009 10:40 PM

hi..
you have changed your subject name from column selector to View Selector.. :-)
To do this,
I assuming that AM and PM are columns
Create a pivot view with AM column and PM column is excluded here...
Create another Pivot with PM and AM excluded..
Now go to view selector, from the available view select Pivot, and Pivot1 views Rename them as you want to show in drop down..
add View Selector to Compound Layout..
If AM, PM are values, then just keep the corresponding column in Pages of Pivot .. which acts as prompt...
You need not to go for view selector in this case....

How to Display the Report Based on The Page Number

Hi All,
I just have a requirement like this
The User wants to see only the odd numbers of Report pages in the Total Report
For Ex. If the Report consist of 10 Pages the user wanna see Pages 1,3,5,7,9...........
is it attainable in WebI..............
Please help on this
Thanks in advance.............

I wonder...how do you think user should navigate through document.... ? If I want to see only odd pages - I will either create separate report or I am ok with setting the correct number to actual displayed page.You may also consider using links - it depends how is report structure created...

How to display Oracle Report in portal

How can I have a link in the portlet, and then after clicking a link, it will open an oracle report in the browser (in pdf format) ?
I am using win2k as my OS....

Hi,
For Developer 6i reports you can
create the link (ie http://<host>/dev60cgi/rwcgi60.exe?report=abc.rdf&userid=un/pw/@cs&.....
Pass the parameter required for output format in the URL .
Thanks
Vineet

How to display a report in a container

Similar Messages

Maybe you are looking for