Re: Why doesn't this trigger an invalid date

[rob@xxxxxxxxx]

You've received good answers.  Why don't you perform a reasonableness 
check also?

monitor;
// if the absolute value of the number of years in the current data,
// minus the number of years in the test date is > x,
// ask the user if they are sure.
if %abs( %subdt(%date():*years) -
         %subdt(%date(%char(rbrddte):*iso0):*years)
       ) >x;
  // Perform "Are you sure?"
EndIf;
on-error 00112; // invalid date
  // conversion of %date(%char(rbrddte):*iso0) failed
  // do something
EndMon;
 

Rob Berendt