[AS400-SQLRPGLE] Insert avec des variables ?

Bonjour,

J'ai une question un peu conne mais à laquelle je ne trouve pas de réponse dans les tutorials dont je dispose :

Dans un programme RPGLE, peut-on écrire un INSERT de ce style, dans lequel VAR1, VAR2 et VAR3 contiendraient les valeurs à insérer ?

Code:

---

1 2 3

INSERT INTO DEPARTMENT (DEPTNO, DEPTNAME, ADMRDEPT) VALUES (VAR1, VAR2, VAR3)

---

D'avance, merci !

Citation:

---

Envoyé par axine

Bonjour,

J'ai une question un peu conne mais à laquelle je ne trouve pas de réponse dans les tutorials dont je dispose :

Dans un programme RPGLE, peut-on écrire un INSERT de ce style, dans lequel VAR1, VAR2 et VAR3 contiendraient les valeurs à insérer ?

Code:

---

1 2 3

INSERT INTO DEPARTMENT (DEPTNO, DEPTNAME, ADMRDEPT) VALUES (VAR1, VAR2, VAR3)

---

---

Tout à fait en utlisant du SQL dynamique.
Ta requête req:

Code:

---

1 2 3

INSERT INTO DEPARTMENT (DEPTNO, DEPTNAME, ADMRDEPT) VALUES (?, ?, ?)

---

Dans ton code :

Code:

---

1 2 3 4 5 6 7 8 9

C/exec sql C+ PREPARE p FROM :req C/end-sql C/exec sql C+ EXECUTE p USING :VAR1, :VAR2, :VAR3 C/end-sql C/exec sql C+ COMMIT C/end-sql

---

Ca doit être à peu près ça...

Yesss, ça marche :yaisse2: Un tout grand merci :D

Citation:

---

Envoyé par axine

Yesss, ça marche :yaisse2: Un tout grand merci :D

---

Avec plaisir :P

SQL dynamique n'est pas indispensable. Voici une variante sans PREPARE en SQL direct :

Code:

---

1 2 3 4

exec sql INSERT INTO DEPARTMENT (DEPTNO, DEPTNAME, ADMRDEPT) VALUES (:var1, :var2, :var3) end-exec

---

Tu pourrais même te dispenser de nommer les colonnes

Code:

---

1 2 3

exec sql INSERT INTO DEPARTMENT VALUES (:var1, :var2, :var3) end-exec

---

mais dans la mesure où tu respectes l'ordre des colonnes de la table dans la clause VALUES.