Introduction
Ce document décrit comment imprimer des résultats à un écran de console avec les mots clé d'IMPRESSION d'APPEL.
Comment est-ce que vous écrivez un script qui lit des colonnes d'une table, et puis imprimez les valeurs de colonne ?
Le script dans cette section exécute ces actions : :
- Lit deux colonnes (DOMAIN_TYPE, DOMAIN_NAME) de la table /services/databases/system/ALL_DOMAINS de systèmes.
- Imprime le contenu des deux colonnes.
PROCEDURE pConcat()
BEGIN
declare result cursor;
declare domaintype VARCHAR(15);
declare domainname VARCHAR(15);
declare concat VARCHAR(70);
OPEN result FOR SELECT DOMAIN_TYPE, DOMAIN_NAME from
/services/databases/system/ALL_DOMAINS;
fetch result into domaintype, domainname;
whileloop:
while result.found
do
begin
fetch result into domaintype, domainname;
set concat = domaintype || ' ---> ' || domainname;
CALL PRINT (concat);
end;
end while;
close result;
END
Pendant que cette image affiche, les résultats sont imprimés à la console :
