Reference Type: Supported, Category: Miscellaneous, Integration Agreement: 10046
NOTE: The XUWORKDY routine is maintained for code that might still use
To use the ^XUWORKDY APIs, you must make sure that the HOLIDAY file (#40.5) is populated with each year's holidays for the workday calculation to work correctly. If it is not populated, you need to populate it yourself (Kernel distributes this file without data). Only enter holidays that fall on weekdays, however.
The $$EN^XUWORKDY extrinsic function is used to calculate the number of workdays between two
dates (date1, date2). It returns a positive value if date1<date2 and a
negative value if date1>date2. If either date is imprecisely
specified, or if the HOLIDAY global is empty, then $$EN^XUWORKDY returns a
The first FOR loop in ^XUWORKDY checks the HOLIDAY global and sets %H equal to the number of holidays between the two dates. It is assumed that the HOLIDAY global contains only weekday holidays.
The second FOR loop (F %J=%J:1 ... ) steps forward from the earliest date and stops at the first Sunday or at the ending date (whichever comes first) counting the number of workdays.
The third FOR loop (F %K=%K:-1 ... ) steps backward from the latest date and stops at the first Sunday or at the beginning date (whichever comes first), counting the workdays.
Then %I is set equal to the number of days between the two Sundays.
Finally, the return value is set equal to the total counted days minus the number of weekend days between the two Sundays ( -(%I\7*2) ).
(required) Starting date in VA FileMan internal format (e.g., 2850420).
(required) Ending date in VA FileMan internal format (e.g., 2850707).
Returns the number of workdays in the interval.
>W $$EN^XUWORKDY(3090102,3090108) 4
August 26, 2011