Page 1 sur 1

langage as400 rpg conversion

Posté : mer. 25 févr. 2009, 10:47:36
par flechevallier
bonjour,

Est-ce que quelqu'un connait une combine pour convertir une donnée 000012 en 12.

merci!

enlever les zéros de gauche

Posté : mer. 25 févr. 2009, 12:02:27
par cmasse
Bonjour,

je propose %trim,%triml et %trimr qui savent éliminer un caractère (par défaut, l'espace), si la zone est de type caractère, %char() avant, sinon :

Code : Tout sélectionner

eval resultat = %triml('000012' : '0');

voyez le détail des fonctions intégrées (BIF) ici : http://publib.boulder.ibm.com/infocente ... 0/6/0/4/2/