Block n'est pas vide [Résolu]

[tunis71187]

Bonjour,

Comment je peux tester qu'un block doit contenir au moins un enregistrement?

Merci pour vos propositions.

[orafrance]

Tu peux t'inspirer de ceci pour compter les enregistrements :
http://www.dbforums.com/oracle/10311...ata-block.html

[SheikYerbouti]

Attention, un block contient TOUJOURS au moins un enregistrement, mais ce n'est pas pour autant qu'il est renseigné...
Il vaut mieux tester si un ou plusieurs champs obligatoires ont une valeur non nulle.

[Garuda]

Ou tester 'SYSTEM.BLOCK_STATUS' (='NEW')

Ou tester :SYSTEM.RECORD_STATUS SUR LE premier enregistrement ('NEW' )
EDIT : J'ai peut être mal compris la question ? Qu'entends-tu par "doit contenir au moins un enregistremen?" ? Qu'il faut que l'utilisateur renseigne au moins un enregistrement ?

[orafrance]

Il doit même y avoir une propriété sur le block pour ça non ?

[SheikYerbouti]

Documentation Forms

[orafrance]

je pensais aux options dans les propriétés du bloc en fait

[tunis71187]

Bonjour,

Garuda: je veux dire qu'il faut un enregistrement fils pour un bloc maitre càd il ne faut pas autoriser l'enregistrement d'une donnée du bloc maitre sans avoir de détails.

Pour cela, je suis bloqué dans la situation de bloquer l'utilisateur de ne pas enregistrer des données maitres sans détails.

J'ai essayé avec la proposition de Mr.Orafrance, c'est une bonne idée mais je ne trouve pas l'emplacement idéale pour le code pour faire le blocage.

Un DBA me propose d'utiliser un déclencheur, mais je suis débutant et je n'ai aucune idée de traduire ça.

Merci.

[tunis71187]

Bonjour,

J'ai essayé avec les commandes

Code :

:SYSTEM.BLOCK_STATUS

et

Code :

:SYSTEM.RECORD_STATUS

mais je ne trouve pas la solution désirée. Est il possible de me donner un exemple.

Merci

[SheikYerbouti]

Vous avez essayé quoi ? donnez votre code

[nancy_carina]

tu peux utiliser un déclencheur WHEN-VALIDATE-RECORD

[nancy_carina]

par exemple

Code :

1
2
3
4
IF :champ_detail IS NULL THEN
AL_MESSAGE('vous devez saisir au moins un enregistrement') ;
RAISE RORM_TRIGGER_FAILLURE;
END IF ;

[tunis71187]

Bonjour,

Merci Nancy pour votre proposition.

J'ai utilisé le code :

Code :

1
2
3
4
	IF :champdetail IS NULL THEN
MESSAGE('vous devez saisir au moins un enregistrement') ;
RAISE FORM_TRIGGER_FAILURE;
end IF;

dans le déclencheur PRE-INSERT du block maitre et ça marche à condition que le curseur soit pointé dans une enregistrement pas dans le prochain enregistrement qui est vide.
mais dans le déclencheur PRE-DELETE au niveau du block détails ça n'empêche plus de vider le block et l'enregistrement réussit donc ce n'est pas préférable dans ce cas.

M. Yerbouti, j'ai essayé avec ce code:

Code :

1
2
3
4
IF :SYSTEM.BLOCK_STATUS='NEW' then
message('il faut au moins un enregistrement');
raise form_trigger_failure;
end IF;

de même pour la commande :system.record_status mais pas d'effet.
D'une autre façon je ne veux pas enregistrer un enregistrement maitre sans au moins un détail.
Merci.

[Mohamed.Houri]

Envoyé par tunis71187

Bonjour,

Garuda: je veux dire qu'il faut un enregistrement fils pour un bloc maitre càd il ne faut pas autoriser l'enregistrement d'une donnée du bloc maitre sans avoir de détails.

Merci.

Je ne vois pas comment vous pourriez le faire sans trigger

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
 
