Hola espero que te sirva el ejemplo

   D ESSO            DS                  OCCURS(10)
   D  SOBASE                 1     13  2
   D  SOIVDE                14     24  2
   D  SOIVND                25     35  2
   D  SOTXC                 37     39  1

  C                   DO        10            X
  C     X             OCCUR     ESSO
  C                   Z-ADD     0             SOBASE
  C                   Z-ADD     0             SOIVDE
  C                   Z-ADD     0             SOIVND
  C                   Z-ADD     0             SOTXC
  C                   END


From: [EMAIL PROTECTED]
Reply-To: [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Subject: Sentencia occurs
Date: Fri, 3 Jan 2003 12:35:00 +0100

Hola compa�eros, �alguien puede indicarme como debo utilizar la sentencia
occurs dentro de las hojas c de un programa ile cuando ha sido incorporada
a una ds?.

Gracias y Feliz A�o para todos.

-----------------------------------------------------------------------------------

Luis M. Gonz�lez Peralta
Departamento Desarrollo SOFT9126, S.L.
E-mail : [EMAIL PROTECTED] <mailto: [EMAIL PROTECTED]>
Tlf: (+34) 976.59.29.69
Fax: (+34) 976.59.33.90
Movil: (+34) 629.67.65.30
-----------------------------------------------------------------------------------




_____________________________________________________
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, env�a el mensaje resultante de pulsar
mailto:[EMAIL PROTECTED]?body=LEAVE

_________________________________________________________________
MSN. M�s �til Cada D�a http://www.msn.es/intmap/


_____________________________________________________
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, env�a el mensaje resultante de pulsar
mailto:[EMAIL PROTECTED]?body=LEAVE

Responder a