michel a écrit :
Bonjour
Est - il possible de créer un hyperlien afin d'ouvrir un rapport
dynamiquement.
Oui.
Je m'explique : j'ai une base, transformée avec un formulaire et un
rapport.
OK.
Je voudrai lorsque je saisisse dans le formulaire les données avoir un
bouton qui m'ouvre le rapport mis à jour avec mes nouvelles données. On
ne peut aller choisir dans l'hyperlien le rapport dans la base de
donnée. Peut être une macro ?
Oui.
ché pas chi j'ai été assez clair ?
Je pense ;-)
Merci
Michel
Place la macro ci-aprés dans la librairie Standard de "Mes macros".
Place un bouton avec, par exemple, le paramétrage de l'évènement "lors
du déclenchement" pointant sur le script principal openBaseReport
sub openBaseReport
dim document as object
dim dispatcher as object
dim nameFormReport as string
dim array()
'// nom du rapport à ouvrir
nameFormReport = "emails"
'// sauvegarde l'enregistrement en cours
document = ThisComponent.CurrentController.Frame
dispatcher = createUnoService( "com.sun.star.frame.DispatchHelper" )
dispatcher.executeDispatch( document, ".uno:RecSave", "", 0, array() )
'// appel procedure ouverture du formulaire ou du rapport
call openFormReport( nameFormReport )
end sub
sub openFormReport( sFormReport as string )
dim sourceDoc as object
dim prop(1) as New com.sun.star.beans.PropertyValue
sourceDoc = thisComponent.Parent
prop(0).Name = "ActiveConnection"
prop(0).Value = sourceDoc.DataSource.getConnection( "", "" )
prop(1).Name = "OpenMode"
prop(1).Value = "open"
'// ouvrir un formulaire
'/* sourceDoc.FormDocuments.loadComponentFromURL( sFormReport,
"_blank", 0, prop() ) */
'----------------------- noter la difference entre FormDocuments et
ReportDocuments -------------
'// ouvrir un rapport
sourceDoc.ReportDocuments.loadComponentFromURL( sFormReport, "_blank",
0, prop() )
end sub
Francois Gatto
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
