Change color or Error records to Red

Hi all
I Have a detail block which has a column status
When the status of the record is 'ERROR'
i want the record to be shown in red
How do i do it
Please help me
Thanks

Make a Visual attribute 'VIS' with foreground and background colour as RED and write the following code in post query trigger of the block.
if :Block.status='yourcondition' then
set_item_instance_property('status',CURRENT_RECORD,VISUAL_ATTRIBUTE,'VIS');
end;
Please mark the answer in case it helped

Similar Messages

Changing colors of individual records in multi-record block

Can any point me to where I should place the code to programmatically change the color of a record in a multi-record block based on a particular column value?
For instance, if block.col1='OPEN', I'd like the entire row to display as BLUE. If block.col1='CLOSED', I'd like the entire row to display as RED. I've tried placing my code at the block POST_QUERY level and WHEN_NEW_RECORD instance level without success.
I'm a relative forms newbie, so any advice would be appreciated.

I tried putting it in the 'when new record instance' trigger but it did not work completely. I put them same code in the Post_Query trigger of the multiple record block along with the 'When new record instance' trigger and it worked perfectly.
I'm not forms expert, and there's probably a reason why I needed to put it in two places to make it work for me but that's a question of a forms expert.
Ron

When using quicktime screen recorder, the recording changes colors

Please help me out!! So I've had my macbook air for a while now and I've used the quicktime screen recorder multipul times, but latley something changed. When I go to record my screen everything works fine, and once its finished and I've saved it it's still normal. But once I go to import it into imovie the entire recording turns red, I can still see the recording but everything is just red! Everywhere else the recording looks fine, but its only when I try to put it into imovie that it changes colors. Its never done this before and all of my past screen recordings work fine.
Does anyone know what I can do to fix it?
Any advice would be greatly appreciated!
Thank you

