Jump to content

Welcome to the new Traders Laboratory! Please bear with us as we finish the migration over the next few days. If you find any issues, want to leave feedback, get in touch with us, or offer suggestions please post to the Support forum here.

  • Welcome Guests

    Welcome. You are currently viewing the forum as a guest which does not give you access to all the great features at Traders Laboratory such as interacting with members, access to all forums, downloading attachments, and eligibility to win free giveaways. Registration is fast, simple and absolutely free. Create a FREE Traders Laboratory account here.

suriNotes

Suri.isTradingDay (EasyLanguage Function)

Recommended Posts

 

suri.isTradingDay

 

A TradingDay (function) searches if a given Date is

a Full Trading Day(1), Half-Day/Early Close (0.5) or A Holiday (0) from

1998 to 2010's list of Holidays.

 

This Holiday list is compiled from NYSE Holiday lists from 1998 to 2010.

 

Usage

 

day = suri.isTradingDay(CheckDate);

 

returns

0 = Holiday/Saturday or Sunday

1 = Full Trading Day

0.5 = Half-Day/Early Close

-1 = Not in the DateList or Error...

 

Example:

day = suri.isTradingDay(1080215); // Returns 1

day = suri.isTradingDay(1081224); // Returns 0.5

day = suri.isTradingDay(1081225); // Returns 0

day = suri.isTradingDay(1080218); // Returns 0

day = suri.isTradingDay(1100114); // Returns -1

 

Notes:

1. Please make sure the Holiday/Early Close Datelist is accurate for the

Instruments/Exchange data you trade.

 

2. The date search code has index-offsets for faster search in

HOLIDAYS array. If you add/remove any dates, pl. change the

index offsets also.

 

 

regards,

Suri ("deMicron")

 

 

This is the same function I posted on the TradeStation Forums on Feb. 15, 2008

and updated the DateArrays in 2009.

 

https://www.tradestation.com/Discussions/Topic.aspx?Result=1&Topic_ID=73885

 

SURIISTRADINGDAY.ELDFetching info...

Share this post


Link to post
Share on other sites

 

Holiday List for suri.IsTradingDay

 

// 1998

HOLIDAYS[ 1,1] = 980101; HOLIDAYS[ 1,2] = 0;

HOLIDAYS[ 2,1] = 980119; HOLIDAYS[ 2,2] = 0;

HOLIDAYS[ 3,1] = 980216; HOLIDAYS[ 3,2] = 0;

HOLIDAYS[ 4,1] = 980410; HOLIDAYS[ 4,2] = 0;

HOLIDAYS[ 5,1] = 980525; HOLIDAYS[ 5,2] = 0;

HOLIDAYS[ 6,1] = 980703; HOLIDAYS[ 6,2] = 0;

HOLIDAYS[ 7,1] = 980907; HOLIDAYS[ 7,2] = 0;

HOLIDAYS[ 8,1] = 981126; HOLIDAYS[ 8,2] = 0;

HOLIDAYS[ 9,1] = 981127; HOLIDAYS[ 9,2] = 0.5;

HOLIDAYS[ 10,1] = 981224; HOLIDAYS[ 10,2] = 0.5;

HOLIDAYS[ 11,1] = 981225; HOLIDAYS[ 11,2] = 0;

 

// 1999

HOLIDAYS[ 12,1] = 990101; HOLIDAYS[ 12,2] = 0;

HOLIDAYS[ 13,1] = 990118; HOLIDAYS[ 13,2] = 0;

HOLIDAYS[ 14,1] = 990215; HOLIDAYS[ 14,2] = 0;

HOLIDAYS[ 15,1] = 990402; HOLIDAYS[ 15,2] = 0;

HOLIDAYS[ 16,1] = 990531; HOLIDAYS[ 16,2] = 0;

HOLIDAYS[ 17,1] = 990705; HOLIDAYS[ 17,2] = 0;

HOLIDAYS[ 18,1] = 990906; HOLIDAYS[ 18,2] = 0;

HOLIDAYS[ 19,1] = 991125; HOLIDAYS[ 19,2] = 0;

HOLIDAYS[ 20,1] = 991126; HOLIDAYS[ 20,2] = 0.5;

HOLIDAYS[ 21,1] = 991224; HOLIDAYS[ 21,2] = 0;

HOLIDAYS[ 22,1] = 991231; HOLIDAYS[ 22,2] = 0.5;

 

// 2000

HOLIDAYS[ 23,1] = 1000117; HOLIDAYS[ 23,2] = 0;

HOLIDAYS[ 24,1] = 1000221; HOLIDAYS[ 24,2] = 0;

HOLIDAYS[ 25,1] = 1000421; HOLIDAYS[ 25,2] = 0;

HOLIDAYS[ 26,1] = 1000529; HOLIDAYS[ 26,2] = 0;

HOLIDAYS[ 27,1] = 1000703; HOLIDAYS[ 27,2] = 0.5;

HOLIDAYS[ 28,1] = 1000704; HOLIDAYS[ 28,2] = 0;

HOLIDAYS[ 29,1] = 1000904; HOLIDAYS[ 29,2] = 0;

HOLIDAYS[ 30,1] = 1001123; HOLIDAYS[ 30,2] = 0;

HOLIDAYS[ 31,1] = 1001124; HOLIDAYS[ 31,2] = 0.5;

HOLIDAYS[ 32,1] = 1001225; HOLIDAYS[ 32,2] = 0;

 

//2001

HOLIDAYS[ 33,1] = 1010101; HOLIDAYS[ 33,2] = 0;

HOLIDAYS[ 34,1] = 1010115; HOLIDAYS[ 34,2] = 0;

HOLIDAYS[ 35,1] = 1010219; HOLIDAYS[ 35,2] = 0;

HOLIDAYS[ 36,1] = 1010413; HOLIDAYS[ 36,2] = 0;

HOLIDAYS[ 37,1] = 1010528; HOLIDAYS[ 37,2] = 0;

HOLIDAYS[ 38,1] = 1010703; HOLIDAYS[ 38,2] = 0.5;

HOLIDAYS[ 39,1] = 1010704; HOLIDAYS[ 39,2] = 0;

HOLIDAYS[ 40,1] = 1010903; HOLIDAYS[ 40,2] = 0;

HOLIDAYS[ 41,1] = 1010911; HOLIDAYS[ 41,2] = 0; //Sept. 11

HOLIDAYS[ 42,1] = 1010912; HOLIDAYS[ 42,2] = 0;

HOLIDAYS[ 43,1] = 1010913; HOLIDAYS[ 43,2] = 0;

HOLIDAYS[ 44,1] = 1010914; HOLIDAYS[ 44,2] = 0;

HOLIDAYS[ 45,1] = 1011122; HOLIDAYS[ 45,2] = 0;

HOLIDAYS[ 46,1] = 1011123; HOLIDAYS[ 46,2] = 0.5;

HOLIDAYS[ 47,1] = 1011224; HOLIDAYS[ 47,2] = 0.5;

HOLIDAYS[ 48,1] = 1011225; HOLIDAYS[ 48,2] = 0;

 

//2002

HOLIDAYS[ 49,1] = 1020101; HOLIDAYS[ 49,2] = 0;

HOLIDAYS[ 50,1] = 1020121; HOLIDAYS[ 50,2] = 0;

HOLIDAYS[ 51,1] = 1020218; HOLIDAYS[ 51,2] = 0;

HOLIDAYS[ 52,1] = 1020329; HOLIDAYS[ 52,2] = 0;

HOLIDAYS[ 53,1] = 1020527; HOLIDAYS[ 53,2] = 0;

HOLIDAYS[ 54,1] = 1020704; HOLIDAYS[ 54,2] = 0;

HOLIDAYS[ 55,1] = 1020705; HOLIDAYS[ 55,2] = 0.5;

HOLIDAYS[ 56,1] = 1020902; HOLIDAYS[ 56,2] = 0;

HOLIDAYS[ 57,1] = 1021128; HOLIDAYS[ 57,2] = 0;

