Salut,
Je bloque depuis 2 jours sur un bout de code Perl - Oracle, que je n'arrive pas à reproduire chez moi avec MySQL.
$sel = $dbh->prepare("select id, appli, cube, serveur, typet from su2qttreat where id in (select min(id) from su2qttreat where flag = 0 and typet <> 'STARSCHEMA')") || gestion_erreur("$nom_procedure - Problème préparation requête : $DBI::errstr");
$sel->execute || gestion_erreur("$nom_procedure - Problème execute requête : $DBI::errstr");
$sel->bind_columns(undef, \$id, \$appli, \$cube, \$serveur, \$type);
$sel->fetch();
if ($type eq 'SCRIPT') { # Attention pas de == pour tester l'égalité !
print "SCRIPT demandé \n";
} elsif ($type eq 'DONNEES') {
print "DONNEES demandé \n";
} else {
my $lg = length($type);
print "aucun : $type $lg \n";
}
$sel->finish; # On ferme la requête
Bref, rien d'extranordinaire, sauf qu'à l'exécution j'ai ça :
aucun : DONNEES 14
Donc je récupère je ne sais pourquoi un truc qui fait le double de la chaine dans la table donc forcément ma comparaison foire :-(
J'avoue que je ne vois pas comment/pourquoi j'arrive à ça.
Merci de votre aide.
Poste le Monday 19 June 2006 08:59:35