Bug report:  double clicking a DataAction

following the information in the bug, here is what I copied:
Message
BME-99009: An error has occured in the Java VM.
Cause
An operation has failed because an error has occurred in the Java VM. The current activity may fail and the system may have been left in an unstable state. The following is a stack trace.
java.lang.StackOverflowError
Action
If further errors occur, you should restart the application.
If the error was an OutOfMemoryError, try closing some components, such as some diagrams, or increase the Java heap size.
Also, report the problem on the JDeveloper forum on otn.oracle.com, or contact Oracle support, giving the information in this message.
I was trying to double click and create the "action class" on a data action.

It appears that this bug is caused when a "DataAction" class is not assigned to the struts action. I created the class, inherited oracle's DataAction class, and then pointed the struts config to the right file. Now, double clicking on the dataAction gets the correct .java file to pop up.

Similar Messages

  • JDeveloper IDE Crashing using double click on DataAction in struts-diagram.

    Hello,
    Has anyone had this problem with Jdeveloper10g?
    We have a workspace for an application that has grown fairly large. The
    problem happens when we try to drag a DataAction from the Component Palette
    onto the struts-diagram when in the the JDeveloper10g IDE and then
    double click the icon to create a data action. We get this message:
    An Error has occurred in the Java VM
    An operation has failed because an error has occurred in the Java VM. The current
    activity may fail and the system may have been left in an unstable state. The following
    is a stack trace.
    java.lang.StackOverflowError
    If further errors occur, you should restart the application.
    If the error was an OutOfMemoryError, try closing some components, such as some
    diagrams, or increase the Java heap size.
    Also, report the problem on the JDeveloper forum on otn.oracle.com, or contact Oracle
    support, giving the information in this message.
    The Version of JDeveloper we are using is: 10.1.2.1.0 Build 1913 but we also had the
    same problem using this same workspace in Build 1811. If we try a different workspace
    there is no problem and we don't see the issue. Neither do we see the problem if we drag
    either a DataPage or a plain Action from the Component Palette and the double click
    either of those to create a Jsp page or an action.
    We have spent hours using diffing software recursively on the workspace directories trying
    to determine what may have gone wrong. We have eliminated a great deal from the problem
    workspace including deleting everything from the struts-diagram (In a copy of the ws of course).
    We really can't afford to rebuild the workspace from scratch and this problem causes us a
    significant headache. It seems like a serious bug in JDeveloper itself.
    Any help would be appreciated.
    Thanks,

    Problem Solved! This condition is caused by a circular dependency set up when the view was checked as a depndency for the model. We had a small class in the view that was being used in the model so the model was made dependant on the view and this causes an infinite loop condition of some sort when double clicking on a newly dropped in DataAction as described below.

  • Bug Report: Double print dialogue in Mac OS X

    Steps to recreate:
    Open a document and choose File -> Print or Command-P on the keyboard
    Make your selections in the adobe print options menu and click "print"
    Observe that the Mac OS X print dialogue box is now displayed.
    Correct behavior:
    There should be no step three, above.
    System Info:
    Adobe Photoshop Version: 13.0 (13.0 20120305.m.415 2012/03/05:21:00:00) x64
    Operating System: Mac OS 10.7.3
    System architecture: Intel CPU Family:6, Model:37, Stepping:5 with MMX, SSE Integer, SSE FP, SSE2, SSE3, SSE4.1, SSE4.2, HyperThreading
    Physical processor count: 2
    Logical processor count: 4
    Processor speed: 2400 MHz
    Built-in memory: 8192 MB
    Free memory: 4224 MB
    Memory available to Photoshop: 6786 MB
    Memory used by Photoshop: 70 %
    Image tile size: 1024K
    Image cache levels: 4
    OpenGL Drawing: Enabled.
    OpenGL Drawing Mode: Normal
    OpenGL Allow Normal Mode: True.
    OpenGL Allow Advanced Mode: True.
    OpenGL Allow Old GPUs: Not Detected.
    OpenGL Version: 2.1 NVIDIA-7.18.11
    OpenCL Unavailable
    Video Card Vendor: NVIDIA Corporation
    Video Card Renderer: NVIDIA GeForce GT 330M OpenGL Engine
    Display: 1
    Main Display
    Display Depth:= 32
    Display Bounds:=  top: 0, left: 0, bottom: 1050, right: 1680
    Video Renderer ID: 16918034
    Video Card Memory: 228 MB
    Video Rect Texture Size: 8192
    Serial number: Tryout Version
    Application folder: SledgeHammer:Applications:Adobe Photoshop CS6:
    Photoshop scratch has async I/O enabled
    Scratch volume(s):
      SledgeHammer, 446.8G, 215.8G free
    Required Plug-ins folder: SledgeHammer:Applications:Adobe Photoshop CS6:Adobe Photoshop CS6.app:Contents:Required:
    Primary Plug-ins folder: SledgeHammer:Applications:Adobe Photoshop CS6:Plug-ins:
    Additional Plug-ins folder: not set
    Installed components:
       adbeape.framework   adbeape   3.3.8.19346   66.1025012
       AdbeScriptUIFlex.framework   AdbeScriptUIFlex   6.2.29.18602   66.490082
       adobe_caps.framework   adobe_caps   5.0.11.0   1.256674
       AdobeACE.framework   AdobeACE   2.19.18.19243   66.492997
       AdobeAGM.framework   AdobeAGM   4.26.17.19243   66.492997
       AdobeAXE8SharedExpat.framework   AdobeAXE8SharedExpat   3.7.101.18636   66.26830
       AdobeAXEDOMCore.framework   AdobeAXEDOMCore   3.7.101.18636   66.26830
       AdobeBIB.framework   AdobeBIB   1.2.02.19243   66.492997
       AdobeBIBUtils.framework   AdobeBIBUtils   1.1.01   66.492997
       AdobeCoolType.framework   AdobeCoolType   5.10.31.19243   66.492997
       AdobeCrashReporter.framework   AdobeCrashReporter   6.0.20120201  
       AdobeExtendScript.framework   AdobeExtendScript   4.2.12.18602   66.490082
       AdobeJP2K.framework   AdobeJP2K   2.0.0.18562   66.236923
       AdobeLinguistic.framework      17206  
       AdobeMPS.framework   AdobeMPS   5.8.0.19463   66.495174
       AdobeOwl.framework   AdobeOwl   4.0.93   66.496052
       AdobePDFL.framework   AdobePDFL   10.0.1.18562   66.419471
       AdobePDFSettings.framework   AdobePDFSettings   1.4  
       AdobePIP.framework   AdobePIP   6.0.0.1642  
       AdobeScCore.framework   AdobeScCore   4.2.12.18602   66.490082
       AdobeUpdater.framework   AdobeUpdater   6.0.0.1452   "52.338651"
       AdobeXMP.framework   AdobeXMPCore   66.145661   66.145661
       AdobeXMPFiles.framework   AdobeXMPFiles   66.145661   66.145661
       AdobeXMPScript.framework   AdobeXMPScript   66.145661   66.145661
       ahclient.framework   ahclient   1.7.0.56  
       aif_core.framework   AdobeAIF   3.0.00   62.490293
       aif_ocl.framework   AdobeAIF   3.0.00   62.490293
       aif_ogl.framework   AdobeAIF   3.0.00   62.490293
       AlignmentLib.framework   xcode   1.0.0.1  
       amtlib.framework   amtlib   6.0.0.75  
       boost_date_time.framework   boost_date_time   6.0.0.0  
       boost_signals.framework   boost_signals   6.0.0.0  
       boost_system.framework   boost_system   6.0.0.0  
       boost_threads.framework   boost_threads   6.0.0.0  
       Cg.framework   NVIDIA Cg     
       CIT.framework   CIT   2.0.5.19287   145486
       data_flow.framework   AdobeAIF   3.0.00   62.490293
       dvaaudiodevice.framework   dvaaudiodevice   6.0.0.0  
       dvacore.framework   dvacore   6.0.0.0  
       dvamarshal.framework   dvamarshal   6.0.0.0  
       dvamediatypes.framework   dvamediatypes   6.0.0.0  
       dvaplayer.framework   dvaplayer   6.0.0.0  
       dvatransport.framework   dvatransport   6.0.0.0  
       dvaunittesting.framework   dvaunittesting   6.0.0.0  
       dynamiclink.framework   dynamiclink   6.0.0.0  
       FileInfo.framework   FileInfo   66.145433   66.145433
       filter_graph.framework   AdobeAIF   3.0.00   62.490293
       hydra_filters.framework   AdobeAIF   3.0.00   62.490293
       ICUConverter.framework   ICUConverter   3.61   "gtlib_3.0" "." "16615"
       ICUData.framework   ICUData   3.61   "gtlib_3.0" "." "16615"
       image_compiler.framework   AdobeAIF   3.0.00   62.490293
       image_flow.framework   AdobeAIF   3.0.00   62.490293
       image_runtime.framework   AdobeAIF   3.0.00   62.490293
       LogSession.framework   LogSession   2.1.2.1640  
       mediacoreif.framework   mediacoreif   6.0.0.0  
       PlugPlug.framework   PlugPlug   3.0.0.383  
       UpdaterNotifications.framework   UpdaterNotifications   6.0.0.24   "6.0.0.24"
       wrservices.framework        
    Required plug-ins:
       3D Studio 13.0 20120305.m.415 2012/03/05:21:00:00  ©2006-2012 Adobe Systems Incorporated - from the file “U3D.plugin”
       Accented Edges 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Adaptive Wide Angle 13.0, Copyright © 2012 Adobe Systems Incorporated - from the file “Adaptive Wide Angle.plugin”
       ADM 3.10x16, Copyright © 1987-2008 Adobe Systems Inc.  All rights reserved. - from the file “AdobeADM.bundle”
       Angled Strokes 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Average 13.0 20120305.m.415 2012/03/05:21:00:00  ©1993-2012 Adobe Systems Incorporated - from the file “Average.plugin”
       Bas Relief 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       BMP 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       Camera Raw 7.0 (308), Copyright © 2012 Adobe Systems Incorporated - from the file “Camera Raw.plugin”
       Chalk & Charcoal 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Charcoal 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Chrome 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Cineon 13.0 20120305.m.415 2012/03/05:21:00:00  ©2002-2012 Adobe Systems Incorporated - from the file “Cineon.plugin”
       Clouds 13.0 20120305.m.415 2012/03/05:21:00:00  ©1993-2012 Adobe Systems Incorporated - from the file “Clouds.plugin”
       Collada DAE 13.0 20120305.m.415 2012/03/05:21:00:00  ©2006-2012 Adobe Systems Incorporated - from the file “U3D.plugin”
       Color Halftone 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       Colored Pencil 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       CompuServe GIF 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       Conté Crayon 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Craquelure 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Crop and Straighten Photos 13.0 20120305.m.415 2012/03/05:21:00:00  ©2003-2012 Adobe Systems Incorporated - from the file “CropPhotosAuto.plugin”
       Crop and Straighten Photos Filter 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       Crosshatch 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Crystallize 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       Cutout 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Dark Strokes 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       De-Interlace 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       Dicom 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “dicom.plugin”
       Difference Clouds 13.0 20120305.m.415 2012/03/05:21:00:00  ©1993-2012 Adobe Systems Incorporated - from the file “Clouds.plugin”
       Diffuse Glow 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Displace 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       Dry Brush 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Eazel Acquire 13.0 20120305.m.415 2012/03/05:21:00:00  ©1997-2012 Adobe Systems Incorporated - from the file “EazelAcquire.plugin”
       Embed Watermark NO VERSION - from the file “DigiSign.plugin”
       Enable Async I/O 13.0 20120305.m.415 2012/03/05:21:00:00  © 2004-2012 Adobe Systems Incorporated - from the file “Enable Async IO.plugin”
       Entropy 13.0 20120305.m.415 2012/03/05:21:00:00  ©2006-2012 Adobe Systems Incorporated - from the file “statistics.plugin”
       Extrude 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       FastCore Routines 13.0 20120305.m.415 2012/03/05:21:00:00  ©1990-2012 Adobe Systems Incorporated - from the file “FastCore.plugin”
       Fibers 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       Film Grain 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Filter Gallery 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Flash 3D 13.0 20120305.m.415 2012/03/05:21:00:00  ©2006-2012 Adobe Systems Incorporated - from the file “U3D.plugin”
       Fresco 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Glass 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Glowing Edges 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Google Earth 4 KMZ 13.0 20120305.m.415 2012/03/05:21:00:00  ©2006-2012 Adobe Systems Incorporated - from the file “U3D.plugin”
       Grain 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Graphic Pen 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Halftone Pattern 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       HDRMergeUI 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “HDRMergeUI.plugin”
       IFF Format 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       Ink Outlines 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       JPEG 2000 13.0 20120305.m.415 2012/03/05:21:00:00  ©2001-2012 Adobe Systems Incorporated - from the file “JPEG2000.plugin”
       Kurtosis 13.0 20120305.m.415 2012/03/05:21:00:00  ©2006-2012 Adobe Systems Incorporated - from the file “statistics.plugin”
       Lens Blur 13.0, Copyright © 2002-2012 Adobe Systems Incorporated - from the file “Lens Blur.plugin”
       Lens Correction 13.0, Copyright © 2002-2012 Adobe Systems Incorporated - from the file “Lens Correct.plugin”
       Lens Flare 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       Liquify 13.0, Copyright © 2001-2012 Adobe Systems Incorporated - from the file “Liquify.plugin”
       Matlab Operation 13.0 20120305.m.415 2012/03/05:21:00:00  ©1993-2012 Adobe Systems Incorporated - from the file “ChannelPort.plugin”
       Maximum 13.0 20120305.m.415 2012/03/05:21:00:00  ©2006-2012 Adobe Systems Incorporated - from the file “statistics.plugin”
       Mean 13.0 20120305.m.415 2012/03/05:21:00:00  ©2006-2012 Adobe Systems Incorporated - from the file “statistics.plugin”
       Measurement Core 13.0 20120305.m.415 2012/03/05:21:00:00  ©1993-2012 Adobe Systems Incorporated - from the file “MeasurementCore.plugin”
       Median 13.0 20120305.m.415 2012/03/05:21:00:00  ©2006-2012 Adobe Systems Incorporated - from the file “statistics.plugin”
       Mezzotint 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       Minimum 13.0 20120305.m.415 2012/03/05:21:00:00  ©2006-2012 Adobe Systems Incorporated - from the file “statistics.plugin”
       MMXCore Routines 13.0 20120305.m.415 2012/03/05:21:00:00  ©1990-2012 Adobe Systems Incorporated - from the file “MMXCore.plugin”
       Mosaic Tiles 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Multiprocessor Support 13.0 20120305.m.415 2012/03/05:21:00:00  ©1990-2012 Adobe Systems Incorporated - from the file “MultiProcessor Support.plugin”
       Neon Glow 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Note Paper 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       NTSC Colors 13.0 20120305.m.415 2012/03/05:21:00:00  ©1993-2012 Adobe Systems Incorporated - from the file “NTSC Colors.plugin”
       Ocean Ripple 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Oil Paint 13.0, Copyright © 2011 Adobe Systems Incorporated - from the file “Oil Paint.plugin”
       OpenEXR 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       Paint Daubs 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Palette Knife 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Patchwork 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Paths to Illustrator 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       PCX 13.0 20120305.m.415 2012/03/05:21:00:00  ©1989-2012 Adobe Systems Incorporated - from the file “PCX.plugin”
       Photocopy 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Photoshop 3D Engine 13.0 20120305.m.415 2012/03/05:21:00:00  ©2006-2012 Adobe Systems Incorporated - from the file “Photoshop3DEngine.plugin”
       Picture Package Filter 13.0 20120305.m.415 2012/03/05:21:00:00  ©1993-2012 Adobe Systems Incorporated - from the file “ChannelPort.plugin”
       Pinch 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       Pixar 13.0 20120305.m.415 2012/03/05:21:00:00  ©1989-2012 Adobe Systems Incorporated - from the file “Pixar.plugin”
       Plaster 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Plastic Wrap 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       PNG 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       Pointillize 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       Polar Coordinates 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       Portable Bit Map 13.0 20120305.m.415 2012/03/05:21:00:00  ©1989-2012 Adobe Systems Incorporated - from the file “PBM.plugin”
       Poster Edges 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Radial Blur 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       Radiance 13.0 20120305.m.415 2012/03/05:21:00:00  ©2003-2012 Adobe Systems Incorporated - from the file “Radiance.plugin”
       Range 13.0 20120305.m.415 2012/03/05:21:00:00  ©2006-2012 Adobe Systems Incorporated - from the file “statistics.plugin”
       Read Watermark NO VERSION - from the file “DigiRead.plugin”
       Reticulation 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Ripple 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       Rough Pastels 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Save for Web 13.0, Copyright © 1999-2012 Adobe Systems Incorporated - from the file “Save for Web.plugin”
       ScriptingSupport 13.0, Copyright © 2012 Adobe Systems Incorporated - from the file “ScriptingSupport.plugin”
       Shear 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       Skewness 13.0 20120305.m.415 2012/03/05:21:00:00  ©2006-2012 Adobe Systems Incorporated - from the file “statistics.plugin”
       Smart Blur 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       Smudge Stick 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Solarize 13.0 20120305.m.415 2012/03/05:21:00:00  ©1993-2012 Adobe Systems Incorporated - from the file “Solarize.plugin”
       Spatter 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Spherize 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       Sponge 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Sprayed Strokes 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Stained Glass 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Stamp 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Standard Deviation 13.0 20120305.m.415 2012/03/05:21:00:00  ©2006-2012 Adobe Systems Incorporated - from the file “statistics.plugin”
       Sumi-e 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Summation 13.0 20120305.m.415 2012/03/05:21:00:00  ©2006-2012 Adobe Systems Incorporated - from the file “statistics.plugin”
       Targa 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       Texturizer 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Tiles 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       Torn Edges 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Twirl 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       U3D 13.0 20120305.m.415 2012/03/05:21:00:00  ©2006-2012 Adobe Systems Incorporated - from the file “U3D.plugin”
       Underpainting 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Vanishing Point 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “VanishingPoint.plugin”
       Variance 13.0 20120305.m.415 2012/03/05:21:00:00  ©2006-2012 Adobe Systems Incorporated - from the file “statistics.plugin”
       Water Paper 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Watercolor 13.0, Copyright © 1991-2012 Adobe Systems Incorporated - from the file “Filter Gallery.plugin”
       Wave 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       Wavefront|OBJ 13.0 20120305.m.415 2012/03/05:21:00:00  ©2006-2012 Adobe Systems Incorporated - from the file “U3D.plugin”
       Wind 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
       Wireless Bitmap 13.0 20120305.m.415 2012/03/05:21:00:00  ©1989-2012 Adobe Systems Incorporated - from the file “WBMP.plugin”
       ZigZag 13.0, Copyright © 2003-2012 Adobe Systems Incorporated - from the file “Standard Multiplugin.plugin”
    Optional and third party plug-ins: NONE
    Plug-ins that failed to load: NONE
    Flash:
       Mini Bridge
       Kuler
    Installed TWAIN devices: NONE

    Hi Charles.
    Here is how my print settings looked when clicking on "print settings" in the Adobe print dialogue box:
    I had opened this up and clicked "save", which did not fix the problem.
    Then, this is how the Color Management settings looked:
    Changing the Color Handling from "Printer Manages Colors" to "PhotoShop Manages Colors" removes the 2nd print dialogue BUT:
    It is not maintained unless you save the document you are working on
    It is unique to each document and each new document defaults to "Printer Manages Colors"
    I do not see a way to globally change this default
    Thanks.

  • Bug report: double-tapping keyboard does not always bring up cursor movement.

    For instance, in:
    The text entry bar for maps
    The subject line of added meetings
    The text entry widget of the Slack Android app
    I'd love this to work consistently.

    oh I get what you're saying now.
    unfortunately, you're not missing anything. that is how they have it set up in 3.0
    if you're unhappy with this design, give Apple feedback at http://www.apple.com/feedback/iphone.html

  • Double Click in ALV TREE doesn't get triggered

    Hello All,
    Double click event on item in a alv tree report doesn't get triggered. I thought I was doing everything right. Please help me out.
    Look at the code below and tell me what else I need to do.
    <b>FORM register_events .
    Event registration: tell ALV Tree which events shall be passed
    from frontend to backend.
      DATA: lt_events TYPE cntl_simple_events,
            l_event TYPE cntl_simple_event,
            l_event_receiver TYPE REF TO lcl_tree_event_receiver.
    Frontend registration:  get already registered tree events
      CALL METHOD g_alv_tree->get_registered_events
        IMPORTING
          events = lt_events.
    Frontend registration: add additional event ids
      l_event-eventid = cl_gui_column_tree=>eventid_node_double_click.
      APPEND l_event TO lt_events.
    Frontend registration: provide new event table to alv tree
      CALL METHOD g_alv_tree->set_registered_events
        EXPORTING
          events                    = lt_events
        EXCEPTIONS
          cntl_error                = 1
          cntl_system_error         = 2
          illegal_event_combination = 3.
      IF sy-subrc <> 0.
        MESSAGE x208(00) WITH 'ERROR'.                          "#EC NOTEXT
      ENDIF.
    Register events on backend (ABAP Objects event handling)
      CREATE OBJECT l_event_receiver.
      SET HANDLER l_event_receiver->node_double_click FOR g_alv_tree.
      SET HANDLER l_event_receiver->item_double_click FOR g_alv_tree.
      SET HANDLER l_event_receiver->on_function_selected FOR g_toolbar.
    ENDFORM.                    " register_events</b>
    When I double click on item on the report double click event doesnt trigger. what could be the problem? Any sample programs?
    Thanks,
    Chandni

    Hi,
    Here is a sample code for you.
    report ztree.
    TABLES : vbak.
    DATA: BEGIN OF mylist OCCURS 50. " Internal table hierarchy
    INCLUDE STRUCTURE snodetext.
    DATA: END OF mylist.
    DATA: f15 TYPE c.
    DATA :
    BEGIN OF gt_sales OCCURS 0,
    vbeln LIKE vbak-vbeln,
    kunnr LIKE vbak-kunnr,
    matnr LIKE vbap-matnr,
    arktx LIKE vbap-arktx,
    END OF gt_sales.
    SELECT-OPTIONS : s_vbeln FOR vbak-vbeln.
    START-OF-SELECTION.
    SET PF-STATUS 'ZTREE1'.
    SET TITLEBAR 'T1'.
    Fill internal table with pseudo-data
    PERFORM fill_itab.
    Hierarchy output
    PERFORM main.
    *& Form FILL_ITAB
    text
    --> p1 text
    <-- p2 text
    FORM fill_itab .
    *Fill the gt_sales table
    SELECT vkvbeln vkkunnr vpmatnr vparktx INTO CORRESPONDING FIELDS OF
    TABLE gt_sales
    FROM ( vbak AS vk INNER JOIN vbap AS vp ON vkvbeln = vpvbeln )
    WHERE vk~vbeln IN s_vbeln.
    SORT gt_sales BY vbeln kunnr.
    *Fill the root
    mylist-name = 'Report Tree List'.
    mylist-color = 1.
    mylist-intensiv = '1'.
    mylist-text = 'Report Tree List'.
    mylist-tlength = 16.
    mylist-tlevel = 1.
    mylist-tcolor = 1.
    mylist-tintensiv = '1'.
    mylist-text1 = 'using "RS_TREE_CONSTRUCT" function'.
    mylist-tlength1 = 50.
    mylist-tcolor1 = 2.
    mylist-tintensiv1 = '0'.
    APPEND mylist.
    LOOP AT gt_sales.
    ON CHANGE OF gt_sales-vbeln.
    mylist-name = 'level1'.
    mylist-color = 0.
    mylist-intensiv = '0'.
    mylist-text = 'Sales Document no:'.
    mylist-tlength = 20.
    mylist-tlevel = 2.
    mylist-tcolor = 7.
    mylist-tintensiv = '1'.
    mylist-text1 = gt_sales-vbeln.
    mylist-tlength1 = 30.
    mylist-tcolor1 = 2.
    mylist-tintensiv1 = '0'.
    APPEND mylist.
    ENDON.
    ON CHANGE OF gt_sales-kunnr.
    mylist-name = 'level2'.
    mylist-color = 0.
    mylist-intensiv = '0'.
    mylist-text = 'Customer no:'.
    mylist-tlength = 20.
    mylist-tlevel = 3.
    mylist-tcolor = 5.
    mylist-tintensiv = '1'.
    mylist-text1 = gt_sales-kunnr.
    mylist-tlength1 = 30.
    mylist-tcolor1 = 3.
    mylist-tintensiv1 = '0'.
    APPEND mylist.
    ENDON.
    mylist-name = 'level3'.
    mylist-color = 0.
    mylist-intensiv = '0'.
    mylist-text = gt_sales-matnr.
    mylist-tlength = 15.
    mylist-tlevel = 4.
    mylist-tcolor = 4.
    mylist-tintensiv = '0'.
    mylist-text1 = gt_sales-arktx.
    mylist-tlength1 = 30.
    mylist-tcolor1 = 2.
    mylist-tintensiv1 = '0'.
    APPEND mylist.
    ENDLOOP.
    ENDFORM. " FILL_ITAB
    *& Form MAIN
    text
    --> p1 text
    <-- p2 text
    FORM main .
    PERFORM hierarchy. " construct & draw the tree
    ENDFORM. " MAIN
    *& Form HIERARCHY
    text
    --> p1 text
    <-- p2 text
    FORM hierarchy .
    PERFORM build_tree.
    PERFORM draw_tree.
    ENDFORM. " HIERARCHY
    FORM BUILD_TREE *
    Builds the tree from internal table *
    Uses the Function module RS_TREE_CONSTRUCT *
    FORM build_tree.
    CALL FUNCTION 'RS_TREE_CONSTRUCT'
    TABLES
    nodetab = mylist
    EXCEPTIONS
    tree_failure = 1.
    ENDFORM. "build_tree
    FORM DRAW_TREE *
    Builds the tree from internal table *
    Uses the Function module RS_TREE_DISPLAY *
    FORM draw_tree.
    sy-lsind = 0.
    CALL FUNCTION 'RS_TREE_LIST_DISPLAY'
    EXPORTING
    callback_program = 'ZREPORT_TREE'
    callback_user_command = 'NODE_SELECT'
    IMPORTING
    f15 = f15.
    ENDFORM. "draw_tree
    FORM NODE_SELECT *
    Handles selection of nodes *
    FORM node_select TABLES knoten STRUCTURE seucomm
    USING command
    CHANGING exit
    list_refresh.
    Processing of commands for hierarchy list
    CASE command.
    WHEN 'DISP'.
    CASE knoten-id.
    WHEN '000002'.
    *Display Sales Order
    SET PARAMETER ID 'AUN' FIELD knoten-text1.
    CALL TRANSACTION 'VA03' AND SKIP FIRST SCREEN.
    WHEN '000003'.
    *Display Customer
    SET PARAMETER ID 'KUN' FIELD knoten-text1.
    CALL TRANSACTION 'XD03' AND SKIP FIRST SCREEN.
    ENDCASE.
    ENDCASE.
    list_refresh = 'X'.
    ENDFORM. "node_select

  • 30EA1 /2.*: Double-clicking objects in the navigator tree

    Hi,
    There is an inconsistency in double-clicking objects in the navigator tree:
    When Preferences - Database - ObjectViewer - Open Objects on Single Click is checked, double-clicking e.g. a table in the navigator will still open it the same way as single-clicking it.
    However, when Preferences - Database - ObjectViewer - Open Objects on Single Click is not checked, double-clicking the table in the navigator will open it, and expand the columns. The latter is quite irritating, especially on large tables.
    Can this be bugged, so double-clicking the table in the navigator will just open it?
    Thanks,
    K.

    The node is expanded on double click irrespective of what the preferenceIs this a typo or does it really expand always for you? For me it only expands with "single click objects" disabled.
    windows explorer also does the sameYes, and I'd even say that's the desired behaviour, especially since it's the only action taken.
    Common sense and standards are against taking 2 different actions at the same time. One should override the other.
    Ideally, double click with "single click objects" disabled would just open the object, and double click with "single click objects" enabled could expand the node as in the Windows Explorer (but doesn't have to).
    So that's almost completely the other way around as we get it now.
    Thanks,
    K.

  • 3.1.2 double clicking home button when music is not playing

    Is the bug that double clicking home button while music is not playing didn't bring up the iPod control fixed? I don't know it's a design change or a bug, but for me it seems definitely a bug since it doesn't give anything good. Clicking home button once already terminates the application, why would anyone use double clicking to exit the application too?
    This is why I'm still using 3.0. Is this fixed in 3.1.2?

    It's a design change, not a bug. Although I do have to agree with you on that I preferred what double-clicking the home button originally did. There is even settings (in general settings if I can remember right) on what double-clicking the home button performs, but that isn't even an option on it.
    And nope this is not fixed or redesigned in 3.1.2.
    Hope that answers your question,
    Enjoy!

  • Bug report: entering serial number does not work with azerty keyboard

    I did not find a place to submit bug reports, so I'm posting here.
    During the instalation of Photoshop Elements 8 for Mac, I was not able to enter any numbers in the serial number fields.  Some other keys did work (like &é$...).  My keyboard is an azerty (Belgium).  Notice the numbers on an azerty keyboard have to be entered while holding the shift key.  I tried switching the keyboard to "French - Numerical" (wich enables numbers to be entered with shift lock on), and then some number keys worked, and others didn't.
    I solved this with a workaround, by temporary switching my keyboard to U.S. English.

    You can submit a bug report by clicking "Feature Request/Bug Report" in the upper-right corner:
    http://www.adobe.com/support/photoshopelements/
    Despite what it says, I've seen no hard evidence that Adobe ever pays attention to PSE bug reports.

  • 3.1.3 double clicking home button when music is not playing

    Is the bug that double clicking home button while music is not playing didn't bring up the iPod control fixed? For me, it seems definitely a bug since it doesn't give anything good. Clicking home button once already terminates the application, why would anyone use double clicking to exit the application too?
    This is why I'm still using 3.0. Is this fixed in 3.1.3?

    Jeong-hun Sin, 3.1.3 has the same issue, and I do not think Apple is ever going to fix this issue. They still haven't even fixed the live updating playlist sort order issue...
    roaminggnome he's referring to a pop-up controls issue that has been talked about on this forum ever since the release of the 3.1 firmware.
    http://discussions.apple.com/thread.jspa?threadID=2151438
    In 3.0 and older versions, if you're in an app/game you can double-click the home-button to access the iPod pop-up controls to resume the playback of a song/podcast that had been previously paused/stopped.
    In 3.1, if a song had been previously paused you cannot launch the pop-up conrols to resume the playback of the song. You're forced to exit the app that you might be in (lets say safari, or a game), and then resume playback using the music app.
    Jeong-hun Sin, I upgraded to 3.1.3 a few days ago, and have found a few improvements:
    - Many 3D games are MUCH smoother/faster under 3.1.3, than 3.0. I downgraded back to 3.0 just to see if I was just imagining things, but games like Coconut-racer, and Asphalt 5 were not as smooth as they were under 3.1.3.
    - If you happen run apps that have live video streaming where the video playback controls do not appear (e.g the BBC world, Al Jazeera news, sure there's more), the iPod Touch no longer randomly reboots when using those apps.

  • Double click on field in ALV Report

    hi everyone
    i have written a program which displays data in an alv grid report, now i need to extend my program a bit more.
    when i double click on any field value the corresponding record should be displayed
    can anyone suggest if i need to call any fn module for this, if so wht's the fn module
    if anyone can give an example that would be fine
    Cheers,
    rama

    Hi,
    *& Report  Z_REPORTFROMKNA1ANDT005T
    REPORT  Z_REPORTFROMKNA1ANDT005T
                      LINE-SIZE 180
                      MESSAGE-ID ZZ.
    TABLES:EKKO.
    TYPE-POOLS : SLIS.
          Internal table for ALV
    DATA : IT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV,     "Field catalog
           WA_FIELDCAT TYPE SLIS_FIELDCAT_ALV,       "WA for Field catalog
           IT_EVENT TYPE SLIS_T_EVENT,               "events
           WA_EVENT TYPE SLIS_ALV_EVENT,             "WA for events
           IT_COMMENT TYPE SLIS_T_LISTHEADER,        "Header details
           WA_COMMENT TYPE SLIS_LISTHEADER,          "WA for header details
           WA_LAYOUT TYPE SLIS_LAYOUT_ALV,           "Layout
           IT_SORT TYPE SLIS_T_SORTINFO_ALV,         "Sort table
           WA_SORT TYPE SLIS_SORTINFO_ALV,           "WA for sort table
           IT_KEYINFO TYPE SLIS_KEYINFO_ALV.         "Pass key value
    DATA : V_REPID LIKE SY-REPID.
    V_REPID = SY-REPID.
    DATA : V_DATE LIKE SY-DATUM.
    color management.
    DATA  : IT_COLOR TYPE TABLE OF LVC_S_SCOL.       "Color management.
          Internal table declearation
    DATA:BEGIN OF IT_EKKO OCCURS 0,
      EBELN LIKE EKKO-EBELN,
      BUKRS  LIKE EKKO-BUKRS,
      AEDAT  LIKE EKKO-AEDAT,
    END OF IT_EKKO.
    DATA : BEGIN OF IT_EKPO OCCURS 0,
      EBELN LIKE EKPO-EBELN,
      EBELP LIKE EKPO-EBELP,
      MATNR LIKE EKPO-MATNR,
      MENGE LIKE EKPO-MENGE,
      MEINS LIKE EKPO-MEINS,
      NETPR LIKE EKPO-NETPR,
      NETWR LIKE EKPO-MENGE,
      chk(1) type c,
    END OF IT_EKPO.
    DATA : BEGIN OF IT_EKBE OCCURS 0,
           EBELN LIKE EKBE-EBELN,
           EBELP LIKE EKBE-EBELP,
           BELNR LIKE EKBE-BELNR,
           MENGE LIKE EKBE-MENGE,
           MATNR LIKE EKBE-MATNR,
      END OF IT_EKBE.
    DATA : BEGIN OF IT_FINAL OCCURS 0,
      EBELN LIKE EKPO-EBELN,
      EBELP LIKE EKPO-EBELP,
      MATNR LIKE EKPO-MATNR,
      MENGE LIKE EKPO-MENGE,
      MEINS LIKE EKPO-MEINS,
      NETPR LIKE EKPO-NETPR,
      NETWR LIKE EKPO-NETWR,
      LINE_COLOR(4) TYPE C,     "Used to store row color attributes
    END OF IT_FINAL.
    SELECTION-SCREEN BEGIN OF BLOCK BLK WITH FRAME TITLE TEXT-001.
    SELECT-OPTIONS:S_EBELN FOR EKKO-EBELN.
    PARAMETERS : RB1 RADIOBUTTON GROUP G1 MODIF ID Z1,
                 RB2 RADIOBUTTON GROUP G1 MODIF ID Z2,
                 RB3 RADIOBUTTON GROUP G1 MODIF ID Z3.
    SELECTION-SCREEN END OF BLOCK BLK.
    AT SELECTION-SCREEN OUTPUT.
      PERFORM MODIFY_SCREEN.
    START-OF-SELECTION.
      PERFORM GET_DETAILS.
      PERFORM GET_ALV.
    *&      Form  modify_screen
          text
    -->  p1        text
    <--  p2        text
    FORM MODIFY_SCREEN .
    IF RB1 = 'X'.
       LOOP AT SCREEN.
         IF SCREEN-GROUP1 = 'Z1' .
           SCREEN-INVISIBLE = 1.
           SCREEN-ACTIVE = 0.
         ELSE.
           SCREEN-INVISIBLE = 0.
           SCREEN-ACTIVE = 1.
         ENDIF.
         MODIFY SCREEN.
       ENDLOOP.
    ENDIF.
    ENDFORM.                    " modify_screen
    *&      Form  GET_DETAILS
          Get the details
    FORM GET_DETAILS .
      DATA: LD_COLOR(1) TYPE C.
      SELECT EBELN
             BUKRS
             AEDAT
        FROM EKKO
        INTO TABLE IT_EKKO
       WHERE EBELN IN S_EBELN.
      IF SY-SUBRC = 0.
        SORT IT_EKKO BY EBELN.
      ELSE.
        MESSAGE E000 WITH 'DATA NOT FOUND'.
      ENDIF.
      IF NOT IT_EKKO[] IS INITIAL.
        SELECT EBELN
               EBELP
               MATNR
               MENGE
               MEINS
               NETPR
               NETWR
              chk
          FROM EKPO
          INTO TABLE IT_EKPO
           FOR ALL ENTRIES IN IT_EKKO
         WHERE EBELN = IT_EKKO-EBELN.
        IF SY-SUBRC = 0.
          SORT IT_EKPO BY EBELN.
        ENDIF.
      ENDIF.
      LOOP AT IT_EKPO.
        IT_FINAL-EBELN = IT_EKPO-EBELN.
        IT_FINAL-EBELP = IT_EKPO-EBELP.
        IT_FINAL-MATNR = IT_EKPO-MATNR.
        IT_FINAL-MENGE = IT_EKPO-MENGE.
        IT_FINAL-MEINS = IT_EKPO-MEINS.
        IT_FINAL-NETPR = IT_EKPO-NETPR.
        IT_FINAL-NETWR = IT_EKPO-NETWR.
        ON CHANGE OF IT_FINAL-EBELN.
          LD_COLOR = 7.
          CONCATENATE 'C' LD_COLOR '10' INTO IT_FINAL-LINE_COLOR.
        ENDON.
        APPEND IT_FINAL.
        CLEAR IT_FINAL.
      ENDLOOP.
    ENDFORM.                    " GET_DETAILS
    *&      Form  GET_ALV
          text
    FORM GET_ALV .
      PERFORM GENERATE_FIELDCAT.
      PERFORM GENERATE_LAYOUT.
      PERFORM GENERATE_EVENTS.
      PERFORM GENERATE_SORT.
      PERFORM ALV_GRID_DISPLAY.
    ENDFORM.                    " GET_ALV
    *&      Form  GENERATE_FIELDCAT
          Field catalog
    FORM GENERATE_FIELDCAT .
      IF RB1 = 'X' OR RB2 = 'X'.
        WA_FIELDCAT-FIELDNAME = 'EBELN'.
        WA_FIELDCAT-COL_POS = '1'.
        WA_FIELDCAT-JUST = 'R'.
        WA_FIELDCAT-SELTEXT_L = 'PO Number'.
        WA_FIELDCAT-LOWERCASE = 'X'.
        WA_FIELDCAT-DO_SUM = 'X'.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'EBELP'.
        WA_FIELDCAT-COL_POS = '2'.
        WA_FIELDCAT-JUST = 'C'.
        WA_FIELDCAT-SELTEXT_L = 'Item Number'.
        WA_FIELDCAT-LOWERCASE = 'X'.
        WA_FIELDCAT-edit = 'X'.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'MATNR'.
        WA_FIELDCAT-COL_POS = '3'.
        WA_FIELDCAT-JUST = 'C'.
        WA_FIELDCAT-SELTEXT_L = 'Material Number'.
        WA_FIELDCAT-LOWERCASE = 'X'.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'MENGE'.
        WA_FIELDCAT-COL_POS = '4'.
        WA_FIELDCAT-JUST = 'C'.
        WA_FIELDCAT-SELTEXT_L = 'PO Quantity'.
        WA_FIELDCAT-LOWERCASE = 'X'.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'MEINS'.
        WA_FIELDCAT-COL_POS = '5'.
        WA_FIELDCAT-JUST = 'C'.
        WA_FIELDCAT-SELTEXT_L = 'Order unit'.
        WA_FIELDCAT-LOWERCASE = 'X'.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'NETPR'.
        WA_FIELDCAT-COL_POS = '6'.
        WA_FIELDCAT-JUST = 'C'.
        WA_FIELDCAT-SELTEXT_L = 'Net price'.
        WA_FIELDCAT-LOWERCASE = 'X'.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'NETWR'.
        WA_FIELDCAT-COL_POS = '7'.
        WA_FIELDCAT-JUST = 'C'.
        WA_FIELDCAT-SELTEXT_L = 'Net order value'.
        WA_FIELDCAT-LOWERCASE = 'X'.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
       wa_fieldcat-fieldname = 'CHK'.
       wa_fieldcat-col_pos = '8'.
       wa_fieldcat-just = 'C'.
       wa_fieldcat-seltext_l = 'Check Box'.
       wa_fieldcat-lowercase = 'X'.
       wa_fieldcat-checkbox = 'X'.
       wa_fieldcat-edit = 'X'.
       append wa_fieldcat to it_fieldcat.
      ELSE.
        CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
         EXPORTING
           I_PROGRAM_NAME               = V_REPID
           I_INTERNAL_TABNAME           = 'IT_EKKO'
        I_STRUCTURE_NAME             = I_STRUCTURE_NAME
        I_CLIENT_NEVER_DISPLAY       = 'X'
           I_INCLNAME                   = V_REPID
        I_BYPASSING_BUFFER           = I_BYPASSING_BUFFER
        I_BUFFER_ACTIVE              = I_BUFFER_ACTIVE
          CHANGING
            CT_FIELDCAT                  = IT_FIELDCAT
         EXCEPTIONS
           INCONSISTENT_INTERFACE       = 1
           PROGRAM_ERROR                = 2
           OTHERS                       = 3
        IF SY-SUBRC <> 0.
          MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
                  WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
        ENDIF.
        CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
         EXPORTING
           I_PROGRAM_NAME               = V_REPID
           I_INTERNAL_TABNAME           = 'IT_EKPO'
      I_STRUCTURE_NAME             = I_STRUCTURE_NAME
      I_CLIENT_NEVER_DISPLAY       = 'X'
           I_INCLNAME                   = V_REPID
      I_BYPASSING_BUFFER           = I_BYPASSING_BUFFER
      I_BUFFER_ACTIVE              = I_BUFFER_ACTIVE
          CHANGING
            CT_FIELDCAT                  = IT_FIELDCAT
         EXCEPTIONS
           INCONSISTENT_INTERFACE       = 1
           PROGRAM_ERROR                = 2
           OTHERS                       = 3
        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.
    ENDFORM.                    " GENERATE_FIELDCAT
    *&      Form  GENERATE_EVENTS
          Generate Events
    FORM GENERATE_EVENTS .
      CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
        IMPORTING
          ET_EVENTS       = IT_EVENT
        EXCEPTIONS
          LIST_TYPE_WRONG = 1
          OTHERS          = 2.
      IF SY-SUBRC <> 0.
        MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
                WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
      ENDIF.
      IF NOT IT_EVENT[] IS INITIAL.
        READ TABLE IT_EVENT INTO WA_EVENT WITH KEY NAME = 'TOP_OF_PAGE'.
        IF SY-SUBRC = 0.
          WA_EVENT-FORM = 'TOP_OF_PAGE'.
          MODIFY IT_EVENT FROM WA_EVENT INDEX SY-TABIX.
        ENDIF.
    <b>   READ TABLE IT_EVENT INTO WA_EVENT WITH KEY NAME = 'USER_COMMAND'.
        IF SY-SUBRC = 0.
          WA_EVENT-FORM = 'IT_USER_COMMAND'.
          MODIFY IT_EVENT FROM WA_EVENT INDEX SY-TABIX.
        ENDIF.</b>
      ENDIF.
    ENDFORM.                    " GENERATE_EVENTS
    *&      Form  TOP_OF_PAGE
          TOP_OF_PAGE
    FORM TOP_OF_PAGE.
      DATA : V_CONCATE(50) TYPE C.
      DATA : V_SPACE(10) TYPE C.
      CONCATENATE 'VIKRANTH' 'RAJESH' INTO V_CONCATE.
      WA_COMMENT-TYP = 'S'.
      WA_COMMENT-KEY = 'USER :'.
      WA_COMMENT-INFO = V_CONCATE.
      APPEND WA_COMMENT TO IT_COMMENT.
      WA_COMMENT-TYP = 'S'.
      WA_COMMENT-KEY = 'DATE:'.
      WA_COMMENT-INFO = SY-DATUM.
      APPEND WA_COMMENT TO IT_COMMENT.
      WA_COMMENT-TYP = 'S'.
      WA_COMMENT-KEY = 'TIME:'.
      WA_COMMENT-INFO = SY-TIMLO.
      APPEND WA_COMMENT TO IT_COMMENT.
      CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
        EXPORTING
          IT_LIST_COMMENTARY = IT_COMMENT.
      CLEAR IT_COMMENT.
    ENDFORM.                    "TOP_OF_PAGE
    *&      Form  ALV_GRID_DISPLAY
          Grid display
    FORM ALV_GRID_DISPLAY .
      IF RB1 = 'X'.
        PERFORM GRID_DISPLAY.
      ELSEIF RB2 = 'X'.
        PERFORM LIST_DISPLAY.
      ELSE.
        PERFORM HIERSEQ_DISPLAY.
      ENDIF.
    ENDFORM.                    " ALV_GRID_DISPLAY
    *&      Form  GENERATE_LAYOUT
          LAYOUT
    FORM GENERATE_LAYOUT .
      WA_LAYOUT-COLWIDTH_OPTIMIZE = 'X'.           "OPTIMIZING FIELD WIDTH
      WA_LAYOUT-ZEBRA = 'X'.                       "PUTTING ZEBRA COLORS
      WA_LAYOUT-TOTALS_TEXT = 'Total'.
      WA_LAYOUT-SUBTOTALS_TEXT = 'SUB TOTAL'.
      WA_LAYOUT-INFO_FIELDNAME = 'LINE_COLOR'.
    ENDFORM.                    " GENERATE_LAYOUT
    *&      Form  GENERATE_SORT
          SORT
    FORM GENERATE_SORT .
      WA_SORT-FIELDNAME = 'EBELN'.
      WA_SORT-SPOS = '1'.
      WA_SORT-UP = 'X'.
      WA_SORT-SUBTOT = 'X'.
      APPEND WA_SORT TO IT_SORT.
    ENDFORM.                    " GENERATE_SORT
    *&      Form  GRID_DISPLAY
          GRID DISPLAY
    FORM GRID_DISPLAY .
      CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      I_INTERFACE_CHECK                 = ' '
      I_BYPASSING_BUFFER                = ' '
      I_BUFFER_ACTIVE                   = ' '
       I_CALLBACK_PROGRAM                = V_REPID
      I_CALLBACK_PF_STATUS_SET          = ' '
      I_CALLBACK_USER_COMMAND           = 'IT_USER_COMMAND'
      I_CALLBACK_TOP_OF_PAGE            = ' '
      I_CALLBACK_HTML_TOP_OF_PAGE       = ' '
      I_CALLBACK_HTML_END_OF_LIST       = ' '
      I_STRUCTURE_NAME                  =
      I_BACKGROUND_ID                   = ' '
       I_GRID_TITLE                      = 'Purchase Order Details'
      I_GRID_SETTINGS                   = I_GRID_SETTINGS
       IS_LAYOUT                         = WA_LAYOUT
       IT_FIELDCAT                       = IT_FIELDCAT
      IT_EXCLUDING                      = IT_EXCLUDING
      IT_SPECIAL_GROUPS                 = IT_SPECIAL_GROUPS
       IT_SORT                           = IT_SORT
      IT_FILTER                         = IT_FILTER
      IS_SEL_HIDE                       = IS_SEL_HIDE
      I_DEFAULT                         = 'X'
      I_SAVE                            = ' '
      IS_VARIANT                        = IS_VARIANT
       IT_EVENTS                         = IT_EVENT
      IT_EVENT_EXIT                     = IT_EVENT_EXIT
      IS_PRINT                          = IS_PRINT
      IS_REPREP_ID                      = IS_REPREP_ID
      I_SCREEN_START_COLUMN             = 0
      I_SCREEN_START_LINE               = 0
      I_SCREEN_END_COLUMN               = 0
      I_SCREEN_END_LINE                 = 0
      I_HTML_HEIGHT_TOP                 = 0
      I_HTML_HEIGHT_END                 = 0
      IT_ALV_GRAPHICS                   = IT_ALV_GRAPHICS
      IT_HYPERLINK                      = IT_HYPERLINK
      IT_ADD_FIELDCAT                   = IT_ADD_FIELDCAT
      IT_EXCEPT_QINFO                   = IT_EXCEPT_QINFO
      IR_SALV_FULLSCREEN_ADAPTER        = IR_SALV_FULLSCREEN_ADAPTER
    IMPORTING
      E_EXIT_CAUSED_BY_CALLER           = E_EXIT_CAUSED_BY_CALLER
      ES_EXIT_CAUSED_BY_USER            = ES_EXIT_CAUSED_BY_USER
        TABLES
          T_OUTTAB                          = IT_FINAL
    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.                    " GRID_DISPLAY
    *&      Form  LIST_DISPLAY
          LIST DISPLAY
    FORM LIST_DISPLAY .
      CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
       EXPORTING
        I_INTERFACE_CHECK              = ' '
        I_BYPASSING_BUFFER             = I_BYPASSING_BUFFER
        I_BUFFER_ACTIVE                = ' '
         I_CALLBACK_PROGRAM             = V_REPID
        I_CALLBACK_PF_STATUS_SET       = ' '
    <b>     I_CALLBACK_USER_COMMAND        = 'IT_USER_COMMAND'</b>
        I_STRUCTURE_NAME               = I_STRUCTURE_NAME
         IS_LAYOUT                      = WA_LAYOUT
         IT_FIELDCAT                    = IT_FIELDCAT
        IT_EXCLUDING                   = IT_EXCLUDING
        IT_SPECIAL_GROUPS              = IT_SPECIAL_GROUPS
         IT_SORT                        = IT_SORT
        IT_FILTER                      = IT_FILTER
        IS_SEL_HIDE                    = IS_SEL_HIDE
        I_DEFAULT                      = 'X'
        I_SAVE                         = ' '
        IS_VARIANT                     = IS_VARIANT
         IT_EVENTS                      = IT_EVENT
        IT_EVENT_EXIT                  = IT_EVENT_EXIT
        IS_PRINT                       = IS_PRINT
        IS_REPREP_ID                   = IS_REPREP_ID
        I_SCREEN_START_COLUMN          = 0
        I_SCREEN_START_LINE            = 0
        I_SCREEN_END_COLUMN            = 0
        I_SCREEN_END_LINE              = 0
        IR_SALV_LIST_ADAPTER           = IR_SALV_LIST_ADAPTER
        IT_EXCEPT_QINFO                = IT_EXCEPT_QINFO
        I_SUPPRESS_EMPTY_DATA          = ABAP_FALSE
      IMPORTING
        E_EXIT_CAUSED_BY_CALLER        = E_EXIT_CAUSED_BY_CALLER
        ES_EXIT_CAUSED_BY_USER         = ES_EXIT_CAUSED_BY_USER
        TABLES
          T_OUTTAB                       = IT_FINAL
       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.                    " LIST_DISPLAY
    *&      Form  HIERSEQ_DISPLAY
          HIERSEQ DISPLAY
    FORM HIERSEQ_DISPLAY .
      IT_KEYINFO-HEADER01 = 'EBELN'.
      IT_KEYINFO-ITEM01 = 'EBELN'.
      CALL FUNCTION 'REUSE_ALV_HIERSEQ_LIST_DISPLAY'
        EXPORTING
      I_INTERFACE_CHECK              = ' '
         I_CALLBACK_PROGRAM             = V_REPID
      I_CALLBACK_PF_STATUS_SET       = ' '
      I_CALLBACK_USER_COMMAND        = ' '
         IS_LAYOUT                      = WA_LAYOUT
         IT_FIELDCAT                    = IT_FIELDCAT
      IT_EXCLUDING                   = IT_EXCLUDING
      IT_SPECIAL_GROUPS              = IT_SPECIAL_GROUPS
         IT_SORT                        = IT_SORT
      IT_FILTER                      = IT_FILTER
      IS_SEL_HIDE                    = IS_SEL_HIDE
      I_SCREEN_START_COLUMN          = 0
      I_SCREEN_START_LINE            = 0
      I_SCREEN_END_COLUMN            = 0
      I_SCREEN_END_LINE              = 0
      I_DEFAULT                      = 'X'
      I_SAVE                         = ' '
      IS_VARIANT                     = IS_VARIANT
         IT_EVENTS                      = IT_EVENT
      IT_EVENT_EXIT                  = IT_EVENT_EXIT
          I_TABNAME_HEADER               = 'IT_EKKO'
          I_TABNAME_ITEM                 = 'IT_EKPO'
      I_STRUCTURE_NAME_HEADER        = I_STRUCTURE_NAME_HEADER
      I_STRUCTURE_NAME_ITEM          = I_STRUCTURE_NAME_ITEM
          IS_KEYINFO                     = IT_KEYINFO
      IS_PRINT                       = IS_PRINT
      IS_REPREP_ID                   = IS_REPREP_ID
      I_BYPASSING_BUFFER             = I_BYPASSING_BUFFER
      I_BUFFER_ACTIVE                = I_BUFFER_ACTIVE
      IR_SALV_HIERSEQ_ADAPTER        = IR_SALV_HIERSEQ_ADAPTER
      IT_EXCEPT_QINFO                = IT_EXCEPT_QINFO
      I_SUPPRESS_EMPTY_DATA          = ABAP_FALSE
    IMPORTING
      E_EXIT_CAUSED_BY_CALLER        = E_EXIT_CAUSED_BY_CALLER
      ES_EXIT_CAUSED_BY_USER         = ES_EXIT_CAUSED_BY_USER
        TABLES
          T_OUTTAB_HEADER                = IT_EKKO
          T_OUTTAB_ITEM                  = IT_EKPO
       EXCEPTIONS
         PROGRAM_ERROR                  = 1
         OTHERS                         = 2
      IF SY-SUBRC <> 0.
        MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
                WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
      ENDIF.
    ENDFORM.                    " HIERSEQ_DISPLAY
    <b>
    *& Form IT_USER_COMMAND
    text
    FORM IT_USER_COMMAND USING R_UCOMM LIKE SY-UCOMM
                               RS_SELFIELD TYPE SLIS_SELFIELD.
      FREE IT_FIELDCAT.
      CASE R_UCOMM.
        WHEN '&IC1'.
          READ TABLE IT_FINAL INDEX RS_SELFIELD-TABINDEX.
          PERFORM GET_EKBE.
          PERFORM GET_FIELD_CATALOG.
          PERFORM GET_LIST.
      ENDCASE.
    ENDFORM.                               "IT_USER_COMMAND</b>
    *&      Form  GET_EKBE
          text
    FORM GET_EKBE .
      IF NOT IT_FINAL[] IS INITIAL.
        SELECT EBELN
               EBELP
               BELNR
               MENGE
               MATNR
          INTO TABLE IT_EKBE
          FROM EKBE
           FOR ALL ENTRIES IN IT_FINAL
         WHERE EBELN = IT_FINAL-EBELN
           AND EBELP = IT_FINAL-EBELP.
      ENDIF.
    ENDFORM.                    " GET_EKBE
    *&      Form  GET_FIELD_CATALOG
          text
    FORM GET_FIELD_CATALOG .
      WA_FIELDCAT-FIELDNAME = 'EBELN'.
      WA_FIELDCAT-COL_POS = '1'.
      WA_FIELDCAT-JUST = 'R'.
      WA_FIELDCAT-SELTEXT_L = 'PO Number'.
      WA_FIELDCAT-LOWERCASE = 'X'.
      WA_FIELDCAT-DO_SUM = 'X'.
      APPEND WA_FIELDCAT TO IT_FIELDCAT.
      WA_FIELDCAT-FIELDNAME = 'EBELP'.
      WA_FIELDCAT-COL_POS = '2'.
      WA_FIELDCAT-JUST = 'R'.
      WA_FIELDCAT-SELTEXT_L = 'Item Number'.
      WA_FIELDCAT-LOWERCASE = 'X'.
      WA_FIELDCAT-DO_SUM = 'X'.
      APPEND WA_FIELDCAT TO IT_FIELDCAT.
      WA_FIELDCAT-FIELDNAME = 'BELNR'.
      WA_FIELDCAT-COL_POS = '3'.
      WA_FIELDCAT-JUST = 'R'.
      WA_FIELDCAT-SELTEXT_L = 'Material Document'.
      WA_FIELDCAT-LOWERCASE = 'X'.
      WA_FIELDCAT-DO_SUM = 'X'.
      APPEND WA_FIELDCAT TO IT_FIELDCAT.
      WA_FIELDCAT-FIELDNAME = 'MENGE'.
      WA_FIELDCAT-COL_POS = '4'.
      WA_FIELDCAT-JUST = 'R'.
      WA_FIELDCAT-SELTEXT_L = 'Quantity'.
      WA_FIELDCAT-LOWERCASE = 'X'.
      WA_FIELDCAT-DO_SUM = 'X'.
      APPEND WA_FIELDCAT TO IT_FIELDCAT.
      WA_FIELDCAT-FIELDNAME = 'MATNR'.
      WA_FIELDCAT-COL_POS = '5'.
      WA_FIELDCAT-JUST = 'R'.
      WA_FIELDCAT-SELTEXT_L = 'Material Number'.
      WA_FIELDCAT-LOWERCASE = 'X'.
      WA_FIELDCAT-DO_SUM = 'X'.
      APPEND WA_FIELDCAT TO IT_FIELDCAT.
    ENDFORM.                    " GET_FIELD_CATALOG
    *&      Form  get_list
          text
    FORM GET_LIST .
      IF RB1 = 'X'.
        CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
         EXPORTING
        I_INTERFACE_CHECK                 = ' '
        I_BYPASSING_BUFFER                = ' '
        I_BUFFER_ACTIVE                   = ' '
           I_CALLBACK_PROGRAM                = V_REPID
        I_CALLBACK_PF_STATUS_SET          = ' '
        I_CALLBACK_USER_COMMAND           = ' '
        I_CALLBACK_TOP_OF_PAGE            = ' '
        I_CALLBACK_HTML_TOP_OF_PAGE       = ' '
        I_CALLBACK_HTML_END_OF_LIST       = ' '
        I_STRUCTURE_NAME                  = I_STRUCTURE_NAME
        I_BACKGROUND_ID                   = ' '
           I_GRID_TITLE                      = 'SECONDARY LIST'
        I_GRID_SETTINGS                   = I_GRID_SETTINGS
        IS_LAYOUT                         = IS_LAYOUT
           IT_FIELDCAT                       = IT_FIELDCAT
        IT_EXCLUDING                      = IT_EXCLUDING
        IT_SPECIAL_GROUPS                 = IT_SPECIAL_GROUPS
        IT_SORT                           = IT_SORT
        IT_FILTER                         = IT_FILTER
        IS_SEL_HIDE                       = IS_SEL_HIDE
        I_DEFAULT                         = 'X'
        I_SAVE                            = ' '
        IS_VARIANT                        = IS_VARIANT
        IT_EVENTS                         = IT_EVENTS
        IT_EVENT_EXIT                     = IT_EVENT_EXIT
        IS_PRINT                          = IS_PRINT
        IS_REPREP_ID                      = IS_REPREP_ID
        I_SCREEN_START_COLUMN             = 0
        I_SCREEN_START_LINE               = 0
        I_SCREEN_END_COLUMN               = 0
        I_SCREEN_END_LINE                 = 0
        I_HTML_HEIGHT_TOP                 = 0
        I_HTML_HEIGHT_END                 = 0
        IT_ALV_GRAPHICS                   = IT_ALV_GRAPHICS
        IT_HYPERLINK                      = IT_HYPERLINK
        IT_ADD_FIELDCAT                   = IT_ADD_FIELDCAT
        IT_EXCEPT_QINFO                   = IT_EXCEPT_QINFO
        IR_SALV_FULLSCREEN_ADAPTER        = IR_SALV_FULLSCREEN_ADAPTER
      IMPORTING
        E_EXIT_CAUSED_BY_CALLER           = E_EXIT_CAUSED_BY_CALLER
        ES_EXIT_CAUSED_BY_USER            = ES_EXIT_CAUSED_BY_USER
          TABLES
            T_OUTTAB                          = IT_EKBE
         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.
      ENDIF.
      IF RB2 = 'X'.
        CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
         EXPORTING
      I_INTERFACE_CHECK              = ' '
      I_BYPASSING_BUFFER             = I_BYPASSING_BUFFER
      I_BUFFER_ACTIVE                = ' '
           I_CALLBACK_PROGRAM             = V_REPID
      I_CALLBACK_PF_STATUS_SET       = ' '
      I_CALLBACK_USER_COMMAND        = ' '
      I_STRUCTURE_NAME               = I_STRUCTURE_NAME
      IS_LAYOUT                      = IS_LAYOUT
           IT_FIELDCAT                    = IT_FIELDCAT
      IT_EXCLUDING                   = IT_EXCLUDING
      IT_SPECIAL_GROUPS              = IT_SPECIAL_GROUPS
      IT_SORT                        = IT_SORT
      IT_FILTER                      = IT_FILTER
      IS_SEL_HIDE                    = IS_SEL_HIDE
      I_DEFAULT                      = 'X'
      I_SAVE                         = ' '
      IS_VARIANT                     = IS_VARIANT
      IT_EVENTS                      = IT_EVENTS
      IT_EVENT_EXIT                  = IT_EVENT_EXIT
      IS_PRINT                       = IS_PRINT
      IS_REPREP_ID                   = IS_REPREP_ID
      I_SCREEN_START_COLUMN          = 0
      I_SCREEN_START_LINE            = 0
      I_SCREEN_END_COLUMN            = 0
      I_SCREEN_END_LINE              = 0
      IR_SALV_LIST_ADAPTER           = IR_SALV_LIST_ADAPTER
      IT_EXCEPT_QINFO                = IT_EXCEPT_QINFO
      I_SUPPRESS_EMPTY_DATA          = ABAP_FALSE
    IMPORTING
      E_EXIT_CAUSED_BY_CALLER        = E_EXIT_CAUSED_BY_CALLER
      ES_EXIT_CAUSED_BY_USER         = ES_EXIT_CAUSED_BY_USER
          TABLES
            T_OUTTAB                       = IT_EKBE
         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.
      ENDIF.
    ENDFORM.                    " get_list
    Thanks
    Vikranth Khimavath
    Message was edited by:
            Khimavath Vikranth

  • Double Click on ALV Report Output, Bringing to selections creen

    Hello Gurus,
    Please help me When i do double click on ALV Report  output , it is going back to Selection screen, actually its working as Back button. Now how to stop it.. I did debugging but i cannot trace it.

    PERFORM SUB_CREATE_FCAT.
    DATA W_REPID LIKE SY-REPID.
        W_REPID = SY-REPID.
    ls_layout-colwidth_optimize = 'X'.
    ls_layout-zebra = 'X'.
    PERFORM SUB_SORT.
    CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
        EXPORTING
    *     I_INTERFACE_CHECK                 = ' '
    *     I_BYPASSING_BUFFER                = ' '
    *     I_BUFFER_ACTIVE                   = ' '
          I_CALLBACK_PROGRAM                 = SY-CPROG
          I_CALLBACK_PF_STATUS_SET          = 'STATUS'
           I_CALLBACK_USER_COMMAND           = 'C_USERCOMMAND '
    *     I_CALLBACK_TOP_OF_PAGE            = ' '
    *     I_CALLBACK_HTML_TOP_OF_PAGE       = ' '
    *     I_CALLBACK_HTML_END_OF_LIST       = ' '
    *     I_STRUCTURE_NAME                  =
    *     I_BACKGROUND_ID                   = ' '
    *     I_GRID_TITLE                      =
    *     I_GRID_SETTINGS                   =
           IS_LAYOUT                         = ls_layout
           IT_FIELDCAT                       = IT_FIELDCAT
    *     IT_EXCLUDING                      =
    *     IT_SPECIAL_GROUPS                 =
           IT_SORT                           = IT_SORT
    *     IT_FILTER                         =
    *     IS_SEL_HIDE                       =
    *     I_DEFAULT                         = 'X'
          I_SAVE                            = 'U'
    *     IS_VARIANT                        =
    *     IT_EVENTS                         =
    *     IT_EVENT_EXIT                     =
    *     IS_PRINT                          =
    *     IS_REPREP_ID                      =
    *     I_SCREEN_START_COLUMN             = 0
    *     I_SCREEN_START_LINE               = 0
    *     I_SCREEN_END_COLUMN               = 0
    *     I_SCREEN_END_LINE                 = 0
    *     I_HTML_HEIGHT_TOP                 = 0
    *     I_HTML_HEIGHT_END                 = 0
    *     IT_ALV_GRAPHICS                   =
    *     IT_HYPERLINK                      =
    *     IT_ADD_FIELDCAT                   =
    *     IT_EXCEPT_QINFO                   =
    *     IR_SALV_FULLSCREEN_ADAPTER        =
    *   IMPORTING
    *     E_EXIT_CAUSED_BY_CALLER           =
    *     ES_EXIT_CAUSED_BY_USER            =
         TABLES
           t_outtab                          = T_FINAL
    *   EXCEPTIONS
    *     PROGRAM_ERROR                     = 1
    *     OTHERS                            = 2
       IF sy-subrc <> 0.
    * Implement suitable error handling here
       ENDIF.

  • Get value of field object when I double click on any column of report

    Hi,
    We are converting our projects from .NET 2003 to .Net 2008 and upgrading reports10 to crystal reports 2008 and changing our Active x report viewer control  to crystal report viewer.
    We donu2019t use reports just to see and print the data. Our use is a bit more.
    As we were using Active X Control (CRAXDDRT) to perform different operations
    Following are some functions which are included in our requirements:
    1-     We need the columns width to be flexible which we can changed in the code dynamically according to the users wish
    2-     Setting text of some fields dynamically from .Net code
    3-     Hide and show the columns dynamically from .Net code
           Upto here we are done using crystal report 2008 and .net 2008
           Now we are stuck with problem
    4-     When we double click on fieldobject at runtime we are able to fetch the value of field object by using e.objectinfo.text.tostring, so far it is perfect
    But we have different situation here and need a solution for this
    I have two fields like Account ID and Account Description
    I need the solution so that when user clicks either on Account ID or Account Description I should be able to fetch the Field object value of Account ID Column only so that i will be able to open different forms and reports based on that ID
    As we were doing it before using Active X Control the code snippet is giving below
    case "Field: Account. AccountID ", "Field: Account.Description"
    GlobalCode = GiveCode(mYFields.Item(1).value) '------ Where 1 refer to Account ID, so in both cases either we click Account ID or Description Field at run time we are able to return the account ID field value.
    so we need solution some thing like that please do let us know how we can do that
    For Your reference we were using CrystalActivexReportViewerLib10.CRVFields obejct to fectch the report values
    Thanx in Advance
    Regards,
    Arshad Hussain Bhatt

    Hello,
    I am getting value of that cell where I am clicking. But I need the value of other columns also in that particular row where I double clicked. For this I gave one example also that suppose I have a report where there are two columns. One is AccountID and other is AccountDescription. Now if I click on Account ID I get the value of AccountID and when I click on AccountDescription I get the value of AccountDescripiton This is oK n good but I want that If i double click on AccountDescription I should be able to get the value of AccountID also.Please tell me is there anyway to do so?
    We did so when we were using CRAXDRT.Report Bellow is the code snippet for how I did it in that.
    Dim MyField As CrystalActiveXReportViewerLIb10.CRVFields
    Private Function GiveFieldIndex(ByVal As CrystalActiveXReportViewerLib10.CRVFields, ByVal FldName As String) As Integer
    For i as integer = 1 To FldArry.Count
        If FldArry.Item(i).name = FldName Then
                    GiveFieldIndex = i
          End If
    End Function
    Private Sub CRViewer1_DoubleClick(ByVal eventSender As System.Object, ByVal eventArgs As AxCrystalActiveXReportViewerLib10._ICRViewerEvents_DblClickedEvent) Handles CRViewer1.DblClicked
    If MyField.Name = "Field: AdoJV.AccountID" Or MyField.Name = "Field: AdoJV.AccountDesc" Then
    /Following line will give us AccountID in anycase either we click on AccountID or Account Desc or even you can add more column by adding Or Operator. We need something like this in Crystal Report 2008/
      Dim GlobeAddEditCode  as String = myFields.Item(GiveFieldIndex(myFields, "Field: AdoJV.AccountID")).Value
    End If
    End Sub
    Regards,
    Arshad Hussain Bhatt
    Edited by: arshhb on Oct 31, 2009 6:44 AM
    Edited by: arshhb on Oct 31, 2009 7:09 AM
    Edited by: arshhb on Oct 31, 2009 7:13 AM

  • Double-click in standard report

    Hi,
    I'm creating a standard report (not an ALV, just write's...) and I need to control events when I double-click on certain caracters on the screen. How can I do that?
    Thanks
    Carles

    hi,
    while genarating secondary list based on uer actions( double click), we provide the logic for genarating list unsder <b>AT LINE-SELECTION</b> event.
    AT LINE-SELECTION.
      <statements>.
    When the user triggers the function code PICK, AT LINE-SELECTION is always triggered if the cursor is positioned on a list line. The function code PICK is, by default, always linked with function key F2 and hence with the mouse double-click.
    <b>Example for AT LINE-SELECTION.</b>
    REPORT demo_list_at_line_selection.
    START-OF-SELECTION.
      WRITE  'Basic List'.
    AT LINE-SELECTION.
      WRITE: 'Secondary List by Line-Selection',
           / 'SY-UCOMM =', sy-ucomm.
    When you run the program, the basic list appears with the standard list status. The detail list shows that SY-UCOMM has the value PICK.
    To pass individual output fields or additional information from a user selected line to the corresponding processing block during an interactive event, use these statements:
    <b>HIDE</b>
    The HIDE statement is one of the fundamental statements for interactive reporting. You use the HIDE technique when creating a basic list. It defines the information that can be passed to subsequent detail lists.
    <b>READ LINE</b>
    Use the statements READ LINE and READ CURRENT LINE to read data from the lines of existing list levels. These statements are closely connected to the HIDE technique.
    <b>GET CURSOR</b>
    Use the statements GET CURSOR FIELD and GET CURSOR LINE to pass the output field or output line on which the cursor was positioned during the interactive event to the ABAP program.
    <b>DESCRIBE LIST</b>
    The DESCRIBE LIST statement allows you to read certain list attributes, such as the number of lines or pages, into program variables.
    follow this link fro more information.
    http://help.sap.com/saphelp_nw04/helpdata/en/9f/dba42335c111d1829f0000e829fbfe/content.htm
    follow this link for sample programs on interactive reports.
    http://www.sap-img.com/abap/a-sample-hide-get-cursor-in-interactive-programming.htm
    http://www.erpgenie.com/abap/drill_down_reports.htm
    regards,
    Ashok reddy

  • How to get the alv grid report in another screen when double click on basic

    Hi.
    I have created an alv report using class cl_gui_alv_grid.I got another report in the same screen,when double clicked on basic list(using double_click event).I want to get this report in another screen.What i have to do?(In classical reports i worked with sy-lsind = 1 ,but how to do here?)
    How to set color to the selected rows in the alv grid report?I worked with change_data_from_inside method of cl_gui_alv_grid.But it didn't work out..
    With Regards,
    Ramana.

    On double click event . you will have to call another screen say 9000.
    now within screen 900 PBO.. you will have to prepare the fieldcatalog/layout.. and the table to be displayed there.
    in PAI of screen 9000, you can return to the original ALV.
    method double_click.
    call screen 9000.
    endmethod.
    " now in PBO create a module display_alv2
    module display_alv2.
    'prepare the fieldcat/layout info for new alv
    'add the data to the new ALV table
    'instantiate the grid call.. etc
    'call the ALV
    endmodule
    "in PAI
    module exit.
    case sy-ucomm.
    when 'ENT1'.
      leave to screen 0.
    endcase.
    endmodule
    while preparing the field catalog you can mention the EMPHASIZE field, whish will give color to tht column
    E.g
    *--Service Order
        ls_fieldcat-tabname   = 'IT_FINAL_VALID'.
        ls_fieldcat-fieldname = 'AUFNR'.
        ls_fieldcat-scrtext_m = 'Service Order'.
        ls_fieldcat-ref_table = 'AUFK'.
        ls_fieldcat-ref_field = 'AUFNR'.
        ls_fieldcat-col_pos   = 1.
        ls_fieldcat-outputlen = 12.
        ls_fieldcat-emphasize = 'C400'.  "This will add color to the cell
        APPEND ls_fieldcat TO fcat_valid.
    Hope this helps.

  • About double click event in ALV report

    Hi all,
    I want to program a double-click event in ALV reprot.
    I am not suppose to use module pool approach for the same.
    If a user double clicks on the any of the row of ALV report, the transaction should get called.
    Again, I am using function 'REUSE_ALV_GRID_DISPLAY' for displaying ALV.
    Can you please help me to solve this?
    Thanks,
    -Siddhi

    Hi Sidhi,
    You can do it easily by using Reuse_ALV_GRID_DISPALY.
    The User Command subroutine which you pass to this function module in that you can check which field is selected and what is the value of that and also you can get the table index.
    I am giving you a code example where interactivity of ALV report is done .
    *& Report  ZRAIL_LOT_REPORT
    REPORT  zrail_lot_report.
    TABLES :qals,aufk.
    TYPE-POOLS:slis.
    TYPES:BEGIN OF x_lot,
          sel(1)   TYPE c,                    "SELECTION
          prueflos TYPE qals-prueflos,        "INSPECTION LOT NUMBER
          werk     TYPE qals-werk,            "PLANT
          losmenge TYPE qals-losmenge,        "LOT QUANTITY
          mengeneinh TYPE qals-mengeneinh,   "BASE UNIT OF MEASURE FOR THE INSPECTION LOT QUANTITY
          matnr   TYPE  qals-matnr,          " MATERIAL NO. ATTACHED TO ORDER
          zzequnr  TYPE qals-zzequnr,         "EQUIPMENT NO.
          zzassembly TYPE qals-zzassembly,    "ASSEMBLY
          herkunft  TYPE qals-herkunft,       "INSPECTION LOT ORIGIN
          aufnr     TYPE qals-aufnr,          "ORDER NO.
          sttxt     TYPE qals_d02-sttxt,      "LOT STATUS
          objnr     TYPE qals-objnr,          "OBJECT NUMBER
          enstehdat TYPE qals-enstehdat,      "lot creation date
          pruefer   TYPE qamr-pruefer,        "Name of the Inspector
          END OF x_lot.
    TYPES:BEGIN OF x_ordmat,
          aufnr TYPE aufk-aufnr,             "Order No.
          equnr TYPE afih-equnr,             "Equipment No. attached to Order
          zmatnr TYPE aufk-zmatnr,           "Material No. attached to Order
          bautl  TYPE afih-bautl,            "Assembly attached to Order
          END OF x_ordmat.
    TYPES:BEGIN OF x_status,
          objnr TYPE jest-objnr,
          stat  TYPE jest-stat,
          txt04 TYPE tj02t-txt04,
          END OF x_status.
    DATA:it_qals TYPE STANDARD TABLE OF x_lot,
         wa_qals TYPE x_lot.
    DATA:it_ordmat TYPE TABLE OF x_ordmat,
         wa_ordmat TYPE x_ordmat.
    DATA:it_status TYPE STANDARD TABLE OF x_status,
         wa_status TYPE x_status.
    DATA:mytabix TYPE sy-tabix.
    DATA: wa_layout   TYPE slis_layout_alv,
          wa_fieldcat TYPE slis_fieldcat_alv,
          it_fieldcat TYPE TABLE OF slis_fieldcat_alv,
          it_fcat TYPE TABLE OF slis_fieldcat_alv.
    DATA:mytabix1 TYPE sy-tabix.
    SELECTION-SCREEN BEGIN OF BLOCK  b1 WITH FRAME TITLE text-001.
    SELECT-OPTIONS: s_werks FOR qals-werk,
                    s_zmatnr FOR aufk-zmatnr,
                    s_assbly FOR qals-zzassembly,
                    s_equnr FOR qals-zzequnr,
                    s_lotor FOR qals-herkunft,
                    s_lotdat FOR qals-enstehdat.
    SELECTION-SCREEN END OF BLOCK b1.
    INITIALIZATION.
      s_lotdat-low = sy-datum - 7.
      s_lotdat-high = sy-datum.
      APPEND s_lotdat.
    START-OF-SELECTION.
      PERFORM get_data_qals.
      PERFORM build_fieldcat.
      PERFORM display_data.
      EXIT.
    END-OF-SELECTION.
    *&      Form  get_data_qals
          text
    -->  p1        text
    <--  p2        text
    FORM get_data_qals .
      IF it_qals[] IS INITIAL.
        SELECT a~prueflos
               a~werk
               a~losmenge
               a~mengeneinh
               a~zzequnr
               a~zzassembly
               a~herkunft
               a~aufnr
               a~objnr
               a~matnr
               a~enstehdat
               b~pruefer
               FROM qals AS a INNER JOIN qamr AS b
               ON aprueflos = bprueflos
               INTO CORRESPONDING FIELDS OF TABLE it_qals
               WHERE werk IN s_werks
               AND   zzassembly IN s_assbly
               AND   zzequnr    IN s_equnr
               AND   herkunft   IN s_lotor
               AND   enstehdat  IN s_lotdat.
      ENDIF.
      IF it_ordmat[] IS INITIAL.
        SELECT a~aufnr
               a~zmatnr
               b~bautl
               b~equnr
               FROM aufk AS a INNER JOIN afih AS b
               ON aaufnr = baufnr
               INTO CORRESPONDING FIELDS OF TABLE it_ordmat FOR ALL ENTRIES IN it_qals
               WHERE a~aufnr = it_qals-aufnr
                AND zmatnr IN s_zmatnr.
      ENDIF.
      IF it_status[] IS INITIAL.
        SELECT a~objnr
               a~stat
               b~txt04
               FROM  tj02t AS b
               INNER JOIN jest AS a ON bistat = astat
               INTO CORRESPONDING FIELDS OF TABLE it_status FOR ALL ENTRIES IN it_qals
               WHERE a~objnr = it_qals-objnr
               AND   b~spras = sy-langu
               AND   a~inact = space.
      ENDIF.
      LOOP AT it_qals INTO wa_qals.
        mytabix = sy-tabix.
        READ TABLE it_ordmat INTO wa_ordmat WITH KEY aufnr = wa_qals-aufnr.
        IF sy-subrc = 0.
          IF wa_qals-herkunft = '14'.
            wa_qals-matnr = wa_ordmat-zmatnr.
            wa_qals-zzequnr =  wa_ordmat-equnr.
            wa_qals-zzassembly = wa_ordmat-bautl.
            MODIFY it_qals FROM wa_qals INDEX  mytabix TRANSPORTING matnr zzassembly zzequnr.
          ENDIF.
        ENDIF.
        LOOP AT it_status INTO wa_status WHERE objnr = wa_qals-objnr.
          CONCATENATE wa_qals-sttxt wa_status-txt04 INTO wa_qals-sttxt SEPARATED BY space.
          CLEAR :wa_status.
        ENDLOOP.
        MODIFY it_qals FROM wa_qals INDEX  mytabix TRANSPORTING sttxt.
        CLEAR :wa_qals,wa_ordmat,mytabix.
      ENDLOOP.
      IF s_zmatnr[] IS NOT INITIAL.
        DELETE it_qals WHERE matnr IS INITIAL.
      ENDIF.
    ENDFORM.                    " get_data_qals
    *&      Form  build_fieldcat
          text
    -->  p1        text
    <--  p2        text
    FORM build_fieldcat .
      wa_layout-zebra = 'X'.
      wa_layout-colwidth_optimize = 'X'.
      wa_layout-box_fieldname = 'SEL'.
      wa_layout-box_tabname = 'IT_QALS'.
      CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
       EXPORTING
        I_PROGRAM_NAME               =
          i_internal_tabname           = 'IT_QALS'
          i_structure_name             = 'QALS_D02'
        I_CLIENT_NEVER_DISPLAY       = 'X'
        I_INCLNAME                   =
        I_BYPASSING_BUFFER           =
        I_BUFFER_ACTIVE              =
        CHANGING
          ct_fieldcat                  = it_fieldcat
      IF sy-subrc = 0.
        LOOP AT  it_fieldcat INTO wa_fieldcat.
          CASE  wa_fieldcat-fieldname .
            WHEN  'PRUEFLOS'.
              wa_fieldcat-col_pos = 1.
              wa_fieldcat-hotspot = 'X'.
              APPEND wa_fieldcat TO it_fcat.
            WHEN   'WERK'.
              wa_fieldcat-col_pos = 3.
              APPEND wa_fieldcat TO it_fcat.
            WHEN  'LOSMENGE'.
              wa_fieldcat-col_pos = 4.
              wa_fieldcat-no_out = ''.
              APPEND wa_fieldcat TO it_fcat.
            WHEN  'MENGENEINH'.
              wa_fieldcat-col_pos = 5.
              wa_fieldcat-no_out = ''.
              APPEND wa_fieldcat TO it_fcat.
            WHEN 'ZZEQUNR'.
              wa_fieldcat-col_pos = 6.
              wa_fieldcat-no_out = ''.
              wa_fieldcat-hotspot = 'X'.
              APPEND wa_fieldcat TO it_fcat.
            WHEN  'ZZASSEMBLY'.
              wa_fieldcat-col_pos = 7.
              wa_fieldcat-no_out = ''.
              wa_fieldcat-hotspot = 'X'.
              APPEND wa_fieldcat TO it_fcat.
            WHEN  'HERKUNFT'.
              wa_fieldcat-col_pos = 8.
              APPEND wa_fieldcat TO it_fcat.
            WHEN  'AUFNR'.
              wa_fieldcat-col_pos = 9.
              wa_fieldcat-hotspot = 'X'.
              APPEND wa_fieldcat TO it_fcat.
            WHEN  'ENSTEHDAT'."enstehdat
              wa_fieldcat-col_pos = 10.
              APPEND wa_fieldcat TO it_fcat.
            WHEN  'STTXT'.
              wa_fieldcat-col_pos = 12.
              wa_fieldcat-hotspot = 'X'.
              APPEND wa_fieldcat TO it_fcat.
            WHEN OTHERS.
          ENDCASE.
          CLEAR wa_fieldcat.
        ENDLOOP.
        wa_fieldcat-fieldname = 'MATNR'.
        wa_fieldcat-tabname  =  'IT_QALS'.
        wa_fieldcat-col_pos = 2.
        wa_fieldcat-ref_tabname = 'AUFK'.
        wa_fieldcat-hotspot = 'X'.
        wa_fieldcat-seltext_l = 'Material No.'.
        APPEND wa_fieldcat TO it_fcat.
        wa_fieldcat-fieldname = 'PRUEFER'.
        wa_fieldcat-tabname  =  'IT_QALS'.
        wa_fieldcat-col_pos = 11.
        wa_fieldcat-ref_tabname = 'QAMR'.
        wa_fieldcat-seltext_l = 'Name of the Inspector'.
        APPEND wa_fieldcat TO it_fcat.
      ENDIF.
    ENDFORM.                    " build_fieldcat
    *&      Form  display_data
          text
    -->  p1        text
    <--  p2        text
    FORM display_data .
      CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
       EXPORTING
       i_callback_program                = 'ZRAIL_LOT_REPORT'
      I_CALLBACK_PF_STATUS_SET          = ' '
         i_callback_user_command           = 'USER_COMMAND'
         is_layout                         = wa_layout
          it_fieldcat                       = it_fcat
      IT_EXCLUDING                      =
      IT_SPECIAL_GROUPS                 =
      IT_SORT                           =
      IT_FILTER                         =
      IS_SEL_HIDE                       =
      I_DEFAULT                         = 'X'
      I_SAVE                            = ' '
      IS_VARIANT                        =
      IT_EVENTS                         =
      IT_EVENT_EXIT                     =
      IS_PRINT                          =
      IS_REPREP_ID                      =
      I_SCREEN_START_COLUMN             = 0
      I_SCREEN_START_LINE               = 0
      I_SCREEN_END_COLUMN               = 0
      I_SCREEN_END_LINE                 = 0
      I_HTML_HEIGHT_TOP                 = 0
      I_HTML_HEIGHT_END                 = 0
      IT_ALV_GRAPHICS                   =
      IT_HYPERLINK                      =
      IT_ADD_FIELDCAT                   =
      IT_EXCEPT_QINFO                   =
      IR_SALV_FULLSCREEN_ADAPTER        =
        TABLES
          t_outtab                          = it_qals
    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_data
    *&      Form  USER_COMMAND
          text
         -->R_UCOMM      text
         -->RS_SELFIELD  text
    FORM user_command USING r_ucomm TYPE sy-ucomm  rs_selfield TYPE slis_selfield.
      CASE rs_selfield-fieldname  .
        WHEN 'PRUEFLOS'.
          SET PARAMETER ID 'QLS' FIELD rs_selfield-value.
          CALL TRANSACTION 'QA03' AND SKIP FIRST SCREEN.
        WHEN 'ZZEQUNR'.
          SET PARAMETER ID 'EQN' FIELD  rs_selfield-value.
          CALL TRANSACTION 'IE03' AND SKIP FIRST SCREEN.
        WHEN 'ZMATNR'.
          SET PARAMETER ID 'MAT' FIELD rs_selfield-value.
          CALL TRANSACTION 'MM03' AND SKIP FIRST SCREEN.
        WHEN 'ZZASSEMBLY'.
          SET PARAMETER ID 'MAT' FIELD rs_selfield-value.
          CALL TRANSACTION 'MM03' AND SKIP FIRST SCREEN.
        WHEN 'AUFNR'.
          SET PARAMETER ID 'ANR' FIELD rs_selfield-value.
          CALL TRANSACTION 'IW33' AND SKIP FIRST SCREEN.
        WHEN 'STTXT'.
          MOVE rs_selfield-tabindex TO mytabix1.
          PERFORM show_status.
      ENDCASE.
    ENDFORM.                    "USER_COMMAND
    *&      Form  show_status
          text
    -->  p1        text
    <--  p2        text
    FORM show_status .
      DATA:it_systat TYPE TABLE OF bapi2045ss,
           wa_sysstat TYPE bapi2045ss,
           it_bapi2045us TYPE TABLE OF bapi2045us.
      DATA:it_fsys TYPE TABLE OF slis_fieldcat_alv.
      DATA:insplot TYPE bapi2045d_il0-insplot.
      DATA:language TYPE bapi2045la.
      CLEAR wa_qals.
      READ TABLE it_qals INTO wa_qals INDEX mytabix1.
      insplot = wa_qals-prueflos.
      language-langu = sy-langu.
      CALL FUNCTION 'BAPI_INSPLOT_GETSTATUS'
        EXPORTING
          number        = insplot
          language      = language
        TABLES
          system_status = it_systat
          user_status   = it_bapi2045us.
      CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
        EXPORTING
          i_program_name     = 'ZRAIL_LOT_REPORT'
          i_internal_tabname = 'IT_SYSTAT'
          i_structure_name   = 'BAPI2045SS'
        CHANGING
          ct_fieldcat        = it_fsys.
      CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
        EXPORTING
          i_callback_program = 'ZRAIL_LOT_REPORT'
          it_fieldcat        = it_fsys
        TABLES
          t_outtab           = it_systat.
    ENDFORM.                    " show_status
    IIn the subrouitne the User command the Parameter rs_selfield will give you the selected or clicked field and its value its record no .
    I hope this will help you.

Maybe you are looking for