HOLIDAYS[ 58,1] = 1021129; HOLIDAYS[ 58,2] = 0.5;

HOLIDAYS[ 59,1] = 1021224; HOLIDAYS[ 59,2] = 0.5;

HOLIDAYS[ 60,1] = 1021225; HOLIDAYS[ 60,2] = 0;

 

//2003

HOLIDAYS[ 61,1] = 1030101; HOLIDAYS[ 61,2] = 0;

HOLIDAYS[ 62,1] = 1030120; HOLIDAYS[ 62,2] = 0;

HOLIDAYS[ 63,1] = 1030217; HOLIDAYS[ 63,2] = 0;

HOLIDAYS[ 64,1] = 1030418; HOLIDAYS[ 64,2] = 0;

HOLIDAYS[ 65,1] = 1030526; HOLIDAYS[ 65,2] = 0;

HOLIDAYS[ 66,1] = 1030703; HOLIDAYS[ 66,2] = 0.5;

HOLIDAYS[ 67,1] = 1030704; HOLIDAYS[ 67,2] = 0;

HOLIDAYS[ 68,1] = 1030901; HOLIDAYS[ 68,2] = 0;

HOLIDAYS[ 69,1] = 1031127; HOLIDAYS[ 69,2] = 0;

HOLIDAYS[ 70,1] = 1031128; HOLIDAYS[ 70,2] = 0.5;

HOLIDAYS[ 71,1] = 1031224; HOLIDAYS[ 71,2] = 0.5;

HOLIDAYS[ 72,1] = 1031225; HOLIDAYS[ 72,2] = 0;

HOLIDAYS[ 73,1] = 1031226; HOLIDAYS[ 73,2] = 0.5;

 

//2004

HOLIDAYS[ 74,1] = 1040101; HOLIDAYS[ 74,2] = 0;

HOLIDAYS[ 75,1] = 1040119; HOLIDAYS[ 75,2] = 0;

HOLIDAYS[ 76,1] = 1040216; HOLIDAYS[ 76,2] = 0;

HOLIDAYS[ 77,1] = 1040409; HOLIDAYS[ 77,2] = 0;

HOLIDAYS[ 78,1] = 1040531; HOLIDAYS[ 78,2] = 0;

HOLIDAYS[ 79,1] = 1040611; HOLIDAYS[ 79,2] = 0; // Ronald Reagan's

HOLIDAYS[ 80,1] = 1040705; HOLIDAYS[ 80,2] = 0;

HOLIDAYS[ 81,1] = 1040906; HOLIDAYS[ 81,2] = 0;

HOLIDAYS[ 82,1] = 1041125; HOLIDAYS[ 82,2] = 0;

HOLIDAYS[ 83,1] = 1041126; HOLIDAYS[ 83,2] = 0.5;

HOLIDAYS[ 84,1] = 1041224; HOLIDAYS[ 84,2] = 0;

 

//2005

HOLIDAYS[ 85,1] = 1050117; HOLIDAYS[ 85,2] = 0;

HOLIDAYS[ 86,1] = 1050221; HOLIDAYS[ 86,2] = 0;

HOLIDAYS[ 87,1] = 1050325; HOLIDAYS[ 87,2] = 0;

HOLIDAYS[ 88,1] = 1050530; HOLIDAYS[ 88,2] = 0;

HOLIDAYS[ 89,1] = 1050704; HOLIDAYS[ 89,2] = 0;

HOLIDAYS[ 90,1] = 1050905; HOLIDAYS[ 90,2] = 0;

HOLIDAYS[ 91,1] = 1051124; HOLIDAYS[ 91,2] = 0;

HOLIDAYS[ 92,1] = 1051125; HOLIDAYS[ 92,2] = 0.5;

HOLIDAYS[ 93,1] = 1051226; HOLIDAYS[ 93,2] = 0;

 

//2006

HOLIDAYS[ 94,1] = 1060102; HOLIDAYS[ 94,2] = 0;

HOLIDAYS[ 95,1] = 1060116; HOLIDAYS[ 95,2] = 0;

HOLIDAYS[ 96,1] = 1060220; HOLIDAYS[ 96,2] = 0;

HOLIDAYS[ 97,1] = 1060414; HOLIDAYS[ 97,2] = 0;

HOLIDAYS[ 98,1] = 1060529; HOLIDAYS[ 98,2] = 0;

HOLIDAYS[ 99,1] = 1060703; HOLIDAYS[ 99,2] = 0.5;

HOLIDAYS[ 100,1] = 1060704; HOLIDAYS[ 100,2] = 0;

HOLIDAYS[ 101,1] = 1060904; HOLIDAYS[ 101,2] = 0;

HOLIDAYS[ 102,1] = 1061123; HOLIDAYS[ 102,2] = 0;

HOLIDAYS[ 103,1] = 1061124; HOLIDAYS[ 103,2] = 0.5;

HOLIDAYS[ 104,1] = 1061225; HOLIDAYS[ 104,2] = 0;

 

//2007

HOLIDAYS[ 105,1] = 1070101; HOLIDAYS[ 105,2] = 0;

HOLIDAYS[ 106,1] = 1070102; HOLIDAYS[ 106,2] = 0; // Gerald Ford's

HOLIDAYS[ 107,1] = 1070105; HOLIDAYS[ 107,2] = 0;

HOLIDAYS[ 108,1] = 1070115; HOLIDAYS[ 108,2] = 0;

HOLIDAYS[ 109,1] = 1070219; HOLIDAYS[ 109,2] = 0;

HOLIDAYS[ 110,1] = 1070406; HOLIDAYS[ 110,2] = 0;

HOLIDAYS[ 111,1] = 1070528; HOLIDAYS[ 111,2] = 0;

HOLIDAYS[ 112,1] = 1070703; HOLIDAYS[ 112,2] = 0.5;

HOLIDAYS[ 113,1] = 1070704; HOLIDAYS[ 113,2] = 0;

HOLIDAYS[ 114,1] = 1070903; HOLIDAYS[ 114,2] = 0;

HOLIDAYS[ 115,1] = 1071122; HOLIDAYS[ 115,2] = 0;

HOLIDAYS[ 116,1] = 1071123; HOLIDAYS[ 116,2] = 0.5;

HOLIDAYS[ 117,1] = 1071224; HOLIDAYS[ 117,2] = 0.5;

HOLIDAYS[ 118,1] = 1071225; HOLIDAYS[ 118,2] = 0;

 

// Manual Entries for 2008, 2009, 2010 Holidays from NYSE Calendar... Suri

 

// 2008

HOLIDAYS[ 119,1] = 1080101; HOLIDAYS[ 119,2] = 0;

HOLIDAYS[ 120,1] = 1080121; HOLIDAYS[ 120,2] = 0;

HOLIDAYS[ 121,1] = 1080218; HOLIDAYS[ 121,2] = 0;

HOLIDAYS[ 122,1] = 1080321; HOLIDAYS[ 122,2] = 0;

HOLIDAYS[ 123,1] = 1080526; HOLIDAYS[ 123,2] = 0;

HOLIDAYS[ 124,1] = 1080703; HOLIDAYS[ 124,2] = 0.5;

HOLIDAYS[ 125,1] = 1080704; HOLIDAYS[ 125,2] = 0;

HOLIDAYS[ 126,1] = 1080901; HOLIDAYS[ 126,2] = 0;

HOLIDAYS[ 127,1] = 1081127; HOLIDAYS[ 127,2] = 0;

HOLIDAYS[ 128,1] = 1081127; HOLIDAYS[ 128,2] = 0;

HOLIDAYS[ 129,1] = 1081128; HOLIDAYS[ 129,2] = 0.5;

HOLIDAYS[ 130,1] = 1081224; HOLIDAYS[ 130,2] = 0.5;

HOLIDAYS[ 131,1] = 1081225; HOLIDAYS[ 131,2] = 0;

 

// 2009

HOLIDAYS[ 132,1] = 1090101; HOLIDAYS[ 132,2] = 0;

