Creating a century window in QUIZ/QT

[pickerij@norbord.com]

Byron Welch asks ...

>We are currently working with a customer who can not at this time move
>from version 7.09 on a HP3000 using MPE\IX 5.5.  They would like to
>implement a century window for a defined item with a parm prompt.  They
>would also like to use a format of MMDDYY for data entry:
>
>Define     TEST date century excluded= parm prompt "Enter Start Date
>(MMDDYY): " format MMDDYY
>
>Define NEW-TEST date century included format MMDDYY =
>                     ADDCENTURY(TEST2,19) if NEW-TEST > 19101231 else &
>                     ADDCENTURY(TEST2,20)
>
>The problem with the code above is that you cannot enter 02/29/00.  Can
>anyone think of a solution that would allow me to enter data into a date
>field (so I can get default date validation) and still allow a value of
>02/29/00 without going to a four digit entry.

You could set the default century to 20 in the dictionary since that's   
what's preventing the netry of 02/29/00 -- Powerhouse applies the   
dictionary default century to century excluded dates, in your case 19,   
and correctly flags Feb 29 1900 as invalid.

Changing the default century might be a good idea but I wouldn't do it   
casually :-)

John Pickering
JWP Systems Inc
Toronto  
= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
Subscribe: "subscribe powerh-l" in message body to majordomo@lists.swau.edu
Unsubscribe: "unsubscribe powerh-l" in message to majordomo@lists.swau.edu
powerh-l@lists.swau.edu is gatewayed one-way to bit.listserv.powerh-l
This list is closed, thus to post to the list, you must be a subscriber.