Jump to content

Rebol Programming/request-date

Add links
From Wikibooks, open books for an open world
< Rebol Programming
This page may need to be reviewed for quality.

USAGE:

[edit | edit source]
REQUEST-DATE /offset xy /date when

DESCRIPTION:

[edit | edit source]

Requests a date.

REQUEST-DATE is a function value.

REFINEMENTS

[edit | edit source]
  • /offset
    • xy -- (Type: any)
  • /date
    • when -- Default date (Type: any)

SOURCE CODE

[edit | edit source]
request-date: func [
    "Requests a date." 
    /offset xy 
    /date when "Default date"
][
    result: when 
    base: today: any [when now/date] 
    either date-lay [calc-month base/month] [init] 
    either offset [inform/offset date-lay xy] [inform date-lay] 
    result
]
Retrieved from "https://en.wikibooks.org/wiki/Rebol_Programming/request-date"