XDIFM
XDIFM( $month , $dif )
XDIFM berechnet die Anzahl der Monate $dif zwischen dem aktuellen Monat und dem Monat $month
$tuvdat = '1.21';
XDIFM( $tuvdat , &$dif )
if ($dif < 3)
{
$syserror = "TÜV $tuvdat bald fällig";
XLATIN( $syserror )
XCHECKREPLY( $syserror , "<K022K $syserror;5>" )
}
XCHECKREPLY
XLATIN
$syserror