mhouri.world > CREATE TABLE parent (id number PRIMARY KEY, child_cnt number DEFAULT 0 NOT NULL);
 
TABLE created.
 
mhouri.world > ALTER TABLE parent ADD constraint check_cnt CHECK (child_cnt > 0) deferrable initially deferred;
 
TABLE altered.
 
 
mhouri.world > CREATE TABLE child (p_id number REFERENCES parent);
 
TABLE created.
 
mhouri.world > CREATE OR REPLACE
  2     TRIGGER child_trg after DELETE OR INSERT OR UPDATE of p_id ON child FOR each row
  3    begin
  4            IF (inserting OR updating)
  5            then
  6                    UPDATE parent SET child_cnt = child_cnt+1 WHERE id = :new.p_id;
  7            end IF;
  8            IF (updating OR deleting)
  9            then
 10                    UPDATE parent SET child_cnt = child_cnt-1 WHERE id = :old.p_id;
 11            end IF;
 13    end  child_trg;
 14   /
 
TRIGGER created.
 
mhouri.world > INSERT INTO parent (id) VALUES (1);
 
1 row created.
 
mhouri.world > commit;
commit
*
ERROR at line 1:
ORA-02091: transaction rolled back 
ORA-02290: CHECK constraint (MHOURI.CHECK_CNT) violated 
 
 
mhouri.world > INSERT INTO parent(id) VALUES (1);
 
1 row created.
 
mhouri.world > INSERT INTO child(p_id) VALUES (1);
 
1 row created.
 
mhouri.world > commit;
 
Commit complete.

Ceci étant, cette solution est limitée car comme me l'a indiqué Tom Kyte:

(a) les triggers ne se déclenchent pas lors d'un "direct path''
(b) les triggers peuvent êtres disablés

Bien Cordialement

Mohamed Houri

[tunis71187]

Bonjour,

J'ai esayé de créer le trigger mais suite à un "commit_form", le message suivant est affiché:

Code :

FRM-99999 : Erreur 408. Reportez-vous au fichier relnotes pour plus d’informations.

[tunis71187]

Bonjour,

C'est résolu enfin.
J'ai inspiré de l'idée de Mohamed Houri et j'ai ajouté le déclencheur ON_COMMIT:

Code :

1
2
3
4
5
6
7
8
9
10
11
 
  -- vérifier la contrainte
  forms_ddl ('set constraint cmpt_det immediate');
  IF NOT form_success AND dbms_error_code=2290 then
    -- contrainte violée
    messagebox('Chaque bloc maitre doit avoir au moins un détail.');
    raise form_trigger_failure;
  else
  	commit_form;
  end IF;
end;

Mais le problème c'est que je ne peut pas ajouter une contrainte dans une table non vide.

S'il y a un truc merci de m'éclairsir.

[nancy_carina]

Envoyé par tunis71187

Bonjour,

C'est résolu enfin.
J'ai inspiré de l'idée de Mohamed Houri et j'ai ajouté le déclencheur ON_COMMIT:

Code :

Mais le problème c'est que je ne peut pas ajouter une contrainte dans une table non vide.

S'il y a un truc merci de m'éclairsir.

je crois que si , tu peux ajouter une contrainte a la table comme suit :

Code :

1
2
alter table nom_table add_constraint nom_contrainte  constraint_type (nom_colonne);

[Garuda]

Facile !
Faire un item calculé sur le bloc maitre
Calcul :Summary
Fonction : Count
Block : <block détail>
Item : <un item du bloc fils>

Tester la valeur dans le pre insert ou le pre_update du bloc maitre si lavaleur de l'item > 0

[tunis71187]

Merciiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiii Garuda pour l'idée.

Mais avant de clôturer ce sujet je veux juste une information:

La fonction Count est la même la fonction Décompte sous Forms?

Merci.

[Garuda]

Je suppose que oui.
Si j'ai dit count, c'est que j'utilise form builder en anglais !