Output as Grid in HTML
I need a report in grid form (atleast the presentation of grid) in my report. I make by repeating frames with border lines as black. It shows perfectly fine in the live previewer of the Report Builder 3.0. But as my requirement is that the output is an HTML page. The Grid presentation does not work there. As soon as the output is generated as HTML page all the borders get lost.
I created dummy lines all around the fields to give a presentation of grid in HTML. But it only displays the Horizontal line and does not show the vertical lines, hence defeating my purpose.
Is there any way for creating grid type of report in HTML using Report Builder 3.0 ?
null
in HTML not possible - versionnumber of exporting HTML type is low
and the same problem is in pdf export but
the grinds all in display mode
null
Similar Messages
-
How to Display PHP Output as Portlet in HTML Region using utl_http.request
I wanted to be able to parse PHP functions to add more functionality to my Page. nothing fantasy, something simple like: http://phpsysinfo.sourceforge.net/phpsysinfo-dev/?template=classic
Where the realtime values are retrieved from the OS. this represent some kind of problem to me, I know how to do it from Shell Script, Perl or PHP, but not from PL/SQL.
Based on my experience using Oracle Portal, Portlets, I think we really can make use of the feature used in Portal called Web Clipping. [ This feature basically goes to some Site a retrieve part of the site to show in the current page]. Well the PL/SQL utility utl_http.request does something similar.
Make sure your request page does not retrieve some headers because that would cause a problem in your page and will not show up.
This is what I did:
<b> 1.- </b> Grant Privileges to execute [ <b> utl_http.request </b> ] to the owner of your schema.
login into the OracleXE / APEX as SYS then go to the Object Navigator, then click on packages, find the utl_http.request then click on it, later click on grant and select your schema owner for your applicaion.
<b> 2.- </b> Logout as SYS then login as your application schema user. just to test the functionality go to the sql command then enter the following command and then click run:
<b> select substr(utl_http.request('http://www.oracle.com/'),1, 255) from dual; </b>
If your output is:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <html> <head> <title>Oracle 10g, Siebel, PeopleSoft | Oracle, The World's Largest Enterprise Software Company</title> <meta name="title" content="Enterprise Applications | Database | Fusio
<font color='blue'> Wow It worked </font>, this really could be useful !!, If not go back to step 1 and check your permissions to execute, or perhaps your Internet connectivity.
3.- Once we know the package works and we can retrieve content from the Internet. lets go to some of our pages add some HTML Region.
4.- Create an item and put into the new region. the source will be SQL, For the purposes of my test the query to the Oracle Page failed, so I decided to give a shot with a simple PHP script with no headers.
The internal server is: http://mytest.com/hello_world.php
Where the content of the hello_world.php is:
<?
echo '"<b> Hello World </b> ";
?>
This PHP works fine and display the basic Hello World. can be the same server or not, also noticed this can be another port perhaps using something like Ruby,Mason or Java.
<b> 5.- </b> Finally in my Item the source type is SQL and looks like this:
<b> select substr(utl_http.request('http://mytest.com/hello_world.php'),1, 255) from dual; </b>
Apply the changes and run the page !!!
Excelent It worked as expected. now you know how use utl_http.request to create webclipping in your OracleXE / APEX from remote pages, or how to use it to parse the output from CGI, Perl, PHP, Ruby or Java pages.
Note: [ Just make sure to strip the headers or parse into a PL/SQL Procedure to clean then show ]
Best Regards <b> Dino </b>.
Brains R Like Books only work when they R Open.
http://www.htmldbhosting.com/Sorry, from your post in the LabVIEW board I did not understand that it was the Output message that you were looking for.
I thought you wanted the results from your test steps displayed on the user interface.
It is the “Output Panel” in the sequence editor that displays your output message, but I do not know if there is default Output panel activeX indicator for user interface that the TestStand engine would update automatically like it does the execution view.
Maybe someone else knows
As also pointed out, the UI messages is your other option.
The Output Message event number is 40
http://zone.ni.com/devzone/cda/epd/p/id/3879
UIMsg_OutputMessages–(Value: 40) TestStand sends this message at periodic intervals when it holds references to output messages that calls to the OutputMessage.Post method queue. TestStand transfers the queued messages to an OutputMessages collection attached to the UIMessage.ActiveXData property for this event. An application that processes output messages should copy the output message references from the collection in UIMessage.ActiveXData to its own private OutputMessages collection by passing its private collection to the OutputMessages.CopyMessagesToCollection method. An application calls the Engine.NewOutputMessages method to create a private OutputMessage collection. TestStand generates this event only if the Engine.OutputMessagesEnabled property is True. Because there can be more than one handler for this event, the application should not modify the OutputMessages collection the UIMessage.ActiveXData property holds.
Omar
Message Edited by OmarGator on 10-09-2008 10:12 AM -
Output of Report in HTML/HTMLCSS Format
My application is developed in developer 6i & running on the web. When I take output of the report in HTML/HTMLCSS format the output is not perfect. There are many alignment problems.
Some words mix with others.
Can anybody advice me the solution of this problem.
Thanks in advance
ZulqarnainI have read that it is better to use PDF format of report, but I don't know if it is true ...
-
I exclusively work in Fluid Grid since my site is a Responsive Web Design. I'm having trouble with slow load time in DW CC 2014.1, when my file, as they all do of course, has the Google Analytics Tracking Code script.
I'm on a Windows 8.1 using a Dell Precision M3800 Laptop with Memory 16GB (2x8GB) 1600MHz DDR3 . Each of our site's 180 or so web pages, of course, has its Google Analytics Tracking Code script. It is placed, following Google instructions, as the last entry in the <head>. Google Analytics does not instruct to place the script in the JS Folder with an scr to it, but rather in the <head>. It takes up to one and a half or two minutes for DW CC 2014.1 to load the Google Analytics Tracking Code script . That is, the grid does not show in Live View until finally analytics.js shows up in the Document Toolbar. A minute or two can add up when every page you load takes this long. And, making new Fluid Grid pages, as is done, through the Save As command; every new page made you have to deal with the minute or two wait time since all those pages have the Google Analytics Tracking Code script. Therefore, this time component alone, assuming I'm accessing and/or making 20 pages per week (and in our business this is easily the case) the math is that I'm wasting between 17 and 35 hours per year just with DW CC 2014.1 loading the much needed Google Analytics Tracking Code script.
I have loaded HTML files that do not have the Google Analytics Tracking Code script as a test and those files load at the normal quick speed.
Therefore, the new Chromium Embedded Framework browser engine has a serious load problem when it confronts an HTML5 file with a Google Analytics Tracking Code script. Oddly, the prior DW CC 2014 version, with the old browser engine did not have this slow-load problem since I was loading these same files in that DW CC version up until October 8th or so.
I think this new browser engine is a Google platform that apparently has a problem rendering or loading a Google Analytics Tracking Code script. That makes no sense.
Anyone else had this particular slow-load problem with DW CC 2014.1?
Thanks.Wow. That sure solved the slow-load problem, at least using your suggested snippet in a simple test HTML file.
Per Google's instructions, I pasted the snippet before the closing </head> tag. And, even in that positioning in the file; the file loaded at the speed (about one second) that it did prior to DW 2014.1.
Two questions.
Will this snippet provide the same tracking data as my current GA snippet?
Because my current GA snippet is in about 200 web pages, can I retain the old snippet in most of them and place the new snippet in my approximately 5 main web pages as well as my templates so my new pages, as well as my main pages, have the new snippet. That is, can I have both snippets (i.e. old snippet in earlier pages and new snippet in main pages and new pages to be made going forward) in my website at the same time?
Of course I would not have both the old and new snippet in a web page at the same time.
I greatly appreciate any assistance anyone can provide me on this issue and thank all of you in advance.
I've provided code for both simple test files below.
Code for Asynchronous Syntax of GA script:
<!doctype html>
<!--[if lt IE 7]> <html class="ie6 oldie"> <![endif]-->
<!--[if IE 7]> <html class="ie7 oldie"> <![endif]-->
<!--[if IE 8]> <html class="ie8 oldie"> <![endif]-->
<!--[if gt IE 8]><!-->
<html class="">
<!--<![endif]-->
<head>
<meta charset="utf-8">
<meta name="viewport" content="width=device-width, initial-scale=1">
<title>Test Asynchronous GA Tracking Code In Head</title>
<link href="css/boilerplate.css" rel="stylesheet" type="text/css">
<link href="/css/style.css" rel="stylesheet" type="text/css">
<!--
To learn more about the conditional comments around the html tags at the top of the file:
paulirish.com/2008/conditional-stylesheets-vs-css-hacks-answer-neither/
Do the following if you're using your customized build of modernizr (http://www.modernizr.com/):
* insert the link to your js here
* remove the link below to the html5shiv
* add the "no-js" class to the html tags at the top
* you can also remove the link to respond.min.js if you included the MQ Polyfill in your modernizr build
-->
<!--[if lt IE 9]>
<script src="http://html5shiv.googlecode.com/svn/trunk/html5.js"></script>
<![endif]-->
<script src="js/respond.min.js"></script>
<script type="text/javascript">
var _gaq = _gaq || [];
_gaq.push(['_setAccount', 'UA-73425000-1']);
_gaq.push(['_trackPageview']);
(function() {
var ga = document.createElement('script'); ga.type = 'text/javascript'; ga.async = true;
ga.src = ('https:' == document.location.protocol ? 'https://ssl' : 'http://www') + '.google-analytics.com/ga.js';
var s = document.getElementsByTagName('script')[0]; s.parentNode.insertBefore(ga, s);
</script>
</head>
<body>
<div class="gridContainer clearfix">
<div id="div1" class="fluid">
<div id="test1" class="fluid ">This is the content for Layout Div Tag "test1"</div>
<div id="test2" class="fluid ">This is the content for Layout Div Tag "test2"</div>
</div>
</body>
</html>
Code for older GA script snippet:
<!doctype html>
<!--[if lt IE 7]> <html class="ie6 oldie"> <![endif]-->
<!--[if IE 7]> <html class="ie7 oldie"> <![endif]-->
<!--[if IE 8]> <html class="ie8 oldie"> <![endif]-->
<!--[if gt IE 8]><!-->
<html class="">
<!--<![endif]-->
<head>
<meta charset="utf-8">
<meta name="viewport" content="width=device-width, initial-scale=1">
<title>Test GA Tracking Code In Head</title>
<link href="css/boilerplate.css" rel="stylesheet" type="text/css">
<link href="/css/style.css" rel="stylesheet" type="text/css">
<!--
To learn more about the conditional comments around the html tags at the top of the file:
paulirish.com/2008/conditional-stylesheets-vs-css-hacks-answer-neither/
Do the following if you're using your customized build of modernizr (http://www.modernizr.com/):
* insert the link to your js here
* remove the link below to the html5shiv
* add the "no-js" class to the html tags at the top
* you can also remove the link to respond.min.js if you included the MQ Polyfill in your modernizr build
-->
<!--[if lt IE 9]>
<script src="http://html5shiv.googlecode.com/svn/trunk/html5.js"></script>
<![endif]-->
<script src="js/respond.min.js"></script>
<script>
(function(i,s,o,g,r,a,m){i['GoogleAnalyticsObject']=r;i[r]=i[r]||function(){
(i[r].q=i[r].q||[]).push(arguments)},i[r].l=1*new Date();a=s.createElement(o),
m=s.getElementsByTagName(o)[0];a.async=1;a.src=g;m.parentNode.insertBefore(a,m)
})(window,document,'script','//www.google-analytics.com/analytics.js','ga');
ga('create', 'UA-73425000-1', 'auto');
ga('send', 'pageview');
</script>
</head>
<body>
<div class="gridContainer clearfix">
<div id="div1" class="fluid">
<div id="test1" class="fluid ">This is the content for Layout Div Tag "test1"</div>
<div id="test2" class="fluid ">This is the content for Layout Div Tag "test2"</div>
</div>
</body>
</html> -
How to use Jquery Data Grid in HTML
can anyone please tell me how to use JQuery Data grid in my HTML page with example.
I have one HTML page i want the standard JQuery Data Grid with search and pagination functionality.Guys I have got the solution
thanks a lot
please refer this link for JQGrid
http://www.codeproject.com/Articles/609442/Using-JqGrid-in-ASP-NET -
Outputting SQL statement into HTML table
ok, my problem is that i can only output the first row from my table in my DB and i want to be able to display all the rows from that table which are of a particular type..maybe someone here can help..
and if anyone thinks the code is a bit pants please say why..cheers
import java.lang.*;
import java.util.*;
import java.io.*;
import java.util.Vector;
import java.sql.*;
import javax.servlet.*;
import javax.servlet.http.*;
public class StockStats3 extends HttpServlet
String totalStock = "";
String itemName = "";
int type = 0;
int itemId = 0;
Statement stmt = null;
ResultSet rs = null;
Connection con = null;
String query;
PrintWriter out;
String url = "jdbc:mysql://macneill.cs.tcd.ie/odriscoi_db";
public void doGet(HttpServletRequest request, HttpServletResponse response) throws ServletException, IOException
out= response.getWriter();
response.setContentType("text/html");
out.println("<HTML>");
out.println("<HEAD>");
out.println("<TITLE> Check Current Stock </TITLE>");
out.println("</HEAD>");
out.println("<body bgcolor=#FFFFFF background=\"U:/back.jpg\" link = white vlink = white>");
out.println("<font color=#FFFFFF face=COMIC SANS MS size=3>");
out.print("<form action=\"");
out.print("StockStats3\" ");
out.println("method=POST>");
out.println("<TD><h3><LEFT><font color=#FFFFFF face=COMIC SANS MS size=5>Click on Relevant Button to view Current Stock: </h3></TD>");
out.println("<TD><h3><LEFT><font color=#FFFFFF face=COMIC SANS MS size=3>KITCHEN FOODS: </h3></TD>");
out.println("<input type=submit name=action value=\"Meat \">");
out.println("<input type=submit name=action value=\"Fish\">");
out.println("<input type=submit name=action value=\"Fruit\">");
out.println("<input type=submit name=action value=\"Veg\">");
out.println("<input type=submit name=action value=\"Dairy\">");
out.println("<input type=submit name=action value=\"Herbs\">");
out.println("<input type=submit name=action value=\"Pasta\">");
out.println("<input type=submit name=action value=\"Sauces\">");
out.println("<input type=submit name=action value=\"Condiments\">");
out.println("<input type=submit name=action value=\"Total Food\">");
out.println("<TD><h3><LEFT><font color=#FFFFFF face=COMIC SANS MS size=3>BAR DRINKS: </h3></TD>");
out.println("<input type=submit name=action value=\"Soda\">");
out.println("<input type=submit name=action value=\"Water\">");
out.println("<input type=submit name=action value=\"Beer\">");
out.println("<input type=submit name=action value=\"Wine\">");
out.println("<input type=submit name=action value=\"Total Drink\">");
out.println("<PRE>");
out.println("<CENTER><TH><h3><A HREF= \"ManageOption \"><FONT face=arial>Back to Options</FONT></A></h3></TH><BR>");
out.println("</PRE>");
out.println("<PRE>");
out.println("<CENTER><TH><h3><A HREF= \"log \"><FONT face=arial>logout</FONT></A></h3></TH><BR>");
out.println("</PRE>");
out.println("<BR>");
out.println("</TR>");
out.println("</BODY>");
out.println("</HTML>");
out.close();
public void doPost(HttpServletRequest request, HttpServletResponse response) throws ServletException, IOException
String msg11 = "";
String msg12 = "";
String msg13 = "";
String msg14 = "";
String msg15 = "";
String msg16 = "";
String msg17 = "";
String msg18 = "";
String msg19 = "";
String msg20 = "";
String msg2 = "";
String msg3 = "";
String msg4 = "";
String msg5 = "";
String msg6 = "";
String msg7 = "";
String msg8 = "";
String msg9 = "";
if (request.getParameter("action").equals("Meat"))
msg11 = getItemName(1);
msg12 = getStock(1);
msg13 = getItemName(1);
msg14 = getStock(1);
msg15 = getItemName(2);
msg16 = getStock(2);
msg17 = getItemName(3);
msg18 = getStock(3);
msg19 = getItemName(4);
msg20 = getStock(4);
//im only trying to work on one table at the moment
if (request.getParameter("action").equals("Fish"))
msg2 = getStock(5);
if (request.getParameter("action").equals("Fruit"))
msg3 = getStock(6);
if (request.getParameter("action").equals("Veg"))
msg4 = getStock(7);
if (request.getParameter("action").equals("Dairy"))
msg5 = getStock(8);
if (request.getParameter("action").equals("Herbs"))
msg6 = getStock(9);
if (request.getParameter("action").equals("Pasta"))
msg7 = getStock(10);
if (request.getParameter("action").equals("Sauces"))
msg8 = getStock(11);
if (request.getParameter("action").equals("Condiments"))
msg9 = getStock(12);
response.setContentType("text/html");
PrintWriter out = response.getWriter();
out.println("<HTML>");
out.println("<HEAD>");
out.println("<TITLE>Stock Results </TITLE>");
out.println("</HEAD>");
out.println("<body bgcolor=#FFFFFF background=\"U:/back.jpg\" link = white vlink = white>");
out.println("<font color=#FFFFFF face=COMIC SANS MS size=3>");
out.print("<form action=\"");
out.print("StockStats3\" ");
out.println("method=POST>");
out.println("<BR>");
out.println("</H2><TABLE BORDER='1' CELLSPACING='2' CELLPADDING='2'>");
out.println("<font color=#FFFFFF face=COMIC SANS MS size=3>");
out.println("<TR><TH><B>Item Name</B></TH><TH><B>Portions</B></TH></TR>");
out.println("<TR><TD>"+getItemName(itemId)+"</TD><TD>"+getStock(itemId)+"</TD></TR>");
out.println("</TABLE>");
out.println("<BR>");
out.println("<CENTER><TH><h3><A HREF= \"StockStats3 \"><FONT face=arial>Back</FONT></A></h3></TH><BR>");
out.println("</PRE>");
out.println("<PRE>");
out.println("<CENTER><TH><h3><A HREF= \"ManageOption \"><FONT face=arial>Back to Options</FONT></A></h3></TH><BR>");
out.println("</PRE>");
out.println("<PRE>");
out.println("<CENTER><TH><h3><A HREF= \"log \"><FONT face=arial>logout</FONT></A></h3></TH><BR>");
out.println("</PRE>");
out.println("<BR>");
out.println("</FORM>");
out.println("");
out.println("</BODY>");
out.println("</HTML>");
//This method is used to retrieve the total stock of each item
private String getStock(int itemId) throws ServletException, IOException
String result = "";
try
String driver = "org.git.mm.mysql.Driver";
try
Class.forName(driver).newInstance();
//out.println("Driver Called!");
catch(java.lang.ClassNotFoundException e)
System.err.print("Couldn't find ClassNotFoundException: ");
System.err.println(e.getMessage());
out.println(e.getMessage());
catch(Exception ex)
ex.printStackTrace();
Connection con = DriverManager.getConnection(url, "odriscoi", "3vk7WgdO");
//out.println("Connection made!");
Statement stmt = con.createStatement();
//get stock of items
String query = "SELECT Portions FROM Kitchen WHERE Item_ID = '"+itemId+"';";
result = query;
ResultSet rs = stmt.executeQuery(query);
while(rs.next())
totalStock = rs.getString("Portions");
rs.close();
stmt.close();
con.close();
catch(SQLException ex)
out.println("SQLException: " + ex.getMessage());
return totalStock;
//Ths method is used to retrieve the name of each item
private String getItemName(int itemId) throws ServletException, IOException
String result = "";
try
String driver = "org.git.mm.mysql.Driver";
try
Class.forName(driver).newInstance();
//out.println("Driver Called!");
catch(java.lang.ClassNotFoundException e)
System.err.print("Couldn't find ClassNotFoundException: ");
System.err.println(e.getMessage());
out.println(e.getMessage());
catch(Exception ex)
ex.printStackTrace();
Connection con = DriverManager.getConnection(url, "odriscoi", "3vk7WgdO");
//out.println("Connection made!");
Statement stmt = con.createStatement();
//get name of item
String query = "SELECT item FROM Kitchen WHERE item_ID = '"+itemId+"';";
result = query;
ResultSet rs = stmt.executeQuery(query);
while(rs.next())
itemName = rs.getString("item");
rs.close();
stmt.close();
con.close();
catch(SQLException ex)
out.println("SQLException: " + ex.getMessage());
return itemName;the following is my code to retrieve a table, maybe it gives u some ideas.
Wolf
==========================================================================
import java.io.*;
import java.sql.*;
import javax.naming.*;
import javax.sql.*;
import javax.servlet.*;
import javax.servlet.http.*;
public class Test extends HttpServlet {
public void service(ServletRequest request, ServletResponse response)
throws ServletException, IOException {
Context initCtx=null;
Context envCtx=null;
DataSource ds=null;
Connection conn=null;
Statement stmt=null;
ResultSet rs=null;
response.setContentType("text/html");
PrintWriter out = response.getWriter();
try {
initCtx = new InitialContext();
envCtx = (Context)initCtx.lookup("java:comp/env");
ds = (DataSource)envCtx.lookup("jdbc/Bookingcomputer");
conn = ds.getConnection();
stmt=conn.createStatement();
// rs=stmt.executeQuery("SELECT s_code, description FROM computer");
rs=stmt.executeQuery("SELECT * FROM computer");
out.println("<HTML><HEAD><TITLE>Computer List</TITLE></HEAD>");
out.println("<BODY>");
out.println("<UL>");
out.println("<CENTER><FONT SIZE=\"4\"><B>ERC Computer List</B></FONT></CENTER>");
out.println("<center><table border=\"1\" cellpadding=\"0\" cellspacing=\"0\" style=\"border-collapse: collapse\" bordercolor=\"#111111\" width=\"80%\" id=\"AutoNumber1\">");
while(rs.next()) {
out.println("<tr>");
out.print("<td width=\"10\">");
out.print("<LI>");
out.print("</td>");
out.print("<td width=\"25%\"><B>");
out.print(rs.getString("s_code"));
out.print("</B></td>");
out.print("<td width=\"50%\">");
out.print(rs.getString("description"));
out.print("</td>");
out.print("<td width=\"25%\">");
out.print(rs.getString("capacity"));
out.print("</td>");
// out.println("<LI>"+rs.getString("s_code")+" "+rs.getString("description") );
out.println("</tr>");
out.println("</table></center>");
out.println("</UL>");
// out.println("Hi Arthur, How are you doing?");
out.println("</BODY></HTML>");
catch(SQLException ex) {
System.err.println("SQLException:"+ex.getMessage());
} catch (NamingException e) {
e.printStackTrace();
finally {
try {
if (conn!=null)
conn.close();
}catch(SQLException e){
e.printStackTrace(); -
Will be an editable Grid in HTML DB?
Hi,
I'm trying HTMLDB and I have a question. I know that objects can be imported in this tool and want to know if someone has published an editable grid.
If not, does anyone know if HTMLDB 2.0 will include this feature?
Thanks,
Gari.Gari,
Such a feature isnât yet available as a HTML DB component. We are discussing several ideas in this area, but I have no information when something like this would be available in HTML DB. But HTML DB of course doesnât restrict you to the components that are available out of the box. HTML DB renders standard HTML pages, so you can include your own HTML and Java Script, incl. you own grid components.
Marc -
Urgent! How to suppress indents in output from (XML , XSL) -- HTML
I make transformation (XML , XSL) --> HTML using parser v2 of Oracle XDK for Java v 9.2.0.2.0
I want to generate html in which several tags will follow one after another without new line, and indents.
Like this
<html>
<body>
<img src="1.jpg"/><img src="2.jpg"/>
</body>
</html>
Only in this case images will be visualized in IE5 together without spaces.
But xsl-processor is formatting output text: put each tag on new line and make indents for child tags.
I tried to
1) eliminate white spaces in xsl
2) use <xsl:output indent="no"/>
3) use <xsl:strip-space elements="*"/>
4) use method setPreserveWhitespace(true/false) of XMLParser (oracle.xml.parser.v2.XMLParser)
Xsl-processor continue to format output text.
my xml
<list>
<element name="1.jpg" />
<element name="2.jpg" />
</list>
my xsl
<?xml version="1.0"?>
<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
<xsl:output method="html" indent="no"/>
<xsl:strip-space elements="*"/>
<xsl:template match="list">
<html><body>
<img src="{element[1]/@name}"/><img src="{element[2]/@name}"/>
</body></html>
</xsl:template>
</xsl:stylesheet>
html-output
<html>
<body>
<img src="1.jpg"/>
<img src="2.jpg"/>
</body>
</html>
Please help me!html-output
<html>
<body>
<img src="1.jpg"/>
<img src="2.jpg"/>
</body>
</html>
Please help me! -
To Display Output in Grid ALV with change of some field display total with
Hi Masters,
I m working on ALV in which i have to display output with the following format.
Header
"Some String" date/time
User:XYZ01 page 1
Line
1st field 2nd 3rd 4th 5th 6th 7th 8th 9th 10th field
x y z A B C D E F G
BLANK..............................................................................
"total 3rd+4TH" P Q R S T
same thing for every change of 4th field .
So the problem is with inserting the line with string "Total of 3rd+4th" in the output .
Can Anyone help me out?
Thanks ,
Varlani AmitHi,
Use control-break statement ON-CHANGE for the 4th field, and do the changes.
regards,
sri -
Problem in placing checkboxes in output in grid display
hi experts,
I not getting checkboxes when i am using the concept of dynamic internal table and oops concept.and i am not getting how to pass data from dynamic internal table to standard internal table and i have searched in forums i got some solutions but i tried out with those solution but i havent got the output with checkboxes. so i am pasting the below code.so kindly help me in this regard.
the functionality of below code is to copy tables across clients.for this i have created two containers in same layout i.e.one for source client details and other for target client details.
TYPE-POOLS *
TYPE-POOLS: slis.
*-- Tables Declaration
TABLES: dd02l, t000.
*-- Constants Declaration
CONSTANTS: lc_z TYPE char1 VALUE 'Z',
lc_y TYPE char1 VALUE 'Y'.
*--Internal table and Work Area Declaration
DATA: lines LIKE sy-dbcnt VALUE 0.
DATA: icursor TYPE cursor.
*DATA: icursor1 TYPE cursor.
DATA: lv_count TYPE i.
DATA: lv_table_var1 TYPE char1.
DATA: lv_ans TYPE char1.
DATA : gd_tabname TYPE tabname.
*field catalog for source client
DATA: c_cont1 TYPE REF TO cl_gui_custom_container,
c_alv1 TYPE REF TO cl_gui_alv_grid,
it_fieldcat1 TYPE lvc_t_fcat ,
ty_fieldcat1 TYPE lvc_s_fcat ,
struc_desc1 TYPE REF TO cl_abap_structdescr,
ls_fieldcatalogue1 TYPE slis_fieldcat_alv,
lt_fieldcatalogue1 TYPE slis_t_fieldcat_alv,
l_structure1 TYPE REF TO data,
l_table1 TYPE REF TO data.
check boxes for source client.
for check boxes.
class lcl_event_receiver definition deferred. "for event handling
DATA: ok_code LIKE sy-ucomm,
save_ok LIKE sy-ucomm,
g_event_receiver TYPE REF TO lcl_event_receiver,
gs_layout TYPE lvc_s_layo,
g_max TYPE i VALUE 100.
types: begin of gs_outtab.
types: checkbox type c, "field for checkbox
t_name TYPE tabname,
t_ref TYPE REF TO data.
*include structure itab.
types: celltab type lvc_t_styl. "field to switch editability
types: end of gs_outtab.
data: gt_outtab type gs_outtab occurs 0 with header line,
wa type gs_outtab.
LOCAL CLASSES
This local class only handles event DOUBLE_CLICK.
Wenn the user double clicks on a checkbox cell the status of
this cell is switched from editable to not editable and vice versa.
class lcl_event_receiver definition.
public section.
methods: catch_doubleclick
for event double_click of cl_gui_alv_grid
importing
e_column
es_row_no
sender.
endclass.
class lcl_event_receiver implementation.
method catch_doubleclick.
data: ls_outtab type gs_outtab,
ls_celltab type lvc_s_styl.
if e_column-fieldname ne 'CHECKBOX'.
exit.
endif.
read table gt_outtab into ls_outtab index es_row_no-row_id.
The loop is only needed if there are other columns that
use checkboxes. At this point the loop could be
replaced by a READ of the first line of CELLTAB.
loop at ls_outtab-celltab into ls_celltab.
if ls_celltab-fieldname eq 'CHECKBOX'.
§B4.Switch the style to dis- or enable a cell for input
if ls_celltab-style = cl_gui_alv_grid=>mc_style_enabled.
ls_celltab-style = cl_gui_alv_grid=>mc_style_disabled.
else.
ls_celltab-style = cl_gui_alv_grid=>mc_style_enabled.
endif.
modify ls_outtab-celltab from ls_celltab.
endif.
endloop.
modify gt_outtab from ls_outtab index es_row_no-row_id.
call method sender->refresh_table_display.
endmethod.
endclass.
*field catalog for target client
DATA: c_cont2 TYPE REF TO cl_gui_custom_container,
c_alv2 TYPE REF TO cl_gui_alv_grid,
it_fieldcat2 TYPE lvc_t_fcat ,
ty_fieldcat2 TYPE lvc_s_fcat ,
struc_desc2 TYPE REF TO cl_abap_structdescr,
ls_fieldcatalogue2 TYPE slis_fieldcat_alv,
lt_fieldcatalogue2 TYPE slis_t_fieldcat_alv,
l_structure2 TYPE REF TO data,
l_table2 TYPE REF TO data.
*for source client
TYPES: BEGIN OF itab,
t_name TYPE tabname,
t_ref TYPE REF TO data,
END OF itab.
*for target client
TYPES: BEGIN OF itab1,
t_name1 TYPE tabname,
t_ref1 TYPE REF TO data,
END OF itab1.
*-- Field Symbol declaration for Dynamic Internal Table for source client
FIELD-SYMBOLS: TYPE ANY.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME.
PARAMETERS: p_table LIKE dd02l-tabname,
p_mdt_fm LIKE t000-mandt DEFAULT sy-mandt,
p_mdt_to LIKE t000-mandt DEFAULT '910'.
SELECTION-SCREEN END OF BLOCK b1.
AT SELECTION-SCREEN ON p_table.
lv_table_var1 = p_table+0(1).
*-- Validation for Standard tables
IF ( lv_table_var1 NE lc_z ) AND ( lv_table_var1 NE lc_y ).
MESSAGE e001(00) WITH text-002.
ENDIF.
*-- Start of Selection
START-OF-SELECTION.
for source client----
DATA itab2 TYPE itab.
DATA t_ref1 TYPE REF TO data.
itab2-t_name = p_table.
for target client----
DATA itab3 TYPE itab1.
DATA t_ref2 TYPE REF TO data.
itab3-t_name1 = p_table.
*-- Create Dynamic Internal table for source client
CREATE DATA itab2-t_ref TYPE TABLE OF (itab2-t_name) .
ASSIGN itab2-t_ref->* TO 0.
CLOSE CURSOR icursor.
EXIT.
ENDIF.
*-- Close the cursor
CALL FUNCTION 'DB_COMMIT'.
ENDDO.
ENDIF.
CALL SCREEN 3000.
*& Module STATUS_3000 OUTPUT
text
MODULE status_3000 OUTPUT.
SET PF-STATUS 'ZTESTMENU'.
SET TITLEBAR 'xxx'.
For Source client
*for check boxes.
if c_cont1 is initial.
perform create_and_init_alv.
endif.
IF c_alv2 IS INITIAL.
CREATE OBJECT c_cont2
EXPORTING
container_name = 'CONTAINER_TARGET'.
IF sy-subrc = 0.
CREATE OBJECT c_alv2
EXPORTING
i_parent = c_cont2.
ENDIF.
IF sy-subrc EQ 0.
PERFORM field_cat2.
ENDIF.
CALL METHOD c_alv2->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 =
is_print =
it_special_groups =
it_toolbar_excluding =
it_hyperlink =
it_alv_graphics =
it_except_qinfo =
ir_salv_adapter =
CHANGING
it_outtab =
it_fieldcatalog = it_fieldcat2
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.
ENDIF.
ENDMODULE. " STATUS_3000 OUTPUT
*& Module USER_COMMAND_3000 INPUT
text
MODULE user_command_3000 INPUT.
save_ok = ok_code.
clear ok_code.
case save_ok.
WHEN 'BACK'.
LEAVE PROGRAM.
when 'EXIT'.
perform exit_program.
when 'SELECT'.
perform select_all_entries changing gt_outtab[].
when 'DESELECT'.
perform deselect_all_entries changing gt_outtab[].
when 'RESET'.
perform reset_selected_entries changing gt_outtab[].
when 'SWITCH'.
perform switch_activation changing gt_outtab[].
ENDCASE.
ENDMODULE. " USER_COMMAND_3000 INPUT
*& Form field_cat1
text
--> p1 text
<-- p2 text
FORM field_cat1 .
Dynamic creation of a structure
CREATE DATA l_structure1 TYPE (p_table).
ASSIGN l_structure1->* TO .
Fields Structure
struc_desc1 ?= cl_abap_typedescr=>describe_by_data( .
Build Fieldcatalog
ty_fieldcat1-checkbox = 'X'.
ty_fieldcat1-fieldname = -name.
ty_fieldcat1-ref_table = p_table.
APPEND ty_fieldcat1 TO it_fieldcat1.
Build Fieldcatalog
ls_fieldcatalogue1-fieldname = create_dynamic_table
EXPORTING
i_style_table =
it_fieldcatalog = it_fieldcat1
i_length_in_byte =
IMPORTING
ep_table = l_table1
e_style_fname =
EXCEPTIONS
generate_subpool_dir_full = 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.
ASSIGN l_table1->* TO = gt_outtab[].
Read data from the table selected.
SELECT * FROM (p_table)
CLIENT SPECIFIED
INTO CORRESPONDING FIELDS OF TABLE TO wa.
INSERT wa into table gt_outtab.
ENDLOOP.
ENDFORM. " field_cat1
*& Form field_cat2
text
--> p1 text
<-- p2 text
FORM field_cat2 .
CREATE DATA l_structure2 TYPE (p_table).
ASSIGN l_structure2->* TO .
Fields Structure
struc_desc2 ?= cl_abap_typedescr=>describe_by_data( .
Build Fieldcatalog
ty_fieldcat2-fieldname = -name.
ty_fieldcat2-ref_table = p_table.
APPEND ty_fieldcat2 TO it_fieldcat2.
Build Fieldcatalog
ls_fieldcatalogue2-fieldname = create_dynamic_table
EXPORTING
i_style_table =
it_fieldcatalog = it_fieldcat2
i_length_in_byte =
IMPORTING
ep_table = l_table2
e_style_fname =
EXCEPTIONS
generate_subpool_dir_full = 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.
ASSIGN l_table2->* TO .
Read data from the table selected.
SELECT * FROM (p_table) CLIENT SPECIFIED
INTO CORRESPONDING FIELDS OF TABLE
WHERE mandt = p_mdt_to.
ENDFORM. " field_cat2
*& Form create_and_init_alv
text
--> p1 text
<-- p2 text
form create_and_init_alv .
data: lt_exclude type ui_functions.
create object c_cont1
exporting container_name = 'CONTAINER_SOURCE'.
create object c_alv1
exporting i_parent = c_cont1.
PERFORM field_cat1.
perform exclude_tb_functions changing lt_exclude.
perform build_data.
gs_layout-stylefname = 'CELLTAB'.
call method c_alv1->set_table_for_first_display
exporting is_layout = gs_layout
it_toolbar_excluding = lt_exclude
changing it_fieldcatalog = it_fieldcat1
it_outtab = gt_outtab[].
create object g_event_receiver.
set handler g_event_receiver->catch_doubleclick for c_alv1.
Set editable cells to ready for input initially
call method c_alv1->set_ready_for_input
exporting
i_ready_for_input = 1.
endform. " create_and_init_alv
*& Form exclude_tb_functions
text
<--P_LT_EXCLUDE text
form exclude_tb_functions changing pt_exclude type ui_functions.
data ls_exclude type ui_func.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_copy_row.
append ls_exclude to pt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_delete_row.
append ls_exclude to pt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_append_row.
append ls_exclude to pt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_insert_row.
append ls_exclude to pt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_move_row.
append ls_exclude to pt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_copy.
append ls_exclude to pt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_cut.
append ls_exclude to pt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_paste.
append ls_exclude to pt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_paste_new_row.
append ls_exclude to pt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_undo.
append ls_exclude to pt_exclude.
endform. " exclude_tb_functions
*& Form build_data
text
--> p1 text
<-- p2 text
form build_data .
data:ls_celltab type lvc_s_styl,
lt_celltab type lvc_t_styl,
l_index type i.
*-- get the number of entries in table
SELECT COUNT(*) FROM dd03l INTO lv_count
WHERE tabname = p_table
AND fieldname = 'MANDT'.
Check MANDT field the the table, if not exists through an error message
IF lv_count = 0.
MESSAGE i000(8i) WITH text-001 space space.
EXIT.
ELSE.
*-- Delete the Table Entries in the target system
DELETE FROM (p_table) CLIENT SPECIFIED
WHERE mandt = p_mdt_to.
COMMIT WORK.
*-- Open cursor
OPEN CURSOR WITH HOLD icursor FOR
SELECT * FROM (p_table) CLIENT SPECIFIED
WHERE mandt = p_mdt_fm.
IF sy-subrc .
move-corresponding <tab1> to gt_outtab.
if gt_outtab-connid eq '400'.
gt_outtab-checkbox = 'X'.
endif.
append gt_outtab.
endloop.
ls_celltab-fieldname = 'CHECKBOX'.
ls_celltab-style = cl_gui_alv_grid=>mc_style_enabled.
loop at gt_outtab.
l_index = sy-tabix.
refresh lt_celltab.
ls_celltab-fieldname = 'CHECKBOX'.
ls_celltab-style = cl_gui_alv_grid=>mc_style_enabled.
insert ls_celltab into table lt_celltab.
insert lines of lt_celltab into table gt_outtab-celltab.
modify gt_outtab index l_index.
endloop.
endform. " build_data
*& Form select_all_entries
text
<--P_GT_OUTTAB text
form select_all_entries changing pt_outtab type standard table.
data: ls_outtab type gs_outtab.
data: l_valid type c,
l_locked type c.
*§A4ad. Before you (a)set, reset or (d)evaluate checkboxes,
you must check the input cells.
If all entries are ok, ALV transferes new values to the output
table which you then can modify.
call method c_alv1->check_changed_data
importing
e_valid = l_valid.
if l_valid eq 'X'.
loop at pt_outtab into ls_outtab.
perform check_lock using ls_outtab
changing l_locked.
if l_locked is initial
and not ls_outtab-checkbox eq '-'.
ls_outtab-checkbox = 'X'.
endif.
modify pt_outtab from ls_outtab.
endloop.
call method c_alv1->refresh_table_display.
endif.
endform. " select_all_entries
*& Form deselect_all_entries
text
<--P_GT_OUTTAB[] text
form deselect_all_entries changing pt_outtab type standard table.
data: ls_outtab type gs_outtab.
data: l_valid type c,
l_locked type c.
*§A4ad. Before you (a)set, reset or (d)evaluate checkboxes,
you must check the input cells.
If all entries are ok, ALV transferes new values to the output
table which you then can modify.
call method c_alv1->check_changed_data
importing
e_valid = l_valid.
if l_valid eq 'X'.
loop at pt_outtab into ls_outtab.
perform check_lock using ls_outtab
changing l_locked.
if l_locked is initial
and not ls_outtab-checkbox eq '-'.
ls_outtab-checkbox = ' '.
endif.
modify pt_outtab from ls_outtab.
endloop.
call method c_alv1->refresh_table_display.
endif.
endform. " deselect_all_entries
*& Form reset_selected_entries
text
<--P_GT_OUTTAB[] text
form reset_selected_entries changing pt_outtab type standard table.
data: ls_outtab type gs_outtab.
data: l_valid type c.
*§A4b. Before you set, (b)reset or evaluate checkboxes,
you must check the input cells.
If all entries are ok, ALV transferes new values to the output
table which you then can modify.
call method c_alv1->check_changed_data
importing
e_valid = l_valid.
if l_valid eq 'X'.
loop at pt_outtab into ls_outtab.
if not ls_outtab-checkbox is initial
and not ls_outtab-checkbox eq '-'.
clear ls_outtab.
modify pt_outtab from ls_outtab.
endif.
endloop.
call method c_alv1->refresh_table_display.
endif.
endform. " reset_selected_entries
*& Form check_lock
text
-->P_LS_OUTTAB text
<--P_L_LOCKED text
form check_lock using ps_outtab type gs_outtab
changing p_locked.
data ls_celltab type lvc_s_styl.
loop at ps_outtab-celltab into ls_celltab.
if ls_celltab-fieldname = 'CHECKBOX'.
if ls_celltab-style eq cl_gui_alv_grid=>mc_style_disabled.
p_locked = 'X'.
else.
p_locked = space.
endif.
endif.
endloop.
endform. " check_lock
and when i am running this code its going for runtime.i know the cause also as the data from dynamic internal table is not properly moved to standard internal.but i am not getting how to do this.please can u help out in this regard with code.
thank u.
sohamhi experts,
I not getting checkboxes when i am using the concept of dynamic internal table and oops concept.and i am not getting how to pass data from dynamic internal table to standard internal table and i have searched in forums i got some solutions but i tried out with those solution but i havent got the output with checkboxes. so i am pasting the below code.so kindly help me in this regard.
the functionality of below code is to copy tables across clients.for this i have created two containers in same layout i.e.one for source client details and other for target client details.
TYPE-POOLS *
TYPE-POOLS: slis.
*-- Tables Declaration
TABLES: dd02l, t000.
*-- Constants Declaration
CONSTANTS: lc_z TYPE char1 VALUE 'Z',
lc_y TYPE char1 VALUE 'Y'.
*--Internal table and Work Area Declaration
DATA: lines LIKE sy-dbcnt VALUE 0.
DATA: icursor TYPE cursor.
*DATA: icursor1 TYPE cursor.
DATA: lv_count TYPE i.
DATA: lv_table_var1 TYPE char1.
DATA: lv_ans TYPE char1.
DATA : gd_tabname TYPE tabname.
*field catalog for source client
DATA: c_cont1 TYPE REF TO cl_gui_custom_container,
c_alv1 TYPE REF TO cl_gui_alv_grid,
it_fieldcat1 TYPE lvc_t_fcat ,
ty_fieldcat1 TYPE lvc_s_fcat ,
struc_desc1 TYPE REF TO cl_abap_structdescr,
ls_fieldcatalogue1 TYPE slis_fieldcat_alv,
lt_fieldcatalogue1 TYPE slis_t_fieldcat_alv,
l_structure1 TYPE REF TO data,
l_table1 TYPE REF TO data.
check boxes for source client.
for check boxes.
class lcl_event_receiver definition deferred. "for event handling
DATA: ok_code LIKE sy-ucomm,
save_ok LIKE sy-ucomm,
g_event_receiver TYPE REF TO lcl_event_receiver,
gs_layout TYPE lvc_s_layo,
g_max TYPE i VALUE 100.
types: begin of gs_outtab.
types: checkbox type c, "field for checkbox
t_name TYPE tabname,
t_ref TYPE REF TO data.
*include structure itab.
types: celltab type lvc_t_styl. "field to switch editability
types: end of gs_outtab.
data: gt_outtab type gs_outtab occurs 0 with header line,
wa type gs_outtab.
LOCAL CLASSES
This local class only handles event DOUBLE_CLICK.
Wenn the user double clicks on a checkbox cell the status of
this cell is switched from editable to not editable and vice versa.
class lcl_event_receiver definition.
public section.
methods: catch_doubleclick
for event double_click of cl_gui_alv_grid
importing
e_column
es_row_no
sender.
endclass.
class lcl_event_receiver implementation.
method catch_doubleclick.
data: ls_outtab type gs_outtab,
ls_celltab type lvc_s_styl.
if e_column-fieldname ne 'CHECKBOX'.
exit.
endif.
read table gt_outtab into ls_outtab index es_row_no-row_id.
The loop is only needed if there are other columns that
use checkboxes. At this point the loop could be
replaced by a READ of the first line of CELLTAB.
loop at ls_outtab-celltab into ls_celltab.
if ls_celltab-fieldname eq 'CHECKBOX'.
§B4.Switch the style to dis- or enable a cell for input
if ls_celltab-style = cl_gui_alv_grid=>mc_style_enabled.
ls_celltab-style = cl_gui_alv_grid=>mc_style_disabled.
else.
ls_celltab-style = cl_gui_alv_grid=>mc_style_enabled.
endif.
modify ls_outtab-celltab from ls_celltab.
endif.
endloop.
modify gt_outtab from ls_outtab index es_row_no-row_id.
call method sender->refresh_table_display.
endmethod.
endclass.
*field catalog for target client
DATA: c_cont2 TYPE REF TO cl_gui_custom_container,
c_alv2 TYPE REF TO cl_gui_alv_grid,
it_fieldcat2 TYPE lvc_t_fcat ,
ty_fieldcat2 TYPE lvc_s_fcat ,
struc_desc2 TYPE REF TO cl_abap_structdescr,
ls_fieldcatalogue2 TYPE slis_fieldcat_alv,
lt_fieldcatalogue2 TYPE slis_t_fieldcat_alv,
l_structure2 TYPE REF TO data,
l_table2 TYPE REF TO data.
*for source client
TYPES: BEGIN OF itab,
t_name TYPE tabname,
t_ref TYPE REF TO data,
END OF itab.
*for target client
TYPES: BEGIN OF itab1,
t_name1 TYPE tabname,
t_ref1 TYPE REF TO data,
END OF itab1.
*-- Field Symbol declaration for Dynamic Internal Table for source client
FIELD-SYMBOLS: TYPE ANY.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME.
PARAMETERS: p_table LIKE dd02l-tabname,
p_mdt_fm LIKE t000-mandt DEFAULT sy-mandt,
p_mdt_to LIKE t000-mandt DEFAULT '910'.
SELECTION-SCREEN END OF BLOCK b1.
AT SELECTION-SCREEN ON p_table.
lv_table_var1 = p_table+0(1).
*-- Validation for Standard tables
IF ( lv_table_var1 NE lc_z ) AND ( lv_table_var1 NE lc_y ).
MESSAGE e001(00) WITH text-002.
ENDIF.
*-- Start of Selection
START-OF-SELECTION.
for source client----
DATA itab2 TYPE itab.
DATA t_ref1 TYPE REF TO data.
itab2-t_name = p_table.
for target client----
DATA itab3 TYPE itab1.
DATA t_ref2 TYPE REF TO data.
itab3-t_name1 = p_table.
*-- Create Dynamic Internal table for source client
CREATE DATA itab2-t_ref TYPE TABLE OF (itab2-t_name) .
ASSIGN itab2-t_ref->* TO 0.
CLOSE CURSOR icursor.
EXIT.
ENDIF.
*-- Close the cursor
CALL FUNCTION 'DB_COMMIT'.
ENDDO.
ENDIF.
CALL SCREEN 3000.
*& Module STATUS_3000 OUTPUT
text
MODULE status_3000 OUTPUT.
SET PF-STATUS 'ZTESTMENU'.
SET TITLEBAR 'xxx'.
For Source client
*for check boxes.
if c_cont1 is initial.
perform create_and_init_alv.
endif.
IF c_alv2 IS INITIAL.
CREATE OBJECT c_cont2
EXPORTING
container_name = 'CONTAINER_TARGET'.
IF sy-subrc = 0.
CREATE OBJECT c_alv2
EXPORTING
i_parent = c_cont2.
ENDIF.
IF sy-subrc EQ 0.
PERFORM field_cat2.
ENDIF.
CALL METHOD c_alv2->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 =
is_print =
it_special_groups =
it_toolbar_excluding =
it_hyperlink =
it_alv_graphics =
it_except_qinfo =
ir_salv_adapter =
CHANGING
it_outtab =
it_fieldcatalog = it_fieldcat2
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.
ENDIF.
ENDMODULE. " STATUS_3000 OUTPUT
*& Module USER_COMMAND_3000 INPUT
text
MODULE user_command_3000 INPUT.
save_ok = ok_code.
clear ok_code.
case save_ok.
WHEN 'BACK'.
LEAVE PROGRAM.
when 'EXIT'.
perform exit_program.
when 'SELECT'.
perform select_all_entries changing gt_outtab[].
when 'DESELECT'.
perform deselect_all_entries changing gt_outtab[].
when 'RESET'.
perform reset_selected_entries changing gt_outtab[].
when 'SWITCH'.
perform switch_activation changing gt_outtab[].
ENDCASE.
ENDMODULE. " USER_COMMAND_3000 INPUT
*& Form field_cat1
text
--> p1 text
<-- p2 text
FORM field_cat1 .
Dynamic creation of a structure
CREATE DATA l_structure1 TYPE (p_table).
ASSIGN l_structure1->* TO .
Fields Structure
struc_desc1 ?= cl_abap_typedescr=>describe_by_data( .
Build Fieldcatalog
ty_fieldcat1-checkbox = 'X'.
ty_fieldcat1-fieldname = -name.
ty_fieldcat1-ref_table = p_table.
APPEND ty_fieldcat1 TO it_fieldcat1.
Build Fieldcatalog
ls_fieldcatalogue1-fieldname = create_dynamic_table
EXPORTING
i_style_table =
it_fieldcatalog = it_fieldcat1
i_length_in_byte =
IMPORTING
ep_table = l_table1
e_style_fname =
EXCEPTIONS
generate_subpool_dir_full = 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.
ASSIGN l_table1->* TO = gt_outtab[].
Read data from the table selected.
SELECT * FROM (p_table)
CLIENT SPECIFIED
INTO CORRESPONDING FIELDS OF TABLE TO wa.
INSERT wa into table gt_outtab.
ENDLOOP.
ENDFORM. " field_cat1
*& Form field_cat2
text
--> p1 text
<-- p2 text
FORM field_cat2 .
CREATE DATA l_structure2 TYPE (p_table).
ASSIGN l_structure2->* TO .
Fields Structure
struc_desc2 ?= cl_abap_typedescr=>describe_by_data( .
Build Fieldcatalog
ty_fieldcat2-fieldname = -name.
ty_fieldcat2-ref_table = p_table.
APPEND ty_fieldcat2 TO it_fieldcat2.
Build Fieldcatalog
ls_fieldcatalogue2-fieldname = create_dynamic_table
EXPORTING
i_style_table =
it_fieldcatalog = it_fieldcat2
i_length_in_byte =
IMPORTING
ep_table = l_table2
e_style_fname =
EXCEPTIONS
generate_subpool_dir_full = 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.
ASSIGN l_table2->* TO .
Read data from the table selected.
SELECT * FROM (p_table) CLIENT SPECIFIED
INTO CORRESPONDING FIELDS OF TABLE
WHERE mandt = p_mdt_to.
ENDFORM. " field_cat2
*& Form create_and_init_alv
text
--> p1 text
<-- p2 text
form create_and_init_alv .
data: lt_exclude type ui_functions.
create object c_cont1
exporting container_name = 'CONTAINER_SOURCE'.
create object c_alv1
exporting i_parent = c_cont1.
PERFORM field_cat1.
perform exclude_tb_functions changing lt_exclude.
perform build_data.
gs_layout-stylefname = 'CELLTAB'.
call method c_alv1->set_table_for_first_display
exporting is_layout = gs_layout
it_toolbar_excluding = lt_exclude
changing it_fieldcatalog = it_fieldcat1
it_outtab = gt_outtab[].
create object g_event_receiver.
set handler g_event_receiver->catch_doubleclick for c_alv1.
Set editable cells to ready for input initially
call method c_alv1->set_ready_for_input
exporting
i_ready_for_input = 1.
endform. " create_and_init_alv
*& Form exclude_tb_functions
text
<--P_LT_EXCLUDE text
form exclude_tb_functions changing pt_exclude type ui_functions.
data ls_exclude type ui_func.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_copy_row.
append ls_exclude to pt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_delete_row.
append ls_exclude to pt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_append_row.
append ls_exclude to pt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_insert_row.
append ls_exclude to pt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_move_row.
append ls_exclude to pt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_copy.
append ls_exclude to pt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_cut.
append ls_exclude to pt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_paste.
append ls_exclude to pt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_paste_new_row.
append ls_exclude to pt_exclude.
ls_exclude = cl_gui_alv_grid=>mc_fc_loc_undo.
append ls_exclude to pt_exclude.
endform. " exclude_tb_functions
*& Form build_data
text
--> p1 text
<-- p2 text
form build_data .
data:ls_celltab type lvc_s_styl,
lt_celltab type lvc_t_styl,
l_index type i.
*-- get the number of entries in table
SELECT COUNT(*) FROM dd03l INTO lv_count
WHERE tabname = p_table
AND fieldname = 'MANDT'.
Check MANDT field the the table, if not exists through an error message
IF lv_count = 0.
MESSAGE i000(8i) WITH text-001 space space.
EXIT.
ELSE.
*-- Delete the Table Entries in the target system
DELETE FROM (p_table) CLIENT SPECIFIED
WHERE mandt = p_mdt_to.
COMMIT WORK.
*-- Open cursor
OPEN CURSOR WITH HOLD icursor FOR
SELECT * FROM (p_table) CLIENT SPECIFIED
WHERE mandt = p_mdt_fm.
IF sy-subrc .
move-corresponding <tab1> to gt_outtab.
if gt_outtab-connid eq '400'.
gt_outtab-checkbox = 'X'.
endif.
append gt_outtab.
endloop.
ls_celltab-fieldname = 'CHECKBOX'.
ls_celltab-style = cl_gui_alv_grid=>mc_style_enabled.
loop at gt_outtab.
l_index = sy-tabix.
refresh lt_celltab.
ls_celltab-fieldname = 'CHECKBOX'.
ls_celltab-style = cl_gui_alv_grid=>mc_style_enabled.
insert ls_celltab into table lt_celltab.
insert lines of lt_celltab into table gt_outtab-celltab.
modify gt_outtab index l_index.
endloop.
endform. " build_data
*& Form select_all_entries
text
<--P_GT_OUTTAB text
form select_all_entries changing pt_outtab type standard table.
data: ls_outtab type gs_outtab.
data: l_valid type c,
l_locked type c.
*§A4ad. Before you (a)set, reset or (d)evaluate checkboxes,
you must check the input cells.
If all entries are ok, ALV transferes new values to the output
table which you then can modify.
call method c_alv1->check_changed_data
importing
e_valid = l_valid.
if l_valid eq 'X'.
loop at pt_outtab into ls_outtab.
perform check_lock using ls_outtab
changing l_locked.
if l_locked is initial
and not ls_outtab-checkbox eq '-'.
ls_outtab-checkbox = 'X'.
endif.
modify pt_outtab from ls_outtab.
endloop.
call method c_alv1->refresh_table_display.
endif.
endform. " select_all_entries
*& Form deselect_all_entries
text
<--P_GT_OUTTAB[] text
form deselect_all_entries changing pt_outtab type standard table.
data: ls_outtab type gs_outtab.
data: l_valid type c,
l_locked type c.
*§A4ad. Before you (a)set, reset or (d)evaluate checkboxes,
you must check the input cells.
If all entries are ok, ALV transferes new values to the output
table which you then can modify.
call method c_alv1->check_changed_data
importing
e_valid = l_valid.
if l_valid eq 'X'.
loop at pt_outtab into ls_outtab.
perform check_lock using ls_outtab
changing l_locked.
if l_locked is initial
and not ls_outtab-checkbox eq '-'.
ls_outtab-checkbox = ' '.
endif.
modify pt_outtab from ls_outtab.
endloop.
call method c_alv1->refresh_table_display.
endif.
endform. " deselect_all_entries
*& Form reset_selected_entries
text
<--P_GT_OUTTAB[] text
form reset_selected_entries changing pt_outtab type standard table.
data: ls_outtab type gs_outtab.
data: l_valid type c.
*§A4b. Before you set, (b)reset or evaluate checkboxes,
you must check the input cells.
If all entries are ok, ALV transferes new values to the output
table which you then can modify.
call method c_alv1->check_changed_data
importing
e_valid = l_valid.
if l_valid eq 'X'.
loop at pt_outtab into ls_outtab.
if not ls_outtab-checkbox is initial
and not ls_outtab-checkbox eq '-'.
clear ls_outtab.
modify pt_outtab from ls_outtab.
endif.
endloop.
call method c_alv1->refresh_table_display.
endif.
endform. " reset_selected_entries
*& Form check_lock
text
-->P_LS_OUTTAB text
<--P_L_LOCKED text
form check_lock using ps_outtab type gs_outtab
changing p_locked.
data ls_celltab type lvc_s_styl.
loop at ps_outtab-celltab into ls_celltab.
if ls_celltab-fieldname = 'CHECKBOX'.
if ls_celltab-style eq cl_gui_alv_grid=>mc_style_disabled.
p_locked = 'X'.
else.
p_locked = space.
endif.
endif.
endloop.
endform. " check_lock
and when i am running this code its going for runtime.i know the cause also as the data from dynamic internal table is not properly moved to standard internal.but i am not getting how to do this.please can u help out in this regard with code.
thank u.
soham -
How to send program output as mail in HTML format
Hi Friends,
I have a BDc which runs in background and its been Stored in my system and displayed as HTML format.
My requirement is now i want that Same HTML file which i am displaying to be sent as a mail in HTML format itself..Kindly help me on this
Thanks in advance
kishoreHi,
Below sample program might give you idea on sending HTML attachment.
TYPES: BEGIN OF t_sal_ord,
vbeln TYPE vbeln_va,
posnr TYPE posnr_va,
auart TYPE auart,
vkorg TYPE vkorg,
matnr TYPE matnr,
END OF t_sal_ord.
DATA: i_sal_ord TYPE STANDARD TABLE OF t_sal_ord,
i_header TYPE STANDARD TABLE OF w3head,
i_fields TYPE STANDARD TABLE OF w3fields,
i_html TYPE STANDARD TABLE OF w3html,
wa_header TYPE w3head.
DATA: i_fcat TYPE lvc_t_fcat,
wa_fcat TYPE lvc_s_fcat.
DATA: g_send_request TYPE REF TO cl_bcs,
g_document TYPE REF TO cl_document_bcs,
g_recipient TYPE REF TO cl_cam_address_bcs,
g_cx_bcs TYPE REF TO cx_bcs,
g_sent_to_all TYPE os_boolean.
DATA: g_lines TYPE i,
g_size TYPE so_obj_len.
PARAMETERS: p_vkorg TYPE vkorg OBLIGATORY,
p_mailad TYPE ad_smtpadr OBLIGATORY.
START-OF-SELECTION.
SELECT a~vbeln b~posnr a~auart a~vkorg b~matnr
INTO TABLE i_sal_ord
UP TO 20 ROWS
FROM vbak AS a
INNER JOIN vbap AS b
ON a~vbeln = b~vbeln
WHERE a~vkorg = p_vkorg.
wa_fcat-coltext = 'SalesOrd#'.
APPEND wa_fcat TO i_fcat.
wa_fcat-coltext = 'Item#'.
APPEND wa_fcat TO i_fcat.
wa_fcat-coltext = 'OrdType'.
APPEND wa_fcat TO i_fcat.
wa_fcat-coltext = 'Sales.Org'.
APPEND wa_fcat TO i_fcat.
wa_fcat-coltext = 'Material'.
APPEND wa_fcat TO i_fcat.
LOOP AT i_fcat INTO wa_fcat.
wa_header-text = wa_fcat-coltext.
CALL FUNCTION 'WWW_ITAB_TO_HTML_HEADERS'
EXPORTING
field_nr = sy-tabix
text = wa_header-text
size = '2'
fgcolor = 'BLACK'
bgcolor = 'VIOLET'
font = 'CALIBRI'
TABLES
header = i_header.
CALL FUNCTION 'WWW_ITAB_TO_HTML_LAYOUT'
EXPORTING
field_nr = sy-tabix
size = '2'
fgcolor = 'BLACK'
bgcolor = 'WHITE'
font = 'CALIBRI'
TABLES
fields = i_fields.
ENDLOOP.
wa_header-text = 'Sales Order Details'.
wa_header-size = '2'.
wa_header-font = 'CALIBRI'.
CALL FUNCTION 'WWW_ITAB_TO_HTML'
EXPORTING
* TABLE_ATTRIBUTES = 'BORDER=1'
table_header = wa_header
* ALL_FIELDS = 'X'
TABLES
html = i_html
fields = i_fields
row_header = i_header
itable = i_sal_ord.
TRY .
g_send_request = cl_bcs=>create_persistent( ).
g_document = cl_document_bcs=>create_document(
i_type = 'RAW'
* i_text = i_content[] " Body for Mail
i_subject = 'Sales Order Details' ).
DESCRIBE TABLE i_html LINES g_lines.
g_size = g_lines * 2 * 255.
CALL METHOD g_document->add_attachment
EXPORTING
i_attachment_type = 'HTM'
i_attachment_subject = 'Sales Order Details'
i_attachment_size = g_size
i_att_content_text = i_html[].
g_send_request->set_document( g_document ).
g_recipient = cl_cam_address_bcs=>create_internet_address( p_mailad ).
g_send_request->add_recipient(
EXPORTING
i_recipient = g_recipient
i_express = 'X' ).
g_send_request->set_send_immediately( 'X' ).
g_send_request->send(
EXPORTING
i_with_error_screen = 'X'
RECEIVING
result = g_sent_to_all ).
COMMIT WORK.
CATCH cx_bcs INTO g_cx_bcs.
WRITE:/ g_cx_bcs->error_type.
ENDTRY.
Kind Regards
Eswar -
Email the Output of Report under HTML Format instead of .eps
Hi to all
I having Developer 6.0.5.0.2. I want to send an email from
report (Using Lotus Notes email client) as an HTML attachment.
Could any one guide me how to do that?
nullSet DESFORMAT = HTML in the Parameter Form Builder.(or in the
system Parameters under Data Model)
the DESTYPE should be MAIL only then you won't get the .eps file.
Hope this helps.
NB
Kalle (guest) wrote:
: Hi,
: In case of Reports Runtime : Edit->Runtime Options->Runtime
: Values->Format HTML, in Report Builder: Tools->Preferences...
: Regards
: Thalamuthu (guest) wrote:
: : Hi to all
: : I having Developer 6.0.5.0.2. I want to send an email from
: : report (Using Lotus Notes email client) as an HTML
attachment.
: : Could any one guide me how to do that?
null -
ABAP Function Module for Output File Compression of HTML file
We would to compress a HTML file that is created during a daily batch run so that it can be sent to the concerned users by email.
THerefore we are looking for a Function Module and code that can do this for us.
Please help.
You can contact me at [email protected]
Thanks.
Suresh RaoWe would to compress a HTML file that is created during a daily batch run so that it can be sent to the concerned users by email.
THerefore we are looking for a Function Module and code that can do this for us.
Please help.
You can contact me at [email protected]
Thanks.
Suresh Rao -
Hello All,
I have a container in which I am displaying 6 ALV grids. Of these 6 grids the data in first grid is populated using 'add_static_html' method of class cl_dd_document.This data is in HTML format. Other 5 grids are displayed using normal set_table_for_first_display method.
While taking printout I am able to convert the grid data of 5 grids (other than the grid which is having data in HTML format ) to list data using REUSE_ALV_BLOCK_LIST_APPEND function module and then using REUSE_ALV_BLOCK_LIST_DISPLAY FM I am able to print it. Can somebody please let me know how to print the data of grid having HTML display, in same format and same style as it is displayed in grid output. Let me tell you that I need to print all 6 grids in a single page which I am able to do using he above mentioned FM's. Since all grids are to be displayed in same page so I can't use set_frontend_print method of grids. Please suggest the solutions.
Note: Helpful answers will be duly rewarded.Ok, you specifically asked for SQL.
Here goes:
SQL> with t as (select 1 id from dual union all
select 12 id from dual union all
select 2231 id from dual union all
select 221 id from dual union all
select 21 id from dual union all
select 5 id from dual union all
select 56 id from dual)
select ltrim(max(sys_connect_by_path(id, ',' )), ',') unordered_list
from (select id, rownum rn from t)
start with rn = 1
connect by prior rn = rn-1
UNORDERED_LIST
1,12,2231,221,21,5,56
1 row selected.Regards
Peter -
How to Generate HTML Report Output in Excel
Dear Experts,
How to convert HTML report output in Excel.
I have reports which output is coming in HTML format & the same I want to use in Excel.
So tell me how I can covert the same in Excel.
Thanks
Sudhirhello,
in your case, you might want to make the following :
a) use DESFORMAT=HTML
b) use MIMETYPE=application/vnd.msexcell (or whatever mimetype your excel application is bound to)
i am nor sure if excel will understeand our HTMLCSS (which is actually HTML4.0 using layers for best possible rendering of the paper page in the browser).
regards,
the oracle reports team
Maybe you are looking for
-
I received a $9.99 charge for premium messaging. According to Verizon Wireless, my phone somehow signed up to receive MLB scores on a monthly basis (my phone is not actually receiving the service, and of course no one in my house signed up for it -
-
How search a file with Forms 6i
I want to know where is located a file system's file. Are there some libraries to include in Oracle Forms 6i? Thanks.
-
How to go to Camera Raw from Lightroom
Using Photoshop/Lightroom CC - Windows 7 Is there some way to open an image in Camera Raw directly from Lightroom? Thanks, RzzB
-
All, I am running WLS510+WLCS310. It is possible to view the source code by entering this URL: http://localhost:7001/wlcs/index.jsp%00 By appending "%00", the jsp will not be executed and view all source code! Any workaround/patch for this? This is a
-
Is it possible to invoke() 'Change All' in Find/Change?
Hi All, Is it possible to invoke() 'Change All' in Find/Change? Regards, Chinna