menu

arrow_back Peut-on utiliser des booléens RPG comme variable hôte sur du SQL embarqué?

par Actif
(360 points) 13 26
dans Programmation
0 votes

Bonjour, 

Je souhaite faire une requête SQL d'existence d'enregistrement et mettre directement dans une variable hôte la valeur *On. Peut-on le faire? Si oui, comment?

Exec sql Select '1'?
           Into :lControleInvalide
           From Bnsgwp
          Where Numsgw = :pNumeroSerie
            And Coduex = :pCodeUniteExploitation
          Limit 1; 

Cordialement, 

1 Réponse

par Averti
(979 points) 2 30 35
1 vote
Bonsoir, j'ai trouvé une solution mais il y a peut être plus simple :

dcl-proc TESTSQLBOO;

  dcl-s trouve ind;    //trouve est un indicateur

  //article 87 existe
  EXEC SQL
    VALUES
      CASE
        WHEN (SELECT '*'
              FROM STKART0
              WHERE NOARTF = 87
              LIMIT 1) IS NULL THEN '0'
        ELSE '1'
      END INTO :TROUVE;

  dsply ('Art 87 : ' + trouve);

  // arcicle 87999 n'existe pas
  EXEC SQL
    VALUES
      CASE
        WHEN (SELECT '*'
              FROM STKART0
              WHERE NOARTF = 87999
              LIMIT 1) IS NULL THEN '0'
        ELSE '1'
      END INTO :TROUVE;

  dsply ('Art 87999 : ' + trouve);

  return;

end-proc;


donne :
 3 > call TESTSQLBOO      
     DSPLY  Art 87 : 1    
     DSPLY  Art 87999 : 0

1 commentaire

0
Merci Denis, je vais essayer.

Questions liées

0 votes
1 réponse 213 vues
Comment utilise t'on les DS en SQL embarqué?Comment utilise t'on les DS en SQL embarqué? ...
par ibmiiste Confirmé
(1.4k points)
06-Juillet-2018 posée dans Programmation
0 votes
1 réponse 507 vues
J'ai une erreur SQL0314: Position 13 Nom de la variable VRF_TSMCRT déjà utilisé. Qu'est-ce que cela veut dire?Bonjour,  A la précompilationn j'ai l'erreur "SQL0314: Position 13 Nom de la variable VRF_TSMCRT déjà utilisé." Je ne la comprend pas. Ci-dessous la requête. ...
par ibmiiste Confirmé
(1.4k points)
19-Novembre-2019 posée dans Programmation
0 votes
3 réponses 396 vues
Comment connaître l'état du Commitment control d'un programme?Bonjour, Un programme SQLRPGILE semble ne pas mettre à jour les données. Il est possible que le programme a été créée avec l'option commit CHG, mais je ne sais pas comm ...
par ibmiiste Confirmé
(1.4k points)
19-Septembre-2019 posée dans Programmation
0 votes
1 réponse 106 vues
Comment convertir une valeur en seconde en hh:mm en RPG ile?Bonjour, J'ai une valeur en seconde stockée dans du "packé" 10:0 et je souhaite le convertir en heure et minutes sous ce masque hh:00 et en alphanumérique. Ave ...
par ibmiiste Confirmé
(1.4k points)
28-Octobre-2020 posée dans Programmation
0 votes
2 réponses 3.8K vues
Combien gère t'on les valeurs nulles en Rpg?Bonjour, Comment gérer les valeurs nulles sur les variables Rpg ile? Cordialement, ...
par ibmiiste Confirmé
(1.4k points)
20-Novembre-2019 posée dans Programmation