<% Response.Redirect "/workshop/down.htm" %>

Workshop Screen Current Rankings

Last Updated: July 31, 1998

All stocks listed here are in order according to the screen's ranking system.

Changes to the Weekly Database 
  
 Delete: 
 Alaska Air Group <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: ALK)") else Response.Write("(NYSE: ALK)") end if %> 
 Cheesecake Factory <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: CAKE)") else Response.Write("(Nasdaq: CAKE)") end if %> 
 Computer Associates <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: CA)") else Response.Write("(NYSE: CA)") end if %> 
 Federal-Mogul <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: FMO)") else Response.Write("(NYSE: FMO)") end if %> 
 Maytag Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: MYG)") else Response.Write("(NYSE: MYG)") end if %> 
 Pillowtex Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: PTX)") else Response.Write("(NYSE: PTX)") end if %> 
 United HealthCare <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: UNH)") else Response.Write("(NYSE: UNH)") end if %> 
 Varco Int'l <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: VRC)") else Response.Write("(NYSE: VRC)") end if %> 
  
 Add: 
 Amgen <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: AMGN)") else Response.Write("(Nasdaq: AMGN)") end if %> 
 Centex Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: CTX)") else Response.Write("(NYSE: CTX)") end if %> 
 Jones Pharma <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: JMED)") else Response.Write("(Nasdaq: JMED)") end if %> 
 Oshkosh B'Gosh 'A' <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: GOSHA)") else Response.Write("(Nasdaq: GOSHA)") end if %> 
 Pulte Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: PHM)") else Response.Write("(NYSE: PHM)") end if %> 
 Roberts Pharmac. <% if gsSubBrand = "aolsnapshot" then Response.Write("(AMEX: RPC)") else Response.Write("(AMEX: RPC)") end if %> 
 Ryland Group <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: RYL)") else Response.Write("(NYSE: RYL)") end if %> 
 Symbol Technologies <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: SBL)") else Response.Write("(NYSE: SBL)") end if %> 
  
 Unemotional Growth 
 Dell Computer <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: DELL)") else Response.Write("(Nasdaq: DELL)") end if %> 
 HBO & Co. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: HBOC)") else Response.Write("(Nasdaq: HBOC)") end if %> 
 PeopleSoft <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: PSFT)") else Response.Write("(Nasdaq: PSFT)") end if %> 
 Anchor Gaming <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: SLOT)") else Response.Write("(Nasdaq: SLOT)") end if %> 
 Papa John's Int'l <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: PZZA)") else Response.Write("(Nasdaq: PZZA)") end if %> 
 Lexmark Int'l `A' <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: LXK)") else Response.Write("(NYSE: LXK)") end if %> 
 Dollar Tree Stores <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: DLTR)") else Response.Write("(Nasdaq: DLTR)") end if %> 
 Keane Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(AMEX: KEA)") else Response.Write("(AMEX: KEA)") end if %> 
 Tellabs  Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: TLAB)") else Response.Write("(Nasdaq: TLAB)") end if %> 
 Robert Half Int'l <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: RHI)") else Response.Write("(NYSE: RHI)") end if %> 
  
 Relative Strength -- IBD Method 
 America Online <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: AOL)") else Response.Write("(NYSE: AOL)") end if %> 
 Best Buy Co. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: BBY)") else Response.Write("(NYSE: BBY)") end if %> 
 Dell Computer <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: DELL)") else Response.Write("(Nasdaq: DELL)") end if %> 
 Nokia Corp. ADR <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: NOK.A)") else Response.Write("(NYSE: NOK.A)") end if %> 
 Capital One Fin'l <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: COF)") else Response.Write("(NYSE: COF)") end if %> 
 AEGON Ins. Group <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: AEG)") else Response.Write("(NYSE: AEG)") end if %> 
 Recoton Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: RCOT)") else Response.Write("(Nasdaq: RCOT)") end if %> 
 Unisys Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: UIS)") else Response.Write("(NYSE: UIS)") end if %> 
 Lexmark Int'l `A' <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: LXK)") else Response.Write("(NYSE: LXK)") end if %> 
 Staples  Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: SPLS)") else Response.Write("(Nasdaq: SPLS)") end if %> 
  
 Relative Strength -- 26-Week Method 
 Recoton Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: RCOT)") else Response.Write("(Nasdaq: RCOT)") end if %> 
 America Online <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: AOL)") else Response.Write("(NYSE: AOL)") end if %> 
 Dell Computer <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: DELL)") else Response.Write("(Nasdaq: DELL)") end if %> 
 Nokia Corp. ADR <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: NOK.A)") else Response.Write("(NYSE: NOK.A)") end if %> 
 AEGON Ins. Group <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: AEG)") else Response.Write("(NYSE: AEG)") end if %> 
 Best Buy Co. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: BBY)") else Response.Write("(NYSE: BBY)") end if %> 
 Roberts Pharmac. <% if gsSubBrand = "aolsnapshot" then Response.Write("(AMEX: RPC)") else Response.Write("(AMEX: RPC)") end if %> 
 Lexmark Int'l `A' <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: LXK)") else Response.Write("(NYSE: LXK)") end if %> 
 Staples  Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: SPLS)") else Response.Write("(Nasdaq: SPLS)") end if %> 
 Kansas City South'n Ind. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: KSU)") else Response.Write("(NYSE: KSU)") end if %> 
  
 Formula 90 
 Dell Computer <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: DELL)") else Response.Write("(Nasdaq: DELL)") end if %> 
 Nokia Corp. ADR <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: NOK.A)") else Response.Write("(NYSE: NOK.A)") end if %> 
 Capital One Fin'l <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: COF)") else Response.Write("(NYSE: COF)") end if %> 
 Lexmark Int'l `A' <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: LXK)") else Response.Write("(NYSE: LXK)") end if %> 
 Staples  Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: SPLS)") else Response.Write("(Nasdaq: SPLS)") end if %> 
 Dollar Tree Stores <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: DLTR)") else Response.Write("(Nasdaq: DLTR)") end if %> 
 Cisco Systems <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: CSCO)") else Response.Write("(Nasdaq: CSCO)") end if %> 
 Kansas City South'n Ind. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: KSU)") else Response.Write("(NYSE: KSU)") end if %> 
 EMC Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: EMC)") else Response.Write("(NYSE: EMC)") end if %> 
 Gap (The)  Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: GPS)") else Response.Write("(NYSE: GPS)") end if %> -- tie 
 United Stationers <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: USTR)") else Response.Write("(Nasdaq: USTR)") end if %> -- tie 
  
 Low Price/Sales 
 Recoton Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: RCOT)") else Response.Write("(Nasdaq: RCOT)") end if %> 
 Computer Sciences <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: CSC)") else Response.Write("(NYSE: CSC)") end if %> 
 Westpoint Stevens <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: WPSN)") else Response.Write("(Nasdaq: WPSN)") end if %> 
 Lowe's Cos. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: LOW)") else Response.Write("(NYSE: LOW)") end if %> 
 Fingerhut Cos. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: FHT)") else Response.Write("(NYSE: FHT)") end if %> 
 TJX Companies <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: TJX)") else Response.Write("(NYSE: TJX)") end if %> 
 Champion Enterprises <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: CHB)") else Response.Write("(NYSE: CHB)") end if %> 
 Pulte Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: PHM)") else Response.Write("(NYSE: PHM)") end if %> 
 Office Depot <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: ODP)") else Response.Write("(NYSE: ODP)") end if %> 
 Centex Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: CTX)") else Response.Write("(NYSE: CTX)") end if %> 
  
 Investing for Growth -- Classic (all candidates) 
 HBO & Co. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: HBOC)") else Response.Write("(Nasdaq: HBOC)") end if %> 
 Keane Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(AMEX: KEA)") else Response.Write("(AMEX: KEA)") end if %> 
 Paychex, Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: PAYX)") else Response.Write("(Nasdaq: PAYX)") end if %> 
 Computer Sciences <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: CSC)") else Response.Write("(NYSE: CSC)") end if %> 
 Home Depot <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: HD)") else Response.Write("(NYSE: HD)") end if %> 
 Lowe's Cos. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: LOW)") else Response.Write("(NYSE: LOW)") end if %> 
 Dollar General Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: DG)") else Response.Write("(NYSE: DG)") end if %> 
 Williams-Sonoma <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: WSM)") else Response.Write("(NYSE: WSM)") end if %> 
 Gap (The), Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: GPS)") else Response.Write("(NYSE: GPS)") end if %> 
 Best Buy Co. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: BBY)") else Response.Write("(NYSE: BBY)") end if %> 
 Jones Pharma <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: JMED)") else Response.Write("(Nasdaq: JMED)") end if %> 
 ICN Pharmaceuticals <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: ICN)") else Response.Write("(NYSE: ICN)") end if %> 
 Schering-Plough <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: SGP)") else Response.Write("(NYSE: SGP)") end if %> 
 Nautica Enterprises <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: NAUT)") else Response.Write("(Nasdaq: NAUT)") end if %> 
 Helen of Troy Ltd. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: HELE)") else Response.Write("(Nasdaq: HELE)") end if %> 
 Tellabs, Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: TLAB)") else Response.Write("(Nasdaq: TLAB)") end if %> 
 Robert Half Int'l <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: RHI)") else Response.Write("(NYSE: RHI)") end if %> 
 Dell Computer <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: DELL)") else Response.Write("(Nasdaq: DELL)") end if %> 
 Electronic Arts <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: ERTS)") else Response.Write("(Nasdaq: ERTS)") end if %> 
 Recoton Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: RCOT)") else Response.Write("(Nasdaq: RCOT)") end if %> 
 Symbol Technologies <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: SBL)") else Response.Write("(NYSE: SBL)") end if %> 
  
 Investing for Growth -- Relative Strength 
 Recoton Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: RCOT)") else Response.Write("(Nasdaq: RCOT)") end if %> 
 Dell Computer <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: DELL)") else Response.Write("(Nasdaq: DELL)") end if %> 
 Best Buy Co. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: BBY)") else Response.Write("(NYSE: BBY)") end if %> 
 Tellabs  Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: TLAB)") else Response.Write("(Nasdaq: TLAB)") end if %> 
 Computer Sciences <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: CSC)") else Response.Write("(NYSE: CSC)") end if %> 
 Williams-Sonoma <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: WSM)") else Response.Write("(NYSE: WSM)") end if %> 
 Lowe's Cos. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: LOW)") else Response.Write("(NYSE: LOW)") end if %> 
 Helen of Troy Ltd. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: HELE)") else Response.Write("(Nasdaq: HELE)") end if %> 
 Gap (The)  Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: GPS)") else Response.Write("(NYSE: GPS)") end if %> 
 Robert Half Int'l <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: RHI)") else Response.Write("(NYSE: RHI)") end if %> 
  
 Keystone (all 30 candidates) 
 America Online <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: AOL)") else Response.Write("(NYSE: AOL)") end if %> 
 Dell Computer <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: DELL)") else Response.Write("(Nasdaq: DELL)") end if %> 
 Equitable Cos. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: EQ)") else Response.Write("(NYSE: EQ)") end if %> 
 EMC Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: EMC)") else Response.Write("(NYSE: EMC)") end if %> 
 Cisco Systems <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: CSCO)") else Response.Write("(Nasdaq: CSCO)") end if %> 
 Warner-Lambert <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: WLA)") else Response.Write("(NYSE: WLA)") end if %> 
 Wal-Mart Stores <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: WMT)") else Response.Write("(NYSE: WMT)") end if %> 
 Amgen <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: AMGN)") else Response.Write("(Nasdaq: AMGN)") end if %> 
 Microsoft Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: MSFT)") else Response.Write("(Nasdaq: MSFT)") end if %> 
 Gap (The)  Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: GPS)") else Response.Write("(NYSE: GPS)") end if %> 
 Time Warner <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: TWX)") else Response.Write("(NYSE: TWX)") end if %> 
 Tyco Int'l Ltd. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: TYC)") else Response.Write("(NYSE: TYC)") end if %> 
 Home Depot <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: HD)") else Response.Write("(NYSE: HD)") end if %> 
 Pfizer  Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: PFE)") else Response.Write("(NYSE: PFE)") end if %> 
 Waste Management <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: WMI)") else Response.Write("(NYSE: WMI)") end if %> 
 Safeway Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: SWY)") else Response.Write("(NYSE: SWY)") end if %> 
 Amer. Int'l Group <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: AIG)") else Response.Write("(NYSE: AIG)") end if %> 
 Walgreen Co. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: WAG)") else Response.Write("(NYSE: WAG)") end if %> 
 Xerox Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: XRX)") else Response.Write("(NYSE: XRX)") end if %> 
 Travelers Group <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: TRV)") else Response.Write("(NYSE: TRV)") end if %> 
 AirTouch Communic. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: ATI)") else Response.Write("(NYSE: ATI)") end if %> 
 Dayton Hudson <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: DH)") else Response.Write("(NYSE: DH)") end if %> 
 Schering-Plough <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: SGP)") else Response.Write("(NYSE: SGP)") end if %> 
 Eastman Kodak <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: EK)") else Response.Write("(NYSE: EK)") end if %> 
 BankAmerica Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: BAC)") else Response.Write("(NYSE: BAC)") end if %> 
 Medtronic  Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: MDT)") else Response.Write("(NYSE: MDT)") end if %> 
 Abbott Labs. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: ABT)") else Response.Write("(NYSE: ABT)") end if %> 
 Freddie Mac <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: FRE)") else Response.Write("(NYSE: FRE)") end if %> 
 Fannie Mae <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: FNM)") else Response.Write("(NYSE: FNM)") end if %> 
 Sun Microsystems <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: SUNW)") else Response.Write("(Nasdaq: SUNW)") end if %>