TicketBAI:= LoadTicketBai( IncludeTrailingPathDelimiter(g_strDirEmpre) + 'TicketBAI\'+Format('Factura %s.xml', [strNumFra]));
MsgInfo(TicketBAI.HuellaTBAI.Software.EntidadDesarrolladora.NIF);
for x := 0 to TicketBAI.Sujetos.Destinatarios.Count - 1 do
MsgInfo(TicketBAI.Sujetos.Destinatarios[x].ApellidosNombreRazonSocial);