my $sf=Win32::OLE->new('CortalConsors.TradingAPI.DE.SessionFacade');
print $!;
print Win32::OLE->LastError();