Purpose Check that a date is a factory working day
Solution
GuiXT
// sample value
// any date in valid date format:
// d.m.y, m/d/y, m-d-y, y.m.d, y/m/d, y-m-d
Set V[mydate] "25.12.2018"
// convert to format YYYYMMDD
Set V[diff] "&V[mydate]" - "01.01.1900"
Set V[d] "01.01.1900" + "&V[diff]"
Set V[yyyymmdd] "&V[d](7-10)&V[d](4-5)&V[d](1-2)"
Call "DATE_CONVERT_TO_FACTORYDATE" _
in.DATE="&V[yyyymmdd]" _
in.FACTORY_CALENDAR_ID="01" _
out.WORKINGDAY_INDICATOR="noworkday"
if V[noworkday]
Message "E: &V[mydate] is not a working day" -statusline
endif