Hello meaganmarie,
I am assuming you have quicktime up to date (10.3)
When recording a game window,
- select quicktime
- go to file > New Movie Recording
- select your game window like a rectangular marquee selection (drag and make a rectangle filling only your game window
- stop when done and save
This way the endtire screen (including youe desktop) won't be seen, just your selected game window.
Regards,
Asevenc

Showing error records with colors

Hi all,
I have requirement like,
1. need to upload the file into Ztable ,if there is any error in updating into the table
it should display the record with red color in the GRID and with error text in GRID.
How to display the records which are in error with colors and how to get the error text why it is actually not update in table .
Regards,
Madhavi

Madhavi,
1.How are you going to update Ztable based on that you have to get error messages.
2. To get records colored, Just check the sample program.
Check the program and check the comments inside the program. You can come to know what to do to get the rows colored.
REPORT zvenkat_alv_color_row_col.
" Declaration
" To get color for row
" 1.Define color variable with length 3 type char in the final internal
"   which is displayed
" 2.build layout structure type slis_layout_alv by specifying
"   info_fieldname = 'COLOR' and pass layout structure thru FM REUSE*ALV*
" 3.Poplate Final internal with color values for the field COLOR.
"types
TYPES:
     BEGIN OF t_pa0001,
       color(3) TYPE c,      "1.Declare this
       pernr    TYPE pa0001-pernr,
       ename    TYPE pa0001-ename,
     END OF t_pa0001.
"Work area
DATA:
      w_pa0001 TYPE t_pa0001.
"Internal tables
DATA:
      i_pa0001 TYPE STANDARD TABLE OF t_pa0001.
* ALV Declarations
* Types Pools
TYPE-POOLS:
   slis.
* Types
TYPES:
   t_fieldcat         TYPE slis_fieldcat_alv,
   t_events           TYPE slis_alv_event,
   t_layout           TYPE slis_layout_alv.
* Workareas
DATA:
   w_fieldcat         TYPE t_fieldcat,
   w_events           TYPE t_events,
   w_layout           TYPE t_layout.
* Internal Tables
DATA:
   i_fieldcat         TYPE STANDARD TABLE OF t_fieldcat,
   i_events           TYPE STANDARD TABLE OF t_events.
*&START-OF-SELECTION
START-OF-SELECTION .
PERFORM get_data.
PERFORM color_the_row. "Populate Color like this based on ur conditions
*&END-OF-SELECTION
END-OF-SELECTION.
PERFORM fieldcat.
PERFORM layout_build.
PERFORM dispaly .
" Form fieldcat
"emphasize ===== Set this to highlight column in color
" Value range: SPACE, 'X' or 'Cxyz' (x:'1'-'9'; y,z: '0'=off '1'=on)
" 'X' = The column is highlighted in the default color for color highlighting.
" 'Cxyz' = The column is highlighted in the coded color:
" C: Color (coding must start with C)
" x: Color number
" y: Intensified
" z: Inverse
FORM fieldcat .
CLEAR :
w_fieldcat,i_fieldcat[].
w_fieldcat-fieldname = 'PERNR'.
w_fieldcat-tabname   = 'I_PA0001'.
w_fieldcat-emphasize = 'C71'.
w_fieldcat-seltext_m = 'Employee No'.
w_fieldcat-no_zero   = 'PERNR'.
APPEND w_fieldcat TO i_fieldcat.
CLEAR w_fieldcat.
w_fieldcat-fieldname = 'ENAME'.
w_fieldcat-tabname   = 'I_PA0001'.
w_fieldcat-seltext_m = 'ENAME'.
APPEND w_fieldcat TO i_fieldcat.
CLEAR w_fieldcat.
ENDFORM.                    " fieldcat
*&      Form dispaly
FORM dispaly .
DATA :l_program TYPE sy-repid.
l_program = sy-repid.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      i_callback_program          = l_program
*      i_callback_top_of_page      = 'TOP_OF_PAGE'
      i_callback_html_top_of_page = 'TOP_OF_PAGE'
*      IT_EXCLUDING                = i_extab
      is_layout                   = w_layout
      it_events                   = i_events
      it_fieldcat                 = i_fieldcat
    TABLES
      t_outtab                    = i_pa0001.
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.                    " dispaly
*&      Form get_data
FORM get_data .
DO 20 TIMES.
    SELECT pernr ename
    FROM pa0001
    APPENDING CORRESPONDING FIELDS OF TABLE i_pa0001
    UP TO 10 ROWS.
ENDDO.
ENDFORM.                    " get_data
*&      Form layout_build
FORM layout_build .
w_layout-info_fieldname = 'COLOR'. "Pass COLOR field name like this.
ENDFORM.                    " layout_build
*&      Form color_the_row
FORM color_the_row .
LOOP AT i_pa0001 INTO w_pa0001.
    IF sy-tabix > 3.
      w_pa0001-color = 'C31'.
      MODIFY i_pa0001 FROM w_pa0001 INDEX sy-tabix.
    ENDIF.
ENDLOOP.
ENDFORM.                    " color_the_row
*&      Form top_of_page
FORM top_of_page USING document TYPE REF TO cl_dd_document.
DATA:
        l_text TYPE sdydo_text_element.
l_text = 'xyz'.
CALL METHOD document->add_text
    EXPORTING
      text         = l_text
      sap_emphasis = cl_dd_document=>strong
      sap_style    = cl_dd_document=>key.
CALL METHOD document->new_line.
l_text = 'lmn'.
CALL METHOD document->add_text
    EXPORTING
      text         = l_text
      sap_fontsize = cl_dd_document=>medium
      sap_color    = cl_dd_document=>list_positive
      sap_style    = cl_dd_document=>key.
CALL METHOD document->underline.
ENDFORM.                    "top_of_page
I hope that it helps u .
Regards,
Venkat.O

Why do I get a program error when changing colors?

I get a 'Could not complete your request because of a program error' when I try to change colors on both the forground/background palette or from the color picker palette. Is there a patch for this?
I am using Photoshop CS6 version 13.0.1.x64

Hi. Because this forum is for beginners trying to learn the basics of Photoshop, I'm moving your question to the Photoshop General Discussion forum.

My screen is changing colors (Red, blue, gray). Any clue?

My screen is changing colors. (Red, Blue, Grey). Any idea? I could press on the back of the screen for a while to correct this but it doesn't seem to work now. Thanks.

I would take it to an Apple Retail Store or an Apple Authorized Service Provider (AASP) for evaluation, or call your nearest Apple Contact Center. Visit the Genius Bar at the Apple Retail Store, make a reservation.

Req to highlight few records with red color

Hi gurus,
We have a requirement where we need to display the record for which actual resolution date is greater than planned resolution date in red.I tried this using the calculted key fig which will give one whenever it is greater n 0 wen less n then created the exception over thsi field.Its working fine but if i hide this calculated field(as do not want in my rep) then its not highlighting the color for the records?
any suggestion??

Deepikas,
Calculated Keyfigure also should work though hided. Instead use the Formula and try it.
Laxmi N

Play Button Changes Color To Red, Can I Change It?

In the Sliding Planes theme, when I preview, the Play button (originally dark blue) turns red. It has to be something set in the theme since other themes have a change in color of the Play button as well (sometimes to yellow and other colors). Is this changeable? I would rather the color not change and stay dark blue. Thanks a lot!

Ok, I think you answered my question. I just want to make sure you know that it's not the highlighting persay that I'm talking about, it's just the fact that the button changes and stays to red, it's not that it only gets red when you're selecting it but that once the menu starts and the text flies in and the drop zones are in motion the top writting and everything is the color I want but the Play button turns red automatically before I select it or anything. But I think you answered my question in that the theme I selected requires the Play button to turn red automatically to distinguish it from other buttons. I wouldn't mind it turning red when I would press enter or something to play, like for a second to change color to know that I cliked it, but what bothers me is that it's red the whole time which off sets the color scheme that I'm trying to make on the menu. Thanks again

How to change color of selected label from list of labels?

My Problem is that I have a list of labels. RowHeaderRenderer is a row header renderer for Jtable which is rendering list items and (labels).getListTableHeader() is a method to get the list. When we click on the label this code is executed:
getListTableHeader().addMouseListener(new MouseAdapter()
public void mouseReleased(MouseEvent e)
if (e.getClickCount() >= 1)
int index = getListTableHeader().locationToIndex(e.getPoint());
try
if (((ae_AlertEventInfo)theAlerts.values().toArray()[index]).ackRequiredFlag)
AcknowledgeEvent ackEvent = new AcknowledgeEvent(
this, (ae_AlertEventInfo)theAlerts.values().toArray()[index]);
fireAcknowledgeEvent(ackEvent);
((HeaderListModel)listModel).setElementAt(ACK, index);
catch(Exception ex) {;}
Upon mouse click color of the label should be changed. For some period of time ie. Upto completion of fireAcknowledgeEvent(ackEvent);
This statement is calling this method:
public void handleAcknowledgeEvent(final AcknowledgeEvent event)
boolean ackOk = false;
int seqId = ((ae_AlertEventInfo)event.getAlertInfo()).sequenceId;
if (((ae_AlertEventInfo)event.getAlertInfo()).ackRequiredFlag)
try
// perform call to inform server about acknowledgement.
ackOk = serviceAdapter.acknowledge(seqId,
theLogicalPosition, theUserName);
catch(AdapterException aex)
Log.error(getClass(), "handleAcknowledgeEvent()",
"Error while calling serviceAdapter.acknowledge()", aex);
ExceptionHandler.handleException(aex);
else
// Acknowledge not required...
ackOk = true;
//theQueue.buttonAcknowledge.setEnabled(false);
final AlertEventQueue myQueue = theQueue;
if (ackOk)
Object popupObj = null;
synchronized (mutex)
if( hasBeenDismissed ) { return; }
// mark alert event as acknowledged (simply reset ack req flag)
ae_AlertEventInfo info;
Iterator i = theAlerts.values().iterator();
while (i.hasNext())
info = (ae_AlertEventInfo) i.next();
if (info.sequenceId == seqId)
// even if ack wasn't required, doesn't hurt to set it
// to false again. But it is important to prevent the
// audible from playing again.
info.ackRequiredFlag = false;
info.alreadyPlayed = true;
// internally uses the vector index so
// process the queue acknowledge update within
// the synchronize block.
final ae_AlertEventInfo myAlertEventInfo = event.getAlertInfo();
SwingUtilities.invokeLater(new Runnable()
public void run()
myQueue.acknowledge(myAlertEventInfo);
myQueue.updateAcknowledgeButtonState();
// here we should stop playing sound
// if it is playing for this alert.
int seqId1;
if (theTonePlayer != null)
seqId1 = theTonePlayer.getSequenceId();
if (seqId1 == seqId)
if (! theTonePlayer.isStopped())
theTonePlayer.stopPlaying();
theTonePlayer = null;
// get reference to popup to be dismissed...
// The dismiss must take place outside of
// the mutex... otherwise threads potentially
// hang (user hits "ok" and is waiting for the
// mutex which is currently held by processing
// for a "move to summary" transition message.
// if the "dismiss" call in the transition
// message were done within the mutex, it might
// hang on the dispose method because the popup
// is waiting for the mutex...
// So call popup.dismiss() outside the mutex
// in all cases.
if(event.getSource() instanceof AlertEventPopup)
popupObj = (AlertEventPopup)event.getSource();
else
popupObj = thePopups.get(event.getAlertInfo());
thePopups.remove(event.getAlertInfo());
SwingUtilities.invokeLater(new Runnable()
public void run()
// search vector elements to determine icon color in main frame
String color = getColor();
fireUpdateEvent(new UpdateEvent(this, blinking, color));
// Call dismiss outside of the mutex.
if (popupObj !=null)
if(popupObj instanceof AlertEventPopup)
((AlertEventPopup)popupObj).setModal(false);
((AlertEventPopup)popupObj).setVisible(false); // xyzzy
((AlertEventPopup)popupObj).dismiss();
else
// update feedback... ack failed
SwingUtilities.invokeLater(new Runnable()
public void run()
myQueue.setInformationMessage("Acknowledge failed to reach server... try again");
return;
Code for RowHeaderRenderer is:
class RowHeaderRenderer extends JLabel implements ListCellRenderer
JTable theTable = null;
ImageIcon image = null;
RowHeaderRenderer(JTable table)
image = new ImageIcon(AlertEventQueue.class.getResource("images" + "/" + "alert.gif"));
theTable = table;
JTableHeader header = table.getTableHeader();
setOpaque(true);
setHorizontalAlignment(LEFT);
setForeground(header.getForeground());
setBackground(header.getBackground());
setFont(header.getFont());
public Component getListCellRendererComponent( JList list, Object value,
int index, boolean isSelected, boolean cellHasFocus)
int level = 0;
try
level = Integer.parseInt(value.toString());
catch(Exception e)
level = 0;
if (((ae_AlertEventInfo)theAlerts.values().toArray()[index]).ackRequiredFlag)
setBorder(UIManager.getBorder("TableHeader.cellBorder"));
this.setHorizontalAlignment(JLabel.CENTER);
this.setVerticalAlignment(JLabel.CENTER);
setIcon(image);
else
setBorder(BorderFactory.createLineBorder(Color.gray));
setText("");
setIcon(null);
return this;
I tried but when i am clicking a particular label, the color of all labels in the List is being changed. So can you please assist me in changing color of only the label that is selected and the color must disappear after completion of Upto completion of fireAcknowledgeEvent(ackEvent);

im a bit confused with the post so hopefully this will help you, if not then let me know.
I think the problem is that in your renderer your saying
setBackground(header.getBackground());which is setting the backgound of the renderer rather than the selected item, please see an example below, I created a very simple program where it adds JLabels to a list and the renderer changes the colour of the selected item, please note the isSelected boolean.
Object "value" is the currentObject its rendering, obviously you may need to test if its a JLabel before casting it but for this example I kept it simple.
populating the list
public void populateList(){
        DefaultListModel model = new DefaultListModel();
        for (int i=0;i<10;i++){
            JLabel newLabel = new JLabel(String.valueOf(i));
            newLabel.setOpaque(true);
            model.addElement(newLabel);
        this.jListExample.setModel(model);
        this.jListExample.setCellRenderer(new RowHeaderRenderer());
    }the renderer
class RowHeaderRenderer extends JLabel implements ListCellRenderer
    JTable theTable = null;
    public Component getListCellRendererComponent(JList list, Object value,
                                                  int index, boolean isSelected, boolean cellHasFocus){
        JLabel aLabel = (JLabel)value;
        if (isSelected){
            aLabel.setBackground(Color.RED);
        }else{
            aLabel.setBackground(Color.GRAY);
        return aLabel;
}

How to change color of an annotation on PDF with VBA

hi
i 'm not sure i'm at the good place and i even don't know if it's posible
on one side
i'm using acrobat pro 9 to make square on industrial plan (P&ID).
square are red or green in fonction of theire status.
on the other side
i'm using excel to list all equipement and theire status that should be notify on my DPF
i would like a macro on excel that check all statuts and give the good color to the square refering to the equipment listed on excel?
thx

Greatestdan wrote:
I know there should be some way to change the colors of just specific areas of text like this. It should be as simple as putting a color code at the start and end of the tag like
<div><color="#FF0000">This text should be RED</color></div>
I tried that and it came up with the error "Invalid Markup, This is not the correct format for an HTML tag."
I am about 99% certain you can change colors of specific div tags using color codes without giving them an Id and making a css rule for them, I just don't know how. This is a simple question and it should be a simple answer.
Correct:
<div style="color: #ff0000;">This text should be RED</div>

Change color in alv column

how do change color of a column in ALV.

Hi
The below abap program shows how to change the colour of individual ALV cells /fields. Only a small number of changes are required from a basic ALV grid which include adding a new field to ALV data declaration table(it_ekko), populating this field with the field name identifier and colour attributes and finally adding an entry to layout control work area. These changes are highlighted in bold below.
REPORT zdemo_alvgrid                 .
REPORT ZALV_CELLCOLOR.
TABLES:     ekko.
type-pools: slis.                                 "ALV Declarations
*Data Declaration
TYPES: BEGIN OF t_ekko,
ebeln TYPE ekpo-ebeln,
ebelp TYPE ekpo-ebelp,
statu TYPE ekpo-statu,
aedat TYPE ekpo-aedat,
matnr TYPE ekpo-matnr,
menge TYPE ekpo-menge,
meins TYPE ekpo-meins,
netpr TYPE ekpo-netpr,
peinh TYPE ekpo-peinh,
CELLCOLOR TYPE LVC_T_SCOL,
END OF t_ekko.
DATA: it_ekko TYPE STANDARD TABLE OF t_ekko INITIAL SIZE 0,
      wa_ekko TYPE t_ekko.
*ALV data declarations
data: fieldcatalog type slis_t_fieldcat_alv with header line,
      gd_tab_group type slis_t_sp_group_alv,
      gd_layout    type slis_layout_alv,
      gd_repid     like sy-repid,
      gt_events     type slis_t_event,
      gd_prntparams type slis_print_alv.
*Start-of-selection.
START-OF-SELECTION.
perform data_retrieval.
perform build_fieldcatalog.
perform build_layout.
perform set_cell_colours.
perform display_alv_report.
*&      Form BUILD_FIELDCATALOG
      Build Fieldcatalog for ALV Report
form build_fieldcatalog.
There are a number of ways to create a fieldcat.
For the purpose of this example i will build the fieldcatalog manualy
by populating the internal table fields individually and then
appending the rows. This method can be the most time consuming but can
also allow you more control of the final product.
Beware though, you need to ensure that all fields required are
populated. When using some of functionality available via ALV, such as
total. You may need to provide more information than if you were
simply displaying the result
              I.e. Field type may be required in-order for
                   the 'TOTAL' function to work.
fieldcatalog-fieldname   = 'EBELN'.
fieldcatalog-seltext_m   = 'Purchase Order'.
fieldcatalog-col_pos     = 0.
fieldcatalog-outputlen   = 10.
fieldcatalog-emphasize   = 'X'.
fieldcatalog-key         = 'X'.
fieldcatalog-do_sum      = 'X'.
fieldcatalog-no_zero     = 'X'.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
fieldcatalog-fieldname   = 'EBELP'.
fieldcatalog-seltext_m   = 'PO Item'.
fieldcatalog-col_pos     = 1.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
fieldcatalog-fieldname   = 'STATU'.
fieldcatalog-seltext_m   = 'Status'.
fieldcatalog-col_pos     = 2.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
fieldcatalog-fieldname   = 'AEDAT'.
fieldcatalog-seltext_m   = 'Item change date'.
fieldcatalog-col_pos     = 3.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
fieldcatalog-fieldname   = 'MATNR'.
fieldcatalog-seltext_m   = 'Material Number'.
fieldcatalog-col_pos     = 4.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
fieldcatalog-fieldname   = 'MENGE'.
fieldcatalog-seltext_m   = 'PO quantity'.
fieldcatalog-col_pos     = 5.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
fieldcatalog-fieldname   = 'MEINS'.
fieldcatalog-seltext_m   = 'Order Unit'.
fieldcatalog-col_pos     = 6.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
fieldcatalog-fieldname   = 'NETPR'.
fieldcatalog-seltext_m   = 'Net Price'.
fieldcatalog-col_pos     = 7.
fieldcatalog-outputlen   = 15.
fieldcatalog-do_sum      = 'X'.
fieldcatalog-datatype     = 'CURR'.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
fieldcatalog-fieldname   = 'PEINH'.
fieldcatalog-seltext_m   = 'Price Unit'.
fieldcatalog-col_pos     = 8.
append fieldcatalog to fieldcatalog.
clear fieldcatalog.
endform.                    " BUILD_FIELDCATALOG
*&      Form BUILD_LAYOUT
      Build layout for ALV grid report
form build_layout.
gd_layout-no_input          = 'X'.
gd_layout-colwidth_optimize = 'X'.
gd_layout-totals_text       = 'Totals'(201).
gd_LAYOUT-coltab_fieldname = 'CELLCOLOR'. "CTAB_FNAME
endform.                    " BUILD_LAYOUT
*&      Form DISPLAY_ALV_REPORT
      Display report using ALV grid
form display_alv_report.
gd_repid = sy-repid.
call function 'REUSE_ALV_GRID_DISPLAY'
       exporting
            i_callback_program      = gd_repid
            i_callback_top_of_page   = 'TOP-OF-PAGE' "see FORM
           i_callback_user_command = 'USER_COMMAND'
           i_grid_title           = outtext
            is_layout               = gd_layout
            it_fieldcat             = fieldcatalog[]
           it_special_groups       = gd_tabgroup
          it_events               = gt_events
          is_print                = gd_prntparams
            i_save                  = 'X'
           is_variant              = z_template
       tables
            t_outtab                = it_ekko
       exceptions
            program_error           = 1
            others                  = 2.
if sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
endif.
endform.                    " DISPLAY_ALV_REPORT
*&      Form DATA_RETRIEVAL
      Retrieve data form EKPO table and populate itab it_ekko
form data_retrieval.
select ebeln ebelp statu aedat matnr menge meins netpr peinh
   up to 10 rows
    from ekpo
    into CORRESPONDING FIELDS OF TABLE it_ekko.
endform.                    " DATA_RETRIEVAL
Form TOP-OF-PAGE                                                 *
ALV Report Header                                                 *
Form top-of-page.
*ALV Header declarations
data: t_header type slis_t_listheader,
        wa_header type slis_listheader,
        t_line like wa_header-info,
        ld_lines type i,
        ld_linesc(10) type c.
Title
wa_header-typ = 'H'.
wa_header-info = 'EKKO Table Report'.
append wa_header to t_header.
clear wa_header.
Date
wa_header-typ = 'S'.
wa_header-key = 'Date: '.
CONCATENATE sy-datum+6(2) '.'
               sy-datum+4(2) '.'
               sy-datum(4) INTO wa_header-info.   "todays date
append wa_header to t_header.
clear: wa_header.
Total No. of Records Selected
describe table it_ekko lines ld_lines.
ld_linesc = ld_lines.
concatenate 'Total No. of Records Selected: ' ld_linesc
                    into t_line separated by space.
wa_header-typ = 'A'.
wa_header-info = t_line.
append wa_header to t_header.
clear: wa_header, t_line.
call function 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
      it_list_commentary = t_header.
           i_logo             = 'Z_LOGO'.
endform.                    "top-of-page
*&      Form SET_CELL_COLOURS
      Set colour of individual ALV cell, field
FORM SET_CELL_COLOURS .
DATA: WA_CELLCOLOR TYPE LVC_S_SCOL.
DATA: ld_index TYPE SY-TABIX.
LOOP AT IT_EKKO into wa_ekko.
    LD_INDEX = SY-TABIX.
Set colour of EBELN field to various colors based on sy-tabix value
    WA_CELLCOLOR-FNAME = 'EBELN'.
    WA_CELLCOLOR-COLOR-COL = sy-tabix. "color code 1-7, if outside rage defaults to 7
    WA_CELLCOLOR-COLOR-INT = '1'. "1 = Intensified on, 0 = Intensified off
    WA_CELLCOLOR-COLOR-INV = '0'. "1 = text colour, 0 = background colour
    APPEND WA_CELLCOLOR TO wa_ekko-CELLCOLOR.
    MODIFY it_ekko from wa_ekko INDEX ld_index TRANSPORTING CELLCOLOR.
Set colour of NETPR field to color 4 if gt 0
    if wa_ekko-netpr gt 0.
      WA_CELLCOLOR-FNAME = 'NETPR'.
      WA_CELLCOLOR-COLOR-COL = 4. "color code 1-7, if outside rage defaults to 7
      WA_CELLCOLOR-COLOR-INT = '0'. "1 = Intensified on, 0 = Intensified off
      WA_CELLCOLOR-COLOR-INV = '0'. "1 = text colour, 0 = background colour
      APPEND WA_CELLCOLOR TO wa_ekko-CELLCOLOR.
      MODIFY it_ekko from wa_ekko INDEX ld_index TRANSPORTING CELLCOLOR.
    endif.
Set colour of AEDAT field text to red(6)
    WA_CELLCOLOR-FNAME = 'AEDAT'.
    WA_CELLCOLOR-COLOR-COL = 6. "color code 1-7, if outside rage defaults to 7
    WA_CELLCOLOR-COLOR-INT = '0'. "1 = Intensified on, 0 = Intensified off
    WA_CELLCOLOR-COLOR-INV = '1'. "1 = text colour, 0 = background colour
    APPEND WA_CELLCOLOR TO wa_ekko-CELLCOLOR.
    MODIFY it_ekko from wa_ekko INDEX ld_index TRANSPORTING CELLCOLOR.
ENDLOOP.
ENDFORM.                    " SET_CELL_COLOURS

REG: Correcting error records which have invalid characters

Hi All,
I had couple of questions regarding DTP.
DTP loads are failing because of the invalid characters, we are correcting the error records from the error stack and then running the Error DTP to process further. now my question is the original DTP is still red, with correct records in the RSMO showing red. Please let me know how to make the red request in to green and maintain the data integrity.
Thanks in advance.

I have corrected the Error stack and updated the corrected records through the Error DTP.
I checked the Number of records which have come to the Table, it is showing correct number of records( i.e error stack data + correct records which loaded in the first shot) but the technical status is still red, so i am curious if i am change the overall status to green manually will that affect the data in any manner?

Change color randomly of object

Hi,
I wrote a small application simulating a road traffic. I am using threads to do the animation.
this is the code:
public class TestProject extends Frame implements Runnable
   public static int frame;   // int variable for frame (animation)
    int delay = 100;    // delay for animation
    Thread animator, light;    // thread name
     * Create a thread and start it.
    public void start()
        animator = new Thread(this);    // create new thread
        animator.start();               // start thread
     * This method is called by the thread that was created in
     * the start method. It does the main animation.
    public void run()
        // Remember the starting time
        long tm = System.currentTimeMillis();   // get time (ms) and store it in tm
        while (Thread.currentThread() == animator)
            // Display the next frame of animation.
            if (frame==(200*roadArrangement.size()+50)) // if object reaches "end" reset
                frame =-50; // "reset" frame
            repaint(); // repaint object
            // Delay depending on how far we are behind.
            try
                tm += delay;    // delay
                Thread.sleep(Math.max(0, tm - System.currentTimeMillis()));
            catch (InterruptedException e) // catch exception for thread
                System.out.println("error in thread interrupt!");
                break;
            frame++;    // Advance the frame
    } // end of run
     * Set the animator variable to null so that the
     * thread will exit before displaying the next frame.
    public void stop()
        animator = null;
     * Paint a frame of animation.
    public void paint(Graphics g)
        for(int i = 0; i < roadArrangement.size(); i++)
            String tempType = roadArrangement.elementAt(i).toString();
            char roadType = tempType.charAt(0);
            g.setColor(Color.darkGray);
            if(roadType == 'r')
                g.setColor(Color.darkGray);
                g.fill3DRect(10+(i*210),100,210,60,true);
            else if(roadType == 'j')
                g.setColor(Color.darkGray);
                g.fill3DRect(10+(i*210),100,210,60,true);
                g.fill3DRect(85+(i*210),160,60,70,true);
                g.fill3DRect(85+(i*210),30,60,70,true);
                g.setColor(Color.green); // traffic light color
                g.fillOval(10+(i*210)+50,30+100,10,10); // traffic light
                Color clr = g.getColor();
                int red = clr.getRed();
                if((frame == (10+(i*210)+50))&&(red==255))
                    stop(); // stop thread to stop cars
                    System.out.println("STOP");
}In the code I have "oval" traffic lights where I set the colours.
Now, what I want to do is that traffic lights change independently and randomly their colour so that cars stop and drive.
How can I do this? Will I need a second thread? If yes, how to implement that?
thanks in advance.

Use [url http://java.sun.com/j2se/1.5.0/docs/api/java/util/Random.html]Random class and call nextInt every time in paint method than match a color to the int you get back.

How to print the error records and success records in bdc

how to print the number of error records and success records in bdc

hai,
plz refer this program,
Z_130399130271_A
REPORT Z_130399130271_A
       NO STANDARD PAGE HEADING LINE-SIZE 325.
*INCLUDE YVALIDATE.
*include bdcrecx1.
INCLUDE YINCLUDE399.
DATA ITAB LIKE TABLE OF FILE_TABLE WITH HEADER LINE.
PARAMETERS: DATASET(132) LOWER CASE.
DATA : RC TYPE I,
ERR(40) TYPE C,
SUCCESSCNT TYPE I VALUE 0,
FAILCOUNT TYPE I VALUE 0.
   DO NOT CHANGE - the generated data section - DO NOT CHANGE    ***
If it is nessesary to change the data section use the rules:
1.) Each definition of a field exists of two lines
2.) The first line shows exactly the comment
      '* data element: ' followed with the data element
      which describes the field.
      If you don't have a data element use the
      comment without a data element name
3.) The second line shows the fieldname of the
      structure, the fieldname must consist of
      a fieldname and optional the character '_' and
      three numbers and the field length in brackets
4.) Each field must be type C.
Generated data section with specific formatting - DO NOT CHANGE ***
DATA: BEGIN OF RECORD OCCURS 0,
data element: LIF16
        LIFNR_001(016),
data element: KTOKK
        KTOKK_002(004),
data element: ANRED
        ANRED_003(015),
data element: NAME1_GP
        NAME1_004(035),
data element: SORTL
        SORTL_005(010),
data element: STRAS_GP
        STRAS_006(035),
data element: PFACH
        PFACH_007(010),
data element: ORT01_GP
        ORT01_008(035),
data element: ORT02_GP
        ORT02_009(035),
data element: LAND1_GP
        LAND1_010(003),
data element: REGIO
        REGIO_011(003),
data element: SPRAS
        SPRAS_012(002),
data element: TELF1
        TELF1_013(016),
data element: TELF2
        TELF2_014(016),
data element: BANKS
        BANKS_01_015(003),
data element: BANKK
        BANKL_01_016(015),
data element: BANKN
        BANKN_01_017(018),
      END OF RECORD.
DATA:   BEGIN OF ERRORITAB OCCURS 0,
        LIFNR_001 LIKE LFA1-LIFNR,
        KTOKK_002 LIKE LFA1-KTOKK,
        ANRED_003 LIKE LFA1-ANRED,
        NAME1_004 LIKE LFA1-NAME1,
        SORTL_005 LIKE LFA1-SORTL,
        STRAS_006 LIKE LFA1-STRAS,
        PFACH_007 LIKE LFA1-PFACH,
        ORT01_008 LIKE LFA1-ORT01,
        ORT02_009 LIKE LFA1-ORT02,
        LAND1_010 LIKE LFA1-LAND1,
        REGIO_011 LIKE LFA1-REGIO,
        SPRAS_012 LIKE LFA1-SPRAS,
        TELF1_013 LIKE LFA1-TELF1,
        TELF2_014 LIKE LFA1-TELF2,
        BANKS_01_015 LIKE LFBK-BANKS,
        BANKL_01_016 LIKE LFBK-BANKL,
        BANKN_01_017 LIKE LFBK-BANKN,
        ERRORMSG(60) TYPE C,
        SERIAL TYPE I VALUE '1',
    END OF ERRORITAB.
End generated data section ***
AT SELECTION-SCREEN ON VALUE-REQUEST FOR DATASET.
CALL FUNCTION 'TMP_GUI_FILE_OPEN_DIALOG'
EXPORTING
    WINDOW_TITLE            = 'select a file '
    DEFAULT_EXTENSION       = 'TXT'
    DEFAULT_FILENAME        = 'ASSIGN5.TXT'
FILE_FILTER             =
INIT_DIRECTORY          =
MULTISELECTION          =
IMPORTING
RC                      =
    TABLES
      FILE_TABLE              = ITAB
EXCEPTIONS
   CNTL_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.
READ TABLE ITAB INDEX 1.
DATASET = ITAB-FILENAME.
WRITE DATASET.
START-OF-SELECTION.
*perform open_dataset using dataset.
*perform open_group.
DATA T TYPE STRING.
T = DATASET.
IF T EQ ' '.
    MESSAGE E110(ZX).
ENDIF.
CALL FUNCTION 'GUI_UPLOAD'
    EXPORTING
      FILENAME                      = T
FILETYPE                      = 'ASC'
      HAS_FIELD_SEPARATOR           = 'X'
HEADER_LENGTH                 = 0
READ_BY_LINE                  = 'X'
DAT_MODE                      = ' '
CODEPAGE                      = ' '
IGNORE_CERR                   = ABAP_TRUE
REPLACEMENT                   = '#'
CHECK_BOM                     = ' '
IMPORTING
FILELENGTH                    =
HEADER                        =
    TABLES
      DATA_TAB                      = RECORD
EXCEPTIONS
FILE_OPEN_ERROR               = 1
FILE_READ_ERROR               = 2
NO_BATCH                      = 3
GUI_REFUSE_FILETRANSFER       = 4
INVALID_TYPE                  = 5
NO_AUTHORITY                  = 6
UNKNOWN_ERROR                 = 7
BAD_DATA_FORMAT               = 8
HEADER_NOT_ALLOWED            = 9
SEPARATOR_NOT_ALLOWED         = 10
HEADER_TOO_LONG               = 11
UNKNOWN_DP_ERROR              = 12
ACCESS_DENIED                 = 13
DP_OUT_OF_MEMORY              = 14
DISK_FULL                     = 15
DP_TIMEOUT                    = 16
OTHERS                        = 17
IF SY-SUBRC <> 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
           WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
LOOP AT RECORD.
    CLEAR RC.
    CLEAR ERR.
*read dataset dataset into record.
    IF SY-SUBRC <> 0. EXIT. ENDIF.
    RECORD-KTOKK_002 = '0001'.
    PERFORM BDC_DYNPRO      USING 'SAPMF02K' '0100'.
    PERFORM BDC_FIELD       USING 'BDC_CURSOR'
                                  'RF02K-KTOKK'.
    PERFORM BDC_FIELD       USING 'BDC_OKCODE'
                                  '/00'.
    PERFORM BDC_FIELD       USING 'RF02K-LIFNR'
                                  RECORD-LIFNR_001.
    PERFORM BDC_FIELD       USING 'RF02K-KTOKK'
                                  RECORD-KTOKK_002.
    PERFORM BDC_DYNPRO      USING 'SAPMF02K' '0110'.
    PERFORM BDC_FIELD       USING 'BDC_CURSOR'
                                  'LFA1-TELX1'.
    PERFORM BDC_FIELD       USING 'BDC_OKCODE'
                                  '/00'.
    PERFORM BDC_FIELD       USING 'LFA1-ANRED'
                                  RECORD-ANRED_003.
    PERFORM BDC_FIELD       USING 'LFA1-NAME1'
                                  RECORD-NAME1_004.
    PERFORM BDC_FIELD       USING 'LFA1-SORTL'
                                  RECORD-SORTL_005.
    PERFORM BDC_FIELD       USING 'LFA1-STRAS'
                                  RECORD-STRAS_006.
    PERFORM BDC_FIELD       USING 'LFA1-PFACH'
                                  RECORD-PFACH_007.
    PERFORM BDC_FIELD       USING 'LFA1-ORT01'
                                  RECORD-ORT01_008.
    PERFORM BDC_FIELD       USING 'LFA1-ORT02'
                                  RECORD-ORT02_009.
    PERFORM BDC_FIELD       USING 'LFA1-LAND1'
                                  RECORD-LAND1_010.
    PERFORM BDC_FIELD       USING 'LFA1-REGIO'
                                  RECORD-REGIO_011.
    PERFORM BDC_FIELD       USING 'LFA1-SPRAS'
                                  RECORD-SPRAS_012.
    PERFORM BDC_FIELD       USING 'LFA1-TELF1'
                                  RECORD-TELF1_013.
    PERFORM BDC_FIELD       USING 'LFA1-TELF2'
                                  RECORD-TELF2_014.
    PERFORM BDC_DYNPRO      USING 'SAPMF02K' '0120'.
    PERFORM BDC_FIELD       USING 'BDC_CURSOR'
                                  'LFA1-KUNNR'.
    PERFORM BDC_FIELD       USING 'BDC_OKCODE'
                                  '=VW'.
    PERFORM BDC_DYNPRO      USING 'SAPMF02K' '0130'.
    PERFORM BDC_FIELD       USING 'BDC_CURSOR'
                                  'LFBK-BANKN(01)'.
    PERFORM BDC_FIELD       USING 'BDC_OKCODE'
                                  '=ENTR'.
    PERFORM BDC_FIELD       USING 'LFBK-BANKS(01)'
                                  RECORD-BANKS_01_015.
    PERFORM BDC_FIELD       USING 'LFBK-BANKL(01)'
                                  RECORD-BANKL_01_016.
    PERFORM BDC_FIELD       USING 'LFBK-BANKN(01)'
                                  RECORD-BANKN_01_017.
    PERFORM BDC_DYNPRO      USING 'SAPMF02K' '0130'.
    PERFORM BDC_FIELD       USING 'BDC_CURSOR'
                                  'LFBK-BANKS(01)'.
    PERFORM BDC_FIELD       USING 'BDC_OKCODE'
                                  '=UPDA'.
    PERFORM BDC_TRANSACTION USING 'XK01' CHANGING ERR RC.
    DATA: SERIAL TYPE I VALUE 1.
    IF RC <> 0.
      FAILCOUNT = FAILCOUNT + 1.
      CLEAR ERRORITAB.
      ERRORITAB-SERIAL = SERIAL.
      ERRORITAB-LIFNR_001 = RECORD-LIFNR_001.
      ERRORITAB-KTOKK_002 = RECORD-KTOKK_002.
      ERRORITAB-ANRED_003 = RECORD-ANRED_003.
      ERRORITAB-NAME1_004 = RECORD-NAME1_004.
      ERRORITAB-SORTL_005 = RECORD-SORTL_005.
      ERRORITAB-STRAS_006 = RECORD-STRAS_006.
      ERRORITAB-PFACH_007 = RECORD-PFACH_007.
      ERRORITAB-ORT01_008 = RECORD-ORT01_008.
      ERRORITAB-ORT02_009 = RECORD-ORT02_009.
      ERRORITAB-LAND1_010 = RECORD-LAND1_010.
      ERRORITAB-REGIO_011 = RECORD-REGIO_011.
      ERRORITAB-SPRAS_012 = RECORD-SPRAS_012.
      ERRORITAB-TELF1_013 = RECORD-TELF1_013.
      ERRORITAB-TELF2_014 = RECORD-TELF2_014.
      ERRORITAB-BANKS_01_015 = RECORD-BANKS_01_015.
      ERRORITAB-BANKL_01_016 = RECORD-BANKL_01_016.
      ERRORITAB-BANKN_01_017 = RECORD-BANKN_01_017.
      ERRORITAB-ERRORMSG = ERR.
      SERIAL = SERIAL + 1.
      APPEND ERRORITAB.
      MODIFY RECORD TRANSPORTING KTOKK_002.
      DELETE RECORD WHERE KTOKK_002 = '0001'.
    ELSE.
      SUCCESSCNT = SUCCESSCNT + 1.
    ENDIF.
ENDLOOP.
display output********************************************************
SKIP.
FORMAT COLOR 5 INTENSIFIED OFF.
WRITE:/ 'No. of records successfully uploaded: '.
FORMAT COLOR 4 INTENSIFIED OFF.
WRITE: SUCCESSCNT.
Displaying the success table******************************************
IF SUCCESSCNT <> 0.
    SKIP.
    FORMAT COLOR 4 INTENSIFIED OFF.
    WRITE:/ 'Successful Records'.
    FORMAT COLOR 7 INTENSIFIED ON.
    WRITE:/(261) SY-ULINE,
          / SY-VLINE,
            'S.NO',                               007 SY-VLINE,
            'VENDOR ACC.NUM',                     023 SY-VLINE,
            'VENDOR ACC GROUP',                   041 SY-VLINE,
            'TITLE',                              048 SY-VLINE,
            'VENDOR NAME',                        064 SY-VLINE,
            'SORT FIELD',                         076 SY-VLINE,
            'HOUSE NO.& STREET',                  101 SY-VLINE,
            'PO.BOX NO',                          116 SY-VLINE,
            'CITY',                               129 SY-VLINE,
            'DISTRICT',                           141 SY-VLINE,
            'COUNTRY KEY',                        156 SY-VLINE,
            'REGION',                             166 SY-VLINE,
            'LANGUAGE KEY',                       180 SY-VLINE,
            'TELEPHONE NO 1',                     196 SY-VLINE,
            'TELEPHONE NO 2',                     213 SY-VLINE,
            'BANK COUNTRY KEY',                   231 SY-VLINE,
            'BANK KEY',                           241 SY-VLINE,
            'BANK ACC.NO',                        261 SY-VLINE,
            /1(261) SY-ULINE.
    FORMAT COLOR 4 INTENSIFIED ON.
    SERIAL = 1.
   SORT RECORD BY LIFNR_001.
    LOOP AT RECORD.
      WRITE:/ SY-VLINE,
      SERIAL LEFT-JUSTIFIED,          007 SY-VLINE,
      RECORD-LIFNR_001(016),          023 SY-VLINE,
      RECORD-KTOKK_002(004),          041 SY-VLINE,
      RECORD-ANRED_003(015),          048 SY-VLINE,
      RECORD-NAME1_004(035),          064 SY-VLINE,
      RECORD-SORTL_005(010),          076 SY-VLINE,
      RECORD-STRAS_006(035),          101 SY-VLINE,
      RECORD-PFACH_007(010),          116 SY-VLINE,
      RECORD-ORT01_008(035),          129 SY-VLINE,
      RECORD-ORT02_009(035),          141 SY-VLINE,
      RECORD-LAND1_010(003),          156 SY-VLINE,
      RECORD-REGIO_011(003),          166 SY-VLINE,
      RECORD-SPRAS_012(002),          180 SY-VLINE,
      RECORD-TELF1_013(016),          196 SY-VLINE,
      RECORD-TELF2_014(016),          213 SY-VLINE,
      RECORD-BANKS_01_015(003),       231 SY-VLINE,
      RECORD-BANKL_01_016(015),       241 SY-VLINE,
      RECORD-BANKN_01_017(018),       261 SY-VLINE.
      WRITE:/(261) SY-ULINE.
      SERIAL = SERIAL + 1.
    ENDLOOP.
    WRITE:/1(261) SY-ULINE.
ENDIF.
SKIP.
FORMAT COLOR 5 INTENSIFIED OFF.
WRITE:/ 'No. of records not uploaded: '.
FORMAT COLOR 4 INTENSIFIED OFF.
WRITE: FAILCOUNT.
*Displaying the error table
IF FAILCOUNT <> 0.
    SKIP.
    FORMAT COLOR 4 INTENSIFIED OFF.
    WRITE:/(320) SY-ULINE,
            'Error Records'.
    FORMAT COLOR 7 INTENSIFIED ON.
    WRITE:/ SY-ULINE, SY-VLINE,
            'S.NO',                               007 SY-VLINE,
            'VENDOR ACC.NUM',                     023 SY-VLINE,
            'VENDOR ACC GROUP',                   041 SY-VLINE,
            'TITLE',                              048 SY-VLINE,
            'VENDOR NAME',                        064 SY-VLINE,
            'SORT FIELD',                         076 SY-VLINE,
            'HOUSE NO.& STREET',                  101 SY-VLINE,
            'PO.BOX NO',                          116 SY-VLINE,
            'CITY',                               129 SY-VLINE,
            'DISTRICT',                           141 SY-VLINE,
            'COUNTRY KEY',                        156 SY-VLINE,
            'REGION',                             166 SY-VLINE,
            'LANGUAGE KEY',                       180 SY-VLINE,
            'TELEPHONE NO 1',                     196 SY-VLINE,
            'TELEPHONE NO 2',                     213 SY-VLINE,
            'BANK COUNTRY KEY',                   231 SY-VLINE,
            'BANK KEY',                           241 SY-VLINE,
            'BANK ACC.NO',                        261 SY-VLINE,
            'ERROR MESSAGE',                      320 SY-VLINE.
    WRITE:/(320) SY-ULINE.
    FORMAT COLOR 4 INTENSIFIED ON.
   SORT ERRORITAB BY LIFNR_001.
    LOOP AT ERRORITAB.
      WRITE:/ SY-VLINE,
            ERRORITAB-SERIAL LEFT-JUSTIFIED,          007 SY-VLINE,
            ERRORITAB-LIFNR_001 ,       023 SY-VLINE,
            ERRORITAB-KTOKK_002,       041 SY-VLINE,
            ERRORITAB-ANRED_003,       048 SY-VLINE,
            ERRORITAB-NAME1_004,       064 SY-VLINE,
            ERRORITAB-SORTL_005,       076 SY-VLINE,
            ERRORITAB-STRAS_006,       101 SY-VLINE,
            ERRORITAB-PFACH_007,       116 SY-VLINE,
            ERRORITAB-ORT01_008,       129 SY-VLINE,
            ERRORITAB-ORT02_009,       141 SY-VLINE,
            ERRORITAB-LAND1_010,       156 SY-VLINE,
            ERRORITAB-REGIO_011,       166 SY-VLINE,
            ERRORITAB-SPRAS_012,       180 SY-VLINE,
            ERRORITAB-TELF1_013,       196 SY-VLINE,
            ERRORITAB-TELF2_014,       213 SY-VLINE,
            ERRORITAB-BANKS_01_015,    231 SY-VLINE,
            ERRORITAB-BANKL_01_016,    241 SY-VLINE,
            ERRORITAB-BANKN_01_017,    261 SY-VLINE,
            ERRORITAB-ERRORMSG,        320 SY-VLINE.
      WRITE:/(320) SY-ULINE.
    ENDLOOP.
    WRITE:/ SY-ULINE.
ENDIF.
hope this ll help you..
regards,
prema.A

Changing color of background

Hi, I am using Adobe Photoshop CS5 (64 bit) and I would like to know how to change the background color of my .tiff file. It is a black and white picture, and I just would like to change the white portion to a different color, such as green, yellow, red etc. I used to use a hothey to change it on older versions, but it does not seem to work on the new one. Does anyone know how to do this? Thank you.

You can try this:
1. Open a grayscale image.
2. Make the Actions panel visible by choosing Window - Actions from the menus.
3. Click the little fly-out menu icon in the upper right corner and choose New Set... Call it Color Changing Actions.
4. Click the fly-out icon and choose New Action... Call it Greenify. It will go into Record mode automatically.
5. Choose Image - Mode - RGB Color.
6. Choose Image - Adjustments - Curves...
7. In the Curves dialog, click the Channel: selector, choose Red, and drag the white point down to the center grid mark.
8. Do the same thing as step 7 with the Blue channel.
9. Press [ OK ].
10. Click the little square at the bottom of the Actions panel to stop the recording.
11. Double click the empty space to the right of the action name Greenify.
12. In the Action Options dialog, change Function Key: to F3 and click the Shift checkbox, then press [ OK ].
Voila, your Shift-F3 key now makes grayscale images "greenscale".
-Noel

Change color or Error records to Red

Similar Messages

Maybe you are looking for