Bonjour
J'ai écris et compilé ce programme, basique, en SQLRPGLE, et qui ne fonctionne pas !
Ou est l'erreur ?
D V_AMJT S 8 0
*===============
C *ENTRY PLIST
C PARM P_AMJT 8
*===============
C MOVEL(P) P_AMJT V_AMJT
*===============
C/EXEC SQL
C+ DELETE FROM TESTOBJ/NEWSU1 WHERE S1AMJT < :V_AMJT
C/END-EXEC
*===============
C/EXEC SQL
C+ COMMIT
C/END-EXEC
*===============
C SETON LR
Le compilateur signale la ou les lignes en erreur et la raison de l'erreur...
Bonjour Rich,
je vois que tu commit après ton delete : cela signifie que ton fichier est journalisé.
As tu inidiquer lors de la compilation que les instructions SQL du programme compilé sont exécutées sous contrôle de validation : paramètre COMMIT(*CHG) par exemple.
Sinon je te conseille de le faire directement dans ton programme :
C/Exec Sql
C+ Set Option Commit = *CHG
C/End-Exec
Wilfrid.
Le programme compile sans erreurs, mais n'exécute pas la mise à jour via SQL.
Bonjour,
WHERE S1AMJT < :V_AMJT
tu es sûr des : avant ta variable ?