FB II COMPILER
Put an expiration date into a program
You put the expiration date into your program. If the current date is beyond the expiration date, then do whatever you want. The code follows:
'the following code is designed to provide a limit to the time
The code has a Y2k problem.
You can get around that simply by changing:
LONG IF year > 93 AND month > 6
The program will work again in 2093 for 6 months, but I don't
think you'll have to worry about it by then :)
Al Staffieri Jr.
Set up a global in your program to record the date/time of compile and then add the time out period. This global should be part of your stored preferences.
LONG IF SYSTEM(_aplFlag) = _False
(NOTE: If this is a non-timed out version, set the global to zero.)