Variations on Official Screens
(TMF Sheard)
LEXINGTON, KY. (July 10, 1998) -- Some of the screens I don't follow officially are watched by enough of you that I thought I'd post some new rankings today for variations on relative strength and low Price/Sales.
But first, as expected, Parametric Technology <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: PMTC)") else Response.Write("(Nasdaq: PMTC)") end if %> was dropped from the group of #1-ranked stocks in the Value Line Investment Survey after its recent earnings warning. Earnings surprises are one of the five factors listed by Value Line as making up their proprietary timeliness rankings, and when a stock announces a warning like Parametric did recently, Value Line almost always lowers their rating. If you're an Unemotional growth follower, you'll notice the stock gets dumped from the current rankings as a result.
The first screen is applying the Relative Strength factor (6-month total return) to a larger field of stocks than normal. In this screen, I allowed all stocks ranked 1 or 2 for timeliness (400 stocks). Here are the top twenty:
America Online <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: AOL)") else Response.Write("(NYSE: AOL)") end if %>
Capital One Fin'l <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: COF)") else Response.Write("(NYSE: COF)") end if %>
Roberts Pharmac. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: RPC)") else Response.Write("(NYSE: RPC)") end if %>
Dell Computer <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: DELL)") else Response.Write("(Nasdaq: DELL)") end if %>
AEGON Ins. Group <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: AEG)") else Response.Write("(NYSE: AEG)") end if %>
Nokia Corp. ADR <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: NOK.A)") else Response.Write("(NYSE: NOK.A)") end if %>
Just For Feet <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: FEET)") else Response.Write("(Nasdaq: FEET)") end if %>
LADD Furniture <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: LADF)") else Response.Write("(Nasdaq: LADF)") end if %>
Hunt (J.B.) <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: JBHT)") else Response.Write("(Nasdaq: JBHT)") end if %>
Best Buy Co. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: BBY)") else Response.Write("(NYSE: BBY)") end if %>
Learning Co. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: TLC)") else Response.Write("(NYSE: TLC)") end if %>
Lowe's Cos. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: LOW)") else Response.Write("(NYSE: LOW)") end if %>
Unisys Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: UIS)") else Response.Write("(NYSE: UIS)") end if %>
Vodafone Group ADR <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: VOD)") else Response.Write("(NYSE: VOD)") end if %>
Apple Computer <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: AAPL)") else Response.Write("(Nasdaq: AAPL)") end if %>
Gap (The) Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: GPS)") else Response.Write("(NYSE: GPS)") end if %>
Health Mgmt. Systems <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: HMSY)") else Response.Write("(Nasdaq: HMSY)") end if %>
Jones Apparel Group <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: JNY)") else Response.Write("(NYSE: JNY)") end if %>
Staples Inc. <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: SPLS)") else Response.Write("(Nasdaq: SPLS)") end if %>
Cablevision Sys. 'A' <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: CVC)") else Response.Write("(NYSE: CVC)") end if %>
The second screen approximates one of James O'Shaughnessy's models -- Reasonable Runaways. I began with the 400 stocks ranked either 1 or 2 for timeliness, eliminated all stocks with a price to sales ratio of 1.0 or higher, and ranked the remaining stocks by their 6-month total returns. Here are the top twenty:
LADD Furniture <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: LADF)") else Response.Write("(Nasdaq: LADF)") end if %>
Hunt (J.B.) <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: JBHT)") else Response.Write("(Nasdaq: JBHT)") end if %>
Best Buy Co. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: BBY)") else Response.Write("(NYSE: BBY)") end if %>
Apple Computer <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: AAPL)") else Response.Write("(Nasdaq: AAPL)") end if %>
Blair Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: BL)") else Response.Write("(NYSE: BL)") end if %>
Kmart Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: KM)") else Response.Write("(NYSE: KM)") end if %>
GRC Int'l <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: GRH)") else Response.Write("(NYSE: GRH)") end if %>
McKesson Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: MCK)") else Response.Write("(NYSE: MCK)") end if %>
Haverty Furniture <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: HAVT)") else Response.Write("(Nasdaq: HAVT)") end if %>
Winnebago <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: WGO)") else Response.Write("(NYSE: WGO)") end if %>
Kaufman & Broad Home <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: KBH)") else Response.Write("(NYSE: KBH)") end if %>
Good Guys <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: GGUY)") else Response.Write("(Nasdaq: GGUY)") end if %>
Dayton Hudson <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: DH)") else Response.Write("(NYSE: DH)") end if %>
Lehman Bros. Holdings <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: LEH)") else Response.Write("(NYSE: LEH)") end if %>
Office Depot <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: ODP)") else Response.Write("(NYSE: ODP)") end if %>
Pulte Corp. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: PHM)") else Response.Write("(NYSE: PHM)") end if %>
Handleman Co. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: HDL)") else Response.Write("(NYSE: HDL)") end if %>
Shaw Inds. <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: SHX)") else Response.Write("(NYSE: SHX)") end if %>
Alaska Air Group <% if gsSubBrand = "aolsnapshot" then Response.Write("(NYSE: ALK)") else Response.Write("(NYSE: ALK)") end if %>
United Stationers <% if gsSubBrand = "aolsnapshot" then Response.Write("(Nasdaq: USTR)") else Response.Write("(Nasdaq: USTR)") end if %>
Have a good weekend and be sure to check out all the latest rankings and year-to-date returns!
Check out the latest file updates for the Workshop:
New Rankings
| 1998 Returns
| New Database
[Robert Sheard is the author of the The Unemotional Investor (Simon & Schuster, 1998) available now at Amazon.com and your local bookseller.]