|
PureBytes Links
Trading Reference Links
|
Jitu
Re: "Third thing: all floating point arithmetic is IEEE single
precision 32 bit floating point that has 7 (seven) significant
digits." This is the reason I had to write that YYYYMMDD function.
This function pads date out to 8 digits. This is essentially how I
use these functions, I want to export a file with a 8 digit date tag
attached. The Date will be the end date of the range you select in
the AA window.
Andrew
function YYYYMMDD( indexofBar )
{
tYear = Year();
tDate = DateNum();
Daystr = StrRight(WriteVal(tdate[indexofBar],1.0),2);
Monthstr = StrLeft(StrRight(WriteVal(tdate[indexofBar]
*10,1.0),6),2);
Yearstr = StrLeft(WriteVal(tYear[indexofBar],1.0),1)+StrRight
(WriteVal(tYear[indexofBar],1.0),3);
result = YearStr + Monthstr + DayStr;
return result;
}
function RangeBarLast()
{
Result = LastValue( ValueWhen( Status("lastbarinrange"),
BarIndex() ) );
return Result;
}
EndBar = RangeBarLast();
finishbar = YYYYMMDD(EndBar);
/*
ReportExport = "C:/Documents and Settings/Owner/My
Documents/Investment docs/ROR System daily
Scans/ROR_Report_"+YYYYMMDD(finishbar)+".TXT";
xxTableExport(ReportExport," ",Report);
*/
Filter = 1;
AddTextColumn(finishbar, "End Date");
--- In amibroker@xxxxxxxxxxxxxxx, "jtelang" <jtelang@xxxx> wrote:
> Ha! Yes I did read your post carefully, but you're right, what I
> didn't read carefully is that doc you pointed to. The reason is
that
> I had already carefully read DateNum documentation that I have
> installed (with the latest beta), and it does not have that last
> crucial "Separator" parameter that I was desparately looking
for. :-)
>
> > Third thing: all floating point arithmetic is IEEE single
precision
> 32 bit
> > floating point that has 7 (seven) significant digits.
>
> Gotcha!
>
> Jitu
>
> --- In amibroker@xxxxxxxxxxxxxxx, "Tomasz Janeczko"
<amibroker@xxxx>
> wrote:
> > Read carefully.
> >
> > I wrote:
> > Use ******formatDateTime******* in conjunction with WriteVal
> > http://www.amibroker.com/guide/afl/afl_view.php?name=WRITEVAL
> >
> > Quote
> >
> > "Display date/time according to regional settings
> >
> > WriteVal( DateTime(), formatDateTime );
> >
> > "
> >
> >
> >
> > Also If you don't want to display thousand separator simply
> >
> > specify Separator = False as below
> >
> >
> > WriteVal( DateNum(), 1.0, False );
> >
> >
> >
> > Third thing: all floating point arithmetic is IEEE single
precision
> 32 bit
> >
> > floating point that has 7 (seven) significant digits.
> >
> >
> >
> > Best regards,
> > Tomasz Janeczko
> > amibroker.com
> >
> > ----- Original Message -----
> > From: "jtelang" <jtelang@xxxx>
> > To: <amibroker@xxxxxxxxxxxxxxx>
> > Sent: Thursday, September 11, 2003 2:18 AM
> > Subject: [amibroker] Re: Converting DateNum() to a string...
> >
> >
> > > Tomasz,
> > >
> > > I did try WriteVal. The problem I ran into was that integer
value
> > > such as 20021010 came back with commas, like 200,210,10 which
I
> could
> > > not get rid of. And I'm quite puzzled that passing the number
> > > returned by DateNum didn't work for me in the way I tried it
(as
> > > mentioned in my original post). Do you have any idea if its a
bug
> or
> > > if its something that I did wrong?
> > >
> > > Andrew, thanks for your suggestion. I'll try it. I have it now
> > > working as follows (which gives me a 8 digit number, with
leading
> 0's
> > > when warranted). Couldn't think of any other way to get it to
> work.
> > > By leading 0's, I mean that I want the string to be 20020310
when
> the
> > > date is 10/3/2002, instead of 2002310.
> > >
> > > ------------------
> > >
> > > EnableScript("vbscript");
> > >
> > > gYstr = "" + Year();
> > > gMstr = "" + Month();
> > > gDstr = "" + Day();
> > > <%
> > > Dim mstr
> > > Dim dstr
> > > mstr = AFL("gMstr")
> > > if( Len(mstr) < 2 ) then mstr = "0" + mstr
> > > dstr = AFL("gDstr")
> > > if( Len(dstr) < 2 ) then dstr = "0" + dstr
> > > AFL("gMstr") = mstr
> > > AFL("gDstr") = dstr
> > > %>
> > > gDateNumStr = gYstr + gMstr + gDstr;
> > >
> > > -----------------
> > >
> > > Jitu
> > >
> > > --- In amibroker@xxxxxxxxxxxxxxx, "Tomasz Janeczko"
> <amibroker@xxxx>
> > > wrote:
> > > > Hello,
> > > >
> > > > Use formatDateTime in conjunction with WriteVal
> > > > http://www.amibroker.com/guide/afl/afl_view.php?name=WRITEVAL
> > > >
> > > >
> > > > Best regards,
> > > > Tomasz Janeczko
> > > > amibroker.com
> > > > ----- Original Message -----
> > > > From: "jtelang" <jtelang@xxxx>
> > > > To: <amibroker@xxxxxxxxxxxxxxx>
> > > > Sent: Wednesday, September 10, 2003 11:54 PM
> > > > Subject: [amibroker] Converting DateNum() to a string...
> > > >
> > > >
> > > > > I'm trying to use the number returned by DateNum() in a
> string
> > > > > that'll designate a unique filename for each day, and for
> some
> > > reason
> > > > > am unable to use the value returned. Here's a simplified
> example,
> > > > > when trying to set it as a string to title. Does anyone
know
> why
> > > this
> > > > > wouldn't work? I get a syntax error on this -
> > > > >
> > > > > EnableScript("vbscript");
> > > > > dn = DateNum();
> > > > > <%
> > > > > AFL("Title") = CStr(AFL("dn"))
> > > > > %>
> > > > >
> > > > > Following does work -
> > > > >
> > > > > EnableScript("vbscript");
> > > > > dn = 9999999;
> > > > > <%
> > > > > AFL("Title") = CStr(AFL("dn"))
> > > > > %>
> > > > >
> > > > > What's the difference in assigning a constant vs a value
> returned
> > > by
> > > > > DateNum to variable dn? FWIW, I tried ABTool's xxToString
()
> > > function
> > > > > as well. Similar problem...
> > > > >
> > > > > TIA,
> > > > >
> > > > > Jitu
> > > > >
> > > > >
> > > > >
> > > > >
> > > > > Send BUG REPORTS to bugs@xxxx
> > > > > Send SUGGESTIONS to suggest@xxxx
> > > > > -----------------------------------------
> > > > > Post AmiQuote-related messages ONLY to:
> amiquote@xxxxxxxxxxxxxxx
> > > > > (Web page:
http://groups.yahoo.com/group/amiquote/messages/)
> > > > > --------------------------------------------
> > > > > Check group FAQ at:
> > > http://groups.yahoo.com/group/amibroker/files/groupfaq.html
> > > > >
> > > > > Your use of Yahoo! Groups is subject to
> > > http://docs.yahoo.com/info/terms/
> > > > >
> > > > >
> > > > >
> > >
> > >
> > >
> > > Send BUG REPORTS to bugs@xxxx
> > > Send SUGGESTIONS to suggest@xxxx
> > > -----------------------------------------
> > > Post AmiQuote-related messages ONLY to:
amiquote@xxxxxxxxxxxxxxx
> > > (Web page: http://groups.yahoo.com/group/amiquote/messages/)
> > > --------------------------------------------
> > > Check group FAQ at:
> http://groups.yahoo.com/group/amibroker/files/groupfaq.html
> > >
> > > Your use of Yahoo! Groups is subject to
> http://docs.yahoo.com/info/terms/
> > >
> > >
> > >
------------------------ Yahoo! Groups Sponsor ---------------------~-->
Buy Ink Cartridges or Refill Kits for Your HP, Epson, Canon or Lexmark
Printer at Myinks.com. Free s/h on orders $50 or more to the US & Canada. http://www.c1tracking.com/l.asp?cid=5511
http://us.click.yahoo.com/l.m7sD/LIdGAA/qnsNAA/GHeqlB/TM
---------------------------------------------------------------------~->
Send BUG REPORTS to bugs@xxxxxxxxxxxxx
Send SUGGESTIONS to suggest@xxxxxxxxxxxxx
-----------------------------------------
Post AmiQuote-related messages ONLY to: amiquote@xxxxxxxxxxxxxxx
(Web page: http://groups.yahoo.com/group/amiquote/messages/)
--------------------------------------------
Check group FAQ at: http://groups.yahoo.com/group/amibroker/files/groupfaq.html
Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/
|