Perfect! Sorry for the confusion, I guess I'm just too literal! Eric
--- In [email protected], "gary" <[EMAIL PROTECTED]> wrote: > > Hi > > This is the Excel function that returns qtr eps. > > ------------------------------------------------------------------------- > > Public Function QP_QuarterEps(symbol As String, Quarter_Index As Long) > qp_Revs.symbol = symbol > > Value = qp_Revs.Earnings(Quarter_Index) > If (VarType(Value) = vbError) Then > QP_QuarterEps = "N/A" > Else > QP_QuarterEps = Value > End If > End Function > > ----------------------------------------------------------------------------- > > > The earnings function returns the quarterly eps, I guess it should be name eps instead of earnings. > > Best regards > > Gary Lyben > > > ----- Original Message ----- > From: ly0y > To: [email protected] > Sent: Sunday, March 30, 2008 1:00 AM > Subject: [quotes-plus] Re: Scan Function -> COM interface? > > > Yes, I got Earnings to work. I do know those functions you listed > below work, I also listed them in my last post. I must not have been > clear where my problem lies. > > I'm trying to get *Earnings per Share* historically - EPS. The > equivalent QP scan function is QTREPS. Not Earnings. > > Alternatively I could make do with historical active shares so I can > calculate EPS myself (dividing earnings by active shares). I don't see > a call in any of the historical functions for getting share counts by > quarter. > > Eric > > --- In [email protected], Howard Hansen <hrhan@> wrote: > > > > The Quotes Plus VB 6.0 example 4 shows the following code for getting > > Quarterly earnings and revenues from the Quotes Plus database. I > > haven't converted example 4 for use with the 2005 version of VB.net yet > > so I can't predict it will work for you. But hopefully the code will > > provide you some hints towards answering your question. Qtr is a > > negative number. Quotes Plus uses a similar scheme for indexing > > earnings as it does for indexing closing prices. > > > > Howard > > > > qpRevEps.Symbol = Symbol > > 'Earnings Per Share > > DisplayDataNumber qpRevEps.Earnings(Qtr), IDC_EPS > > 'Revenues > > DisplayDataNumber qpRevEps.Revenues(Qtr), IDC_SALES > > '12 Month Sales Change > > DisplayDataNumber qpRevEps.SalesChange12Month(Qtr), IDC_12SALES > > '12 Month EPS Change > > DisplayDataNumber qpRevEps.EarningsChange12Month(Qtr), IDC_12EPS > > > > ly0y wrote: > > > > > > I'm the original poster. When I declare an instance of RevEPS, which > > > function do I call to get quarterly EPS? Note that I'm looking for the > > > equivalent to the scan function QTREPS(#qtrnum), not earnings. > > > > > > Object Browser tells me the functions in QuotesPlus.RevEPS are: > > > > > > Earnings(Integer) > > > EarningsChange12Month(Integer) > > > QtrDate(Integer) > > > Revenues(Integer) > > > SalesChange12Month(Integer) > > > > > > I don't see anything for EPS. How can I reproduce the scan function > > > QTREPS? > > > > > > Thanks! > > > > > > Eric > > > > > > --- In [email protected] > > > <mailto:quotes-plus%40yahoogroups.com>, "gary" <gary@> wrote: > > > > > > > > Hi Howard - > > > > > > > > You should see a RevEps object > > > > > > > > This is from vba in Excel: > > > > > > > > > > > > Dim qp_Revs As New QuotesPlus.RevEps > > > > > > > > > > > > You can always go to vba from excel to see what functions are being > > > called. > > > > > > > > Best regards > > > > > > > > Gary > > > > > > > > > > > > > > > > > > > > ----- Original Message ----- > > > > From: Howard Hansen > > > > To: [email protected] > <mailto:quotes-plus%40yahoogroups.com> > > > > Sent: Saturday, March 29, 2008 5:23 PM > > > > Subject: Re: [quotes-plus] Scan Function -> COM interface? > > > > > > > > > > > > As far as I can tell the Quotes Plus COM interface doesn't have a > > > > function for getting quarterly earnings from the Quotes Plus > > > database. > > > > I used the object browser to search the classes exposed by the COM > > > > interface but couldn't find a method that returned the quarterly > > > > earnings for a stock. Very strange because the Excel interface > > > > includes a function for getting quarterly earnings from the Quotes > > > Plus > > > > database. > > > > > > > > Howard > > > > > > > > ly0y wrote: > > > > > > > > > > I have been trying to reproduce a scan I run as a console VB.NET > > > > > application. I used as my base the QP_EX_Closes program (thanks to > > > > > whomever wrote that). > > > > > > > > > > I have much of it working. The thing I'm fighting right now is > > > > > reproducing the QPSCAN function QTREPS(quarter#). > > > > > > > > > > I've tried to grab the same data from the RevEPS class, which > seems > > > > > logical, but I don't see a matching function. I tried the > > > > > EarningsEstimates class function QtrYPAEPS but when I pass > > > quarter# == > > > > > -1 I get garbage back. The CompanyInfo class has a TTMEPS > > > function but > > > > > it doesn't take a quarter parameter. > > > > > > > > > > I know it's something stupid I'm overlooking. Can anyone please > > > point > > > > > me in the right direction? > > > > > > > > > > Eric > > > > > > > > > > > > > > > > > > > > > > >
