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

Workshop Screen Current Rankings

Last Updated: June 26, 1998

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

Changes to the Weekly Database 
  
 Delete: 
 Guidant Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: GDT)") else Response.Write("(NYSE: GDT)") end if %> 
 Kaufman & Broad Home <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: KBH)") else Response.Write("(NYSE: KBH)") end if %> 
 Pier 1 Imports <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: PIR)") else Response.Write("(NYSE: PIR)") end if %> 
 Ryland Group <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: RYL)") else Response.Write("(NYSE: RYL)") end if %> 
  
 Add: 
 CKE Restaurants <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: CKR)") else Response.Write("(NYSE: CKR)") end if %> 
 DeVRY Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: DV)") else Response.Write("(NYSE: DV)") end if %> 
 Integrated Health <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: IHS)") else Response.Write("(NYSE: IHS)") end if %> 
 Winnebago <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: WGO)") else Response.Write("(NYSE: WGO)") 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 %> 
 Cambridge Technology <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: CATP)") else Response.Write("(Nasdaq: CATP)") end if %> 
 Anchor Gaming <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: SLOT)") else Response.Write("(Nasdaq: SLOT)") end if %> 
 Parametric Technology <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: PMTC)") else Response.Write("(Nasdaq: PMTC)") end if %> 
 PeopleSoft <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: PSFT)") else Response.Write("(Nasdaq: PSFT)") end if %> 
 Robert Half Int'l <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: RHI)") else Response.Write("(NYSE: RHI)") end if %> 
 CKE Restaurants <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: CKR)") else Response.Write("(NYSE: CKR)") end if %> 
 Quintiles Transn'l <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: QTRN)") else Response.Write("(Nasdaq: QTRN)") end if %> 
 Papa John's Int'l <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: PZZA)") else Response.Write("(Nasdaq: PZZA)") 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 %> 
 Capital One Fin'l <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: COF)") else Response.Write("(NYSE: COF)") end if %> 
 Gap (The)  Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: GPS)") else Response.Write("(NYSE: GPS)") end if %> 
 Safeskin Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: SFSK)") else Response.Write("(Nasdaq: SFSK)") end if %> 
 Lowe's Cos. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: LOW)") else Response.Write("(NYSE: LOW)") end if %> 
 AEGON Ins. Group <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: AEG)") else Response.Write("(NYSE: AEG)") end if %> 
 Hunt (J.B.) <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: JBHT)") else Response.Write("(Nasdaq: JBHT)") end if %> 
 Lexmark Int'l `A' <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: LXK)") else Response.Write("(NYSE: LXK)") end if %> 
  
 Relative Strength -- 26-Week Method 
 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 %> 
 Capital One Fin'l <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: COF)") else Response.Write("(NYSE: COF)") end if %> 
 Best Buy Co. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: BBY)") else Response.Write("(NYSE: BBY)") end if %> 
 Nokia Corp. ADR <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: NOK.A)") else Response.Write("(NYSE: NOK.A)") end if %> 
 EMC Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: EMC)") else Response.Write("(NYSE: EMC)") end if %> 
 Lowe's Cos. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: LOW)") else Response.Write("(NYSE: LOW)") end if %> 
 Staples  Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: SPLS)") else Response.Write("(Nasdaq: SPLS)") end if %> 
 Gap (The)  Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: GPS)") else Response.Write("(NYSE: GPS)") end if %> 
 AEGON Ins. Group <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: AEG)") else Response.Write("(NYSE: AEG)") end if %> 
  
 Formula 90 
 Dell Computer <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: DELL)") else Response.Write("(Nasdaq: DELL)") end if %> 
 Capital One Fin'l <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: COF)") else Response.Write("(NYSE: COF)") end if %> 
 Gap (The)  Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: GPS)") else Response.Write("(NYSE: GPS)") end if %> 
 Safeskin Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: SFSK)") else Response.Write("(Nasdaq: SFSK)") end if %> 
 Lowe's Cos. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: LOW)") else Response.Write("(NYSE: LOW)") end if %> 
 Staples  Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: SPLS)") else Response.Write("(Nasdaq: SPLS)") end if %> 
 Watson Pharmac. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: WPI)") else Response.Write("(NYSE: WPI)") end if %> 
 EMC Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: EMC)") else Response.Write("(NYSE: EMC)") end if %> 
 Nokia Corp. ADR <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: NOK.A)") else Response.Write("(NYSE: NOK.A)") end if %> 
 Cisco Systems <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: CSCO)") else Response.Write("(Nasdaq: CSCO)") end if %> 
  
 Low Price/Sales 
 Lowe's Cos. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: LOW)") else Response.Write("(NYSE: LOW)") end if %> 
 Staples  Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: SPLS)") else Response.Write("(Nasdaq: SPLS)") end if %> 
 TJX Companies <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: TJX)") else Response.Write("(NYSE: TJX)") end if %> 
 Fingerhut Cos. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: FHT)") else Response.Write("(NYSE: FHT)") end if %> 
 Proffitt's Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: PFT)") else Response.Write("(NYSE: PFT)") end if %> 
 Haverty Furniture <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: HAVT)") else Response.Write("(Nasdaq: HAVT)") end if %> 
 Computer Sciences <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: CSC)") else Response.Write("(NYSE: CSC)") end if %> 
 Costco Cos. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: COST)") else Response.Write("(Nasdaq: COST)") end if %> 
 Alaska Air Group <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: ALK)") else Response.Write("(NYSE: ALK)") end if %> 
 Varlen Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: VRLN)") else Response.Write("(Nasdaq: VRLN)") 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 Associates <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: CA)") else Response.Write("(NYSE: CA)") end if %> 
 Computer Sciences <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: CSC)") else Response.Write("(NYSE: CSC)") 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 %> 
 Lowe's Cos. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: LOW)") else Response.Write("(NYSE: LOW)") 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 %> 
 United HealthCare <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: UNH)") else Response.Write("(NYSE: UNH)") end if %> 
 Helen of Troy Ltd. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: HELE)") else Response.Write("(Nasdaq: HELE)") end if %> 
 Nautica Enterprises <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: NAUT)") else Response.Write("(Nasdaq: NAUT)") end if %> 
 Robert Half Int'l <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: RHI)") else Response.Write("(NYSE: RHI)") end if %> 
 Tellabs, Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: TLAB)") else Response.Write("(Nasdaq: TLAB)") 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 %> 
 Mercury General <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: MCY)") else Response.Write("(NYSE: MCY)") end if %> 
  
 Investing for Growth -- Relative Strength 
 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 %> 
 Lowe's Cos. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: LOW)") else Response.Write("(NYSE: LOW)") end if %> 
 Gap (The)  Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: GPS)") else Response.Write("(NYSE: GPS)") end if %> 
 Williams-Sonoma <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: WSM)") else Response.Write("(NYSE: WSM)") end if %> 
 Dollar General Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: DG)") else Response.Write("(NYSE: DG)") end if %> 
 Schering-Plough <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: SGP)") else Response.Write("(NYSE: SGP)") end if %> 
 Computer Sciences <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: CSC)") else Response.Write("(NYSE: CSC)") end if %> 
 Robert Half Int'l <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: RHI)") else Response.Write("(NYSE: RHI)") end if %> 
 HBO & Co. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: HBOC)") else Response.Write("(Nasdaq: HBOC)") 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 %> 
 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 %> 
 Microsoft Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: MSFT)") else Response.Write("(Nasdaq: MSFT)") end if %> 
 Cisco Systems <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: CSCO)") else Response.Write("(Nasdaq: CSCO)") end if %> 
 Schering-Plough <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: SGP)") else Response.Write("(NYSE: SGP)") end if %> 
 Wal-Mart Stores <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: WMT)") else Response.Write("(NYSE: WMT)") end if %> 
 Dayton Hudson <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: DH)") else Response.Write("(NYSE: DH)") end if %> 
 Warner-Lambert <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: WLA)") else Response.Write("(NYSE: WLA)") 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 %> 
 Tele-Communic. 'A' <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: TCOMA)") else Response.Write("(Nasdaq: TCOMA)") end if %> 
 AirTouch Communic. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: ATI)") else Response.Write("(NYSE: ATI)") end if %> 
 Xerox Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: XRX)") else Response.Write("(NYSE: XRX)") end if %> 
 Tyco Int'l Ltd. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: TYC)") else Response.Write("(NYSE: TYC)") end if %> 
 Walgreen Co. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: WAG)") else Response.Write("(NYSE: WAG)") 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 %> 
 MBNA Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: KRB)") else Response.Write("(NYSE: KRB)") end if %> 
 Household Int'l <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: HI)") else Response.Write("(NYSE: HI)") end if %> 
 Travelers Group <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: TRV)") else Response.Write("(NYSE: TRV)") end if %> 
 BankBoston Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: BKB)") else Response.Write("(NYSE: BKB)") end if %> 
 Computer Associates <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: CA)") else Response.Write("(NYSE: CA)") end if %> 
 Sun Microsystems <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: SUNW)") else Response.Write("(Nasdaq: SUNW)") end if %> 
 Illinois Tool Works <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: ITW)") else Response.Write("(NYSE: ITW)") 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 %> 
 Allstate Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: ALL)") else Response.Write("(NYSE: ALL)") end if %> 
 Cendant Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: CD)") else Response.Write("(NYSE: CD)") end if %>