Hola, estoy queriendo compilar un programa y no le gusta como pongo el
OCCURS.
Lo estoy cambiando a DIM, pero queria usar el OCCURS si se podia.
D VariantInfo ds Inz
d Qualified
d Occurs(1000)
d Var_Code 7A
d Var_Price 13S 4
d Var_Disc 13S 4
D DsChasPrice ds Inz
D Qualified
D Price_ListId 3S 0
D Chass_Price 13S 4
D Chass_DiscV 13S 4
D Cur_ind 4S 0
D Var_Info likeds(VariantInfo)
y en un procedimiento:
P Incoming B
D Incoming PI
D ChasPrice likeds(DsChasPrice )
xOccur = xOccur + 1 ;
ChasPrice.Cur_ind = xOccur ;
%occur(ChasPrice.Var_Info) = xOccur ;
ChasPrice.Var_Info.Var_Code = Value ;
Es correcto ?? Se puede usar el OCCURS como campo de una DS ??
El error es : El parámetro para %OCCUR no es válido.
Supongo que no puede determinar que ChasPrice.VarInfo es una DS con OCCURS.
Si pongo el Occurs en la ds dsChasPrice, me da error el editor directamente.
Gracias
--
.::.
Nicolas Machado
Metodo Argentina S.A.
_____________________
__________________________________________________
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400
