Discussion :

[Neby_Mokona]

Bonjour,

j'ai une table avec une colonne de type décimal (15,2) sous DB2.

j'ai déclaré une variable :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

77 ws-somme pic 9(15)V99.

j'ai déclaré un curseur :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
exec sql declare my-curs cursor
for select CA.caneuf
from tableT CA 
end-exec.

mais quand je fais un fetch dans le programme cobol mais j'ai

ws-somme does not have a suitable def to be used as a host variable" et "ws invalid/not declared

J'ai changé le type de ws-somme en x(17) pour faire un test mais si la compilation s'effectue correctement, j'ai un sqlcode -303 au niveau du fetch lors du lancement (run)

Quelqu'un aurait une idée ?

Merci

[ted the Ors]

Comment est codé ton fetch?
Sinon, c'est quoi l'interet d'un niveau 77?

a plus

[Luc Orient]

...
j'ai une table avec une colonne de type décimal (15,2) sous DB2.

j'ai déclaré une variable : 77 ws-somme pic 9(15)V99.

...

Il faut déclarer :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

77  WS-SOMME PIC S9(13)V99 COMP-3.

ou

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

77  WS-SOMME PIC S9(13)V99 PACKED-DECIMAL.

Voir :
Determining equivalent SQL and COBOL data types

[Peut-êtreUneRéponse]

DECIMAL (15,2) --> 15 dont 2

.