Increment Elapsed Business Days Without Company Holidays

This agent increment elapsed business days without company holidays counted in. The formulae is simple and you

can plug n play right away. Just remember you need a fields such RecvDate, HolidayCounter and Elapsed Days in the main form. And if your company does have db which has a listed holidays values in a document the below agent is good to go right away. Also, you can create a field the same document which will store company holidays dates and then you match with this dates field. Have Fun!!!!

SELECT Form = "Form" & @Contains(Status ; "Opened" : "Pending");
FIELD RecvDate:=RecvDate;
FIELD HolidayCounter:=@If(!@IsAvailable(HolidayCounter);0;HolidayCounter);
tem:=tmp +1;

ClassCache := "Notes" : "NoCache";
ServerDatabase := "NJSERVER1//SERVER//Lotus":"NJ\CASE.NSF" ;
View := "LU_Holidays";
Key := "Holiday List";
Column := 2;
List := (@DbLookup(ClassCache; ServerDatabase ; View; Key; Column));

@If(@IsMember(@Text(temp1);List);@SetField("HolidayCounter"; tem);tmp);

diffDays := (EndDate - StartDate) / 86400;
strtDay := @Modulo(@Weekday(StartDate); 7);
endDay := @Modulo(@Weekday(EndDate); 7);
weekdays := (diffDays - endDay + strtDay - 7) * 5 /
7 - @Max(-2; -strtDay) - @Min(1; endDay) + 5 - strtDay + endDay - t1;


This was first published in November 2000

Dig deeper on Domino Resources - Part 2



Forgot Password?

No problem! Submit your e-mail address below. We'll send you an email containing your password.

Your password has been sent to:



  • iSeries tutorials's tutorials provide in-depth information on the iSeries. Our iSeries tutorials address areas you need to know about...

  • V6R1 upgrade planning checklist

    When upgrading to V6R1, make sure your software will be supported, your programs will function and the correct PTFs have been ...

  • Connecting multiple iSeries systems through DDM

    Working with databases over multiple iSeries systems can be simple when remotely connecting logical partitions with distributed ...