Not to Display Result after Re voting in Quick poll

Hello Expert,
I have created an ivew of Km Quick Poll & Km Quick Poll Administration.
I dn't wan't to display result layout ( Flat pie / Flat Bar) after voting or re-voting...user can vote or re-vote but he must be unable to see result...
Please suggest the solution
Regards,
Vidhanshi

Hi Vishal,
In the Quick Poll admin iview, make sure that you have started the poll.
Also check the Radio buttons for displaying the result.There are 3 options.
Select the one with either displaying the poll after users voted or displaying the poll after the poll is closed.
Hope it helps.

Similar Messages

Special characters are not being displayed normally after recent update.

FF messed up with that recent update. Special characters are now not being displayed properly - they somehow stretch the whole line where they are posted. It was fine before
I.E.:
http://www.discogs.com/artist/%E2%84%91%E2%8A%87%E2%89%A5%E2%97%8A%E2%89%A4%E2%8A%86%E2%84%9C
ℑ⊇≥◊≤⊆ℜ
Here you can see what I mean (Opera & FF screenshots), Opera has no problems with them, see highlighted:
http://img525.imageshack.us/img525/3897/image16m.jpg
Thanks

Which version were you using before?
Some font issues may be caused by graphics hardware acceleration. Since this feature was added to Firefox, it has gradually improved, but there still are a few glitches.
You can disable it, but you might need to restart Firefox in order for this to take effect, so save all work first (e.g., mail you are composing, online documents you're editing, etc.).
orange Firefox button ''or'' classic Tools menu > Options > Advanced
On the "General" mini-tab, uncheck the box for "Use hardware acceleration when available"
Does that make any difference?

IR not to display results until functions are applied

I have a IR that produces around 400,000 rows of information for two months worth of data. The user will not be interested in all those rows. I would like to display the report only after the filters (i.e., functions such as filters, aggregates, etc.) have been selected. How can this be accomplished?
Can someone direct me to the documention on how to accomplish this?
Robert
http://apexcssjs.blogspot.com

Hi, Robert.
I saw your post and thought I might be able to help.
From your question what it seems you want is to have your IR report appear without first retrieving data. Instead, you would like users to have a chance to select filtering conditions and whatnot before actually running the report.
I found the following link that addresses this functionality in a very simple way.
http://www.apexsolutions.de/blog/allgemein/interactive-report-without-initial-results/
I hope this helps you.
Elie

Problems displaying results after search

I am new to webdesign so I apologize in advance if the anwer is obvios. As you can probably see I rely a lot on dreamweaver to write the code.
Here is the problem:
I have a mysql database where I would like to search 3 columns (it contains 38 column in total). I have a search page with a form that has a text input field. (See code below)
My database is just in test stage, however the columns will not change
Category
Product
Model
Color
Korg Digital Piano
New
PA3X
Black
Kawai Digital Piano
New
CVP509
Rosewood
Etc.
<form id="form1" name="form1" method="get" action="Manage_Products_results.php">
<label for="Search">Search</label>
<input name="Search" type="text" id="Search" size="100" maxlength="100" />
<input type="submit" name="Search2" id="Search2" value="Submit" />
</form>
On the results page I have the following code:
<?php require_once('../Connections/dBconn.php'); ?>
<?php
if (!function_exists("GetSQLValueString")) {
function GetSQLValueString($theValue, $theType, $theDefinedValue = "", $theNotDefinedValue = "")
if (PHP_VERSION < 6) {
    $theValue = get_magic_quotes_gpc() ? stripslashes($theValue) : $theValue;
$theValue = function_exists("mysql_real_escape_string") ? mysql_real_escape_string($theValue) : mysql_escape_string($theValue);
switch ($theType) {
    case "text":
      $theValue = ($theValue != "") ? "'" . $theValue . "'" : "NULL";
      break;
    case "long":
    case "int":
      $theValue = ($theValue != "") ? intval($theValue) : "NULL";
      break;
    case "double":
      $theValue = ($theValue != "") ? doubleval($theValue) : "NULL";
      break;
    case "date":
      $theValue = ($theValue != "") ? "'" . $theValue . "'" : "NULL";
      break;
    case "defined":
      $theValue = ($theValue != "") ? $theDefinedValue : $theNotDefinedValue;
      break;
return $theValue;
$maxRows_getResults = 10;
$pageNum_getResults = 0;
if (isset($_GET['pageNum_getResults'])) {
$pageNum_getResults = $_GET['pageNum_getResults'];
$startRow_getResults = $pageNum_getResults * $maxRows_getResults;
$Category_getResults = "-1";
if (isset($_GET['Category'])) {
$Category_getResults = $_GET['Category'];
$Model_getResults = "-1";
if (isset($_GET['Model'])) {
$Model_getResults = $_GET['Model'];
$Color_getResults = "-1";
if (isset($_GET['Color'])) {
$Color_getResults = $_GET['Color'];
mysql_select_db($database_dBconn, $dBconn);
$query_getResults = sprintf("SELECT id, %s, Manufacturer, %s, %s, Product FROM products WHERE %s LIKE %s OR %s LIKE %s OR %s LIKE %s", GetSQLValueString($Category_getResults, "text"),GetSQLValueString($Model_getResults, "text"),GetSQLValueString($Color_getResults, "text"),GetSQLValueString($Category_getResults, "text"),GetSQLValueString("%" . $Category_getResults . "%", "text"),GetSQLValueString($Model_getResults, "text"),GetSQLValueString("%" . $Model_getResults . "%", "text"),GetSQLValueString($Color_getResults, "text"),GetSQLValueString("%" . $Color_getResults . "%", "text"));
$query_limit_getResults = sprintf("%s LIMIT %d, %d", $query_getResults, $startRow_getResults, $maxRows_getResults);
$getResults = mysql_query($query_limit_getResults, $dBconn) or die(mysql_error());
$row_getResults = mysql_fetch_assoc($getResults);
if (isset($_GET['totalRows_getResults'])) {
$totalRows_getResults = $_GET['totalRows_getResults'];
} else {
$all_getResults = mysql_query($query_getResults);
$totalRows_getResults = mysql_num_rows($all_getResults);
$totalPages_getResults = ceil($totalRows_getResults/$maxRows_getResults)-1;
?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />
<title>Untitled Document</title>
</head>
<body>
<p>Your Search Results</p>
<p> </p>
<table border="1">
<tr>
    <td>id</td>
    <td>Category</td>
    <td>Manufacturer</td>
    <td>Model</td>
    <td>Color</td>
    <td>Product</td>
</tr>
<?php do { ?>
    <tr>
      <td><?php echo $row_getResults['id']; ?></td>
      <td><?php echo $row_getResults['Category']; ?></td>
      <td><?php echo $row_getResults['Manufacturer']; ?></td>
      <td><?php echo $row_getResults['Model']; ?></td>
      <td><?php echo $row_getResults['Color']; ?></td>
      <td><?php echo $row_getResults['Product']; ?></td>
    </tr>
    <?php } while ($row_getResults = mysql_fetch_assoc($getResults)); ?>
</table>
</body>
</html>
<?php
mysql_free_result($getResults);
?>
I would like input e.g. korg in the search page and the results page will display all the record with korg either in the category or model column. At the moment there is no result on the result page.
Thanks

Hi Martin,
I did'nt have to re-start the portal. Just hitting on Preview worked. Also, these are my iView settings: The parameter "Enable KM Search Advanced" is set to True, "Show 'Open in New Window' Option" is set to True, "Show 'Details' Option" is set to True
and as Matthias advised me, in "KM Search Parameters" and "KM Search Advanced Parameters", I have "SearchPluginName=<my_search_options_set>" and "SearchCompsName=<my_search_components_set>" and also, I have "Advanced=true" for "KM Search Advanced Parameters". I agree it's a bit strange because initially it did not seem to work but after a while, I got the "Advanced Search" link back. Hope it helps.
Thanks,
Sri

Photoshop CS6 does not detect display adapter after upgrading to Windows 8

Hi, I just upgraded my 3 year old Dell XPS 16 which came with a AMD (ATI) Radeon HD 5730 (1GB) graphics card to Windows 8 (along with a new SSD hard drive), and reinstalled CS6, and now I get messages that the program is no longer detecting my dedicated graphics card. I updated the drivers from both Dell and AMD, and I get the same result.The Graphics Processor Seting box is greyed out in Preferences, and it says it detected an error in my display driver. Everything was fine with the same graphics card under Windows 7.
I suspect that when Windows 8 was installed it installed a generic AMD driver, and even though I have updated it from Dell and AMD several times, something is not quite right because I can't find the AMD Catalyst Control Center. So it might be a WIndows 8 & AMD issue, but I don't really know for sure.
If anyone has any ideas how to get the graphics driver working properly for CS6 I'd be very happy.
Thanks

Thanks everyone for all the helpful advice.
I finally gave up and called Dell (thank god for my 3 year XPS warranty). Screen shared with a techncian who was surprisingly knowledgeable, and even though he tried updating different versions of the driver for about an hour, he finally suceeded when he went through this link on the AMD site, using the driver verification tool:
http://support.amd.com/us/gpudownload/windows/Pages/radeonmob_win7-64.aspx#1
Then he downloaded the file:
13-1_mobility_vista_win7_win8_64_dd_ccc_whql
He was finally able to load up Catalyst Control Center and the proper AMD driver. CS6 now sees the graphics adapter.
Hopefully this thread helps some other poor W8 upgrader like me.

Some web pages can NOT be displayed after installing grid control 10g R3

I deployed grid control 10.2.0.3 on Linux x86-64 platform this week, but when I tried to logon the console. the Logon page can NOT be displayed. After manually directing to home page, the page showed up. I browsed several modules and found some pages work, some not. Did anyone have the same problem on the latest R3(10.2.0.3) for Linux X86-64? I use Red Hat Enterprise Linux 4 (update 3) for AMD 64bit Blade server as the OMS and repository server.
Really appreciate any help.

Thanks a lot for your reply. I didn't have any problems during installation.
Here is the files under $OMSHOME/cfgtoollogs/cfgfw
[oracle@rman11p cfgfw]$ pwd
/oracle/app/oracle/product/oms10.2/oms10g/cfgtoollogs/cfgfw
[oracle@rman11p cfgfw]$ ls -ltr
total 2668
-rw------- 1 oracle dba 0 Apr 2 14:03 oracle.sysman.top.oms_2007-04-02_03-03-55-PM.log.lck
-rw------- 1 oracle dba 0 Apr 2 14:03 oracle.sysman.top.oms_2007-04-02_03-03-55-PM.log
-rw------- 1 oracle dba 0 Apr 2 14:03 CfmLogger_2007-04-02_03-03-55-PM.log.lck
-rw------- 1 oracle dba 0 Apr 2 14:03 OuiConfigVariables_2007-04-02_03-03-56-PM.log.lck
-rw------- 1 oracle dba 0 Apr 2 14:03 OuiConfigVariables_2007-04-02_03-03-56-PM.log
-rw------- 1 oracle dba 0 Apr 2 14:03 oracle.rdbms.jazn.config_2007-04-02_03-03-56-PM.log.lck
-rw------- 1 oracle dba 0 Apr 2 14:03 oracle.rdbms.jazn.config_2007-04-02_03-03-56-PM.log
-rw------- 1 oracle dba 0 Apr 2 14:03 oracle.oid.oradas_2007-04-02_03-03-56-PM.log.lck
-rw------- 1 oracle dba 0 Apr 2 14:03 oracle.oid.oradas_2007-04-02_03-03-56-PM.log
-rw------- 1 oracle dba 0 Apr 2 14:03 oracle.java.j2ee.iascfg_2007-04-02_03-03-56-PM.log.lck
-rw------- 1 oracle dba 0 Apr 2 14:03 oracle.java.j2ee.iascfg_2007-04-02_03-03-56-PM.log
-rw------- 1 oracle dba 0 Apr 2 14:03 oracle.iappserver.repository.api_2007-04-02_03-03-56-PM.log.lck
-rw------- 1 oracle dba 0 Apr 2 14:03 oracle.iappserver.repository.api_2007-04-02_03-03-56-PM.log
-rw------- 1 oracle dba 0 Apr 2 14:03 oracle.iappserver.iasobject_2007-04-02_03-03-56-PM.log.lck
-rw------- 1 oracle dba 0 Apr 2 14:03 oracle.iappserver.iasobject_2007-04-02_03-03-56-PM.log
-rw------- 1 oracle dba 0 Apr 2 14:03 oracle.iappserver.iapptop_2007-04-02_03-03-56-PM.log.lck
-rw------- 1 oracle dba 0 Apr 2 14:03 oracle.iappserver.iapptop_2007-04-02_03-03-56-PM.log
-rw------- 1 oracle dba 0 Apr 2 14:03 oracle.iappserver.iappcore_2007-04-02_03-03-56-PM.log.lck
-rw------- 1 oracle dba 0 Apr 2 14:03 oracle.iappserver.iappcore_2007-04-02_03-03-56-PM.log
-rw------- 1 oracle dba 0 Apr 2 14:03 oracle.calypso_2007-04-02_03-03-56-PM.log.lck
-rw------- 1 oracle dba 0 Apr 2 14:03 oracle.calypso_2007-04-02_03-03-56-PM.log
-rw------- 1 oracle dba 0 Apr 2 14:03 oracle.apache.apache_2007-04-02_03-03-56-PM.log.lck
-rw------- 1 oracle dba 0 Apr 2 14:03 oracle.apache.apache_2007-04-02_03-03-56-PM.log
-rw------- 1 oracle dba 0 Apr 2 14:03 oracle.apache_2007-04-02_03-03-56-PM.log.lck
-rw------- 1 oracle dba 0 Apr 2 14:03 oracle.apache_2007-04-02_03-03-56-PM.log
-rw------- 1 oracle dba 3816 Apr 2 14:03 CfmLogger_2007-04-02_03-03-55-PM.log
-rw------- 1 oracle dba 0 Apr 2 14:05 oracle.sysman.top.oms_2007-04-02_03-05-04-PM.log.lck
-rw------- 1 oracle dba 0 Apr 2 14:05 encap_oms_2007-04-02_03-05-04-PM.log.lck
-rw------- 1 oracle dba 0 Apr 2 14:05 CfmLogger_2007-04-02_03-05-04-PM.log.lck
-rw------- 1 oracle dba 0 Apr 2 14:05 OuiConfigVariables_2007-04-02_03-05-05-PM.log.lck
-rw------- 1 oracle dba 0 Apr 2 14:05 OuiConfigVariables_2007-04-02_03-05-05-PM.log
-rw------- 1 oracle dba 0 Apr 2 14:05 oracle.rdbms.jazn.config_2007-04-02_03-05-05-PM.log.lck
-rw------- 1 oracle dba 0 Apr 2 14:05 oracle.oid.oradas_2007-04-02_03-05-05-PM.log.lck
-rw------- 1 oracle dba 0 Apr 2 14:05 oracle.oid.oradas_2007-04-02_03-05-05-PM.log
-rw------- 1 oracle dba 0 Apr 2 14:05 oracle.java.j2ee.iascfg_2007-04-02_03-05-05-PM.log.lck
-rw------- 1 oracle dba 0 Apr 2 14:05 oracle.iappserver.repository.api_2007-04-02_03-05-05-PM.log.lck
-rw------- 1 oracle dba 0 Apr 2 14:05 oracle.iappserver.repository.api_2007-04-02_03-05-05-PM.log
-rw------- 1 oracle dba 0 Apr 2 14:05 oracle.iappserver.iasobject_2007-04-02_03-05-05-PM.log.lck
-rw------- 1 oracle dba 0 Apr 2 14:05 oracle.iappserver.iasobject_2007-04-02_03-05-05-PM.log
-rw------- 1 oracle dba 0 Apr 2 14:05 oracle.iappserver.iapptop_2007-04-02_03-05-05-PM.log.lck
-rw------- 1 oracle dba 0 Apr 2 14:05 oracle.iappserver.iappcore_2007-04-02_03-05-05-PM.log.lck
-rw------- 1 oracle dba 0 Apr 2 14:05 oracle.calypso_2007-04-02_03-05-05-PM.log.lck
-rw------- 1 oracle dba 0 Apr 2 14:05 oracle.apache.apache_2007-04-02_03-05-05-PM.log.lck
-rw------- 1 oracle dba 0 Apr 2 14:05 oracle.apache_2007-04-02_03-05-05-PM.log.lck
-rw------- 1 oracle dba 0 Apr 2 14:05 oracle.apache_2007-04-02_03-05-05-PM.log
-rw------- 1 oracle dba 491 Apr 2 14:09 oracle.java.j2ee.iascfg_2007-04-02_03-05-05-PM.log
-rw------- 1 oracle dba 501 Apr 2 14:09 oracle.apache.apache_2007-04-02_03-05-05-PM.log
-rw------- 1 oracle dba 533 Apr 2 14:10 oracle.rdbms.jazn.config_2007-04-02_03-05-05-PM.log
-rw------- 1 oracle dba 457 Apr 2 14:10 oracle.calypso_2007-04-02_03-05-05-PM.log
-rw------- 1 oracle dba 629 Apr 2 14:10 oracle.iappserver.iappcore_2007-04-02_03-05-05-PM.log
-rw------- 1 oracle dba 580 Apr 2 14:56 encap_oms_2007-04-02_03-05-04-PM.log
-rw------- 1 oracle dba 2635 Apr 2 14:57 oracle.iappserver.iapptop_2007-04-02_03-05-05-PM.log
-rw-rw---- 1 oracle dba 0 Apr 2 14:59 opmn_cmd_15_59_57.log8043_ERR.log
-rw-rw---- 1 oracle dba 29 Apr 2 14:59 opmn_cmd_15_59_57.log8042_OUT.log
-rw-rw---- 1 oracle dba 0 Apr 2 14:59 emdeploy_cmd_15_59_57.log8045_ERR.log
-rw-rw---- 1 oracle dba 21993 Apr 2 15:03 emdeploy_cmd_15_59_57.log8044_OUT.log
-rw-rw---- 1 oracle dba 78 Apr 2 15:03 emca_repos_drop16_03_11.log8047_ERR.log
-rw-rw---- 1 oracle dba 439 Apr 2 15:04 emca_repos_drop16_03_11.log8046_OUT.log
-rw-rw---- 1 oracle dba 234 Apr 2 15:04 emca_repos_create16_04_13.log8049_ERR.log
-rw-rw---- 1 oracle dba 1925730 Apr 2 15:12 emca_repos_create16_04_13.log8048_OUT.log
-rw-rw---- 1 oracle dba 0 Apr 2 15:12 emctl_cmd_16_12_27.log8051_ERR.log
-rw-rw---- 1 oracle dba 3830 Apr 2 15:12 emctl_cmd_16_12_27.log8050_OUT.log
-rw-rw---- 1 oracle dba 78 Apr 2 15:12 emctl_cmd_16_12_28.log8053_ERR.log
-rw-rw---- 1 oracle dba 203 Apr 2 15:12 emctl_cmd_16_12_28.log8052_OUT.log
-rw-rw---- 1 oracle dba 156 Apr 2 15:12 emctl_cmd_16_12_30.log8055_ERR.log
-rw-rw---- 1 oracle dba 0 Apr 2 15:14 emctl_cmd_16_14_25.log8057_ERR.log
-rw-rw---- 1 oracle dba 1013 Apr 2 15:14 emctl_cmd_16_12_30.log8054_OUT.log
-rw-rw---- 1 oracle dba 0 Apr 2 15:14 jsps_cmd_16_14_37.log8059_ERR.log
-rw-rw---- 1 oracle dba 50 Apr 2 15:14 jsps_cmd_16_14_37.log8058_OUT.log
-rw-rw---- 1 oracle dba 0 Apr 2 15:14 emctl_cmd_16_14_37.log8063_ERR.log
-rw-rw---- 1 oracle dba 377 Apr 2 15:14 emctl_cmd_16_14_25.log8056_OUT.log
-rw-rw---- 1 oracle dba 0 Apr 2 15:14 additonal_cmd_16_14_37.log8061_ERR.log
-rw-rw---- 1 oracle dba 169 Apr 2 15:14 additonal_cmd_16_14_37.log8060_OUT.log
-rw-rw---- 1 oracle dba 0 Apr 2 15:14 opmn_cmd_16_14_38.log8065_ERR.log
-rw-rw---- 1 oracle dba 52 Apr 2 15:14 opmn_cmd_16_14_38.log8064_OUT.log
-rw-rw---- 1 oracle dba 122 Apr 2 15:14 emctl_cmd_16_14_37.log8062_OUT.log
-rw-rw---- 1 oracle dba 0 Apr 2 15:15 opmn_cmd_16_15_02.log8067_ERR.log
-rw-rw---- 1 oracle dba 52 Apr 2 15:15 opmn_cmd_16_15_02.log8066_OUT.log
-rw------- 1 oracle dba 153765 Apr 2 15:16 oracle.sysman.top.oms_2007-04-02_03-05-04-PM.log
-rw------- 1 oracle dba 185264 Apr 2 15:22 CfmLogger_2007-04-02_03-05-04-PM.log
[oracle@rman11p cfgfw]$

Display result Group wise

Hello experts,
Update type is key in report.
It has two values. 1000 & 2000.
I want to display result after displaying all the values of 1000.
same for 2000 values.
Ex:
1000    ICICI     100
           HDFC   200
           SBI      300
Result             600
2000    ICICI     150
           HDFC   250
           SBI      350
Result             750
Thank You.
KV

Hi KV,
keep update type and necessary other fields in rows ...
and values in columns ....
as the update type is outer most field u need to keep display on the next field in the rows ....
if u keep display of result for outer most one then it will show after the last value...
u need to keep resuls row display off for update type and keep result row display for the next field in rows... then u can get the indivudal update type result displays...as u showed...
Regards
vamsi

How to configure search results web part to display results only after a query is generated from user?

Hi All,
I am crawling documents from a file server. I created a new content source and crawled the documents. All documents are crawled successfully.
Then I went to my enterprise search center site collection and created a new result source. I have added the query to use above content source.
After that, on a page I am trying to configure the search results web part to display documents using this result source. Now the problem is:
It displays all the documents that are crawled without searching for anything. I mean first it should not display any results. If a user searches for something , then according to that search it should display results.
Any idea how to do this in the web part? I am using SharePoint 2013 on premise enterprise edition. No code. Totally OOTB.

Hi Mohan,
What did you use for the Query text in the result source?
I could reproduce this issue when I used Query text like: {searchTerms} Path:”http://sps2k13sp/sites/First/Shared%20Documents”
Then I changed the Query to
{?{searchTerms}
Path:"http://sps2k13sp/sites/First/Shared%20Documents"}
, then Search result web part didn’t return results without searching.
So , check your result source, and use the Query like the above(adding "{?...}").
I hope this helps.
Thanks,
Wendy
Wendy Li
TechNet Community Support

After displaying result of report, my report goes back to source code edito

Hello experts,
I am currently having a big problem with my report. Here is the problem, after displaying the
result(write), when I press BACK button it is not going back to my selection-screen which is the
usual for reports. Now, what happens is that it goes back to the source code or worse, to the main menu of SAP.
What I want to do is that when I press BACK button it should go to either selection-screen 500 or
selection-screen 1500.
Here's a rough flow of what is happening in my report:
start report -> fetch records based on user input -> display results(not in ALV) ->
after displaying report, click 'BACK' button -> it goes back to source code
Now, here's what I want to do:
start report -> fetch records based on user input -> display results(not in ALV) ->
after displaying report, click 'BACK' button -> go back to either selection-screen 500 or 1500
or call again the transaction of my report.
Help would be greatly appreciated here.

Hi guys,
Thanks again for the quick replies.Here is the source code:
REPORT zdealer_contacts NO STANDARD PAGE HEADING
                        LINE-COUNT 0
                        LINE-SIZE 255
                        MESSAGE-ID zz.
TYPE-POOLS: slis.
Data Dictionary Tables
TABLES: zts0001,
        zsoemailid,
        kna1,
        zts_stpgeoloc.
Includes
*INCLUDE zun_globe_header.       " Globe Telecom Report Header
Structures, internal tables and data declarations
TYPES: BEGIN OF t_upload,
        kunnr LIKE zts0001-kunnr,
        zaddress(100),
        zcperson(30),
        zcnumber(18),
       END OF t_upload.
TYPES: BEGIN OF t_error,
        kunnr LIKE zts0001-kunnr,
        zaddress(100),
        zcperson(30),
        zcnumber(18),
       END OF t_error.
TYPES: BEGIN OF t_kna1,
        name1 LIKE kna1-name1,
       END OF t_kna1.
TYPES: BEGIN OF t_zts0001,
        kunnr      LIKE zts0001-kunnr,
        cdseq      LIKE zts0001-cdseq,
        zaddress   LIKE zts0001-zaddress,
        zcperson   LIKE zts0001-zcperson,
        zcnumber   LIKE zts0001-zcnumber,
        zactivated LIKE zts0001-zactivated,
        name1      LIKE kna1-name1,
       END OF t_zts0001.
DATA: it_upload TYPE STANDARD TABLE OF t_upload WITH HEADER LINE,
      it_error   TYPE STANDARD TABLE OF t_error   WITH HEADER LINE,
      it_kna1    TYPE STANDARD TABLE OF t_kna1    WITH HEADER LINE,
      it_zts0001 TYPE STANDARD TABLE OF t_zts0001 WITH HEADER LINE.
DATA: it_ztstemp LIKE zts0001 OCCURS 100 WITH HEADER LINE,
      it_ztstemp_gloc LIKE zts_stpgeoloc OCCURS 100 WITH HEADER LINE.
*AVH - start of insertion - 04/18/06
FIELD-SYMBOLS: <fs_zts0001> LIKE LINE OF it_zts0001.
**ALV Declarations
DATA:   gt_fieldcat         TYPE slis_t_fieldcat_alv,
        g_repid             LIKE sy-repid,
        gs_layout           TYPE slis_layout_alv,
        gt_list_top_of_page TYPE slis_t_listheader,
        gt_events           TYPE slis_t_event WITH HEADER LINE,
        gt_print            TYPE slis_print_alv.
CONSTANTS: gc_top TYPE slis_formname VALUE 'TOP_OF_PAGE',
           gc_topsum TYPE slis_formname VALUE 'TOP_OF_LIST',
           gc_ucomm TYPE slis_formname VALUE 'USER_COMMAND'.
*AVH - end of insertion
Variables
DATA: v_kunnr LIKE zts0001-kunnr,
      v_title(100) TYPE c,
      gc_kunnr(06) TYPE c,
      v_compflag(1) TYPE c,
      v_flag(1).
Selection Screen
*AVH - start of modification - 06/27/06
*if user is controller, selection-screen 500 will be called else,
*selection-scren 1500 will be called.
*selection-screen for controllers
SELECTION-SCREEN BEGIN OF SCREEN 500.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pr_upld RADIOBUTTON GROUP grp2 USER-COMMAND ucomm1.
SELECTION-SCREEN COMMENT 2(20) text-007 FOR FIELD pr_upld.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 03(15) text-a11 FOR FIELD p_flnme.
PARAMETERS: p_flnme LIKE rlgrap-filename DEFAULT 'C:\'.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pr_list1 RADIOBUTTON GROUP grp2.
SELECTION-SCREEN COMMENT 2(7) text-003 FOR FIELD pr_list1.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN END OF SCREEN 500.
*selection-screen for non-controllers.
SELECTION-SCREEN BEGIN OF SCREEN 1500.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-001.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(22) text-002 FOR FIELD p_dcode.
PARAMETERS: p_dcode LIKE vbak-kunnr,
            p_name1 LIKE kna1-name1.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pr_list2 RADIOBUTTON GROUP grp USER-COMMAND ucomm2.
SELECTION-SCREEN COMMENT 2(7) text-003 FOR FIELD pr_list2.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pr_add RADIOBUTTON GROUP grp.
SELECTION-SCREEN COMMENT 2(3) text-005 FOR FIELD pr_add.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: pr_edit RADIOBUTTON GROUP grp.
SELECTION-SCREEN COMMENT 2(4) text-006 FOR FIELD pr_edit.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 03(20) text-a12 FOR FIELD p_code.
PARAMETERS: p_code LIKE zts0001-cdseq.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK b2.
SELECTION-SCREEN END OF SCREEN 1500.
INITIALIZATION.
SELECT SINGLE kunnr comp_flag INTO (gc_kunnr,v_compflag)
    FROM zsoemailid
   WHERE bname = sy-uname.
IF sy-subrc <> 0.
    MESSAGE i000 WITH
         'You are not authorised to use this transaction'.
    LEAVE PROGRAM.
ENDIF.
IF v_compflag = 'X'.
    CALL SCREEN 500.
ELSE.
    CALL SCREEN 1500.
ENDIF.
*AVH - end of modification
AT SELECTION-SCREEN OUTPUT.
PERFORM authority_check.
added by derick 050125
**-changed by weng rulloda 06012005
*AVH - start of insertion - 05/22/06
*no need to get value of kunnr from global memory
*since gc_kunnr would be filled via the select statement below
GET PARAMETER ID 'KUN' FIELD gc_kunnr.
*AVH - end of insertion
p_dcode = gc_kunnr.
*AVH - start of insertion - 05/22/06
**fetch the respective description of dealer based from p_dcode
**and put in parameter p_name1
SELECT SINGLE name1 FROM kna1
INTO p_name1
WHERE kunnr = p_dcode.
*AVH - end of insertion
*AVH - start of insertion - 05/22/06
**selection-screen parameters is based if user is controller or not.
**created new selection-screen conditions based from orig. code
v_kunnr = gc_kunnr.
LOOP AT SCREEN.
    IF screen-name      = 'P_DCODE'.
      screen-input      = '0'.
      screen-output     = '1'.
      MODIFY SCREEN.
    ELSEIF screen-name = 'P_NAME1'.
      screen-input      = '0'.
      screen-output     = '1'.
      MODIFY SCREEN.
    ELSEIF screen-name = 'P_CODE'.
      screen-input      = '0'.
      MODIFY SCREEN.
    ENDIF.
ENDLOOP.
IF pr_list2 = 'X' OR pr_add = 'X'.
    LOOP AT SCREEN.
      IF screen-name   = 'P_CODE'.
        screen-input   = '0'.
        MODIFY SCREEN.
      ENDIF.
    ENDLOOP.
ELSEIF pr_edit = 'X'.
    LOOP AT SCREEN.
      IF screen-name   = 'P_CODE'.
        screen-input = '1'.
        MODIFY SCREEN.
      ENDIF.
    ENDLOOP.
ENDIF.
IF pr_list1   = 'X'.
    LOOP AT SCREEN.
      IF screen-name   = 'P_FLNME'.
        screen-input = '0'.
        MODIFY SCREEN.
      ENDIF.
    ENDLOOP.
ENDIF.
*AVH - end of modification
AT SELECTION-SCREEN.
CHECK sy-ucomm = 'UCOMM1' OR sy-ucomm = 'UCOMM2'.
*AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_flnme.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_flnme.
CALL FUNCTION 'WS_FILENAME_GET'
       EXPORTING
            mask             = ',.,..'
            mode             = 'O'
            title            = 'File Selection'
       IMPORTING
            filename         = p_flnme
       EXCEPTIONS
            inv_winsys       = 1
            no_batch         = 2
            selection_cancel = 3
            selection_error = 4
            OTHERS           = 5.
*AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_code.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_code.
DATA : BEGIN OF itab_list OCCURS 0,
          kunnr LIKE zts0001-kunnr,
          cdseq LIKE zts0001-cdseq,
          zaddress LIKE zts0001-zaddress,
          zcperson LIKE zts0001-zcperson,
          zcnumber LIKE zts0001-zcnumber,
         END OF itab_list.
DATA: tab_fields LIKE dfies      OCCURS 0 WITH HEADER LINE,
        tab_valuetab(100) TYPE c   OCCURS 0 WITH HEADER LINE.
DATA: tab_dynnr TYPE sy-dynnr.
DATA: BEGIN OF tab_return_tab OCCURS 0.
          INCLUDE STRUCTURE ddshretval.
DATA: END OF tab_return_tab.
DATA: progname LIKE sy-repid.
CLEAR: tab_valuetab[], tab_fields[].
SELECT kunnr cdseq zaddress zcperson zcnumber
    INTO CORRESPONDING FIELDS OF TABLE itab_list
    FROM zts0001
    WHERE kunnr = v_kunnr.
tab_dynnr = sy-dynnr.
tab_fields-tabname = 'ZTS0001'.
tab_fields-fieldname = 'KUNNR'.
APPEND tab_fields.
tab_dynnr = sy-dynnr.
tab_fields-tabname = 'ZTS0001'.
tab_fields-fieldname = 'CDSEQ'.
APPEND tab_fields.
tab_fields-tabname = 'ZTS0001'.
tab_fields-fieldname = 'ZADDRESS'.
APPEND tab_fields.
tab_fields-tabname = 'ZTS0001'.
tab_fields-fieldname = 'ZCPERSON'.
APPEND tab_fields.
tab_fields-tabname = 'ZTS0001'.
tab_fields-fieldname = 'ZCNUMBER'.
APPEND tab_fields.
LOOP AT itab_list.
    tab_valuetab = itab_list-kunnr.
    APPEND tab_valuetab.
    tab_valuetab = itab_list-cdseq.
    APPEND tab_valuetab.
    tab_valuetab = itab_list-zaddress.
    APPEND tab_valuetab.
    tab_valuetab = itab_list-zcperson.
    APPEND tab_valuetab.
    tab_valuetab = itab_list-zcnumber.
    APPEND tab_valuetab.
ENDLOOP.
progname = sy-repid.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
       EXPORTING
            retfield    = 'CDSEQ'
            dynpprog    = progname
            dynpnr      = '1000'
            dynprofield = 'P_CODE'
       TABLES
            value_tab   = tab_valuetab
            field_tab   = tab_fields
            return_tab = tab_return_tab
       EXCEPTIONS
            OTHERS      = 0.
START-OF-SELECTION.
IF pr_edit = 'X' AND p_code IS INITIAL.
    MESSAGE i008 WITH 'Please specify a ship-to code.'.
     LEAVE TO TRANSACTION 'ZDCONTACT'.
ENDIF.
PERFORM get_data.
IF pr_upld = 'X'.
    PERFORM upload_file.
ELSEIF pr_add = 'X'.
    PERFORM add_record.
ELSEIF pr_edit = 'X'.
    PERFORM edit_record.
ELSEIF pr_list1 = 'X' OR pr_list2 = 'X'.
    PERFORM display_alv.
ENDIF.
END-OF-SELECTION.
based from ALV PF-STATUS
IF sy-ucomm = '&F03'.                  "BACK
   LEAVE TO TRANSACTION 'ZDCONTACT'.
ELSEIF sy-ucomm = '&F15'.              "EXIT
   LEAVE TO TRANSACTION 'ZDCONTACT'.
ELSEIF sy-ucomm = '&F12'.              "CANCEL
   LEAVE TO TRANSACTION 'ZDCONTACT'.
ENDIF.
*&      Form authority_check
FORM authority_check.
CALL FUNCTION 'AUTHORITY_CHECK'
       EXPORTING
            field1              = 'TCD' "MDM
            object              = 'S_TCODE'
            user                = sy-uname
            value1              = 'ZMEN'
           VALUE3              = '01' MDM
       EXCEPTIONS
            user_dont_exist     = 1
            user_is_authorized = 2
            user_not_authorized = 3
            user_is_locked      = 4
            OTHERS              = 5.
IF sy-subrc NE 2.
**-added by weng 04/28/2006
**-if user is not authorized to use dealer portal check if he is
**- authorized to use the tcode ZDCONTACT
    CALL FUNCTION 'AUTHORITY_CHECK'
         EXPORTING
              field1              = 'TCD' "MDM
              object              = 'S_TCODE'
              user                = sy-uname
              value1              = 'ZDCONTACT'
           VALUE3              = '01' MDM
         EXCEPTIONS
              user_dont_exist     = 1
              user_is_authorized = 2
              user_not_authorized = 3
              user_is_locked      = 4
              OTHERS              = 5.
**-weng
    IF sy-subrc NE 2.
      MESSAGE i000 WITH
        'You are not authorised to use this transaction'.
      LEAVE PROGRAM.
    ENDIF.
ENDIF.
ENDFORM.                    " AUTHORITY_CHECK
*&      Form get_data
FORM get_data.
*AVH - start of insertion - 04/19/06
**records selected from table zts0001 that has been marked as
**activated will be fetched otherwise, ignore.
IF v_kunnr IS INITIAL.
    SELECT * INTO CORRESPONDING FIELDS OF TABLE it_zts0001
      FROM zts0001.
ELSEIF v_compflag = 'X'.
    SELECT * INTO CORRESPONDING FIELDS OF TABLE it_zts0001
       FROM zts0001.
ELSE.
    SELECT * INTO CORRESPONDING FIELDS OF TABLE it_zts0001
       FROM zts0001
       WHERE kunnr = v_kunnr.
ENDIF.
*AVH - start of insertion - 05/24/06
**fetch name based from kunnr and put in itab
LOOP AT it_zts0001 ASSIGNING <fs_zts0001>.
    SELECT SINGLE name1 FROM kna1
    INTO <fs_zts0001>-name1
    WHERE kunnr = <fs_zts0001>-kunnr.
ENDLOOP.
*AVH - end of insertion
ENDFORM.                    " get_data
*&      Form Upload_file
FORM upload_file.
DATA: lv_seq(5) TYPE n,
        lv_ctr(5) TYPE c,
        lv_kunnr LIKE it_upload-kunnr.
v_title = 'Upload from File'.
CALL FUNCTION 'WS_UPLOAD'
       EXPORTING
            filename = p_flnme
            filetype = 'DAT'
       TABLES
            data_tab = it_upload
       EXCEPTIONS
            OTHERS   = 1.
IF sy-subrc <> 0.
    MESSAGE i008 WITH 'File does not exist.'.
    IF v_compflag IS INITIAL.
      LEAVE TO TRANSACTION 'ZDCONTACT'.
    ELSE.
      LEAVE TO TRANSACTION 'ZDCONTACT'.
    ENDIF.
ENDIF.
CHECK sy-subrc EQ 0.
DELETE it_upload
    WHERE zaddress EQ space
      AND zcperson EQ space
      AND zcnumber EQ space.
SORT it_zts0001 BY kunnr ASCENDING cdseq DESCENDING.
SORT it_upload BY kunnr ASCENDING.
LOOP AT it_upload.
    lv_kunnr = it_upload-kunnr.
    AT NEW kunnr.
AVH - start of insertion - 06/30/06
      SELECT SINGLE kunnr FROM zsoemailid
      INTO lv_kunnr
      WHERE kunnr = it_upload-kunnr.
if it_upload-kunnr is not found in table ZSOEMAILID, it will
not be included in the upload.
      IF sy-subrc <> 0.
        DELETE it_upload.
        CLEAR it_upload.
        CONTINUE.
      ENDIF.
AVH - end of insertion
      READ TABLE it_zts0001 WITH KEY kunnr = lv_kunnr.
      IF sy-subrc EQ 0.
        lv_seq = it_zts0001-cdseq.
      ELSE.
        CLEAR lv_seq.
      ENDIF.
    ENDAT.
    IF it_upload-zaddress IS INITIAL.
      MOVE-CORRESPONDING it_upload TO it_error.
      APPEND it_error.
      CLEAR it_error.
    ELSE.
      REPLACE '"' WITH '' INTO it_upload-zaddress.
      REPLACE '"' WITH '' INTO it_upload-zaddress.
      REPLACE '"' WITH '' INTO it_upload-zcperson.
      REPLACE '"' WITH '' INTO it_upload-zcperson.
      CONDENSE it_upload-zaddress.
      CONDENSE it_upload-zcperson
      ADD 1 TO lv_seq.
      MOVE: it_upload-kunnr    TO it_ztstemp-kunnr,
            lv_seq             TO it_ztstemp-cdseq,
            it_upload-zaddress TO it_ztstemp-zaddress,
            it_upload-zcperson TO it_ztstemp-zcperson,
            it_upload-zcnumber TO it_ztstemp-zcnumber,
            'X'                TO it_ztstemp-zactivated,
            sy-uname           TO it_ztstemp-zcreated_by,
            sy-datum           TO it_ztstemp-zchanged_date.
      MOVE-CORRESPONDING it_ztstemp TO it_ztstemp_gloc.
      APPEND: it_ztstemp, it_ztstemp_gloc.
      CLEAR: it_ztstemp, it_ztstemp_gloc.
    ENDIF.
ENDLOOP.
IF NOT it_ztstemp[] IS INITIAL.
    INSERT zts0001 FROM TABLE it_ztstemp.
    INSERT zts_stpgeoloc FROM TABLE it_ztstemp_gloc.
    WRITE:/ 'List of Records Uploaded.' COLOR 1 INTENSIFIED ON.
    FORMAT COLOR 1 INTENSIFIED OFF.
    WRITE:/(020) 'Dealer Code' CENTERED,
           (007) 'Code'         CENTERED,
           (100) 'Address',
           (030) 'Contact Person' CENTERED,
           (018) 'Contact Number' CENTERED.
    FORMAT COLOR OFF.
    WRITE:/(179) sy-uline.
    DESCRIBE TABLE it_ztstemp LINES lv_ctr.
    SORT it_ztstemp BY kunnr cdseq.
    LOOP AT it_ztstemp.
      WRITE:/(020) it_ztstemp-kunnr,
             (007) it_ztstemp-cdseq,
             (100) it_ztstemp-zaddress,
             (030) it_ztstemp-zcperson,
             (018) it_ztstemp-zcnumber.
    ENDLOOP.
    SKIP 1.
    WRITE:/ 'TOTAL :', lv_ctr.
ENDIF.
IF NOT it_error[] IS INITIAL.
    SKIP 2.
    FORMAT COLOR 1 INTENSIFIED OFF.
    WRITE:/(020) 'Dealer Code' CENTERED,
           (030) 'Contact Person' CENTERED,
           (018) 'Contact Number' CENTERED.
    FORMAT COLOR OFF.
    WRITE:/(070) sy-uline.
    DESCRIBE TABLE it_error LINES lv_ctr.
    SORT it_error BY kunnr zcperson.
    LOOP AT it_error.
      WRITE:/ 'With No Address.' COLOR 6 INTENSIFIED ON.
      WRITE:/(020) it_error-kunnr,
             (030) it_error-zcperson,
             (018) it_error-zcnumber.
    ENDLOOP.
    SKIP 1.
    WRITE:/ 'TOTAL :', lv_ctr.
ENDIF.
ENDFORM.                    " Upload_file
*&      Form add_record
FORM add_record.
v_title = ''.
IF NOT v_kunnr IS INITIAL.
    SUBMIT zdealer_contacts_add_edit AND RETURN
                                     WITH p_kunnr = v_kunnr
                                     WITH p_name1 = p_name1 "AVH
                                     WITH p_cdseq = space
                                     WITH p_flag = 'A'
                                     WITH p_addr = it_zts0001-zaddress
                                     WITH p_pers = it_zts0001-zcperson
                                     WITH p_numb = it_zts0001-zcnumber
                                     VIA SELECTION-SCREEN.
ENDIF.
    LEAVE TO TRANSACTION 'ZDCONTACT'.
ENDFORM.                    " add_record
*&      Form edit_record
FORM edit_record.
v_title = ''.
READ TABLE it_zts0001 WITH KEY kunnr = v_kunnr
                                 cdseq = p_code.
IF sy-subrc EQ 0.
    SUBMIT zdealer_contacts_add_edit AND RETURN
                                     WITH p_kunnr = v_kunnr
                                     WITH p_name1 = p_name1 "AVH
                                     WITH p_cdseq = p_code
                                     WITH p_flag = 'E'
                                     WITH p_addr = it_zts0001-zaddress
                                     WITH p_pers = it_zts0001-zcperson
                                     WITH p_numb = it_zts0001-zcnumber
                                     WITH v_controller = v_compflag
                                     VIA SELECTION-SCREEN.
ELSE.
    MESSAGE i008 WITH 'No record found.'.
    CALL TRANSACTION 'ZDCONTACT'.
ENDIF.
    LEAVE TO TRANSACTION 'ZDCONTACT'.
ENDFORM.                    " edit_record
*&      Form display_records
*FORM display_records.
IF NOT it_zts0001[] IS INITIAL.
   v_title = 'List of Dealer Contacts'.
   FORMAT COLOR 1 INTENSIFIED OFF.
   WRITE:/(020) 'Customer Number' CENTERED,
          (007) 'Code' CENTERED,
          (100) 'Address',
          (030) 'Contact Person' CENTERED,
          (018) 'Contact Number' CENTERED.
   FORMAT COLOR OFF.
   WRITE:/(179) sy-uline.
   SORT it_zts0001 BY kunnr cdseq.
   LOOP AT it_zts0001.
     WRITE:/(020) it_zts0001-kunnr,
            (007) it_zts0001-cdseq,
            (100) it_zts0001-zaddress,
            (030) it_zts0001-zcperson,
            (018) it_zts0001-zcnumber.
   ENDLOOP.
ELSE.
   MESSAGE i008 WITH 'No records to display.'.
ENDIF.
*ENDFORM.                    " display_records
*&      Form display_alv
FORM display_alv.
SORT it_zts0001 BY kunnr cdseq.
PERFORM f_build_layout USING gs_layout.
PERFORM f_init_fieldcat USING gt_fieldcat[].
PERFORM f_init_events USING 'BACK' gt_events[].
g_repid = sy-repid.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
       EXPORTING
            i_callback_program      = g_repid
            i_callback_top_of_page = 'TOP_OF_PAGE'
            i_callback_user_command = 'USER_COMMAND'
            is_layout               = gs_layout
            it_fieldcat             = gt_fieldcat[]
            it_events               = gt_events[]
            i_save                  = 'X'
           it_sort                 = gt_sort
       TABLES
            t_outtab                = it_zts0001[]
       EXCEPTIONS
            program_error           = 1
            OTHERS                  = 2.
IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
ENDFORM.                    " DISPLAY_ALV
      FORM top_of_page                                          *
FORM top_of_page.
*ALV Header declarations
DATA: t_header TYPE slis_t_listheader,
        wa_header TYPE slis_listheader,
        t_line LIKE wa_header-info,
        lv_title(60),
        lv_user(60),
        lv_date(10),
        lv_time(10),
        lv_time_n_date(30),
        lv_dcode_n_name(150),
        lv_dlr_n_desc(100),
        ld_lines TYPE i,
        ld_linesc(10) TYPE c.
Title
CLEAR: lv_title, wa_header.
MOVE sy-title TO lv_title.
wa_header-typ = 'H'.
wa_header-info = lv_title.
APPEND wa_header TO t_header.
CLEAR wa_header.
User
CLEAR: lv_user, wa_header.
CONCATENATE: 'Generated by:' sy-uname
               INTO lv_user SEPARATED BY space.
wa_header-typ = 'A'.
wa_header-info = lv_user.
APPEND wa_header TO t_header.
CLEAR wa_header.
*Date and time
CLEAR: lv_date, lv_time.
WRITE: sy-datum TO lv_date MM/DD/YYYY,
         sy-uzeit TO lv_time USING EDIT MASK '__:__:__'.
CONCATENATE: 'Generated on:' lv_date lv_time
    INTO lv_time_n_date SEPARATED BY space.
wa_header-typ = 'A'.
wa_header-info = lv_time_n_date.
APPEND wa_header TO t_header.
CLEAR wa_header.
IF NOT v_kunnr IS INITIAL AND v_compflag IS INITIAL.
*Dealer code and name
    CONCATENATE: 'Dealer:' p_dcode p_name1
      INTO lv_dcode_n_name SEPARATED BY space.
    wa_header-typ = 'A'.
    wa_header-info = lv_dcode_n_name.
    APPEND wa_header TO t_header.
    CLEAR wa_header.
ENDIF.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
       EXPORTING
            it_list_commentary = t_header.
ENDFORM.                    " TOP_OF_PAGE
      FORM f_build_layout                                           *
--> %LAYOUT                                                       *
FORM f_build_layout USING %layout TYPE slis_layout_alv.
%layout-zebra             = 'X'.
%layout-colwidth_optimize = 'X'.
ENDFORM.                    " F_BUILD_LAYOUT
      FORM f_init_fieldcat                                          *
--> %FIELDCAT                                                     *
FORM f_init_fieldcat USING %fieldcat TYPE slis_t_fieldcat_alv.
DATA: lc_fieldcat TYPE slis_fieldcat_alv.
CLEAR lc_fieldcat.
DEFINE m_field.
    add 1 to lc_fieldcat-col_pos.
    lc_fieldcat-fieldname   = &1.
    lc_fieldcat-outputlen   = &2.
    lc_fieldcat-seltext_l   = &3.
    lc_fieldcat-do_sum      = &4.
    lc_fieldcat-inttype     = &5.
    lc_fieldcat-hotspot     = &6.
    lc_fieldcat-fix_column = &7.
    lc_fieldcat-ddictxt     = 'L'.
    lc_fieldcat-no_zero     = 'X'.
    append lc_fieldcat to %fieldcat.
END-OF-DEFINITION.
IF v_kunnr IS INITIAL.
    m_field 'KUNNR' '5' 'Dealer Code'            '' '' '' ''.
ENDIF.
IF v_compflag = 'X'.
    m_field 'KUNNR' '5' 'Dealer Code'        '' '' '' ''.
ENDIF.
IF v_compflag = 'X'.
    m_field 'NAME1'    '40' 'Dealer Name'        '' '' '' ''.
ENDIF.
m_field 'CDSEQ' '05' 'Ship-To Code'            '' '' '' ''.
m_field 'ZADDRESS' '100' 'Address'             '' '' '' ''.
m_field 'ZCPERSON' '30' 'Contact Person'       '' '' '' ''.
m_field 'ZCNUMBER' '18' 'Contact Number'       '' '' '' ''.
IF v_kunnr IS INITIAL.
    m_field 'NAME1'    '40' 'Dealer Name'        '' '' '' ''.
ENDIF.
m_field 'ZACTIVATED' '1' 'Activated'           '' '' '' ''.
ENDFORM.                    " f_init_fieldcat
      FORM f_init_events                                            *
--> P_TYPE                                                        *
--> %EVENTS                                                       *
FORM f_init_events USING p_type CHANGING %events TYPE slis_t_event.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
       EXPORTING
            i_list_type     = 0
       IMPORTING
            et_events       = %events
       EXCEPTIONS
            list_type_wrong = 1
            OTHERS          = 2.
IF sy-subrc = 0.
    PERFORM f_build_events USING: slis_ev_user_command.
   IF p_type = 'TOP'.
     PERFORM f_build_events USING: gc_top.
   ELSEIF p_type = 'SUM'.
     PERFORM f_build_events_sum USING: gc_topsum.
   ENDIF.
ELSE.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
ENDFORM.                    " F_INIT_EVENTS
      FORM user_command                                             *
--> P_UCOMM                                                       *
--> P_SELFIELD                                                    *
FORM user_command USING p_ucomm LIKE sy-ucomm
                        p_selfield TYPE slis_selfield.
CASE p_ucomm.
    WHEN 'E'.
      CALL SELECTION-SCREEN 500.
ENDCASE.
ENDFORM.
      FORM f_build_events                                           *
--> %EVENT                                                        *
FORM f_build_events USING %event.
READ TABLE gt_events WITH KEY name = %event.
IF sy-subrc = 0.
    MOVE: %event TO gt_events-form.
    MOVE 'USER_COMMAND' TO gt_events-form.
    MODIFY gt_events INDEX sy-tabix.
ENDIF.
ENDFORM.                    " F_BUILD_EVENTS

MRP list MD05 not displyaing results where as MD04 displays results

Dear Experts,
We have a peculiar problem in SAP, MRP list MD05 not displyaing results where as MD04 displays results.
Please suggest me how to find out the error and what could be the reasons.

Dear Kannaiyan.
MD05 displays the results of the last MRP run,where in you will be able to see the stock,requirements and receipts that was
available during the output of MRP.It's a static one and changes after every MRP run.
MD04 - stock/requirements list displays the newly created requirements,stock on that time.It's dynamic one.
Regards
S Mangalraj

SAP Bex: Not Enough cells to display result

Hi,
In BW 3,5 Analyzer, if user typed some values next to the reported columns and then tried to drill down on columns say characteristics profit center, the system used to display a message with options like below:
''SAP Bex: Not enough cells to display result
-TO extend the result areas to the right:
0 Overwirte the existing cells
0 insert cells next to the results area
0 insert entire columns''
After upgrading the query to 7.0, the Analyzer does not pop-up this information and it simply overwrites the existing cells.
Can you please advise, if there are some settings in BI 7.0 which can enable pop-up of this information window with above options?
Please suggest.
Best Regards,
UR

Hi,
Try setting the cells which are not to be overwritten as formulas and refreshing them which may not overwrite those cells.
Thanks,
Arun

Screen fields not getting displayed after Line 16

Hi All,
There is a screen exit created in IW51, now the new requirment is to add 3 more fields. I added the fields below the exiting fields, in line number 15 , 16 &17. After executing the Tcode I could find that the field created in line 17 is not getting displayed in runtime. I have increased the screen length. The fields if moved to line numbers below 16 then they are getting displayed. Can anyone help me to find why it is not getting displayed after line 16.

Hi,
Can you give me the Enhancement name?
I searched for the exits using package , but i did not find any screen exists for that IW51 Tcode?

Custom message is not getting displayed after raising do_not_save

Hi all,
In Order_save BADI, based some conditions, we were throwing custom messages.
FYI., code used,
CV_OWN_MESSAGE = 'X'.
MESSAGE 'xxxxxxxxxxxxxx' TYPE 'W' Raising do_not_save.
After Solman upgrade from 7.0 to 7.1, system is not displaying custom message and
system throwing message like "The document could not be saved" only after execution of above message statement.
How can I overwrite this system message.
Any help would be highly appreciated.
-Mahi

Hi,
Please check the below notes
1922870 - Raising DO_NOT_SAVE event from ORDER_SAVE BADI cause dump
1650635 - Work Center: problems when using BAdI ORDER_SAVE
Rg,
Karthik

After installation of latest Bridge and Photoshop version (2014.2.2) *.CR2 files will not be displayed correctly, neither in preview nor in Camera Raw dialog.

After installation of latest Bridge and Photoshop version (2014.2.2) *.CR2 files will not be displayed correctly anymore, neither in preview nor in Camera Raw dialogue.
Some pictures have white squares with blue and red diagonal stripes that cover almost the complete picture.
When opening those files I have the same problem in Camera Raw dailogue and even in Photoshop eventually.
I tried to open the same same pictures on another computer with the same version of Bridge and Photoshop but the problem remains the same.
It seems like the files itselves are still ok, because if you open an explorer window the previews of the pictures are all ok. And the pictures' sizes remain the same.
I tried to clear the cache in both programs but it didn't help.
Has anyone an idea????

First see if a reboot of your PC helps. If not,
Resets may be in order:
Photoshop: Press and hold Control - Shift - Alt immediately upon cold-starting Photoshop. If you get the keys down quickly enough - and you have to be VERY quick - it will prompt you to confirm deletion of your established preferences, which will lead to them all being set to defaults.
Bridge: Start Adobe Bridge and immediately press Ctrl+Alt+Shift (Windows) or Command+Option+Shift (Mac OS) until the Reset Settings dialog box appears. Select all three options--Reset Preferences, Reset Standard Workspaces, and Purge Entire Thumbnail Cache--and then click OK.
Outdated graphics drivers can also cause display problems. Go to your GPU maker's website and be sure you have the latest drivers for your card model.

I just bought a new Retina Display macbook pro, and I plugged in my iPod touch (4th gen) into the new computer, but it will not show up, even after I typed in the passcode. How do I get my iTouch to sync with my new computer without restoring my itouch?

I just bought a new Retina Display macbook pro, and I plugged in my iPod touch (4th gen) into the new computer, but it will not show up, even after I typed in the passcode. How do I get my iTouch to sync with my new computer without restoring my itouch?

iOS: Device not recognized in iTunes for Mac OS X

Not to Display Result after Re voting in Quick poll

Similar Messages

Maybe you are looking for