Bonjour , ( verssion :DB 9i Forms 10g Toad 9)
j'ai un problème pour tester si des table ont des correspondances dans une autre table sr ma fenêtre(service maintenance)
le code est sur forms mais le probleme est d'ordre syntaxique.
j'arrive pas a trouver la bonne syntaxe pour le dernier test
LES TABLES: PRESTATION VEHICULE >prest_veh** HUILE_PRESTATION VEH >huile_prest** PIECE_PRESTATION_VEHICULE> piece_prest**
**********************************************FIN
Code : Sélectionner tout - Visualiser dans une fenêtre à part
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 DECLARE v_invalid boolean; cursor c_d is select V.DES_PREST from PRESTATION V where V.NUM_PREST=:PREST_VEH.NUM_PREST; begin open c_d ; v_invalid:=c_d%notfound;. IF v_invalid then null;------------------------------------ (1ER TEST. else fetch c_d into :PREST_VEH.PRESTATION; ---(champ prestation du vehicule) end if; end; begin select H.DES_HUIL,HP.QT_HP INTO :PREST_VEH.HUILE, :PREST_VEH.QTE_H FROM HUILE_PREST HP,HUILE H WHERE H.CODE_HUIL=HP.NUM_HL AND HP.NUM_COMPM=:PREST_VEH.NUM_COMPM AND HP.N_CHASS=:PREST_VEH.N_CHASS AND HP.NUM_PREST=:PREST_VEH.NUM_PREST; EXCEPTION WHEN NO_DATA_FOUND ----------------------(2EM TEST........... THEN NULL; end; begin IF EXIST (SELECT num_compm <----------------------(3EM Test c'est la que je bloque??? from piec_prest where num_compm=:prest_veh.num_compm and n_chass=:prest_veh.n_chass) then INSTRUCTION....{select into... end;
MERCI ENCORE
Partager