le forum IBM i

Bonjour,

Dans sqlrpgle, je lis un fichier dont certaines zones peuvent avoir nulles.

Pour éviter d'avoir l'erreur SQLCOD = -000000305 (La variable indicateur doit être indiquée.), j'ai utilisé ifnull(zone,'0')

Code : Tout sélectionner

EXEC SqL  DECLARE C3 CURSOR FOR
  SELECT clé, ifnull&#40;z1,'0'&#41;, ifnull&#40;z2,'0'&#41;,
             ifnull&#40;z3,'0'&#41; FROM fichier
    where clé = &#58;wclé  and
              &#40;z1 is NOT NULL or z2 is NOT NULL or z3 is NOT NULL&#41;
    group BY clé, z1, z2, z3
    order by clé
  FOR FETCH ONLY;
EXEC SqL OPEN C3;
  dow sqlCod = 0;
  EXEC SqL FETCH C3 INTO &#58;wclé1, &#58;wz1, &#58;wz2, &#58;wz3;
  if sqlcod = 0;
  if z1....

Mais la z2, le zéro est significatif, donc je ne peux pas utiliser ifnull(z2,'0').

Comment faire pour ne charger wz2 que si z2 is not null ?

Merci d'avance pour votre aide.

Je viens de trouver la réponse sur votre site http://www.volubis.fr/news/liens/AF4SRC ... QL400P.HTM.

Essayez plutôt avec les variables indicateur, qui sont des variables déclarées

Code : Tout sélectionner

D ind1                      s               5I 0

Code : Tout sélectionner

EXEC SqL  DECLARE C3 CURSOR FOR
  SELECT clé, z1 ,z2, z3
             FROM fichier
    where clé = &#58;wclé  
    group BY clé, z1, z2, z3
    order by clé
  FOR FETCH ONLY;
EXEC SqL OPEN C3;
  dow sqlCod = 0;
  EXEC SqL FETCH C3 INTO &#58;wclé1, &#58;wz1&#58;ind1, &#58;wz2&#58;ind2, &#58;wz3&#58;ind3;
  if sqlcod = 0;
  if ind1< 0;
    ...

les variables ind1,ind2 et ind3 contiennent

0 -> z1 contient qq chose, du coup wz1 aussi.
-1 -> z1 contient NULL dans la base (s'affiche '-' sous STRSQL)
-2 -> impossible de "fabriquer" le résultat (s'affiche '+++' sous STRSQL)

Merci

le forum IBM i

SQLRPGLE, travail avec valeur nulle

SQLRPGLE, travail avec valeur nulle

SQLRPGLE, travail avec valeur nulle

valeur nulle

(sans texte)