JTable cell color overriding Boolean values displayed as checkboxes. Fix?

I have a JTable column of Boolean values that automatically appear as checkboxes. When I apply my DefaultTableCellRenderer to this column, the checkbox disappears and a "false" or "true" appears instead. But if I mouseclick on the cell, the checkbox will appear momentarily.
Any suggestions for getting the Boolean value displayed as a checkbox and seeing my colors change? (I suppose the easy way is using JCheckBox, but I'm curious if I can do it using Boolean)
Thanks for the help. Code follows for the cell renderer.
class ColorRenderer extends DefaultTableCellRenderer{
public ColorRenderer() {
super();
public Component getTableCellRendererComponent(JTable table, Object value, boolean isSelected, boolean hasFocus, int row, int column) {
if (isSelected == true) {
setBackground(Color.getHSBColor(100, 100, 1));
setForeground(Color.BLACK);
} else {
setBackground(Color.LIGHT_GRAY);
setForeground(Color.WHITE);
if (hasFocus == true) {
setBackground(Color.RED);
setForeground(Color.WHITE);
setOpaque(true);
setValue(value);
return this;

Wouldn't extend DefaultTableCellRenderer as that extends a JLabel
I would extend a JCheckBox and implement TableCellRenderer.

Similar Messages

Shading part of a JTable Cell dependent upon the value of the cell

Hi
Was hoping some one woudl be able to provide some help with this. I'm trying to create a renderer that will "shade" part of a JTable cell's background depending upon the value in the cell as a percentage (E.g. if the cell contains 0.25 then a quarter of the cell background will be shaded)
What I've got so far is a renderer which will draw a rectangle whose width is the relevant percentage of the cell's width. (i.e. the width of the column) based on something similar I found in the forum but the part I'm struggling with is getting it to draw this rectangle in any cell other than the first cell. I've tried using .getCellRect(...) to get the x and y position of the cell to draw the rectangle but I still can't make it work.
The code for my renderer as it stands is:
import java.awt.Component;
import java.awt.Graphics;
import java.awt.Graphics2D;
import javax.swing.JLabel;
import javax.swing.JTable;
import javax.swing.table.TableCellRenderer;
public class PercentageRepresentationRenderer extends JLabel implements TableCellRenderer{
     double percentageValue;
     double rectWidth;
     double rectHeight;
     JTable table;
     int row;
     int column;
     int x;
     int y;
     public Component getTableCellRendererComponent(JTable table, Object value, boolean isSelected, boolean hasFocus, int row, int column) {
          if (value instanceof Number)
               this.table = table;
               this.row = row;
               this.column = column;
               Number numValue = (Number)value;
               percentageValue = numValue.doubleValue();
               rectHeight = table.getRowHeight(row);
               rectWidth = percentageValue * table.getColumnModel().getColumn(column).getWidth();
          return this;
     public void paintComponent(Graphics g) {
        x = table.getCellRect(row, column, false).x;
        y = table.getCellRect(row, column, false).y;
          setOpaque(false);
        Graphics2D g2d = (Graphics2D)g;
        g2d.fillRect(x,y, new Double(rectWidth).intValue(), new Double(rectHeight).intValue());
        super.paintComponent(g);
}and the following code produces a runnable example:
import javax.swing.JFrame;
import javax.swing.JScrollPane;
import javax.swing.JTable;
import javax.swing.table.DefaultTableModel;
public class PercentageTestTable extends JFrame {
     public PercentageTestTable()
          Object[] columnNames = new Object[]{"A","B"};
          Object[][] tableData = new Object[][]{{0.25,0.5},{0.75,1.0}};
          DefaultTableModel testModel = new DefaultTableModel(tableData,columnNames);
          JTable test = new JTable(testModel);
          test.setDefaultRenderer(Object.class, new PercentageRepresentationRenderer());
          JScrollPane scroll = new JScrollPane();
          scroll.getViewport().add(test);
          add(scroll);
     public static void main(String[] args)
          PercentageTestTable testTable = new PercentageTestTable();
          testTable.pack();
          testTable.setVisible(true);
          testTable.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);
}If anyone could help or point me in the right direction, I'd appreciate it.
Ruanae

This is an example I published some while ago -
import java.awt.*;
import javax.swing.*;
import javax.swing.table.*;
public class Fred120 extends JPanel
    static final Object[][] tableData =
        {1, new Double(10.0)},
        {2, new Double(20.0)},
        {3, new Double(50.0)},
        {4, new Double(10.0)},
        {5, new Double(95.0)},
        {6, new Double(60.0)},
    static final Object[] headers =
        "One",
        "Two",
    public Fred120() throws Exception
        super(new BorderLayout());
        final DefaultTableModel model = new DefaultTableModel(tableData, headers);
        final JTable table = new JTable(model);
        table.getColumnModel().getColumn(1).setCellRenderer( new LocalCellRenderer(120.0));
        add(table);
        add(table.getTableHeader(), BorderLayout.NORTH);
    public class LocalCellRenderer extends DefaultTableCellRenderer
        private double v = 0.0;
        private double maxV;
        private final JPanel renderer = new JPanel(new GridLayout(1,0))
            public void paintComponent(Graphics g)
                super.paintComponent(g);
                g.setColor(Color.CYAN);
                int w = (int)(getWidth() * v / maxV + 0.5);
                int h = getHeight();
                g.fillRect(0, 0, w, h);
                g.drawRect(0, 0, w, h);
        private LocalCellRenderer(double maxV)
            this.maxV = maxV;
            renderer.add(this);
            renderer.setOpaque(true);
            renderer.setBackground(Color.YELLOW);
            renderer.setBorder(null);
            setOpaque(false);
            setHorizontalAlignment(JLabel.CENTER);
        public Component getTableCellRendererComponent(JTable table, Object value, boolean isSelected, boolean hasFocus, int row, int col)
            final JLabel label = (JLabel) super.getTableCellRendererComponent(table, value, isSelected, hasFocus, row, col);
            if (value instanceof Double)
                v = ((Double)value).doubleValue();
            return renderer;
    public static void main(String[] args) throws Exception
        final JFrame frame = new JFrame("Fred120");
        frame.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);
        frame.setContentPane(new Fred120());
        frame.pack();
        frame.setLocationRelativeTo(null);
        frame.setVisible(true);
}

Code to change JTable cell color not working

My code below is supposed to change the color
of a single JTable cell however its not working.
Could anyone please tell me why?
Here's the code:
import java.awt.*;
import javax.swing.table.*;
import javax.swing.*;
import java.awt.event.*;
public class ColorTable extends JTable {
public ColorTable() {
AbstractTableModel tableModel = new AbstractTableModel() {
public Class getColumnClass(int column) { return Integer.class; }
public int getColumnCount() { return 6; }
public int getRowCount() { return 10;}
public Object getValueAt(int row,int col) { return new Integer(row * col); }
setModel(tableModel);
setDefaultRenderer(Integer.class,new ColorRenderer(Color.cyan));
this.setRowSelectionAllowed(false);
this.setCellSelectionEnabled(true);
addMouseListener(new MouseAdapter() {
private ColorRenderer renderer;
private JColorChooser chooser = new JColorChooser();
public void mousePressed(MouseEvent e) {
if(e.getModifiers() == MouseEvent.BUTTON3_MASK) {
System.out.print("rowAtPoint(e.getPoint())=" +rowAtPoint(e.getPoint()));
System.out.print( "columnAtPoint(e.getPoint()))=" + columnAtPoint(e.getPoint()));
renderer = (ColorRenderer)getCellRenderer(rowAtPoint(e.getPoint()), columnAtPoint(e.getPoint()));
// chooser.setColor(renderer.getColor());
renderer.setColor(chooser.showDialog((Component)e.getSource(),"Choose Cell Color",chooser.getColor()));
class ColorRenderer extends DefaultTableCellRenderer {
private Color cellColor;
public ColorRenderer(Color color) { cellColor = color; }
public Component getTableCellRendererComponent(JTable table, Object value, boolean isSelected, boolean hasFocus, int row, int column) {
System.out.print("row= " + row + "\n");
System.out.print("column= " + column + "\n");
System.out.print("OBJECT VALUE=" + value.toString());
//Component comp = super.getTableCellRendererComponent(table,value,isSelected,hasFocus,row,column);
super.getTableCellRendererComponent(table,value,isSelected,hasFocus,row,column);
if (isSelected) {
setOpaque(true);
setBackground(cellColor);
else {
setBackground(Color.white);
setForeground(Color.black);
return this;
public void setColor(Color color)
cellColor = color;
ColorTable.this.repaint();
public Color getColor() { return cellColor; }
public static void main(String[] args) {
JFrame frame = new JFrame();
JPanel panel = new JPanel();
ColorTable table = new ColorTable();
panel.add(table);
frame.getContentPane().add(panel);
frame.setSize(500,250);
frame.setVisible(true);

My code below is supposed to change the color
of a single JTable cell however its not working.
Could anyone please tell me why?
Here's the code:
import java.awt.*;
import javax.swing.table.*;
import javax.swing.*;
import java.awt.event.*;
public class ColorTable extends JTable {
public ColorTable() {
AbstractTableModel tableModel = new AbstractTableModel() {
public Class getColumnClass(int column) { return Integer.class; }
public int getColumnCount() { return 6; }
public int getRowCount() { return 10;}
public Object getValueAt(int row,int col) { return new Integer(row * col); }
setModel(tableModel);
setDefaultRenderer(Integer.class,new ColorRenderer(Color.cyan));
this.setRowSelectionAllowed(false);
this.setCellSelectionEnabled(true);
addMouseListener(new MouseAdapter() {
private ColorRenderer renderer;
private JColorChooser chooser = new JColorChooser();
public void mousePressed(MouseEvent e) {
if(e.getModifiers() == MouseEvent.BUTTON3_MASK) {
System.out.print("rowAtPoint(e.getPoint())=" +rowAtPoint(e.getPoint()));
System.out.print( "columnAtPoint(e.getPoint()))=" + columnAtPoint(e.getPoint()));
renderer = (ColorRenderer)getCellRenderer(rowAtPoint(e.getPoint()), columnAtPoint(e.getPoint()));
// chooser.setColor(renderer.getColor());
renderer.setColor(chooser.showDialog((Component)e.getSource(),"Choose Cell Color",chooser.getColor()));
class ColorRenderer extends DefaultTableCellRenderer {
private Color cellColor;
public ColorRenderer(Color color) { cellColor = color; }
public Component getTableCellRendererComponent(JTable table, Object value, boolean isSelected, boolean hasFocus, int row, int column) {
System.out.print("row= " + row + "\n");
System.out.print("column= " + column + "\n");
System.out.print("OBJECT VALUE=" + value.toString());
//Component comp = super.getTableCellRendererComponent(table,value,isSelected,hasFocus,row,column);
super.getTableCellRendererComponent(table,value,isSelected,hasFocus,row,column);
if (isSelected) {
setOpaque(true);
setBackground(cellColor);
else {
setBackground(Color.white);
setForeground(Color.black);
return this;
public void setColor(Color color)
cellColor = color;
ColorTable.this.repaint();
public Color getColor() { return cellColor; }
public static void main(String[] args) {
JFrame frame = new JFrame();
JPanel panel = new JPanel();
ColorTable table = new ColorTable();
panel.add(table);
frame.getContentPane().add(panel);
frame.setSize(500,250);
frame.setVisible(true);

Edit a JTable cell, click save button, value isn't stored in JTable

I'm editing a JTable cell, just using default editor provided by JTable
I click a save button elsewhere in my GUI
The value typed into the cell so far isn't stored in the TableModel yet and so doesn't get saved.
How can I make sure the value gets stored in the JTable in the above scenario when the JButton is pressed but before saving.
Preferably I'd like the code with the JButton not to have to know about the JTable at all.
Cheers,
D

I the forums 100s of times.Many thanks. If they had a decent search on this forum I might have found it as I did try.
Come to think of it - Sun have completely fcukd up this forum.

Problem when setting JTable cell color.

hello,
when I setting color for particular table cell, it sets.
but, when I click another row (another cell) , the color of the previous cell disabled and it visible only when I click that cells row.
how can I permanatly set the color for the rows depends on input data.
for example,
if a device is connected, I want to give the cell color GREEN.
if device is not connected , i want to give the color as RED.
thank you.

but, when I click another row (another cell) , the color of the previous cell disabled and it visible only when I click that cells row.It appears you applied color to cell editor.
tableObj.getComponentAt(x,y).setForeground(Color.red);
tableObj.getComponentAt(x,y).setBackground(Color.red); or could be solved properl if you post the code

Binding a boolean value to a Checkbox in Dashcode

I can't seem to bind a boolean value in my JSON model to a checkbox in Dashcode. I can create the binding, and it shows up properly in the datasource and in the bindings inspector for the checkbox part, but if I launch the application through the simulator, or if I save the project, the binding disappears.
To reproduce:
1. create an empty (custom) web application project.
2. Drag a checkbox part onto the canvas.
3. Create a datasource with the JSON model:
doit: "false"
4. Load the datasource, and drag a binding from the doit boolean field to the checkbox. The binding is created. Save the project. The binding is gone.
Anyone else seen this? What am I doing wrong?

happybuddha wrote:
The question really is, if my pojo has lets say 10 setter methods which will set a boolean to variables in the class. Is there a way I can pass a boolean parameter to 9 out of 10 setters (since the 10th one will be true)?
Or to all setters is also fine I can then set the one I am interested to true. In case the properties of your PoJOs are <tt>boolean</tt> (and not <tt>Boolean</tt>) they get initialized to false on Object creation.
bye
TPD

ALV Grid display cell color based on value ( Function Module ALV )

Hi,
I want to color the cell based on value eg ( Green = Green color, Red = Red color, Amber = Yello color ).
Each and every cell is editable after displaying on screen. once the user clicks update button the contents has to be saved to a custom table.
Can anyone help?
Advance thanks

Hi,
<li>To get color for the cell, you need to set EMPHASIZE field with below information while building fieldcatalog.
emphasize (highlight columns in color)
value set: SPACE, 'X' or 'Cxyz' (x:'1'-'9'; y,z: '0'=off '1'=on)
'X' = column is colored with the default column highlight color.
'Cxyz' = column is colored with a coded color:
C: Color (coding must begin with C)
x: color number
y: bold
z: inverse
<li> To edit the fields, you need to set EDIT = 'X' or INPUT= 'X' . Try those .
wa_fieldcata-input = 'X'.
<li>you need to set PF status , to do your remaining requirement.
<li>For any help, you have to search the forum .
Thanks
Venkat.O

JTable cell color

I use the following custom DefaultTableCellRenderer:
------------------------CustomTableCellRenderer-------------------
import java.awt.Component;
import java.awt.Color;
import java.awt.Font;
import javax.swing.JTable;
import javax.swing.table.DefaultTableCellRenderer;
public class CustomTableCellRenderer extends DefaultTableCellRenderer
     public Component getTableCellRendererComponent( JTable jTable, Object value,boolean isSelected, boolean hasFocus, int row,int col)
     super.getTableCellRendererComponent(jTable, value, false,
     true, row, col);
     setHorizontalAlignment(CENTER);
     if(row!=0 && !(jTable.getValueAt(row-1,col).toString().equals(value.toString()))) {
          setBackground(new Color(255,220,220));
     return this;
-----------------main class-----------------------------------------------
TableCellRenderer cell = new CustomTableCellRenderer();
     table.setDefaultRenderer( Object.class, cell );
The above scheme works fine where I want to color a cell every time a change/transition occurs among the values in a particular column for each column in the table.
The problem is, in the resulting table, all the cells appear selected and I am unable to select a set of rows or columns by clicking/dragging and trying to create a rectangular rubberband.
Why is it not allowing me to treat this as a regular JTable instance where upon clicking any cell, the whole row gets selected?
I suspect the 3rd and 4th arguments in the following statement, I tried all boolean combinations for it, but in vain:
super.getTableCellRendererComponent(jTable, value, false,
     true, row, col);
any help?

You need to override the prepareRenderer method of the TableRenderer with something like this:
        table = new JTable(myTableModel) {
            public Component prepareRenderer(TableCellRenderer renderer, int rowIndex, int colIndex) {
                Component c = super.prepareRenderer(renderer, rowIndex, colIndex);
                // Set color lightyellow, lightred (inverted ones) or just like the rest of the cells.
                String cellContent = myTableModel.getValueAt(rowIndex, 4).toString();
                if (table.isCellSelected(rowIndex, colIndex)) {
                    // nothing to do or maybe setSelectionBackground or further if/else if/else for selected cells.
                } else if (colIndex == 4 && cellContent.equals("content1")) {
                    c.setBackground(new Color(255, 220, 200));
                } else if (colIndex == 4 && cellContent.contains("content2")) {
                    c.setBackground(new Color(255, 255, 220));
                } else {
                    c.setBackground(table.getBackground());
                return c;
        };If you don't know that c is a TableCellRenderer component you'll need instanceof check.

Setting jtables cell color

Hi,
I would like to know if anyone know how to set a specific cell colour in a JTable, or if they know any links to when i can find help...thanks in advance
Rudy

Take a look at TableCellRenderer and its default implementation
HTH
Mike

How to display cusomized custom tooltip(jwindow) in jtable cell position

Hi,
i am trying to display custom tooltip for jtable cell. i created custom tooltip(jwindow) and on mouseover of jtable cell i am trying to display the custom tooltip.
But it is not display the position of jtable cell. How to display the exact position of jtable cell
please help me on this.

Did you read the posting directly below yours which was also about a custom tool tip?
JScrollableToolTip is buggy
The code presented there shows the tool tip in the proper location.
For more help create a [url http://sscce.org]SSCCE, that demonstrates the incorrect behaviour.
Don't forget to read the "Welcome to the new home" posting at the start of the forum to learn how to use the "code tags" so posted code is formatted and readable.

Set Cell Color without using DefaultTableCellRenderer

Hi,
Is there any possible to set the JTable cell color without using DefaultTableCellRenderer ?. For ex, I have one JTable that having 9 rows and 9 columns. I have to set the cell color in 2nd row & 3rd column.
Please anyone give me guidance to solve this.
Thanks & Regards
S Senthilkumar

Fine.. Please try to understand my points.
Because in my application I have JTable that having 10 columns and rows dynamically will come based on the value fetch from arraylist. If I use DefaultTableCellRenderer, for each record its calling CustomTableCellRenderer(). For example arraylist return 10 rows means its looping 100 times(10 rows * 10 columns).
CustomTableCellRenderrer.java
ArrayList dataLiveMarket = (ArrayList) new CheckUser().getLiveMarketDetails(unval);
CustomTableModel modelLiveMarket = new CustomTableModel(dataLiveMarket);
JTable tableOne = new JTable(modelLiveMarket);
tableOne.setDefaultRenderer(Object.class, new CustomTableCellRenderer());
CustomTableCellRenderrer.java
package com.fxtrading.dao;
import java.awt.Color;
import java.awt.Component;
import javax.swing.JTable;
import javax.swing.SwingConstants;
import javax.swing.table.DefaultTableCellRenderer;
import javax.swing.table.TableModel;
* @author user
public class CustomTableCellRenderer extends DefaultTableCellRenderer {
    //private TableModel bidLastPrice;
    //int k;
    @Override
    public Component getTableCellRendererComponent(JTable table, Object value, boolean isSelected,
            boolean hasFocus,
            int row, int column) {
        Component component =
                super.getTableCellRendererComponent(table, value, isSelected, hasFocus, row, column);
        if (column == 0 || column == 1|| column == 2) {
            setHorizontalAlignment(SwingConstants.LEFT);
        } else if(column == 3 || column == 4 || column == 5 || column == 6 || column == 7 || column == 8){
            setHorizontalAlignment(SwingConstants.RIGHT);
        }else if(column == 9){
            setHorizontalAlignment(SwingConstants.CENTER);
        // Change cell Color - Started
        bidLastPrice = table.getModel();
        int bidLastRowCount =(int)table.getRowCount();
        for(k=0; k<bidLastRowCount; k++) {
            String bidPrice = (String)bidLastPrice.getValueAt(k,4);
            String lastPrice = (String)bidLastPrice.getValueAt(k,8);
            bidPrice = bidPrice.replace(",","").replace("$","");
            lastPrice = lastPrice.replace(",","").replace("$","");
            if(Double.parseDouble(bidPrice)<Double.parseDouble(lastPrice)){
                if(row == k && column == 4){
                    component.setBackground(Color.RED);
                }else{
                    component.setBackground(Color.WHITE);
                System.out.println("Row Count -->"+k+" Less ----> Bid Price----> "+Double.parseDouble(bidPrice)+" : Last Price----> "+Double.parseDouble(lastPrice));
            }else{
                if(row == k && column == 4){
                    component.setBackground(Color.GREEN);
                }else{
                    component.setBackground(Color.WHITE);
                System.out.println("Row Count -->"+k+" More ----> Bid Price----> "+Double.parseDouble(bidPrice)+" : Last Price----> "+Double.parseDouble(lastPrice));
        // Change cell Color - End
        return component;
}Thanks & Regards,
S Senthilkumar

Color for negative Values in ALV Report

I want to change the color for negative values displayed in ALV list diplay report. Eg. -5 in Quantity should be changed to orange. Kindly help me
Thanks

Check the below program and bold one are important ( which is similar to MD05 Traffic lights )
REPORT ZWM_BIN_STOCK_REQ no standard page heading
                    message-id zwave.
D A T A   D E C L A R A T I O N ****************************
Tables
tables :zpwvbap,
         mara,
         marc,
         makt,
         vbap,
         zshift,
         marm,
         lqua.
TYPE-POOLS: SLIS.
Internal Table for Sales order
data : begin of i_vbap occurs 0,
       matnr like zpwvbap-matnr," Material #
       ZZCUTOFF like zpwvbak-ZZCUTOFF," Cutoff Time
       vlpla like zpwvbap-vlpla,
       kwmeng like zpwvbap-kwmeng," Quantity
       vrkme like zpwvbap-vrkme, " Sales Unit
       meins like zpwvbap-meins, " Unit of measure
       end of i_vbap.
Internal Table for final Processing
data : begin of i_final occurs 0,
       date(8) type c,
       matnr like zpwvbap-matnr," Material #
       zzshift like zshift-zzshift, " Wave Drop
       maktx like makt-maktx," Desc
       lgpla like lagp-lgpla, " Pick Bin
       pverme like lqua-verme," Stock at Pick Bin
       prverme like lqua-verme," Stock at Prod Bin
       kwmeng like zpwvbap-kwmeng," Requiremnet from Wave Drop
       vrkme like zpwvbap-vrkme, " Sales Unit
      meins like zpwvbap-meins," Unit of measure
       end of i_final.
Internal Table for Output
data : begin of i_output occurs 0,
     <b> field type c, " Traffic Lights</b>
      zzshift like zshift-zzshift, " Wave Drop
       matnr like zpwvbap-matnr," Material #
       maktx like makt-maktx," Desc
       lgpla like lagp-lgpla, " Pick Bin
       pverme like lqua-verme," Stock at Pick Bin
       prverme like lqua-verme," Stock at Prod Bin
       kwmeng like zpwvbap-kwmeng," Requiremnet from Wave Drop
       vrkme like zpwvbap-vrkme," Sales Unit
      meins like zpwvbap-meins," Unit of measure
       diff like zpwvbap-kwmeng, " Diffrence
       end of i_output.
Work Area for Final Internal Table
data wa_final like i_final.
data : w_zzcutoff(12) TYPE c,
        v_date type sy-datum,
        v_time(4) type c,
        v_fldate(12) type c,
        v_fhdate(12) type c,
        v_pverme like lqua-verme,
        v_prverme like lqua-verme,
        v_diff like zpwvbap-kwmeng.
Variables for new check box
data : v_nverme like lqua-verme.
Internal Table for Pick Bin
data : begin of i_verme occurs 0,
       verme like lqua-verme,
       end of i_verme.
Internal table for Prod Bin
data : begin of i_pverme occurs 0,
       verme like lqua-verme,
       end of i_pverme.
Variables for ALV
DATA: FIELDCAT           TYPE SLIS_T_FIELDCAT_ALV,
      FIELDCAT_LN        LIKE LINE OF FIELDCAT,
      SORTCAT            TYPE SLIS_T_SORTINFO_ALV,
      SORTCAT_LN         LIKE LINE OF SORTCAT,
      EVENTCAT           TYPE SLIS_T_EVENT,
      EVENTCAT_LN        LIKE LINE OF EVENTCAT,
      LAYOUT             TYPE SLIS_LAYOUT_ALV,
      C_TOP_OF_PAGE      TYPE SLIS_FORMNAME VALUE 'TOP_OF_PAGE',
      g_user_command TYPE slis_formname VALUE 'USER_COMMAND',
      GT_LIST_TOP_OF_PAGE TYPE SLIS_T_LISTHEADER.
DATA: COL_POS TYPE I,
      P_LIGNAM TYPE SLIS_FIELDNAME VALUE 'FIELD'.
DATA : V_REPID LIKE SY-REPID,
       flag type c.
S E L E C T I O N - S C R E E N *************************
selection-screen : begin of block blk with frame title text-001.
parameter : p_plant like marc-werks obligatory default '1000'.
select-options : s_date for sy-datum obligatory ,
                 s_shift for zshift-zzshift,
                 s_matnr for mara-matnr,
                 s_dept for zpwvbap-zzdept,
                 s_pdept for marc-ZZPRODDEPT.
selection-screen: end of block blk.
parameters : p_check as checkbox ."default 'X'.
ranges r_cutoff for w_zzcutoff.
I N I T I A L I Z A T I O N ****************************
initialization.
V_REPID = SY-REPID.
s_date-low = sy-datum + 1.
append s_date.
S T A R T - O F - S E L E C T I O N ***********************
start-of-selection.
Get the Shift Data.
PERFORM GET_SHIFT_DETAILS.
Get the data from ZPWVBAP Table
PERFORM GET_DATA_VBAP.
E N D - O F - S E L E C T I O N **********************
end-of-selection.
if not i_output[] is initial.
    sort i_output by field zzshift matnr.
Reset the all Fiedcatlog.
    PERFORM RESETVALUES.
Traffic Lights
    PERFORM BUILD_LAYOUT.
Fill the fieldcatlog values
    PERFORM FILL_FIELDCATLOG.
Call the List Function module
    PERFORM CALL_lIST.
endif.
*&      Form GET_SHIFT_DETAILS
      Get the Cutoff Time.
FORM GET_SHIFT_DETAILS.
clear : v_fldate,
          v_fhdate.
if not s_shift-low is initial.
    clear: v_time,
           v_date.
    if s_shift-low = '1'.
      v_time = '2000'.
    elseif s_shift-low = '2'.
      v_time = '2300'.
    endif.
    v_date = s_date-low - 1.
    concatenate v_date v_time into v_fldate.
endif.
if not s_shift-high is initial.
    clear : v_date,
            v_time.
    if s_shift-high = '1'.
      v_time = '2000'.
    elseif s_shift-high = '2'.
      v_time = '2300'.
    endif.
    if not s_date-high is initial.
      v_date = s_date-high - 1.
    else.
      v_date = s_date-low - 1.
    endif.
    concatenate v_date v_time into v_fhdate.
endif.
if not v_fhdate is initial.
    r_cutoff-low = v_fldate.
    r_cutoff-high = v_fhdate.
    r_cutoff-sign = 'I'.
    r_cutoff-option = 'BT'.
    append r_cutoff.
endif.
ENDFORM.                    " GET_SHIFT_DETAILS
*&      Form GET_DATA_VBAP
      Get the data from ZPWVBAP Table
FORM GET_DATA_VBAP.
Get the data from ZPWVBAP and ZPWVBAK Table
if not v_fhdate is initial.
    select matnr ZZCUTOFF vlpla sum( kwmeng ) vrkme meins
                 into table i_vbap
                 from zpwvbap as a inner join zpwvbak as b on
                               a~vbeln = b~vbeln
                               where a~werks = p_plant
                               and   a~matnr in s_matnr
                               and b~vdatu in s_date
                               and a~zzdept in s_dept
                               and b~zzcutoff in r_cutoff
                              group by matnr zzcutoff vlpla vrkme meins.
elseif not v_fldate is initial.
    select matnr ZZCUTOFF vlpla sum( kwmeng ) vrkme meins
                       into table i_vbap
                       from zpwvbap as a inner join zpwvbak as b on
                               a~vbeln = b~vbeln
                               where a~werks = p_plant
                               and   a~matnr in s_matnr
                               and b~vdatu in s_date
                               and a~zzdept in s_dept
                               and b~zzcutoff = v_fldate
                           group by matnr zzcutoff vlpla vrkme meins.
else.
    select matnr ZZCUTOFF vlpla sum( kwmeng ) vrkme meins
                          into table i_vbap
       from zpwvbap as a inner join zpwvbak as b on
                               a~vbeln = b~vbeln
                               where a~werks = p_plant
                               and   a~matnr in s_matnr
                               and b~vdatu in s_date
                               and a~zzdept in s_dept
                               and b~zzcutoff in r_cutoff
                            group by matnr zzcutoff vlpla vrkme meins .
endif.
if sy-subrc ne 0.
    message i000(zwave) with 'No data found for given selection'.
    stop.
endif.
sort i_vbap by zzcutoff matnr.
loop at i_vbap.
    clear : v_pverme,
            v_prverme.
Compare the data with pick method
    select single zzpick from marc into marc-zzpick
                         where matnr = i_vbap-matnr
                         and   werks = p_plant
                         and   zzpick = '01'.
    if sy-subrc ne 0.
      continue.
    endif.
Compare the data from MARC Table with Production Department
    select single zzPRODdept from marc into marc-zzPRODdept
                         where matnr = i_vbap-matnr
                         and werks = p_plant
                         and zzPRODdept in s_pdept.
    if sy-subrc ne 0.
      continue.
    endif.
Get the Material Description from MAKT Table
    Select single maktx from makt into makt-maktx
                        where matnr = i_vbap-matnr
                        and   spras = 'E'.
    if sy-subrc eq 0.
      i_final-maktx = makt-maktx.
    endif.
Get the Pick Bin
    i_final-lgpla = i_vbap-vlpla.
    refresh i_verme.
    clear i_verme.
Get the stock at Pick bin
    select verme from lqua into table i_verme
                        where lgpla = i_vbap-vlpla
                        and   matnr = i_vbap-matnr
                        and   LGNUM = '100'.
    if sy-subrc eq 0.
      loop at i_verme.
        v_pverme = v_pverme + i_verme-verme.
      endloop.
      if sy-subrc eq 0.
        i_final-pverme = v_pverme.
      endif.
    endif.
    refresh i_pverme.
    clear i_pverme.
Get the stock at Production bin
    select verme from lqua into table i_pverme
                       where matnr = i_vbap-matnr
                       and   LGNUM = '100'
                   and ( lgpla = '9595959595' or
                         lgpla = '2222222222' or
                         lgpla = '5555555555' or
                         lgpla = '3232323232' or
                         lgpla = '8080808080' or
                         lgpla = '4040404040' or
                         lgpla = '9090909090' ).
    if sy-subrc eq 0.
      loop at i_pverme.
        v_prverme = v_prverme + i_pverme-verme.
      endloop.
      if sy-subrc eq 0.
        i_final-prverme = v_prverme.
      endif.
    endif.
Compare the unit of measure and sales unit
    if i_vbap-vrkme ne i_vbap-meins.
Get the data from MARM Table ( Unit of measure )
      select single * from marm into marm
                           where matnr = i_vbap-matnr
                           and   meinh = i_vbap-vrkme.
      if sy-subrc eq 0.
        i_final-pverme = ( i_final-pverme * marm-umren ) / marm-umrez.
      endif.
    endif.
Material #
    i_final-matnr = i_vbap-matnr.
Quantity from ZPWVBAP
    i_final-kwmeng = i_vbap-kwmeng.
Unit of Measure
   i_final-meins = i_vbap-meins.
Sales Unit
    i_final-vrkme = i_vbap-vrkme.
Wave Drop
    if i_vbap-ZZCUTOFF+8(4) = '2000' .
      i_final-zzshift = '1'.
    endif.
    if i_vbap-zzcutoff+8(4) = '2300'.
      i_final-zzshift = '2'.
    endif.
    i_final-date = i_vbap-zzcutoff+0(8).
    append i_final.
    clear : i_final,
            i_vbap.
**Difference
   i_output-diff = i_output-pverme - i_vbap-kwmeng.
Traffic Lights Depends on value
   if i_output-pverme > i_output-kwmeng.
     i_output-field = '3'.
   elseif i_output-pverme < i_output-kwmeng.
     i_output-field = '1'.
   elseif i_output-pverme = i_output-kwmeng.
     i_output-field = '2'.
   endif.
   append i_output.
   clear : i_output,
           i_vbap.
endloop.
refresh i_vbap.
sort i_final by date matnr zzshift.
Processing the internal table to get same material with pick quantity
deduction even it for 2nd shift
loop at i_final.
Move the data into work area in order remove #
    move i_final to wa_final.
    clear : flag.
    at new matnr.
      move : wa_final-matnr to i_output-matnr," Material #
             wa_final-maktx to i_output-maktx," Desc
             wa_final-lgpla to i_output-lgpla," Pick Bin
             wa_final-kwmeng to i_output-kwmeng," Order qty
             wa_final-zzshift to i_output-zzshift," Shift
             wa_final-pverme to i_output-pverme, " Pick bin qty
             wa_final-vrkme to i_output-vrkme," Sales Unit
             wa_final-prverme to i_output-prverme. " Prod Bin Qty
Difference
      i_output-diff = i_output-pverme - i_output-kwmeng.
New logic for Only HMR Department
    <b> if p_check = 'X'.
        if i_output-pverme < i_output-kwmeng.
          v_nverme = i_output-pverme + i_output-prverme.
          if v_nverme > i_output-kwmeng.
           if i_output-pverme < i_output-kwmeng.
           i_output-field = '2'.
            else.
Traffic Lights Depends on value
            i_output-field = '3'.
            endif.
          elseif v_nverme < i_output-kwmeng.
            i_output-field = '1'.
          elseif v_nverme = i_output-kwmeng.
            i_output-field = '2'.
          endif.
        elseif i_output-pverme > i_output-kwmeng.
          i_output-field = '3'.
        elseif i_output-pverme = i_output-kwmeng.
          i_output-field = '3'.
        endif.
      else.
Traffic Lights Depends on value
        if i_output-pverme > i_output-kwmeng.
          i_output-field = '3'.
        elseif i_output-pverme < i_output-kwmeng.
          i_output-field = '1'.
        elseif i_output-pverme = i_output-kwmeng.
          i_output-field = '2'.
        endif.
      endif.
      move i_output-diff to v_diff.
      flag = 'X'.
    endat.</b>
    if flag ne 'X'.
      move : wa_final-matnr to i_output-matnr," Material #
             wa_final-maktx to i_output-maktx," Desc
             wa_final-lgpla to i_output-lgpla," Pick Bin
             wa_final-kwmeng to i_output-kwmeng," Order qty
             wa_final-zzshift to i_output-zzshift," Shift
             wa_final-vrkme to i_output-vrkme," Sales Unit
             wa_final-prverme to i_output-prverme. " Prod Bin Qty
Move Diffrence value
      move v_diff to i_output-pverme.
      clear: v_diff.
New logic for Only HMR Department
New logic for Only HMR Department
      if p_check = 'X'.
        if i_output-pverme < i_output-kwmeng.
          v_nverme = i_output-pverme + i_output-prverme.
          if v_nverme > i_output-kwmeng.
          if i_output-pverme < i_output-kwmeng.
           i_output-field = '2'.
            else.
Traffic Lights Depends on value
            i_output-field = '3'.
            endif.
Traffic Lights Depends on value
           i_output-field = '3'.
          elseif v_nverme < i_output-kwmeng.
            i_output-field = '1'.
          elseif v_nverme = i_output-kwmeng.
            i_output-field = '2'.
          endif.
        elseif i_output-pverme > i_output-kwmeng.
          i_output-field = '3'.
        elseif i_output-pverme = i_output-kwmeng.
          i_output-field = '3'.
        endif.
i_output-diff = i_output-pverme - i_output-kwmeng.
      else.
Difference
        i_output-diff = i_output-pverme - i_output-kwmeng.
Traffic Lights Depends on value
        if i_output-pverme > i_output-kwmeng.
          i_output-field = '3'.
        elseif i_output-pverme < i_output-kwmeng.
          i_output-field = '1'.
        elseif i_output-pverme = i_output-kwmeng.
          i_output-field = '2'.
        endif.
      endif.
    endif.
    append i_output.
    clear : i_output,
            wa_final,
            i_final,
             v_nverme.
endloop.
sort i_output by field zzshift matnr.
ENDFORM.                    " GET_DATA_VBAP
*&      Form RESETVALUES
      Reset the all fieldcatlogs
FORM RESETVALUES.
FIELDCAT_LN-KEY = SPACE.
FIELDCAT_LN-DO_SUM = SPACE.
FIELDCAT_LN-NO_OUT = SPACE.
FIELDCAT_LN-QFIELDNAME = SPACE.
FIELDCAT_LN-HOTSPOT = SPACE.
FIELDCAT_LN-OUTPUTLEN = '0'.
CLEAR: fieldcat_ln-seltext_l, fieldcat_ln-seltext_m,
         fieldcat_ln-seltext_s, fieldcat_ln-reptext_ddic.
ENDFORM.                    " RESETVALUES
*&      Form FILL_FIELDCATLOG
      Fill the Fieldcatlog values
FORM FILL_FIELDCATLOG.
DATA: ls_fieldcat TYPE slis_fieldcat_alv.
Trafiic Light
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'FIELD'.
LS_FIELDCAT-TABNAME    = 'I_OUTPUT'.
LS_FIELDCAT-OUTPUTLEN    = 7.
LS_FIELDCAT-col_pos    = '1'.
ls_fieldcat-seltext_L = 'Lights'.
ls_fieldcat-seltext_s = 'Lights'.
ls_fieldcat-seltext_m = 'Lights'.
APPEND LS_FIELDCAT TO FIELDCAT.
Wave Drop
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'ZZSHIFT'.
LS_FIELDCAT-TABNAME    = 'I_OUTPUT'.
LS_FIELDCAT-OUTPUTLEN    = 9.
LS_FIELDCAT-col_pos    = '2'.
ls_fieldcat-seltext_L = 'Wave Drop'.
APPEND LS_FIELDCAT TO FIELDCAT.
Material
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'MATNR'.
LS_FIELDCAT-ref_fieldname = 'MATNR'.
LS_FIELDCAT-ref_tabname = 'MARA'.
LS_FIELDCAT-TABNAME    = 'I_OUTPUT'.
LS_FIELDCAT-OUTPUTLEN    = 18.
LS_FIELDCAT-col_pos    = '3'.
ls_fieldcat-seltext_L = 'Material'.
APPEND LS_FIELDCAT TO FIELDCAT.
Description
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'MAKTX'.
LS_FIELDCAT-TABNAME    = 'I_OUTPUT'.
LS_FIELDCAT-OUTPUTLEN    = 40.
LS_FIELDCAT-col_pos    = '4'.
ls_fieldcat-seltext_L = 'Description'.
APPEND LS_FIELDCAT TO FIELDCAT.
Pick Bin
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'LGPLA'.
LS_FIELDCAT-TABNAME    = 'I_OUTPUT'.
LS_FIELDCAT-OUTPUTLEN    = 15.
LS_FIELDCAT-col_pos    = '5'.
ls_fieldcat-seltext_L = 'Pick Bin'.
APPEND LS_FIELDCAT TO FIELDCAT.
Trafiic Light
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'PVERME'.
LS_FIELDCAT-TABNAME    = 'I_OUTPUT'.
LS_FIELDCAT-OUTPUTLEN    = 16.
LS_FIELDCAT-col_pos    = '6'.
ls_fieldcat-seltext_L = 'Stock at Pick Bin'.
APPEND LS_FIELDCAT TO FIELDCAT.
Stock at Prod Bin
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'PRVERME'.
LS_FIELDCAT-TABNAME    = 'I_OUTPUT'.
LS_FIELDCAT-OUTPUTLEN    = 16.
LS_FIELDCAT-col_pos    = '7'.
ls_fieldcat-seltext_L = 'Stock at Prod Bin'.
APPEND LS_FIELDCAT TO FIELDCAT.
Req from wave drop
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'KWMENG'.
LS_FIELDCAT-TABNAME    = 'I_OUTPUT'.
LS_FIELDCAT-OUTPUTLEN    = 23.
LS_FIELDCAT-col_pos    = '8'.
ls_fieldcat-seltext_L = 'Requirement from Wave Drop'.
APPEND LS_FIELDCAT TO FIELDCAT.
Sales Unit
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'VRKME'.
LS_FIELDCAT-TABNAME    = 'I_OUTPUT'.
LS_FIELDCAT-OUTPUTLEN    = 12.
LS_FIELDCAT-col_pos    = '9'.
ls_fieldcat-seltext_L = 'Sales Unit'.
APPEND LS_FIELDCAT TO FIELDCAT.
Unit of Measure
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'MEINS'.
LS_FIELDCAT-TABNAME    = 'I_OUTPUT'.
LS_FIELDCAT-OUTPUTLEN    = 9.
LS_FIELDCAT-col_pos    = '10'.
ls_fieldcat-seltext_L = 'UNIT'.
ls_fieldcat-no_out = 'X'.
APPEND LS_FIELDCAT TO FIELDCAT.
Diffference
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'DIFF'.
LS_FIELDCAT-TABNAME    = 'I_OUTPUT'.
LS_FIELDCAT-OUTPUTLEN    = 12.
LS_FIELDCAT-col_pos    = '11'.
ls_fieldcat-seltext_L = 'Difference'.
APPEND LS_FIELDCAT TO FIELDCAT.
ENDFORM.                    " FILL_FIELDCATLOG
*&      Form CALL_lIST
      Use ALV Function module to display output
FORM CALL_lIST.
Top - of - Page
PERFORM COMMENT_BUILD USING GT_LIST_TOP_OF_PAGE[].
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           = g_user_command
      I_CALLBACK_TOP_OF_PAGE            = C_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                         = LAYOUT
      IT_FIELDCAT                       = FIELDCAT
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
IT_ALV_GRAPHICS                   =
IT_ADD_FIELDCAT                   =
IT_HYPERLINK                      =
I_HTML_HEIGHT_TOP                 =
I_HTML_HEIGHT_END                 =
IT_EXCEPT_QINFO                   =
IMPORTING
E_EXIT_CAUSED_BY_CALLER           =
ES_EXIT_CAUSED_BY_USER            =
    TABLES
      T_OUTTAB                          = I_OUTPUT
   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.                    " CALL_lIST
*&      Form BUILD_LAYOUT
      text
FORM BUILD_LAYOUT.
LAYOUT-GET_SELINFOS = 'X'.
Now we want a traffic light to say if the Truck is deleted
the variable p_lignam contains the name in IREPO which stores the
value for the traffic light
LAYOUT-LIGHTS_FIELDNAME = P_LIGNAM.
layout-HEADER_TEXT = 'Lights'.
LAYOUT-LIGHTS_CONDENSE = 'X'.
ENDFORM.                    " BUILD_LAYOUT
*&      Form COMMENT_BUILD
      text
     -->P_GT_LIST_TOP_OF_PAGE[] text
FORM COMMENT_BUILD USING    LT_TOP_OF_PAGE TYPE
                                        SLIS_T_LISTHEADER.
data : v_day(2) type c,
         v_mon(2) type c,
         v_year(4) type c,
         v_ldate(10) type c,
         v_hdate(10) type c.
DATA: LS_LINE TYPE SLIS_LISTHEADER.
data: d_date like sy-datum.
clear : v_ldate,
          v_hdate.
Header Information.
LIST HEADING LINE: TYPE H
CLEAR LS_LINE.
LS_LINE-TYP = 'H'.
LS_LINE-KEY: NOT USED FOR THIS TYPE
LS_LINE-INFO = 'Bin Replenishment report for HMR'.
APPEND LS_LINE TO LT_TOP_OF_PAGE.
STATUS LINE: TYPE S
CLEAR LS_LINE.
LS_LINE-TYP = 'S'.
LS_LINE-KEY = TEXT-003.
LS_LINE-INFO = TEXT-003.
APPEND LS_LINE TO LT_TOP_OF_PAGE.
STATUS LINE: TYPE S
CLEAR LS_LINE.
LS_LINE-TYP = 'S'.
LS_LINE-KEY = TEXT-003.
LS_LINE-INFO = TEXT-003.
APPEND LS_LINE TO LT_TOP_OF_PAGE.
Get the data ( s_date_low) into proper format.
v_year = s_date-low+0(4).
v_mon = s_date-low+4(2).
v_day = s_date-low+6(2).
concatenate v_mon '/' v_day '/' v_year into v_ldate.
clear : v_mon,
          v_year,
          v_day.
Get the data ( s_date_high) into proper format.
v_year = s_date-high+0(4).
v_mon = s_date-high+4(2).
v_day = s_date-high+6(2).
concatenate v_mon '/' v_day '/' v_year into v_hdate.
clear : v_mon,
          v_year,
          v_day.
Delivery date
if not s_date-low is initial .
    if not s_date-high is initial.
      CLEAR LS_LINE.
      LS_LINE-TYP = 'S'.
      LS_LINE-KEY = 'Delivery date From:'.
      LS_LINE-INFO = v_ldate.
      APPEND LS_LINE TO LT_TOP_OF_PAGE.
      CLEAR LS_LINE.
      LS_LINE-TYP = 'S'.
      LS_LINE-KEY = 'Delivery date To :'.
      LS_LINE-INFO = v_hdate.
      APPEND LS_LINE TO LT_TOP_OF_PAGE.
    endif.
endif.
if not s_date-low is initial.
    if s_date-high is initial.
      CLEAR LS_LINE.
      LS_LINE-TYP = 'S'.
      LS_LINE-KEY = 'Delivery date :'.
      LS_LINE-INFO = v_ldate.
      APPEND LS_LINE TO LT_TOP_OF_PAGE.
    endif.
endif.
Wave Drop
if not S_SHIFT-LOW is initial.
    if not S_SHIFT-high is initial.
      CLEAR LS_LINE.
      LS_LINE-TYP = 'S'.
      LS_LINE-KEY = 'Wave Drop From :'.
      LS_LINE-INFO = s_shift-low.
      APPEND LS_LINE TO LT_TOP_OF_PAGE.
      CLEAR LS_LINE.
      LS_LINE-TYP = 'S'.
      LS_LINE-KEY = 'Wave Drop to :'.
      LS_LINE-INFO = s_shift-high.
      APPEND LS_LINE TO LT_TOP_OF_PAGE.
    endif.
endif.
if not S_SHIFT-LOW is initial.
    if S_SHIFT-high is initial.
      CLEAR LS_LINE.
      LS_LINE-TYP = 'S'.
      LS_LINE-KEY = 'Wave Drop :'.
      LS_LINE-INFO = s_shift-low.
      APPEND LS_LINE TO LT_TOP_OF_PAGE.
     CLEAR LS_LINE.
     LS_LINE-TYP = 'S'.
     LS_LINE-KEY = 'Wave Drop to :'.
     LS_LINE-INFO = s_shift-high.
     APPEND LS_LINE TO LT_TOP_OF_PAGE.
    endif.
endif.
Department
if not s_dept-low is initial .
    if not s_dept-high is initial.
      CLEAR LS_LINE.
      LS_LINE-TYP = 'S'.
      LS_LINE-KEY = 'Department From :'.
      LS_LINE-INFO = s_dept-low.
      APPEND LS_LINE TO LT_TOP_OF_PAGE.
      CLEAR LS_LINE.
      LS_LINE-TYP = 'S'.
      LS_LINE-KEY = 'Department to :'.
      LS_LINE-INFO = s_dept-high.
      APPEND LS_LINE TO LT_TOP_OF_PAGE.
    endif.
endif.
if not s_dept-low is initial .
    if s_dept-high is initial.
      CLEAR LS_LINE.
      LS_LINE-TYP = 'S'.
      LS_LINE-KEY = 'Department :'.
      LS_LINE-INFO = s_dept-low.
      APPEND LS_LINE TO LT_TOP_OF_PAGE.
    endif.
endif.
Production Department
if not S_PDEPT-LOW is initial.
    if not S_PDEPT-high is initial.
      CLEAR LS_LINE.
      LS_LINE-TYP = 'S'.
      LS_LINE-KEY = 'Production Department From :'.
      LS_LINE-INFO = S_PDEPT-LOW.
      APPEND LS_LINE TO LT_TOP_OF_PAGE.
      CLEAR LS_LINE.
      LS_LINE-TYP = 'S'.
      LS_LINE-KEY = 'Production Department to :'.
      LS_LINE-INFO = S_PDEPT-high.
      APPEND LS_LINE TO LT_TOP_OF_PAGE.
    endif.
endif.
if not S_PDEPT-LOW is initial.
    if S_PDEPT-high is initial.
      CLEAR LS_LINE.
      LS_LINE-TYP = 'S'.
      LS_LINE-KEY = 'Production Department :'.
      LS_LINE-INFO = S_PDEPT-LOW.
      APPEND LS_LINE TO LT_TOP_OF_PAGE.
    endif.
endif.
ENDFORM.                    " COMMENT_BUILD
      FORM TOP_OF_PAGE                                              *
FORM TOP_OF_PAGE.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
      IT_LIST_COMMENTARY       = GT_LIST_TOP_OF_PAGE
I_LOGO                   =
I_END_OF_LIST_GRID       =
ENDFORM.
      FORM USER_COMMAND                                             *
FORM user_command USING r_ucomm LIKE sy-ucomm
            rs_selfield TYPE slis_selfield.                 "#EC CALLED
CASE R_UCOMM.
    WHEN '&IC1'.
      read table i_output index rs_selfield-tabindex.
      SET PARAMETER ID 'MAT' FIELD i_output-matnr.
      SET PARAMETER ID 'WRK' FIELD p_plant.
      if not i_output-matnr is initial.
        call transaction 'MD04' and skip first screen.
      endif.
ENDCASE.
ENDFORM.
the above code i mentioned 1,2 ,3 values ,1 will have green color,2 will have yellow color,3 will have red color.
Thanks
Seshu

Why does my cell table not display color but RGB value

Could somebody please suggest me.
What I wanted is to let one collumn of a table display colors, but now they display the RGB values of the color not the colors.
Please suggest me how I should do to get this done.
Thanks.

The renderer displays the toString() value of the Object stored in the table by default. If you want to display something else then you need to use a custom renderer
The Swing tutorial on [url http://java.sun.com/docs/books/tutorial/uiswing/misc/keybinding.html]How to Use Tables explains what a renderer is and has an example that displays a color in a column.

Cell with boolean value not rendering properly in Swing (custom renderer)

Hello All,
I have a problem rendenring boolean values when using a custom cell renderer inside a JTable; I managed to reproduce the issue with a dummy application. The application code follows:
import java.awt.BorderLayout;
import java.awt.Dimension;
import java.lang.reflect.InvocationTargetException;
import java.util.ArrayList;
import java.util.Date;
import java.util.List;
import java.util.logging.Logger;
import javax.swing.JFrame;
import javax.swing.JScrollPane;
import javax.swing.JTable;
import javax.swing.SwingUtilities;
* Simple GUI that uses custom cell rendering
* @author josevnz
public final class SimpleGui extends JFrame {
     private static final long serialVersionUID = 1L;
     private Logger log = Logger.getLogger(SimpleGui.class.getName());
     private JTable simpleTable;
     public SimpleGui() {
          super("Simple GUI");
          setPreferredSize(new Dimension(500, 500));
          setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);
          setLayout(new BorderLayout());
     public void constructGui() {
          simpleTable = new JTable(new SimpleTableModel());
          simpleTable.getColumnModel().getColumn(2).setCellRenderer(new HasItCellRenderer());
          SpecialCellRenderer specRen = new SpecialCellRenderer(log);
          simpleTable.setDefaultRenderer(Double.class, specRen);
          simpleTable.setDefaultRenderer(String.class, specRen);
          simpleTable.setDefaultRenderer(Date.class, specRen);
          //simpleTable.setDefaultRenderer(Boolean.class, specRen);
          add(new JScrollPane(simpleTable), BorderLayout.CENTER);
          pack();
          setVisible(true);
     private void populate() {
          List <List<Object>>people = new ArrayList<List<Object>>();
          List <Object>people1 = new ArrayList<Object>();
          people1.add(0, "Jose");
          people1.add(1, 500.333333567);
          people1.add(2, Boolean.TRUE);
          people1.add(3, new Date());
          people.add(people1);
          List <Object>people2 = new ArrayList<Object>();
          people2.add(0, "Yes, you!");
          people2.add(1, 100.522222);
          people2.add(2, Boolean.FALSE);
          people2.add(3, new Date());
          people.add(people2);
          List <Object>people3 = new ArrayList<Object>();
          people3.add(0, "Who, me?");
          people3.add(1, 0.00001);
          people3.add(2, Boolean.TRUE);
          people3.add(3, new Date());
          people.add(people3);
          List <Object>people4 = new ArrayList<Object>();
          people4.add(0, "Peter Parker");
          people4.add(1, 11.567444444);
          people4.add(2, Boolean.FALSE);
          people4.add(3, new Date());
          people.add(people4);
          ((SimpleTableModel) simpleTable.getModel()).addAll(people);
      * @param args
      * @throws InvocationTargetException
      * @throws InterruptedException
     public static void main(String[] args) throws InterruptedException, InvocationTargetException {
          final SimpleGui instance = new SimpleGui();
          SwingUtilities.invokeAndWait(new Runnable() {
               @Override
               public void run() {
                    instance.constructGui();
          instance.populate();
}I decided to write a more specific renderer just for that column:
import java.awt.Color;
import java.awt.Component;
import javax.swing.JTable;
import javax.swing.UIManager;
import javax.swing.table.DefaultTableCellRenderer;
* Cell renderer used only by the DividendElement table
* @author josevnz
final class HasItCellRenderer extends DefaultTableCellRenderer {
     protected static final long serialVersionUID = 2596173912618784286L;
     private Color hasIt = new Color(255, 225, 0);
     public HasItCellRenderer() {
          super();
          setOpaque(true);
     @Override
     public Component getTableCellRendererComponent(JTable table, Object value, boolean isSelected, boolean hasFocus, int row, int column) {
          Component comp = super.getTableCellRendererComponent(table, value, isSelected, hasFocus, row, column);
          int desCol = table.convertColumnIndexToView(1);
          if (! isSelected && value instanceof Boolean && column == desCol) {
               if (((Boolean) value).booleanValue()) {
                    comp.setForeground(hasIt);
               } else {
                    comp.setForeground(UIManager.getColor("table.foreground"));
          return comp;
      * Override for performance reasons
     @Override
     public void firePropertyChange(String propertyName, boolean oldValue, boolean newValue) {
          // EMPTY
     @Override
     protected void firePropertyChange(String propertyName, Object oldValue, Object newValue) {
          // EMPTY
     @Override
     public void revalidate() {
          // EMPTY
     @Override
     public void validate() {
          // EMPTY
} // end classBut the rendering comes all wrong (a String saying true or false, not the expected checkbox from the default renderer) and also there is a weird flickring effect as this particular boolean column is editable (per table model, not show here)...
I can post the table model and the other renderer if needed (didn't want to put too much code on the question, at least initiallty).
Should I render a checkbox myself for this cell in the custom renderer? I'm puzzled as I expected the default renderer part of the code to do this for me instead.
Thanks!
Edited by: josevnz on Apr 14, 2009 12:35 PM
Edited by: josevnz on Apr 14, 2009 12:37 PM

camickr
Thats because the default render is a JLabel and it just displays the text from the toString() method of the Object in the table model.What I meant to say is that I expected the JCheckbox not a String representation of the boolean value.
Thats because a different renderer is used depending on the Class of data in the column. Look at the source code for the JTable class to see what the "default >renderer for the Boolean class" is. Then you can extend that or if its a private class then you will need to copy all the code and customize it.At the end I looked at the code and replicated the functionality I needed. I thought than maybe there was a way to avoid replicating the same logic all over again in order to implement this functionality. Good advice, though.
see you learned nothing from your last posting. This is NOT a SSCCE. 90% of the code you posted is completely irrelevant for the described problem. There is abosutelly no need to post the custom TableModel, because there is no need to use a custom TableModel for this problem. The TableModel has nothing to do with how a column is rendererd.The custom table model returns the type of the column (giving a hint to the renderer on what to expect, right?) and for the one that had a problem it says than the class is Boolean. That's why I mentioned it:
public Class getColumnClass(int columnIndex) {
    // Code omited....
You also posted data for 4 columns worth of data. Again, irrelevant. Your question is about a single column containing Boolean data, so forget about the other columns.
When creating a SSCCE you don't start with your existing code and "remove" code. You start with a brand new class and only add in what is important. That way hopefully if you made a mistake the first time you don't repeat it the second time.That's what I did, is not the real application. I copy & pasted code in a haste from this dummy program on this forum, not the best approach as it gave the wrong impression.
Learn how to write a proper SSCCE if you want help in the future. Point taken, but there is NO need for you to be rude. Your help is appreciated.
Regards,
Jose.

Enter a brief summary here holding the cell color in jtable

Hai every body, I hope someone can rescue me. we r building a standalone application(trading system) for the StockMarket. we r trying to update the watchlist,which displays the market ticks.those who r in this domain can understand this as live streaming.Everything is fine.i could acheive this task.but now my boss has created a problem. he wants the jtable cell to hold the color,once the packet has appeared for that symbol.But currently my system(jtable) holds only the latest color.this can be explained further like this,accoring to the market movement,once the tick has come ,basing on the previous value,say if the value has increased i make the table cell as blue and if the value has decreased the table cell is made red. Now i'm really struggling to hold the colors of the previous ticks.can anyone suggest me a solution for this... i hope someone will come to my rescue... i customized the defaulttablecellrenderer.
thanks in advance regards,
RaviTeja

I think having a custom renderer like this might address your issue.
public Component getTableCellRendererComponent(JTable table,
     Object value, boolean isSelected, boolean hasFocus,
     int row, int col) {
     String oldString = getText();
     if(oldString == null || oldString.length() == 0) {
          oldString = "0.00";
     double oldValue = Double.parseDouble(oldString);
     double newValue = ((Double) value).doubleValue();
     if(oldValue < newValue) {
          //Set desired background and foreground colors.
     else if(oldValue > newValue) {
          //Set desired background and foreground colors.
     else {
          //Set desired background and foreground colors.
     setText(String.valueOf(newValue));
     return null;
}Hope this helps..
Sai Pullabhotla

JTable cell color overriding Boolean values displayed as checkboxes. Fix?

Similar Messages

Maybe you are looking for