Le guide Oracle Forms 9i/10g

Date de publication : Juin 2005

L'appel d'une forme

Définition

Concept

• NEW_FORM()
• OPEN_FORM()
• CALL_FORM()

Mise en oeuvre

• TO_SAVEPOINT (défaut) Forms annule (rollback) tous les changements non validés (y compris ceux pré-validés par l'instruction POST()).
• NO_ROLLBACK Forms quitte la forme sans exécuter de rollback (et donc de libération des enregistrements éventuellement verrouillés).
• FULL_ROLLBACK Forms annule (rollback) tous les changements non validés (y compris ceux pré validés par l'instruction POST()) durant la session. Il n'est pas possible de spécifier cette valeur si la forme en mémoire est en mode POST-ONLY. (le mode POST-ONLY est activé lorsqu'un forme est appelée alors que la forme appelante contient des enregistrements non validés).

• NO_QUERY_ONLY (défaut) La forme appelée est modifiable (Insert, Update, Delete)
• QUERY_ONLY La forme appelée n'est pas modifiable. L'utilisateur pourra interroger mais ne pourra ni insérer, ni modifier, ni supprimer.

• NO_SHARE_LIBRARY_DATA (défaut) les variables situées en librairies PL/SQL ne sont pas partagées.
• SHARE_LIBRARY_DATA Les variables situées en librairies PL/SQL sont visibles. C'est un excellent moyen de contourner la limitation des variables globales, toujours de type CHAR et limitées à 255 caractères.

-- Forme factures, rollback jusqu'au dernier savepoint, mode non modifiable --
NEW_FORM( 'factures', to_savepoint, query_only);

-- Forme factures, rollback jusqu'au dernier savepoint, mode modifiable --
-- partage des variables de librairie --
NEW_FORM( 'factures', to_savepoint, no_query_only, share_library_data);

-- Forme factures, rollback jusqu'au dernier savepoint, mode modifiable --
-- partage des variables de librairie, passage d'une liste de paramètres --
NEW_FORM( 'factures', no_rollback, no_query_only, share_library_data, id_param_list);

• ACTIVATE (défaut) donne le focus à la forme appellée
• NO_ACTIVATE laisse le focus à la forme appelante

• NO_SESSION (défaut) indique que la nouvelle forme s'exécutera dans la même session
• SESSION indique que la nouvelle forme s'exécutera dans une nouvelle session

• NO_SHARE_LIBRARY_DATA (défaut) les variables situées en librairies PL/SQL ne sont pas partagées.
• SHARE_LIBRARY_DATA Les variables situées en librairies PL/SQL sont visibles. C'est un excellent moyen de contourner la limitation des variables globales, toujours de type CHAR et limitées à 255 caractères.

• HIDE (défaut) la forme appelante est masquée
• NO_HIDE la forme appelante reste visible

• NO_REPLACE (défaut) la forme appelée hérite du menu de la forme appelante
• DO_REPLACE le menu de la forme appelante est remplacé par celui défini dans la forme appelée

• NO_QUERY_ONLY (défaut) La forme appelée est modifiable (Insert, Update, Delete)
• QUERY_ONLY La forme appelée n'est pas modifiable. L'utilisateur pourra interroger mais ne pourra ni insérer, ni modifier, ni supprimer.

• NO_SHARE_LIBRARY_DATA (défaut) les variables situées en librairies PL/SQL ne sont pas partagées.
• SHARE_LIBRARY_DATA Les variables situées en librairies PL/SQL sont visibles. C'est un excellent moyen de contourner la limitation des variables globales, toujours de type CHAR et limitées à 255 caractères.

BEGIN
  CALL_FORM('factures', no_hide, no_replace, query_only);
END;

DECLARE
  pl_id   PARAMLIST;
BEGIN
 /* Transmission d'une liste de paramètres */
   pl_id := GET_PARAMETER_LIST('tempdata');
  IF ID_NULL(pl_id) THEN
    CALL_FORM('factures');
  ELSE
    CALL_FORM('factures',
              hide,
              no_replace,
              no_query_only,
              pl_id);
  END IF;
 
  CALL_FORM('ventes', no_hide, do_replace, query_only);
END;

Techniques avancées

• La forme appelante ne contient aucune modification
• La forme appelante contient des modifications que vous enregistrez complètement (Commit)
• La forme appelante contient des modifications que vous enregistrez partiellement (Post)

Begin
  Form_id  FORMMODULE ;
Declare
  Form_id := Find_Form( 'factures' ) ;
  If not id_null( Form_id ) Then
     Go_Form( Form_id ) ;
  End if ;
End ;

Declare
  LC$Url  Varchar2(256) ;
Begin
  LC$Url := 'http://nom_host:port/forms90/f90servlet?config=tuto&form=D:\Cours\tutoforms10g\ALBUM_PHOTO.fmx' ;
  Web.Show_Document( LC$Url, '_blank' ) ;
End ;