Kernel 8.0 APIs Banner [skip navigation]
Office of Information & Technology (OIT) Banner

^XUWORKDY: Workday Calculation (Obsolete)

NOTE: This API is obsolete; see $$EN^XUWORKDY, $$WORKDAY^XUWORKDY, or $$WORKPLUS^XUWORKDY.

Reference Type: Supported, Category: Miscellaneous, Integration Agreement: 10046

Description

NOTE: The XUWORKDY routine is maintained for code that might still use it.

To use the ^XUWORKDY API, 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.

You can call the ^XUWORKDY routine to calculate the number of workdays between two dates (X, X1). It returns a positive value if X<X1 and a negative value if X>X1. If either date is imprecisely specified, or if the HOLIDAY global is empty, then ^XUWORKDY returns a NULL string.

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, X is set equal to the total counted days minus the number of weekend days between the two Sundays ( -(%I\7*2) ).

Format

  ^XUWORKDY

Input Variables

X:

(required) Starting date in VA FileMan internal format (e.g., 2850420).

X1:

(required) Ending date in VA FileMan internal format (e.g., 2850707).

Output Variables

X:

The number of workdays in the interval.

Example

>S X=2850420,X1=2850707 D ^XUWORKDY W X
55

 


VA (Internet) / VA(Intranet) / OI / PD / Site Map / Terms of Use / VA Privacy Policy / Accessibility

Reviewed/Updated: August 26, 2011

If you have questions, need more information, or are having accessibility problems with this website, please contact us by E-Mail: Webmasters, Phone: 510-768-6800, or FAX: 510-768-6850.