dajay Compassion leads to happiness | Voilà voilà, j'ai ce script :
Code :
- -- TRAITEMENT DES FK
- sAction := 'FK ';
- p_WriteTrace('Traitement des clés étrangères' || chr(10), clTrace, bSend_Mail);
- sSql := 'Select FK_NOM, FK_SCR, TAB_NOM From STD_FK Where FK_USE = ''O'' Order by TAB_NOM, FK_NOM';
- Open CurFk For sSql;
- Loop
- Fetch CurFk Into sFK_NOM, sFK_SCR, sTAB_NOM;
- Exit When CurFk%NotFound;
- Select count(1) into nExists from user_tables where table_name = sTAB_NOM;
- If (nExists = 1) AND (INSTR(sFK_SCR,'create',1) = 0) Then
- sAction := 'Create FK '||sFK_NOM;
-
- Begin
- Execute Immediate sFK_SCR;
- Exception
- When Others Then
- p_WriteTrace('Erreur d''Oracle ' || SQLERRM || ' ('|| SQLCODE || ')'||CHR(10), clTrace, bSend_Mail);
- End;
|
Or, je n'arrive pas a récupérer la trace de l'erreur :x
Merci de votre aide
|