Discussion :

[Magnus]

Bonjour,

Sous forms 9 je ne peux pas compiler un écran à cause de l'erreur stipulant que :

l'identifiant REGEXP_REPLACE doit être déclaré

Voici le code associé à cette erreur qui se situe (vous l'aurez deviné) sur la ligne du SELECT :

Code :

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

1
2
3
4
5
6
  -- 1/ substitution du tag <VOLUME>
  SELECT REGEXP_REPLACE(LC_formule, '<VOLUME>', NVL(:B2.TOT_SIM_VOL,0))
  INTO   LC_formule
  FROM   B03FS
  WHERE  T81_FAM = :B5.T81_FAM
  AND    MS_CODE = :B5.MS_CODE;

Un de mes collègues m'a dit que je ne rencontrerai pas cette erreur si j'utilise le package EXEC_SQL dans la mesure où ce même code s'exécute parfaitement sous SQLPlus.

A quoi est due cette erreur ?
Merci d'avance.

PS : c'est en consultant la doc "SQL Reference 10g Release 1" que j'ai trouvé cette fonction.

[SheikYerbouti]

La version du PL/SQL de Forms a toujours un train de retard sur celle du noyau. C'est la raison pour laquelle certaines nouvelles instructions ne sont pas reconnues par le moteur PL/SQL de Forms.

Vous pouvez utiliser une fonction stockée qui retrournera la valeur à Forms.

[plaineR]

La version du PL/SQL de Forms a toujours un train de retard sur celle du noyau.

Sans compter que ici tu utilises une instruction 10g avec un forms 9i, donc même si la version du PL/SQL de forms n'avait pas de retard sur le noyau cela ne fonctionnerait pas !

[orafrance]

Dans ce cas précis l'usage de REGEXP_REPLACE est inutile... REPLACE suffit

[Magnus]

Dans ce cas précis l'usage de REGEXP_REPLACE est inutile... REPLACE suffit

Tout à fait d'accord : j'ai (TROP) simplifié mon exemple.
Et là :

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
SELECT REGEXP_INSTR(FORMULE, LC_PATTERN_SPEC, 1, LN_I, 0) SPEC_DEBUT,
             REGEXP_REPLACE(
               REGEXP_SUBSTR(FORMULE, LC_PATTERN_SPEC, 1, LN_I),
               LC_PATTERN_SPEC,
               'SELECT SPEC_\1 ' || CHR(10) ||
               'FROM   B2820 R,' || CHR(10) ||
               '       B2821 S' || CHR(10) ||
               'WHERE  R.SPEC_CODE  = S.SPEC_CODE ' || CHR(10) ||
               'AND    R.ST_CODE    = ''' || LC_ST_CODE || ''' ' || CHR(10) ||
               'AND    NVL(R.CL_CODE, ''@~@##@]@'') = NVL(' || DECODE(LC_CL_CODE, NULL, 'NULL', LC_CL_CODE) || ', ''@~@##@]@'') ' || CHR(10) ||
               'AND    S.T37_CODE   = ''\2'' '
              ) SPEC_STR
      INTO   LN_DEBUT,
             LC_FORMULE
      FROM   B03FS
      WHERE  T81_FAM = 'Q'
      AND    MS_CODE = 'X00002';

Sans compter que ici tu utilises une instruction 10g avec un forms 9i, donc même si la version du PL/SQL de forms n'avait pas de retard sur le noyau cela ne fonctionnerait pas !

Je pensais que cet ensemble d'instructions était apparu avec la version 9 (je suis loin d'avoir lu toute la doc 10gR1 alors la doc 9i...)

En conclusion et avant que je tag résolu, est-ce que cela signifie que pour utiliser ces instructions je dois :
- soit utiliser EXEC_SQL (et c'est la base exécute le code)
- soit utiliser une procédure stockée (idem),
- soit utiliser une version de forms plus récente (si toutefois la plus récente permet d'utiliser ces instructions en natif) ?

[Magnus]

Avec le package EXEC_SQL, ces instructions peuvent être exécutées sans souci.

Thanks boys.