Page 1 sur 1

ds format libre

Posté : lun. 22 déc. 2014, 08:49:39
par fmouragues
Bonjour,

J'ai voulu remplacer cette DS
d DS
d codcsa 1 5
d codcss 1 5p 0

par

dcl-ds *N;
codcsa char(5) pos(1);
codcss packed(5) pos(1);
end-ds;

Et, j'ai une erreur de donnée décimale avec la déclaration en format libre, erreur que je n'ai pas avec la déclaration en carte D (les données de test sont les mêmes).

Savez vous pourquoi ?

Merci d'avance.

(sujet non précisé)

Posté : lun. 22 déc. 2014, 09:36:27
par cmasse
Dans votre DS en format fixe, vous dites de 1 à 5 (soit 5 octets).

dans 5 octets en packé on met, 9 chiffres, pas 5 !

(sujet non précisé)

Posté : lun. 22 déc. 2014, 10:00:15
par fmouragues
:oops:
Oups,
J'aurai du y penser.

Merci