home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Fred Fish Collection 1.5
/
ffcollection-1-5-1992-11.iso
/
ff_disks
/
200-299
/
ff276.lzh
/
DateRequester
/
ReadMe
< prev
next >
Wrap
Text File
|
1989-11-09
|
4KB
|
123 lines
Amiga Date Requester
Mark R. Rinfret, 10/03/89
The contents of this package will provide you with
- AmigaDOS date support functions
- A date requester which can be added to your programs.
- A standalone ARexx-driven date requester program which can be
called from ARexx macro files.
- Some limited Intuition support functions required by this package.
The date requester module is dependent upon the ARP support library. The
arexx requester program requires that you have ARexx installed on your
system.
What it does -
The MRDateReq module provides you with Intuition-based support for
soliciting a date value from the user. It supports both point-and-click
selection of date values and direct entry (typing) of the individual
components. All useful components of a date are available after the
request is satisfied.
The RxDateReq module provides an ARexx execution framework for the
date requester. At this time, it is not reentrant/shareable, but it can
be told the unique rexx port name to be used upon startup. The example
script, "test", illustrates one method for generating the unique port
name.
The RxDateReq module works in three phases. First, certain parameters
are initialized using 'set' commands. Next, the date requester is
activated. At this time, program is under control of the date requester.
Finally, the results of the request can be polled using a variety of
'get' commands. As of this writing, the RxDateReq module responds to the
following instructions:
'exit'
Shut down the date requester.
'getdate'
This command retrieves a formatted string representing the date
portion (year, month, day) of the user's response to 'request'. The
returned value will be found in the result variable. Be sure to use
"options results" in order to be able to retrieve the value.
'getformat'
This command retrieves the current date format name and stores it in
the result variable. See 'setformat' for the possible name values
returned.
'getfulldate' <stem name>
This command retrieves all date components in a compound variable
whose base name is <stem name>. In addition to the 6 components listed
under 'setfulldate', element 7 will contain an index for the day of the
week, where 0 = Sunday. Example:
'getfulldate' "finaldate"
say "The weekday index was " finaldate.7
'gettime'
The time component of the current date value (hour,minute,second) is
retrieved as a formatted string and placed in the result variable.
'request'
This command activates the date requester. The requester will remain
in control until the user selects either the OK or CANCEL gadget.
'setformat' "International" | "DOS" | "USA" | "Canadian"
This sets the date presentation format. Note that only the unique
portion of one of the format names need be passed (e.g. "Int" or "I") in
order for it to be recognized.
'setfulldate' <stem name>
This command allows the macro to preset a default date value. The
components of the date are expected to be in a compound variable whose
base name is <stem name>. Prior to calling 'setfulldate', the macro must
initialize the compound variable:
defdate = 0
defdate.1 = 1989 /* year */
defdate.2 = 10 /* month */
defdate.3 = 5 /* day */
defdate.4 = 14 /* hour */
defdate.5 = 20 /* minute */
defdate.6 = 30 /* second */
'setfulldate' defdate
'setprompt' <prompt string>
This sets the prompt message that appears in the date requester. For
example:
'setprompt' "Please select the date:"
Credits
This package contains or depends upon several user-contributed algorithms,
libraries, etc. If I left your name out, please give me a holler and I'll
add you to the credits list. Contributors:
Thad Floryan - date routines
Charlie Heath, et al - ARP library
William Hawes - ARexx!
Inovatronics - PowerWindows Intuition code generation
Doug Merrit - date routines
Radical Eye Software - MinRexx (I'd still be floundering,
otherwise)
This package is CopyRight ) 1989, Mark Rinfret. You are free to use/
modify/redistribute this code for any purposes, private or commercial, as
long as the above credits are distributed with this package.
Redistribution to the public sector must include all source.