Creating a century window in QUIZ/QTP for PROMPT variables.

[EDISR@detroitedison.com]

Byron 
 
I think you need to make the prompted DEFINE 'TEST' have century included.  
You should also test against the inputted date.  Would the following help? 
 
;* get prompt with default century 
Define TEST date century included = parm prompt "Enter Start Date (MMDDYY):
" 
format MMDDYY 
 
;* stip of century for comparison 
define TEST_CHAR char*6 = ASCII(TEST,8)[3:6] 
 
;* Assign century based on arbitrary comparison date, in this case saying 
;* that if date with the century is greater than 12/31/10 then century is
the 
;* 19 otherwise it is 20. 
Define NEW-TEST date century included = ADDCENTURY(TEST2,19) & 
  if 101231 < NCONVERT(TEST_CHAR)  else ADDCENTURY(TEST2,20) 
 
 
Robert Edis (Blue) 
Technical Consultant 
Michigan, USA 
(VAX/VMS, ORACLE Rdb, PowerHouse 4GL)
= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
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.