[Forms]verifier qu une form est ouverte

[mike600river]

bonjour,
je cherche un moyen de savoir si une form f_1 est ouverte au moment ou j'ouvre ma form f_2.
quelqu'un aurit une solution?
merci d avance.

[SheikYerbouti]

Sans doute avec Find_Form():

Code :

1
2
3
4
5
6
7
8
9
10
11
 
DECLARE 
  fm_id   FormModule; 
  LC$Form VARCHAR2(60) := 'ma_forme'; 
BEGIN 
  fm_id := Find_Form(:System.Current_Form); 
  IF id_null(fm_id) then
    -- y'a pas ! --
    message('forme : ' || LC$Form || ' non trouvée');
  End IF ;
END;

[Magnus]

SheikYerbouti, je ne voudrais pas te reprendre mais ce ne serait pas plutôt :

Code :

1
2
3
4
5
6
7
8
9
10
11
 
DECLARE 
  fm_id   FormModule; 
  LC$Form VARCHAR2(60) := 'ma_forme'; 
BEGIN 
  fm_id := Find_Form(LC$Form); 
  IF id_null(fm_id) then
    -- y'a pas ! --
    message('forme : ' || LC$Form || ' non trouvée');
  End IF ;
END;

[/QUOTE]

[SheikYerbouti]

Oui, c'est ça