SQLRPGLE de base

25-01-2007 à 15:08:26
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
  • Liens sponsorisés



24-01-2007 à 18:02:24
Le compilateur signale la ou les lignes en erreur et la raison de l'erreur...
24-01-2007 à 18:08:46
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.
25-01-2007 à 10:37:53
Le programme compile sans erreurs, mais n'exécute pas la mise à jour via SQL.
25-01-2007 à 15:08:26
Bonjour,

WHERE S1AMJT < :V_AMJT

tu es sûr des : avant ta variable ?

  • Liens sponsorisés