Discussion :

[LandGreen]

Je souhaite parcourir un fichier .txt et récupérer toutes les occurrences qui viennent juste après le mot FROM
comptant 10 caractères ou plus

il s'agit d'un fichier texte contenant plus de 1000 lignes.

exemple

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
...   ||  DD_ENG  , FLD_NAT_LAN || 
 ||  TO_CHAR (DDDD)   )  FROM SDS_ERP  
 WHERE FLD_CODE =  TO_NUMBER (:b2 )    
 SELECT DECODE(:b1 , 1 , DS_NAME_ENG , 
 DZ_AER )  FROM EEER_ETS  WHERE ...

ICI je dois récupérer 'SDS_ERP ' & 'EEER_ETS '

merci pour vos habituelles collaborations

nb : je dois utiliser : ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
CREATE OR REPLACE PROCEDURE MiseAJour (resultat2.txt UTL_FILE.FILE_TYPE) IS
	-- declaration des constantes, variables, curseurs et exceptions
	fich_resultat UTL_FILE.FILE_TYPE;
	buffer varchar2(1500);

[LandGreen]

après une recherche j'ai trouvé ça :

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
37
38
39
40
-- On créé ou on remplace un répertoire nommé DST qui pointe sur /u01 (repértoire existant au niveau de l'OS)
CREATE OR REPLACE DIRECTORY "dst" AS '/u01';
 
DECLARE
/* Création du descripteur de fichier */
monFichier  UTL_FILE.FILE_TYPE;
buffer varchar2 (1000);
 
begin
/* Ouverture du fichier options.txt en lecture (r)
   si situant dans le répertoire contenu dans l'objet DIRECTORY
   dst.
 */
monFichier := UTL_FILE.FOPEN ('dst','options.txt', 'r');
 
loop
  begin
    utl_file.get_line (monFichier, buffer);
  exception
    when no_data_found then exit;
  end;
  INSERT INTO opts(valeur) VALUES(buffer);
end loop;
commit;
 
/* Fermeture du descripteur de fichier */
UTL_FILE.FCLOSE (monFichier);
 
/* Bloc d'exceptions
   Notez qu'il existe tout un ensemble d'exceptions.
   Par fénéantise (j'avoue) je ne les ai pas toute mises
 */
EXCEPTION
  WHEN UTL_FILE.INVALID_PATH then
  dbms_output.put_line ('Chemin Invalide');
  RAISE;
  WHEN OTHERS then
     RAISE;
end;
/

Reste à récupérer seulement les mots qui viennent juste après la clause FROM