[RESOLU]Les sous formulaires ne s'ouvrent plus sous Base firebird de libre office 6.2

[DanielLB]

Bonsoir.
J’ai un nouveau problème avec base firebird de libre office, les sous formulaires ne s’ouvrent plus sous libre office 6.2 ils provoquent cette erreur. Que ce soit sous Windows 10 ou Ubuntu
Code d’erreur: 1
firebird_sdbc error:
*Dynamic SQL Error
*SQL error code = -206
*Column unknown
*LINK_FROM_ID
*At line 1, column 54
caused by
‘isc_dsql_prepare’
Par contre avec Libre office 6.06 je n’ai aucun problème. Pouvez vous m’indiquer comment résoudre cette erreur, pour enfin utiliser correctement Libre Office.
Merci à l’avance.

[PYS]

Bonjour

Je ne reproduis pas ce problème, pourrais-tu éditer ta question pour ajouter un exemple de base (si possible limité à un exemple permettant de tester) ?

Cordialement

[ElCatala]

Bonjour,
J’ ai rencontré le même problème. Il s’ agit d’ un Bug 117053 traité sur cette page:
texte du lien
Il suffit, au démarrage de LO de lancer la macro ci-jointe et, normalement le problème sera résolu.

Blockquote
Sub Cnn ()
Dim DBDocUI as Object
on error resume next
'XRay ThisComponent
DBDocUI = ThisDatabaseDocument.currentController
if not DBDocUI.isConnected then
DBDocUI.connect
end if
on error goto 0
End Sub

Sub Parametre()
Cnn ()
ThisDatabaseDocument.DataSource.Settings.ParameterNameSubstitution = true
End Sub

Cordialement

[DanielLB]

Bonsoir El Catala.
Merci pour le renseignement, j’ai voulu installé ta macro, malheureusement elle ne m’a provoqué que des erreurs et après quelques manipulations elle fonctionné sans pour cela que mes sous formulaires s’ouvrent. Alors je suis allé sur le site des bugs de Libre Office et la page du bug 117053 et la il y avait 3 macros. Parmi ces 3 une était la bonne. Je la donne si cela peut servir à d’autres membres de la communauté.

Sub ensureConnection()
        Dim DBDocUI as Object
        on error resume next

        DBDocUI = ThisDatabaseDocument.currentController
        if not DBDocUI.isConnected then
                DBDocUI.connect
        end if
        on error goto 0
End Sub

Sub Main
        ensureConnection()
        ThisDatabaseDocument.DataSource.Settings.ParameterNameSubstitution = true
End Sub

Je te remercie sans toi n’aurai pas trouvé, merci aussi à pierre-yves samyn pour sa coopération, je lui avait préparé un fichier pour tester mes sous formulaires.