Formula Confusion

Question

Dear all,
I have created a formula which counts number of working days. This formula then has been modified to subtract Bank holidays.
When I use a array formula of bank holidays dates, it works fine however when I use a holidays table within a database for bank holidays it doesn;t seem to work.
For example:
Using Holidays Array Formula
BeforeReadingRecords;
DateVar Array Holidays := [
Date (2003,12,25),   // you can put in as many lines for holidays as you want. 
Date (2003,12,31),
Date (2008,08,25)
0
Using Subreport>Formula->Shared Datevar with my main report
whileprintingrecords;
Shared DateVar Array Holidays;
numbervar i := i + 1;
numbervar j := count({bank_hol.holiday_date});
if i <= j then (
redim preserve Holidays[j+1];
Holidays<i> := {bank_hol.holiday_date}
The 2nd formula when used in the report, does not account for bank holidays. I don't know where I am doing wrong
Here is the main formula for Working days. (To use it with 2nd formula above, just change the Datevar Holidays to Shared Datevar Holidays;
Working Day Formula
WhileReadingRecords; //Change this to Whileprintingrecords when using it with subreport.
Local DateVar Start := Date(Year(CurrentDate),Month(CurrentDate),1);
Local DateVar End :=   Currentdate;
Local NumberVar Weeks;
Local NumberVar Days;
Local Numbervar Hol;
DateVar Array Holidays; //Change this to Shared DateVar Holidays when using subreport formula
Weeks:= (Truncate (End - dayofWeek(End) + 1 - (Start - dayofWeek(Start) + 1)) /7 ) * 5;
Days := DayOfWeek(End) - DayOfWeek(Start) + 1 +
(if DayOfWeek(Start) = 1 then -1 else 0)  +
(if DayOfWeek(End) = 7 then -1 else 0); 
Local NumberVar i;
For i := 1 to Count (Holidays)
do (if DayOfWeek ( Holidays<i> ) in 2 to 6 and
Holidays<i> in start to end then
Hol:=Hol+1 );
Weeks + Days - Hol;
Any help will be appreciated.
Many thanks
Regards
Jehanzeb

Answer 1

Vitaly,
I was going to reply to you but suddenly some how your post vanished.
Anyhow,
The Subreport is placed on the report header, I have checked my dates with my database dates by inputting a formula in my sub report. They both are identical.
Which means that my sub report is producing right results.
The formula (workingdays) is solely used to get averages of my jobs and lenses.
The report Selection Record formula is
({lab_rework.rework_date} in monthtodate and
{lab_reasons.reason_code} >= {?startcode} and
{lab_reasons.reason_code} <= {?endcode});
So the Jobs and Lenses are printed in accordance with Month to date.
The question arises when I use Holiday Array formula within my report using manual entries into an array and link it with Working days formula, it works however, when I do the same with Shared Datevar array with my subreport it does not want to work.
here is the formula which I inserted into the sub report to test my dates in accordance with Database dates.
whileprintingrecords;
shared datevar array Holidays;
numbervar i := i + 1;
numbervar j := count({bank_hol.holiday_date});
if i <= j then (
redim preserve Holidays[j+1];
Holidays<i> := {bank_hol.holiday_date}
This very formula is shared with my main report via
Shared DateVar Array Holidays;
Regards
Jehanzeb