Datum in SQL Funktion prüfen

[malzusrex]

Danke!

Das war es

Create Function MyLib/DAT_Diff( Dat1 Dec(8, 0), Dat2 Dec(8, 0) ) 
       Returns Decimal (6, 0)                                     
       Language sql                                               
Begin                                                             
declare EXIT HANDLER FOR SQLEXCEPTION return 0;                   
Return                                                            
 Days(Date(SubStr(Digits(Dat1), 1, 4) Concat '-' Concat           
           SubStr(Digits(Dat1), 5, 2) Concat '-' Concat           
           SubStr(Digits(Dat1), 7, 2) ))                          
-Days(Date(SubStr(Digits(Dat2), 1, 4) Concat '-' Concat           
           SubStr(Digits(Dat2), 5, 2) Concat '-' Concat           
           SubStr(Digits(Dat2), 7, 2) ));                         
end