Lancement d’une requête SQL*Plus avec AppleScript
RCI Informatique, Avril 2004
1 - Objectif
On souhaite partir d’une requête, stockée sous forme de variable AppleScript, se connecter à la base Oracle, lancer cette requête, et afficher le résultat.
2 - Donnée fournie et résultat obtenu
La donnée, c’est le texte (SQL) d’une requête :
select ename, job, sal from emp
Le résultat est obtenu dans une fenêtre “Terminal” :
3 - Le texte AppleScript
-- Déclenchement d'une requête SQL simple avec Oracle 9i pour Macintosh OS X
-- sous forme d'un script Apple Script
-- Affichage du résultat dans la fenêtre de terminal Mac OS X
-- Copyright, tous droits réservés, RCI Informatique SA, 2004
-- www.rci-informatique.fr
-- www.index-informatique.net
-- Définition et initialisation d'une variable globale
global wT
set wT to ""
-- Définition de la requête SQL, sous forme d'une variable AppleScript
set wSQL to "select ename, job, sal from emp"
-- Positionnement dans le répertoire DBCreate
e("cd /Users/oracle/9iR2/orahome/DBCreate")
-- Activation des variables d'environnement Oracle
e(". DBENV")
-- Lancement de SQL Plus en se connectant avec SQL*Net TCP/IP
-- la commande à lancer est la suivante :
-- sqplus "scott/tiger@abmacipc"
e("sqlplus \"scott/tiger@abmacipc\"")
-- lancement de la requête, avec ajout d'un ; à la fin
e(wSQL & ";")
-- Puis on quitte SQL Plus
e("exit")
-- Déclenchement de la suite de commandes Unix
doUnix(wT)
-- Le résultat de la requête est affiché dans la fenêtre Terminal Unix de Mac OS X
-- Définition de la procédure d'envoi à Unix d'une ou plusieurs commandes
on doUnix(x)
tell application "Terminal"
activate
do script x
end tell
end doUnix
-- Constitution d'une suite de commandes séparées par des retours à la ligne
on e(x)
set wT to wT & return & x
end e