HOLIDAYS[ 133,1] = 1090119; HOLIDAYS[ 133,2] = 0;

HOLIDAYS[ 134,1] = 1090216; HOLIDAYS[ 134,2] = 0;

HOLIDAYS[ 135,1] = 1090410; HOLIDAYS[ 135,2] = 0;

HOLIDAYS[ 136,1] = 1090525; HOLIDAYS[ 136,2] = 0;

HOLIDAYS[ 137,1] = 1090703; HOLIDAYS[ 137,2] = 0;

HOLIDAYS[ 138,1] = 1090907; HOLIDAYS[ 138,2] = 0;

HOLIDAYS[ 139,1] = 1091126; HOLIDAYS[ 139,2] = 0;

HOLIDAYS[ 140,1] = 1091127; HOLIDAYS[ 140,2] = 0.5;

HOLIDAYS[ 141,1] = 1091224; HOLIDAYS[ 141,2] = 0.5;

HOLIDAYS[ 142,1] = 1091225; HOLIDAYS[ 142,2] = 0;

 

// 2010

HOLIDAYS[ 143,1] = 1100101; HOLIDAYS[ 143,2] = 0;

HOLIDAYS[ 144,1] = 1100118; HOLIDAYS[ 144,2] = 0;

HOLIDAYS[ 145,1] = 1100215; HOLIDAYS[ 145,2] = 0;

HOLIDAYS[ 146,1] = 1100402; HOLIDAYS[ 146,2] = 0;

HOLIDAYS[ 147,1] = 1100531; HOLIDAYS[ 147,2] = 0;

HOLIDAYS[ 148,1] = 1100705; HOLIDAYS[ 148,2] = 0;

HOLIDAYS[ 149,1] = 1100906; HOLIDAYS[ 149,2] = 0;

HOLIDAYS[ 150,1] = 1101125; HOLIDAYS[ 150,2] = 0;

HOLIDAYS[ 151,1] = 1101126; HOLIDAYS[ 151,2] = 0.5;

HOLIDAYS[ 152,1] = 1101224; HOLIDAYS[ 152,2] = 0;

 

Share this post


Link to post
Share on other sites

Suri

 

I've crated a function suri.isTradingDay in MultiCharts

 

I have this message

 

------ Build started: ------

Study: "suri.IsTradingDay" (Function)

Please wait ....

------ Compiled with error(s): ------

assignment is allowed only for variables or array elements

errLine 2, errColumn 0, errLineEnd 2, errColumnEnd 0

 

 

 

