Try this:
DATA TEST;
LENGTH ID $ 5 NAME $ 10 ADDRESS $ 15;
INPUT ID $ NAME $ ADDRESS $ QTY;
DATALINES;
SALES John Philadephia 25
BUY Adams Tampa 30
SALES Adams Orlando 30
BUY Mark Austin 30
;
RUN;
/* CREATE MACRO VARIABLE WITH ALL DUPLICATE PHYID VALUES */
DATA TEST1;
SET TEST;
IF ID='SALES' THEN FLAG='1';
ELSE FLAG='0';
RUN;
ODS LISTING CLOSE;
ODS HTML FILE='C:\Documents and Settings\Desktop\test.xls';
PROC REPORT DATA=TEST1 NOWINDOWS;
COLUMNS ID NAME ADDRESS QTY FLAG;
DEFINE FLAG/NOPRINT;
COMPUTE flag;
IF FLAG='1' THEN CALL DEFINE(_ROW_, "STYLE", "STYLE=[BACKGROUND=blue]");
ENDCOMP;
RUN;
ODS HTML CLOSE;
ODS LISTING;