Erreur RNF0503E Uniquement en free

RPG (3 et 4, free), CL, SQL, etc...
Répondre
Jean-Marie
Messages : 30
Enregistré le : lun. 02 nov. 2015, 17:21:20

Erreur RNF0503E Uniquement en free

Message par Jean-Marie »

Bonjour,

J'obtiens une erreur de compilation RNF0503E lorsque je déclare la DS suivante en Free :

Code : Tout sélectionner

Dcl-DS Test_63;
  ZoneNum Zoned(832:0) DIM(104) POS(1);
End-DS;
Mais pas quand je l'écrit :

Code : Tout sélectionner

     D TEST_63         DS
     D   ZoneNum               1    832  0 DIM(104)
Nous sommes en V7R1, je comprends pas la différence entre le deux syntaxe.

Y'a t-il quelque chose à indiquer en particulier lorsqu'on utilise la syntaxe en free pour que ça compile ? :roll:

Merci

cmasse
Site Admin
Messages : 813
Enregistré le : mer. 14 févr. 2007, 18:00:03
Localisation : Nantes
Contact :

DIM

Message par cmasse »

si vous dites de 1 à 832 DIM(104), ça fait des postes de 8 chiffres (832/104)

essayez

Code : Tout sélectionner

Dcl-DS Test_63;
  ZoneNum Zoned(8:0) DIM(104) ;
End-DS; 
Christian Massé (Volubis.fr)

Jean-Marie
Messages : 30
Enregistré le : lun. 02 nov. 2015, 17:21:20

Message par Jean-Marie »

Ca fonctionne, merci beaucoup. :D

Répondre