RE:Recuper datos Procedimiento
Podes crear una funcion asi:
datetime ld_fecha
time lt_time
string ls_hora, ls_min, ls_seg
DECLARE my_cursor DYNAMIC CURSOR FOR SQLSA ;
PREPARE SQLSA FROM "SELECT getdate(), datepart(hh,getdate()), datepart(mi,getdate()),datepart(ss,getdate())" ;
OPEN DYNAMIC my_cursor ;
FETCH my_cursor INTO :ld_fecha, :ls_hora, :ls_min, :ls_seg ;
CLOSE my_cursor ;
RETURN ld_fecha
Saludos!!!!