Hola escafandra
Efectivamente, tanto la fecha como iflag estan inicializados
Esta es la funcion como tal
Código Delphi
[-]function swe_calc_ut(tjd : double;
ipl : Integer;
iflag : Longint;
var xx : double;
sErr : PChar
): Longint; stdcall; far; external 'swedll32.dll' name '_swe_calc_ut@24';