Re: [sympa-fr] Suppression d'abonn� impossible des listes

[Olivier Salaün <adresse@cachée>]

Bonjour,

On a corrigé ce problème récemment (mais il n'avait pas été appliqué 
dans la branche 5.4).
Voici le patch : 
http://sourcesup.cru.fr/cgi/viewvc.cgi/branches/sympa-5.4-branch/src/List.pm?r1=5556&r2=6140

Cordialement.

adresse@cachée a écrit :
> Bonjour,
>
> J'essaye de supprimer au travers de l'interface web, en tant que listmaster, 
> un
> abonné d'une liste particulière.
> Mais j'obtiens toujours en résultat : *"0 addresses have been removed"* et
> l'utilisateur est toujours bien présent.
>
> nous utilisons une  base oracle 10  avec sympa 5.4.7
>
> Nous avons une log dans apache :
>
> [Wed Aug 12 14:37:59 2009] [warn] mod_fcgid: stderr: DBD::Oracle::db prepare
> failed: ORA-00972: identifier is too long (DBD ERROR: OCIStmtPrepare) [for
> Statement "SELECT user_subscriber "email", comment_subscriber "gecos",
> bounce_subscriber "bounce", bounce_score_subscriber "bounce_score",
> bounce_address_subscriber "bounce_address", reception_subscriber "reception",
> topics_subscriber "topics", visibility_subscriber "visibility",
> ((to_number(to_char(date_subscriber,'J')) -
> to_number(to_char(to_date('01/01/1970','dd/mm/yyyy'), 'J'))) * 86400)
> +to_number
> [Wed Aug 12 14:37:59 2009] [warn] mod_fcgid: stderr:
> (to_char(date_subscriber,'SSSSS')) "date",
> ((to_number(to_char(update_subscriber,'J')) -
> to_number(to_char(to_date('01/01/1970','dd/mm/yyyy'), 'J'))) * 86400)
> +to_number(to_char(update_subscriber,'SSSSS')) "update_date",
> subscribed_subscriber "subscribed", included_subscriber "included",
> include_sources_subscriber "id", custom_attribute_subscriber "custom_attribute 
>  FROM subscriber_table WHERE (user_subscriber = '.........
>
> J'ai pu extraire la requete des logs qui une fois executée directement dans 
> la
> base en sql donne le même message ORA-00972: identifier is too long
>
> Alors, j'ai trouvé une " mal placée. En modifiant le fichier source
> /opt/sympa/bin/List.pm, la requete passe bien. Voici :
>
>  diff List.pm List.pm.ori
> 4700c4700
> <    $statement = sprintf "SELECT user_subscriber \"email\",
> comment_subscriber \"gecos\", bounce_subscriber \"bounce\",
> bounce_score_subscriber \"bounce_score\", bounce_address_subscriber
> \"bounce_address\", reception_subscriber \"reception\", topics_subscriber
> \"topics\", visibility_subscriber \"visibility\", %s \"date\", %s
> \"update_date\", subscribed_subscriber \"subscribed\", included_subscriber
> \"included\", include_sources_subscriber \"id\", custom_attribute_subscriber
> \"custom_attribute\"  %s FROM subscriber_table WHERE (user_subscriber = %s AND
> list_subscriber = %s AND robot_subscriber = %s)", 
> ---
>   
> >         $statement = sprintf "SELECT user_subscriber \"email\",
> >     
> comment_subscriber \"gecos\", bounce_subscriber \"bounce\",
> bounce_score_subscriber \"bounce_score\", bounce_address_subscriber
> \"bounce_address\", reception_subscriber \"reception\", topics_subscriber
> \"topics\", visibility_subscriber \"visibility\", %s \"date\", %s
> \"update_date\", subscribed_subscriber \"subscribed\", included_subscriber
> \"included\", include_sources_subscriber \"id\", custom_attribute_subscriber
> \"custom_attribute\  %s FROM subscriber_table WHERE (user_subscriber = %s AND
> list_subscriber = %s AND robot_subscriber = %s)",
>
> (chercher la " apres custom_attribute)
>
> Avez-vous constaté ce problème ?
>
> Merci pour votre aide 
>
> Jérôme
>
>