{
suri.isTradingDay

written by 
deMicron ("Suri Duddella")
Jan. 04, 2008

[url=http://www.suriNotes.com]suriNotes.com, suriNotes, Stock Research, Futures Trading, Emini Trading, Tradestation, Indicators[/url]

Returns: 0 for Holiday, 1 = Trading Day, 0.5 = EarlyClose/HalfDay, -1: Not in the DateList

Example:
Day = suri.IsTradingDay(1080219);
Day = suri.IsTradingDay(1051225);


1998 to 2007 Data Compiled from $INDU 5m Charts on TS.. Suri
2008, 2009 Data Manually compiled from NYSE Calendar .. Suri

}

//Input: checkDate(numericsimple), d1(numericSimple), d2(numericsimple);

Input: checkDate(numericsimple);

// Input: checkDate(numericsimple);

Arrays: HOLIDAYS[200,2](0);
Var: count(0), Found (0), NumHolidays(142), hreturn(0), iStart(0), iEnd(0);

// 0 = Holiday, 1 = TradingDay, 0.5= HalfDay/EarlyClose ... 

// 1998
HOLIDAYS[   1,1] =  980101; HOLIDAYS[   1,2] = 0;
HOLIDAYS[   2,1] =  980119; HOLIDAYS[   2,2] = 0;
HOLIDAYS[   3,1] =  980216; HOLIDAYS[   3,2] = 0;
HOLIDAYS[   4,1] =  980410; HOLIDAYS[   4,2] = 0;
HOLIDAYS[   5,1] =  980525; HOLIDAYS[   5,2] = 0;
HOLIDAYS[   6,1] =  980703; HOLIDAYS[   6,2] = 0;
HOLIDAYS[   7,1] =  980907; HOLIDAYS[   7,2] = 0;
HOLIDAYS[   8,1] =  981126; HOLIDAYS[   8,2] = 0;
HOLIDAYS[   9,1] =  981127; HOLIDAYS[   9,2] = 0.5;
HOLIDAYS[  10,1] =  981224; HOLIDAYS[  10,2] = 0.5;
HOLIDAYS[  11,1] =  981225; HOLIDAYS[  11,2] = 0;

// 1999
HOLIDAYS[  12,1] =  990101; HOLIDAYS[  12,2] = 0;
HOLIDAYS[  13,1] =  990118; HOLIDAYS[  13,2] = 0;
HOLIDAYS[  14,1] =  990215; HOLIDAYS[  14,2] = 0;
HOLIDAYS[  15,1] =  990402; HOLIDAYS[  15,2] = 0;
HOLIDAYS[  16,1] =  990531; HOLIDAYS[  16,2] = 0;
HOLIDAYS[  17,1] =  990705; HOLIDAYS[  17,2] = 0;
HOLIDAYS[  18,1] =  990906; HOLIDAYS[  18,2] = 0;
HOLIDAYS[  19,1] =  991125; HOLIDAYS[  19,2] = 0;
HOLIDAYS[  20,1] =  991126; HOLIDAYS[  20,2] = 0.5;
HOLIDAYS[  21,1] =  991224; HOLIDAYS[  21,2] = 0;
HOLIDAYS[  22,1] =  991231; HOLIDAYS[  22,2] = 0.5;

// 2000
HOLIDAYS[  23,1] = 1000117; HOLIDAYS[  23,2] = 0;
HOLIDAYS[  24,1] = 1000221; HOLIDAYS[  24,2] = 0;
HOLIDAYS[  25,1] = 1000421; HOLIDAYS[  25,2] = 0;
HOLIDAYS[  26,1] = 1000529; HOLIDAYS[  26,2] = 0;
HOLIDAYS[  27,1] = 1000703; HOLIDAYS[  27,2] = 0.5;
HOLIDAYS[  28,1] = 1000704; HOLIDAYS[  28,2] = 0;
HOLIDAYS[  29,1] = 1000904; HOLIDAYS[  29,2] = 0;
HOLIDAYS[  30,1] = 1001123; HOLIDAYS[  30,2] = 0;
HOLIDAYS[  31,1] = 1001124; HOLIDAYS[  31,2] = 0.5;
HOLIDAYS[  32,1] = 1001225; HOLIDAYS[  32,2] = 0;

//2001
HOLIDAYS[  33,1] = 1010101; HOLIDAYS[  33,2] = 0;
HOLIDAYS[  34,1] = 1010115; HOLIDAYS[  34,2] = 0;
HOLIDAYS[  35,1] = 1010219; HOLIDAYS[  35,2] = 0;
HOLIDAYS[  36,1] = 1010413; HOLIDAYS[  36,2] = 0;
HOLIDAYS[  37,1] = 1010528; HOLIDAYS[  37,2] = 0;
HOLIDAYS[  38,1] = 1010703; HOLIDAYS[  38,2] = 0.5;
HOLIDAYS[  39,1] = 1010704; HOLIDAYS[  39,2] = 0;
HOLIDAYS[  40,1] = 1010903; HOLIDAYS[  40,2] = 0;
HOLIDAYS[  41,1] = 1010911; HOLIDAYS[  41,2] = 0;  //Sept. 11
HOLIDAYS[  42,1] = 1010912; HOLIDAYS[  42,2] = 0;
HOLIDAYS[  43,1] = 1010913; HOLIDAYS[  43,2] = 0;
HOLIDAYS[  44,1] = 1010914; HOLIDAYS[  44,2] = 0;
HOLIDAYS[  45,1] = 1011122; HOLIDAYS[  45,2] = 0;
HOLIDAYS[  46,1] = 1011123; HOLIDAYS[  46,2] = 0.5;
HOLIDAYS[  47,1] = 1011224; HOLIDAYS[  47,2] = 0.5;
HOLIDAYS[  48,1] = 1011225; HOLIDAYS[  48,2] = 0;

//2002
HOLIDAYS[  49,1] = 1020101; HOLIDAYS[  49,2] = 0;
HOLIDAYS[  50,1] = 1020121; HOLIDAYS[  50,2] = 0;
HOLIDAYS[  51,1] = 1020218; HOLIDAYS[  51,2] = 0;
HOLIDAYS[  52,1] = 1020329; HOLIDAYS[  52,2] = 0;
HOLIDAYS[  53,1] = 1020527; HOLIDAYS[  53,2] = 0;
HOLIDAYS[  54,1] = 1020704; HOLIDAYS[  54,2] = 0;
HOLIDAYS[  55,1] = 1020705; HOLIDAYS[  55,2] = 0.5;
HOLIDAYS[  56,1] = 1020902; HOLIDAYS[  56,2] = 0;
HOLIDAYS[  57,1] = 1021128; HOLIDAYS[  57,2] = 0;
HOLIDAYS[  58,1] = 1021129; HOLIDAYS[  58,2] = 0.5;
HOLIDAYS[  59,1] = 1021224; HOLIDAYS[  59,2] = 0.5;
HOLIDAYS[  60,1] = 1021225; HOLIDAYS[  60,2] = 0;

//2003
HOLIDAYS[  61,1] = 1030101; HOLIDAYS[  61,2] = 0;
HOLIDAYS[  62,1] = 1030120; HOLIDAYS[  62,2] = 0;
HOLIDAYS[  63,1] = 1030217; HOLIDAYS[  63,2] = 0;
HOLIDAYS[  64,1] = 1030418; HOLIDAYS[  64,2] = 0;
HOLIDAYS[  65,1] = 1030526; HOLIDAYS[  65,2] = 0;
HOLIDAYS[  66,1] = 1030703; HOLIDAYS[  66,2] = 0.5;
HOLIDAYS[  67,1] = 1030704; HOLIDAYS[  67,2] = 0;
HOLIDAYS[  68,1] = 1030901; HOLIDAYS[  68,2] = 0;
HOLIDAYS[  69,1] = 1031127; HOLIDAYS[  69,2] = 0;
HOLIDAYS[  70,1] = 1031128; HOLIDAYS[  70,2] = 0.5;
HOLIDAYS[  71,1] = 1031224; HOLIDAYS[  71,2] = 0.5;
HOLIDAYS[  72,1] = 1031225; HOLIDAYS[  72,2] = 0;
HOLIDAYS[  73,1] = 1031226; HOLIDAYS[  73,2] = 0.5;

//2004
HOLIDAYS[  74,1] = 1040101; HOLIDAYS[  74,2] = 0;
HOLIDAYS[  75,1] = 1040119; HOLIDAYS[  75,2] = 0;
HOLIDAYS[  76,1] = 1040216; HOLIDAYS[  76,2] = 0;
HOLIDAYS[  77,1] = 1040409; HOLIDAYS[  77,2] = 0;
HOLIDAYS[  78,1] = 1040531; HOLIDAYS[  78,2] = 0;
HOLIDAYS[  79,1] = 1040611; HOLIDAYS[  79,2] = 0; // Ronald Reagan's
HOLIDAYS[  80,1] = 1040705; HOLIDAYS[  80,2] = 0;
HOLIDAYS[  81,1] = 1040906; HOLIDAYS[  81,2] = 0;
HOLIDAYS[  82,1] = 1041125; HOLIDAYS[  82,2] = 0;
HOLIDAYS[  83,1] = 1041126; HOLIDAYS[  83,2] = 0.5;
HOLIDAYS[  84,1] = 1041224; HOLIDAYS[  84,2] = 0;

//2005
HOLIDAYS[  85,1] = 1050117; HOLIDAYS[  85,2] = 0;
HOLIDAYS[  86,1] = 1050221; HOLIDAYS[  86,2] = 0;
HOLIDAYS[  87,1] = 1050325; HOLIDAYS[  87,2] = 0;
HOLIDAYS[  88,1] = 1050530; HOLIDAYS[  88,2] = 0;
HOLIDAYS[  89,1] = 1050704; HOLIDAYS[  89,2] = 0;
HOLIDAYS[  90,1] = 1050905; HOLIDAYS[  90,2] = 0;
HOLIDAYS[  91,1] = 1051124; HOLIDAYS[  91,2] = 0;
HOLIDAYS[  92,1] = 1051125; HOLIDAYS[  92,2] = 0.5;
HOLIDAYS[  93,1] = 1051226; HOLIDAYS[  93,2] = 0;

//2006
HOLIDAYS[  94,1] = 1060102; HOLIDAYS[  94,2] = 0;
HOLIDAYS[  95,1] = 1060116; HOLIDAYS[  95,2] = 0;
HOLIDAYS[  96,1] = 1060220; HOLIDAYS[  96,2] = 0;
HOLIDAYS[  97,1] = 1060414; HOLIDAYS[  97,2] = 0;
HOLIDAYS[  98,1] = 1060529; HOLIDAYS[  98,2] = 0;
HOLIDAYS[  99,1] = 1060703; HOLIDAYS[  99,2] = 0.5;
HOLIDAYS[ 100,1] = 1060704; HOLIDAYS[ 100,2] = 0;
HOLIDAYS[ 101,1] = 1060904; HOLIDAYS[ 101,2] = 0;
HOLIDAYS[ 102,1] = 1061123; HOLIDAYS[ 102,2] = 0;
HOLIDAYS[ 103,1] = 1061124; HOLIDAYS[ 103,2] = 0.5;
HOLIDAYS[ 104,1] = 1061225; HOLIDAYS[ 104,2] = 0;

//2007
HOLIDAYS[ 105,1] = 1070101; HOLIDAYS[ 105,2] = 0;
HOLIDAYS[ 106,1] = 1070102; HOLIDAYS[ 106,2] = 0; // Gerald Ford's
HOLIDAYS[ 107,1] = 1070105; HOLIDAYS[ 107,2] = 0;
HOLIDAYS[ 108,1] = 1070115; HOLIDAYS[ 108,2] = 0;
HOLIDAYS[ 109,1] = 1070219; HOLIDAYS[ 109,2] = 0;
HOLIDAYS[ 110,1] = 1070406; HOLIDAYS[ 110,2] = 0;
HOLIDAYS[ 111,1] = 1070528; HOLIDAYS[ 111,2] = 0;
HOLIDAYS[ 112,1] = 1070703; HOLIDAYS[ 112,2] = 0.5;
HOLIDAYS[ 113,1] = 1070704; HOLIDAYS[ 113,2] = 0;
HOLIDAYS[ 114,1] = 1070903; HOLIDAYS[ 114,2] = 0;
HOLIDAYS[ 115,1] = 1071122; HOLIDAYS[ 115,2] = 0;
HOLIDAYS[ 116,1] = 1071123; HOLIDAYS[ 116,2] = 0.5;
HOLIDAYS[ 117,1] = 1071224; HOLIDAYS[ 117,2] = 0.5;
HOLIDAYS[ 118,1] = 1071225; HOLIDAYS[ 118,2] = 0;

// Manual Entries for 2008, 2009 Holidays from NYSE Calendar... Suri

// 2008
HOLIDAYS[ 119,1] = 1080101; HOLIDAYS[ 119,2] = 0;
HOLIDAYS[ 120,1] = 1080121; HOLIDAYS[ 120,2] = 0;
HOLIDAYS[ 121,1] = 1080218; HOLIDAYS[ 121,2] = 0;
HOLIDAYS[ 122,1] = 1080321; HOLIDAYS[ 122,2] = 0;
HOLIDAYS[ 123,1] = 1080526; HOLIDAYS[ 123,2] = 0;
HOLIDAYS[ 124,1] = 1080703; HOLIDAYS[ 124,2] = 0.5;
HOLIDAYS[ 125,1] = 1080704; HOLIDAYS[ 125,2] = 0;
HOLIDAYS[ 126,1] = 1080901; HOLIDAYS[ 126,2] = 0;
HOLIDAYS[ 127,1] = 1081127; HOLIDAYS[ 127,2] = 0;
HOLIDAYS[ 128,1] = 1081127; HOLIDAYS[ 128,2] = 0;
HOLIDAYS[ 129,1] = 1081128; HOLIDAYS[ 129,2] = 0.5;
HOLIDAYS[ 130,1] = 1081224; HOLIDAYS[ 130,2] = 0.5;
HOLIDAYS[ 131,1] = 1081225; HOLIDAYS[ 131,2] = 0;

// 2009
HOLIDAYS[ 132,1] = 1090101; HOLIDAYS[ 132,2] = 0;
HOLIDAYS[ 133,1] = 1090119; HOLIDAYS[ 133,2] = 0;
HOLIDAYS[ 134,1] = 1090216; HOLIDAYS[ 134,2] = 0;
HOLIDAYS[ 135,1] = 1090410; HOLIDAYS[ 135,2] = 0;
HOLIDAYS[ 136,1] = 1090525; HOLIDAYS[ 136,2] = 0;
HOLIDAYS[ 137,1] = 1090703; HOLIDAYS[ 137,2] = 0;
HOLIDAYS[ 138,1] = 1090907; HOLIDAYS[ 138,2] = 0;
HOLIDAYS[ 139,1] = 1091126; HOLIDAYS[ 139,2] = 0;
HOLIDAYS[ 140,1] = 1091127; HOLIDAYS[ 140,2] = 0.5;
HOLIDAYS[ 141,1] = 1091224; HOLIDAYS[ 141,2] = 0.5;
HOLIDAYS[ 142,1] = 1091225; HOLIDAYS[ 142,2] = 0;



// 2010
HOLIDAYS[ 143,1] = 1100101; HOLIDAYS[ 143,2] = 0;
HOLIDAYS[ 144,1] = 1100118; HOLIDAYS[ 144,2] = 0;
HOLIDAYS[ 145,1] = 1100215; HOLIDAYS[ 145,2] = 0;
HOLIDAYS[ 146,1] = 1100402; HOLIDAYS[ 146,2] = 0;
HOLIDAYS[ 147,1] = 1100531; HOLIDAYS[ 147,2] = 0;
HOLIDAYS[ 148,1] = 1100705; HOLIDAYS[ 148,2] = 0;
HOLIDAYS[ 149,1] = 1100906; HOLIDAYS[ 149,2] = 0;
HOLIDAYS[ 150,1] = 1101125; HOLIDAYS[ 150,2] = 0;
HOLIDAYS[ 151,1] = 1101126; HOLIDAYS[ 151,2] = 0.5;
HOLIDAYS[ 152,1] = 1101224; HOLIDAYS[ 152,2] = 0;





if checkDate >= 980101 and checkDate <= 981231 then
begin
	iStart = 1;
iEnd = 11;
end
else if checkDate >= 990101 and checkDate <= 991231 then
begin
	iStart = 12;
iEnd = 22;
end  else if checkDate >= 1000101 and checkDate <= 1001231 then
begin
	iStart = 23;
iEnd = 32;
end  else if checkDate >= 1010101 and checkDate <= 1021231 then
begin
	iStart = 33;
iEnd = 48;
end   else if checkDate >= 1020101 and checkDate <= 1031231 then
begin
	iStart = 49;
iEnd = 60;
end  else if checkDate >= 1030101 and checkDate <= 1031231 then
begin
	iStart = 61;
iEnd = 73;
end  else if checkDate >= 1040101 and checkDate <= 1041231 then
begin
	iStart = 74;
iEnd = 84;
end  else if checkDate >= 1050101 and checkDate <= 1051231 then
begin
	iStart = 85;
iEnd = 93;
end  else if checkDate >= 1060101 and checkDate <= 1061231 then
begin
	iStart = 94;
iEnd = 104;
end  else if checkDate >= 1070101 and checkDate <= 1071231 then
begin
	iStart = 105;
iEnd = 118;
end  else if checkDate >= 1080101 and checkDate <= 1081231 then
begin
	iStart = 119;
iEnd = 131;
end   else if checkDate >= 1090101 and checkDate <= 1091231 then
begin
	iStart = 132;
iEnd = 142;
end   else if checkDate >= 1100101 and checkDate <= 1101231 then
begin
	iStart = 143;
iEnd = 152;
end

else  // Out of the range of this DB...
begin
	iStart = 0;
iEnd = 0;
Found = -100;
hreturn = -1;  // Not In DB 
end;


if ((DayOfWeek(checkDate) = 0) OR (DayOfWeek(checkDate) = 6)) then  // Saturady or Sunday
begin
hreturn = 0;   // Saturday, Sunday... 
end
else if (iStart > 0 and iEnd > 0) then
begin
Found=-1;		
for count= iStart to iEnd
begin
	value10 = IntPortion(Holidays[count,1]);
	if (value10 = Intportion(checkDate)) then
	begin		
		Found =1;  
		hreturn = HOLIDAYS[count,2];
		count=10000; // Short-Circuit
	end;
end;
if (Found =-1) then  // Not a Holiday
	hreturn = 1; // Full-Trading Day
end;

suri.isTradingDay = hreturn; 




// print("TestD  = ", checkDate, " DayofWeek  = ", DayOfWeek(checkDate));			
// print("Count = ", count, "HC = ", Holidays[count,1]);				
// print("Found = ", " Count = ", Count);			
// print("hreturn = ", hreturn);
// print("Istart = ", istart, " iEnd = ", Iend);

 

// 1998 
HOLIDAYS[ 1,1] = 980101; HOLIDAYS[ 1,2] = 0; 
HOLIDAYS[ 2,1] = 980119; HOLIDAYS[ 2,2] = 0; 
HOLIDAYS[ 3,1] = 980216; HOLIDAYS[ 3,2] = 0; 
HOLIDAYS[ 4,1] = 980410; HOLIDAYS[ 4,2] = 0; 
HOLIDAYS[ 5,1] = 980525; HOLIDAYS[ 5,2] = 0; 
HOLIDAYS[ 6,1] = 980703; HOLIDAYS[ 6,2] = 0; 
HOLIDAYS[ 7,1] = 980907; HOLIDAYS[ 7,2] = 0; 
HOLIDAYS[ 8,1] = 981126; HOLIDAYS[ 8,2] = 0; 
HOLIDAYS[ 9,1] = 981127; HOLIDAYS[ 9,2] = 0.5; 
HOLIDAYS[ 10,1] = 981224; HOLIDAYS[ 10,2] = 0.5; 
HOLIDAYS[ 11,1] = 981225; HOLIDAYS[ 11,2] = 0; 

// 1999 
HOLIDAYS[ 12,1] = 990101; HOLIDAYS[ 12,2] = 0; 
HOLIDAYS[ 13,1] = 990118; HOLIDAYS[ 13,2] = 0; 
HOLIDAYS[ 14,1] = 990215; HOLIDAYS[ 14,2] = 0; 
HOLIDAYS[ 15,1] = 990402; HOLIDAYS[ 15,2] = 0; 
HOLIDAYS[ 16,1] = 990531; HOLIDAYS[ 16,2] = 0; 
HOLIDAYS[ 17,1] = 990705; HOLIDAYS[ 17,2] = 0; 
HOLIDAYS[ 18,1] = 990906; HOLIDAYS[ 18,2] = 0; 
HOLIDAYS[ 19,1] = 991125; HOLIDAYS[ 19,2] = 0; 
HOLIDAYS[ 20,1] = 991126; HOLIDAYS[ 20,2] = 0.5; 
HOLIDAYS[ 21,1] = 991224; HOLIDAYS[ 21,2] = 0; 
HOLIDAYS[ 22,1] = 991231; HOLIDAYS[ 22,2] = 0.5; 

// 2000 
HOLIDAYS[ 23,1] = 1000117; HOLIDAYS[ 23,2] = 0; 
HOLIDAYS[ 24,1] = 1000221; HOLIDAYS[ 24,2] = 0; 
HOLIDAYS[ 25,1] = 1000421; HOLIDAYS[ 25,2] = 0; 
HOLIDAYS[ 26,1] = 1000529; HOLIDAYS[ 26,2] = 0; 
HOLIDAYS[ 27,1] = 1000703; HOLIDAYS[ 27,2] = 0.5; 
HOLIDAYS[ 28,1] = 1000704; HOLIDAYS[ 28,2] = 0; 
HOLIDAYS[ 29,1] = 1000904; HOLIDAYS[ 29,2] = 0; 
HOLIDAYS[ 30,1] = 1001123; HOLIDAYS[ 30,2] = 0; 
HOLIDAYS[ 31,1] = 1001124; HOLIDAYS[ 31,2] = 0.5; 
HOLIDAYS[ 32,1] = 1001225; HOLIDAYS[ 32,2] = 0; 

//2001 
HOLIDAYS[ 33,1] = 1010101; HOLIDAYS[ 33,2] = 0; 
HOLIDAYS[ 34,1] = 1010115; HOLIDAYS[ 34,2] = 0; 
HOLIDAYS[ 35,1] = 1010219; HOLIDAYS[ 35,2] = 0; 
HOLIDAYS[ 36,1] = 1010413; HOLIDAYS[ 36,2] = 0; 
HOLIDAYS[ 37,1] = 1010528; HOLIDAYS[ 37,2] = 0; 
HOLIDAYS[ 38,1] = 1010703; HOLIDAYS[ 38,2] = 0.5; 
HOLIDAYS[ 39,1] = 1010704; HOLIDAYS[ 39,2] = 0; 
HOLIDAYS[ 40,1] = 1010903; HOLIDAYS[ 40,2] = 0; 
HOLIDAYS[ 41,1] = 1010911; HOLIDAYS[ 41,2] = 0; //Sept. 11 
HOLIDAYS[ 42,1] = 1010912; HOLIDAYS[ 42,2] = 0; 
HOLIDAYS[ 43,1] = 1010913; HOLIDAYS[ 43,2] = 0; 
HOLIDAYS[ 44,1] = 1010914; HOLIDAYS[ 44,2] = 0; 
HOLIDAYS[ 45,1] = 1011122; HOLIDAYS[ 45,2] = 0; 
HOLIDAYS[ 46,1] = 1011123; HOLIDAYS[ 46,2] = 0.5; 
HOLIDAYS[ 47,1] = 1011224; HOLIDAYS[ 47,2] = 0.5; 
HOLIDAYS[ 48,1] = 1011225; HOLIDAYS[ 48,2] = 0; 

//2002 
HOLIDAYS[ 49,1] = 1020101; HOLIDAYS[ 49,2] = 0; 
HOLIDAYS[ 50,1] = 1020121; HOLIDAYS[ 50,2] = 0; 
HOLIDAYS[ 51,1] = 1020218; HOLIDAYS[ 51,2] = 0; 
HOLIDAYS[ 52,1] = 1020329; HOLIDAYS[ 52,2] = 0; 
HOLIDAYS[ 53,1] = 1020527; HOLIDAYS[ 53,2] = 0; 
HOLIDAYS[ 54,1] = 1020704; HOLIDAYS[ 54,2] = 0; 
HOLIDAYS[ 55,1] = 1020705; HOLIDAYS[ 55,2] = 0.5; 
HOLIDAYS[ 56,1] = 1020902; HOLIDAYS[ 56,2] = 0; 
HOLIDAYS[ 57,1] = 1021128; HOLIDAYS[ 57,2] = 0; 
HOLIDAYS[ 58,1] = 1021129; HOLIDAYS[ 58,2] = 0.5; 
HOLIDAYS[ 59,1] = 1021224; HOLIDAYS[ 59,2] = 0.5; 
HOLIDAYS[ 60,1] = 1021225; HOLIDAYS[ 60,2] = 0; 

//2003 
HOLIDAYS[ 61,1] = 1030101; HOLIDAYS[ 61,2] = 0; 
HOLIDAYS[ 62,1] = 1030120; HOLIDAYS[ 62,2] = 0; 
HOLIDAYS[ 63,1] = 1030217; HOLIDAYS[ 63,2] = 0; 
HOLIDAYS[ 64,1] = 1030418; HOLIDAYS[ 64,2] = 0; 
HOLIDAYS[ 65,1] = 1030526; HOLIDAYS[ 65,2] = 0; 
HOLIDAYS[ 66,1] = 1030703; HOLIDAYS[ 66,2] = 0.5; 
HOLIDAYS[ 67,1] = 1030704; HOLIDAYS[ 67,2] = 0; 
HOLIDAYS[ 68,1] = 1030901; HOLIDAYS[ 68,2] = 0; 
HOLIDAYS[ 69,1] = 1031127; HOLIDAYS[ 69,2] = 0; 
HOLIDAYS[ 70,1] = 1031128; HOLIDAYS[ 70,2] = 0.5; 
HOLIDAYS[ 71,1] = 1031224; HOLIDAYS[ 71,2] = 0.5; 
HOLIDAYS[ 72,1] = 1031225; HOLIDAYS[ 72,2] = 0; 
HOLIDAYS[ 73,1] = 1031226; HOLIDAYS[ 73,2] = 0.5; 

//2004 
HOLIDAYS[ 74,1] = 1040101; HOLIDAYS[ 74,2] = 0; 
HOLIDAYS[ 75,1] = 1040119; HOLIDAYS[ 75,2] = 0; 
HOLIDAYS[ 76,1] = 1040216; HOLIDAYS[ 76,2] = 0; 
HOLIDAYS[ 77,1] = 1040409; HOLIDAYS[ 77,2] = 0; 
HOLIDAYS[ 78,1] = 1040531; HOLIDAYS[ 78,2] = 0; 
HOLIDAYS[ 79,1] = 1040611; HOLIDAYS[ 79,2] = 0; // Ronald Reagan's 
HOLIDAYS[ 80,1] = 1040705; HOLIDAYS[ 80,2] = 0; 
HOLIDAYS[ 81,1] = 1040906; HOLIDAYS[ 81,2] = 0; 
HOLIDAYS[ 82,1] = 1041125; HOLIDAYS[ 82,2] = 0; 
HOLIDAYS[ 83,1] = 1041126; HOLIDAYS[ 83,2] = 0.5; 
HOLIDAYS[ 84,1] = 1041224; HOLIDAYS[ 84,2] = 0; 

//2005 
HOLIDAYS[ 85,1] = 1050117; HOLIDAYS[ 85,2] = 0; 
HOLIDAYS[ 86,1] = 1050221; HOLIDAYS[ 86,2] = 0; 
HOLIDAYS[ 87,1] = 1050325; HOLIDAYS[ 87,2] = 0; 
HOLIDAYS[ 88,1] = 1050530; HOLIDAYS[ 88,2] = 0; 
HOLIDAYS[ 89,1] = 1050704; HOLIDAYS[ 89,2] = 0; 
HOLIDAYS[ 90,1] = 1050905; HOLIDAYS[ 90,2] = 0; 
HOLIDAYS[ 91,1] = 1051124; HOLIDAYS[ 91,2] = 0; 
HOLIDAYS[ 92,1] = 1051125; HOLIDAYS[ 92,2] = 0.5; 
HOLIDAYS[ 93,1] = 1051226; HOLIDAYS[ 93,2] = 0; 

//2006 
HOLIDAYS[ 94,1] = 1060102; HOLIDAYS[ 94,2] = 0; 
HOLIDAYS[ 95,1] = 1060116; HOLIDAYS[ 95,2] = 0; 
HOLIDAYS[ 96,1] = 1060220; HOLIDAYS[ 96,2] = 0; 
HOLIDAYS[ 97,1] = 1060414; HOLIDAYS[ 97,2] = 0; 
HOLIDAYS[ 98,1] = 1060529; HOLIDAYS[ 98,2] = 0; 
HOLIDAYS[ 99,1] = 1060703; HOLIDAYS[ 99,2] = 0.5; 
HOLIDAYS[ 100,1] = 1060704; HOLIDAYS[ 100,2] = 0; 
HOLIDAYS[ 101,1] = 1060904; HOLIDAYS[ 101,2] = 0; 
HOLIDAYS[ 102,1] = 1061123; HOLIDAYS[ 102,2] = 0; 
HOLIDAYS[ 103,1] = 1061124; HOLIDAYS[ 103,2] = 0.5; 
HOLIDAYS[ 104,1] = 1061225; HOLIDAYS[ 104,2] = 0; 

//2007 
HOLIDAYS[ 105,1] = 1070101; HOLIDAYS[ 105,2] = 0; 
HOLIDAYS[ 106,1] = 1070102; HOLIDAYS[ 106,2] = 0; // Gerald Ford's 
HOLIDAYS[ 107,1] = 1070105; HOLIDAYS[ 107,2] = 0; 
HOLIDAYS[ 108,1] = 1070115; HOLIDAYS[ 108,2] = 0; 
HOLIDAYS[ 109,1] = 1070219; HOLIDAYS[ 109,2] = 0; 
HOLIDAYS[ 110,1] = 1070406; HOLIDAYS[ 110,2] = 0; 
HOLIDAYS[ 111,1] = 1070528; HOLIDAYS[ 111,2] = 0; 
HOLIDAYS[ 112,1] = 1070703; HOLIDAYS[ 112,2] = 0.5; 
HOLIDAYS[ 113,1] = 1070704; HOLIDAYS[ 113,2] = 0; 
HOLIDAYS[ 114,1] = 1070903; HOLIDAYS[ 114,2] = 0; 
HOLIDAYS[ 115,1] = 1071122; HOLIDAYS[ 115,2] = 0; 
HOLIDAYS[ 116,1] = 1071123; HOLIDAYS[ 116,2] = 0.5; 
HOLIDAYS[ 117,1] = 1071224; HOLIDAYS[ 117,2] = 0.5; 
HOLIDAYS[ 118,1] = 1071225; HOLIDAYS[ 118,2] = 0; 

// Manual Entries for 2008, 2009, 2010 Holidays from NYSE Calendar... Suri 

// 2008 
HOLIDAYS[ 119,1] = 1080101; HOLIDAYS[ 119,2] = 0; 
HOLIDAYS[ 120,1] = 1080121; HOLIDAYS[ 120,2] = 0; 
HOLIDAYS[ 121,1] = 1080218; HOLIDAYS[ 121,2] = 0; 
HOLIDAYS[ 122,1] = 1080321; HOLIDAYS[ 122,2] = 0; 
HOLIDAYS[ 123,1] = 1080526; HOLIDAYS[ 123,2] = 0; 
HOLIDAYS[ 124,1] = 1080703; HOLIDAYS[ 124,2] = 0.5; 
HOLIDAYS[ 125,1] = 1080704; HOLIDAYS[ 125,2] = 0; 
HOLIDAYS[ 126,1] = 1080901; HOLIDAYS[ 126,2] = 0; 
HOLIDAYS[ 127,1] = 1081127; HOLIDAYS[ 127,2] = 0; 
HOLIDAYS[ 128,1] = 1081127; HOLIDAYS[ 128,2] = 0; 
HOLIDAYS[ 129,1] = 1081128; HOLIDAYS[ 129,2] = 0.5; 
HOLIDAYS[ 130,1] = 1081224; HOLIDAYS[ 130,2] = 0.5; 
HOLIDAYS[ 131,1] = 1081225; HOLIDAYS[ 131,2] = 0; 

// 2009 
HOLIDAYS[ 132,1] = 1090101; HOLIDAYS[ 132,2] = 0; 
HOLIDAYS[ 133,1] = 1090119; HOLIDAYS[ 133,2] = 0; 
HOLIDAYS[ 134,1] = 1090216; HOLIDAYS[ 134,2] = 0; 
HOLIDAYS[ 135,1] = 1090410; HOLIDAYS[ 135,2] = 0; 
HOLIDAYS[ 136,1] = 1090525; HOLIDAYS[ 136,2] = 0; 
HOLIDAYS[ 137,1] = 1090703; HOLIDAYS[ 137,2] = 0; 
HOLIDAYS[ 138,1] = 1090907; HOLIDAYS[ 138,2] = 0; 
HOLIDAYS[ 139,1] = 1091126; HOLIDAYS[ 139,2] = 0; 
HOLIDAYS[ 140,1] = 1091127; HOLIDAYS[ 140,2] = 0.5; 
HOLIDAYS[ 141,1] = 1091224; HOLIDAYS[ 141,2] = 0.5; 
HOLIDAYS[ 142,1] = 1091225; HOLIDAYS[ 142,2] = 0; 

// 2010 
HOLIDAYS[ 143,1] = 1100101; HOLIDAYS[ 143,2] = 0; 
HOLIDAYS[ 144,1] = 1100118; HOLIDAYS[ 144,2] = 0; 
HOLIDAYS[ 145,1] = 1100215; HOLIDAYS[ 145,2] = 0; 
HOLIDAYS[ 146,1] = 1100402; HOLIDAYS[ 146,2] = 0; 
HOLIDAYS[ 147,1] = 1100531; HOLIDAYS[ 147,2] = 0; 
HOLIDAYS[ 148,1] = 1100705; HOLIDAYS[ 148,2] = 0; 
HOLIDAYS[ 149,1] = 1100906; HOLIDAYS[ 149,2] = 0; 
HOLIDAYS[ 150,1] = 1101125; HOLIDAYS[ 150,2] = 0; 
HOLIDAYS[ 151,1] = 1101126; HOLIDAYS[ 151,2] = 0.5; 
HOLIDAYS[ 152,1] = 1101224; HOLIDAYS[ 152,2] = 0; 

Share this post


Link to post
Share on other sites

Hi aaa,

 

Thanks for your post.

 

I do not use MultiCharts. I know it works fine in TradeStation 8.+.

The error codes you posted are specific to MultiCharts.

 

I'll attempt to download MultiCharts and check it but I request

any other MultiCharts users to see if there is any Code

compatibility issues.

 

Regards,

Suri

Share this post


Link to post
Share on other sites

Hi Suri

 

My Problkem is resolved

 

I've changed the name of the function w/o changing this line of your code below

 

original

suri.isTradingDay = hreturn;

 

new name

$suri.isTradingDay = hreturn;

 

U've made a good job

 

Regards

Share this post


Link to post
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.


  • Topics

  • Posts

    • NFLX Netflix stock watch, local support and resistance areas at 838.12 and 880.5 at https://stockconsultant.com/?NFLX
    • NFLX Netflix stock watch, local support and resistance areas at 838.12 and 880.5 at https://stockconsultant.com/?NFLX
    • Hello citizens of the U.S. The hundred year trade war has leaked over into a trading war. Your equity holdings are under attack by huge sovereign funds shorting relentlessly... running basically the opposite of  PPT operations.  As an American you are blessed to be totally responsible for your own assets - the govt won’t and can’t take care of you, your lame ass whuss ‘retail’ fund managers go catatonic  and can't / won’t help you, etc etc.... If you’re going to hold your positions, it’s on you to hedge your holdings.   Don’t blame Trump, don’t blame the system, don’t even blame the ‘enemies’ - ie don’t blame period.  Just occupy the freedom and responsibility you have and act.  The only mistake ‘Trump’ made so far was not to warn you more explicitly and remind you of your options to hedge weeks ago.   FWIW when Trump got elected... I also failed to explicitly remind you... just sayin’
    • Date: 7th April 2025.   Asian Markets Plunge as US-China Trade War Escalates; Wall Street Futures Signal Further Turmoil.   Global financial markets extended last week’s massive sell-off as tensions between the US and its major trading partners deepened, rattling investors and prompting sharp declines across equities, commodities, and currencies. The fallout from President Trump’s sweeping new tariff measures continued to spread, raising fears of a full-blown trade war and economic recession.   Asian stock markets plunged on Monday, extending a global market rout fueled by rising tensions between the US and China. The latest wave of aggressive tariffs and retaliatory measures has unnerved investors worldwide, triggering sharp sell-offs across the Asia-Pacific region.   Asian equities led the global rout on Monday, with dramatic losses seen across the region. Japan’s Nikkei 225 index tumbled more than 8% shortly after the open, while the broader Topix fell over 6.5%, recovering only slightly from steeper losses. In mainland China, the Shanghai Composite sank 6.7%, and the blue-chip CSI300 dropped 7.5% as markets reopened following a public holiday. Hong Kong’s Hang Seng Index opened more than 9% lower, reflecting deep concerns about escalating trade tensions.           South Korea’s Kospi dropped 4.8%, triggering a circuit breaker designed to curb panic selling. Taiwan’s Taiex index collapsed by nearly 10%, with major tech exporters like TSMC and Foxconn hitting circuit breaker limits after each fell close to 10%. Meanwhile, Australia’s ASX 200 shed as much as 6.3%, and New Zealand’s NZX 50 lost over 3.5%.   Despite the escalation, Beijing has adopted a measured tone. Chinese officials urged investors not to panic and assured markets that the country has the tools to mitigate economic shocks. At the same time, they left the door open for renewed trade talks, though no specific timeline has been set.   US Stock Futures Plunge Ahead of Monday Open   US stock futures pointed to another brutal day on Wall Street. Futures tied to the S&P 500 dropped over 3%, Nasdaq futures sank 4%, and Dow Jones futures lost 2.5%—equivalent to nearly 1,000 points. The Nasdaq Composite officially entered a bear market on Friday, down more than 20% from its recent highs, while the S&P 500 is nearing bear territory. The Dow closed last week in correction. Oil prices followed suit, with WTI crude dropping over 4% to $59.49 per barrel—its lowest since April 2021.   Wall Street closed last week in disarray, erasing more than $5 trillion in value amid fears of an all-out trade war. The Nasdaq Composite officially entered a bear market on Friday, sinking more than 20% from its recent peak. The S&P 500 is approaching bear territory, and the Dow Jones Industrial Average has slipped firmly into correction territory.   German Banks Hit Hard Amid Escalating Trade Tensions   German banking stocks were among the worst hit in Europe. Shares of Commerzbank and Deutsche Bank plunged between 9.5% and 10.3% during early Frankfurt trading, compounding Friday’s steep losses. Fears over a global trade war and looming recession are severely impacting the financial sector, particularly export-driven economies like Germany.   Eurozone Growth at Risk   Eurozone officials are bracing for economic fallout, with Greek central bank governor Yannis Stournaras warning that Trump’s tariff policy could reduce eurozone GDP by up to 1%. The EU is preparing retaliatory tariffs on $28 billion worth of American goods—ranging from steel and aluminium to consumer products like dental floss and luxury jewellery.   Starting Wednesday, the US is expected to impose 25% tariffs on key EU exports, with Brussels ready to respond with its own 20% levies on nearly all remaining American imports.   UK Faces £22 Billion Economic Blow   In the UK, fresh research from KPMG revealed that the British economy could shrink by £21.6 billion by 2027 due to US-imposed tariffs. The analysis points to a 0.8% dip in economic output over the next two years, undermining Chancellor Rachel Reeves’ growth agenda. The report also warned of additional fiscal pressure that may lead to future tax increases and public spending cuts.   Wall Street Braces for Recession   Goldman Sachs revised its US recession probability to 45% within the next year, citing tighter financial conditions and rising policy uncertainty. This marks a sharp jump from the 35% risk estimated just last month—and more than double January’s 20% projection. J.P. Morgan issued a bleaker outlook, now forecasting a 60% chance of recession both in the US and globally.   Global Leaders Respond as Trade Tensions Deepen   The dramatic market sell-off was triggered by China’s sweeping retaliation to a new round of US tariffs, which included a 34% levy on all American imports. Beijing’s state-run People’s Daily released a defiant statement, asserting that China has the tools and resilience to withstand economic pressure from Washington. ‘We’ve built up experience after years of trade conflict and are prepared with a full arsenal of countermeasures,’ it stated.   Around the world, policymakers are responding to the growing threat of a trade-led economic slowdown. Japanese Prime Minister Shigeru Ishiba announced plans to appeal directly to Washington and push for tariff relief, following the US administration’s decision to impose a blanket 24% tariff on Japanese imports. He aims to visit the US soon to present Japan’s case as a fair trade partner.   In Taiwan, President Lai Ching-te said his administration would work closely with Washington to remove trade barriers and increase purchases of American goods in an effort to reduce the bilateral trade deficit. The island's defence ministry has also submitted a new list of US military procurements to highlight its strategic partnership.   Economists and strategists are warning of deeper economic consequences. Ronald Temple, chief market strategist at Lazard, said the scale and speed of these tariffs could result in far more severe damage than previously anticipated. ‘This isn’t just a bilateral conflict anymore — more countries are likely to respond in the coming weeks,’ he noted.   Analysts at Barclays cautioned that smaller Asian economies, such as Singapore and South Korea, may face challenges in negotiating with Washington and are already adjusting their economic growth forecasts downward in response to the unfolding trade crisis.           Oil Prices Sink on Demand Concerns   Crude oil continued its sharp slide on Monday, driven by recession fears and weakened global demand. Brent fell 3.9% to $63.04 a barrel, while WTI plunged over 4% to $59.49—both benchmarks marking weekly losses exceeding 10%. Analysts say inflationary pressures and slowing economic activity may drag demand down, even though energy imports were excluded from the latest round of tariffs.   Vandana Hari of Vanda Insights noted, ‘The market is struggling to find a bottom. Until there’s a clear signal from Trump that calms recession fears, crude prices will remain under pressure.’   OPEC+ Adds Further Pressure with Output Hike   Bearish sentiment intensified after OPEC+ announced it would boost production by 411,000 barrels per day in May, far surpassing the expected 135,000 bpd. The alliance called on overproducing nations to submit compensation plans by April 15. Analysts fear this surprise move could undo years of supply discipline and weigh further on already fragile oil markets.   Global political risks also flared over the weekend. Iran rejected US proposals for direct nuclear negotiations and warned of potential military action. Meanwhile, Russia claimed fresh territorial gains in Ukraine’s Sumy region and ramped up attacks on surrounding areas—further darkening the outlook for markets.   Always trade with strict risk management. Your capital is the single most important aspect of your trading business.   Please note that times displayed based on local time zone and are from time of writing this report.   Click HERE to access the full HFM Economic calendar.   Want to learn to trade and analyse the markets? Join our webinars and get analysis and trading ideas combined with better understanding of how markets work. Click HERE to register for FREE!   Click HERE to READ more Market news.   Andria Pichidi HFMarkets   Disclaimer: This material is provided as a general marketing communication for information purposes only and does not constitute an independent investment research. Nothing in this communication contains, or should be considered as containing, an investment advice or an investment recommendation or a solicitation for the purpose of buying or selling of any financial instrument. All information provided is gathered from reputable sources and any information containing an indication of past performance is not a guarantee or reliable indicator of future performance. Users acknowledge that any investment in Leveraged Products is characterized by a certain degree of uncertainty and that any investment of this nature involves a high level of risk for which the users are solely responsible and liable. We assume no liability for any loss arising from any investment made based on the information provided in this communication. This communication must not be reproduced or further distributed without our prior written permission.
    • AMZN Amazon stock watch, good buying (+313%) toi hold onto the 173.32 support area at https://stockconsultant.com/?AMZN
×
×
  • Create New...

Important Information

By using this site, you agree to our Terms of Use.