Tienes que tener en cuenta que:
Año 4P = 3 bytes
Mes 2P = 2 bytes
Día 2P = 2 bytes
Total 7 bytes
Mientras que 8P (el tamaño de la fecha) ocupa en memoria 5 bytes, por eso el
compilar se queja con el error que te da.
Yo no sabría descomponer una fecha empaquetada en día, mes y año utilizando un
DS. Probablemente programando una
función podrías conseguirlo.
Un saludo,
Javier
________________________________
De: [email protected]
[mailto:[email protected]] En nombre de JUAN García
Enviado el: miércoles, 28 de mayo de 2014 10:21
Para: forum. help400
Asunto: Ds con subcampos empaquetados
Hola a todos
Tengo una DS como esta:
D DS
D fecha 8P 0
D Any 4P 0 Overlay(fecha)
D Mes 2P 0 Overlay(fecha:*next)
D Dia 2P 0 Overlay(fecha:*next)
Pero al compilar me da un error RNF7303 que dice que el subcampos Dia
es demasiado grande.
¿Sabe alguien como hacer una DS con campos empaquetados para mover una
fecha y que los subcampos contengan el día, mes y año?
____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.
