*------------------------------------------------------------*
DAVID P MILLER			
TOTAL SYSTEMS SOLUTIONS
COMPUSERVE - 100010,3556
WIndows Calendar 
*------------------------------------------------------------*

NOTE
----
In order to change the screen you will require a copy of the excellent GenscrnX available on Compuserve.


CALENDAR
--------
The program is well documented and can be modified fairly easily. However if any changes are required then please let me know.


USAGE
-----
The program can be used directly by simply issuing :

	DO Calendar
	
If the program is called from an application, in which you need to return a date simply use the following format :

	ldDateReturn=Calendar()
	
If the user selects EXIT from the calendar thhen NULL will be returned else the selected date.


The routine can also be called with a date parameter, this will then be the defaulted date :

	ldDateReturn=Calendar(ldAnotherDate)
	

VERSION Information
-------------------

Version 1.1	
-----------
Added code for British & American Dates dependant on the setting of SET DATE

DISCLAIMER
----------
I am supplying the program as is, and can take no responsibility for any errors or problems it causes. 


MONEY!!
-------
If you think that you might be using this routine regularly, you may 
wish to send me 25, whereupon you will be registered. This will allow
you to receive updates as they become available.                 

Remember, the fact that it has been written for you will have saved you a few hours! (possibly), so 25 is not much to ask!.                           

ADDRESS
-------
TOTAL SYSTEMS SOLUTIONS are based in the UK. If any other bespoke software is required then do not hesitate to contact us, we work for reasonable rates.

TOTAL SYSTEMS SOLUTIONS
24 PARK DRIVE
NEWPORT
GWENT
NP9 3AL
SOUTH WALES
UK.

Compuserve - 100010,3556
Tel:	   - 01633 852251



	
	
