- En rpg "classique" : Z-ADD Znum7 Znum5
Si Znum7=1234567, permet de tronquer et d'obtenir Znum5=34567
- en rpgfree , l'instruction znum5=znum7;
n'est pas possible si Znum7 est > à 99999
(RNQ0103 : Cible pour opération numérique trop petite pour contenir le résultat)
Pour résoudre le probléme, y aurait-il une instruction plus simple que :
ZNum5=%dec(%subst(%editc(ZNum7:'X'):3:5):5:0);
RpgFree : Znum7 vers Znum5
RpgFree : Znum7 vers Znum5
Philippe MAUGIN, (RAUTUREAU APPLE SHOES)
V7R2.
V7R2.
-
- Site Admin
- Messages : 813
- Enregistré le : mer. 14 févr. 2007, 18:00:03
- Localisation : Nantes
- Contact :
reste de la division
Je pense qu'en demandant le reste de la division par 100, on doit obtenir la même chose :
Code : Tout sélectionner
ZNUM5 = %REM(ZNUM7 : 100) ;
Christian Massé (Volubis.fr)
(sans texte)
1234567 / 100 = 12345,67 --> 12345 = partie gauche
Or j'e veux la partie droite : 34567
Or j'e veux la partie droite : 34567
Philippe MAUGIN, (RAUTUREAU APPLE SHOES)
V7R2.
V7R2.
-
- Site Admin
- Messages : 813
- Enregistré le : mer. 14 févr. 2007, 18:00:03
- Localisation : Nantes
- Contact :
le RESTE pas le résultat
OUPS, pardon.
je voulais dire par 100000
et il faut bien récupérer le RESTE (pas le résultat) ce que fait la fonction %REM.
désolé.
Christian
je voulais dire par 100000
et il faut bien récupérer le RESTE (pas le résultat) ce que fait la fonction %REM.
désolé.
Christian
Christian Massé (Volubis.fr)