Avalados por :
¡Hola Expertos!
Estoy intentando ejecutar un programa pero está dando el error 'Programa 'zxxxxxxx' almacenado temporalmente.....
El programa es el siguiente:
REPORT ZCUST_INFO_PRG.
TABLES: ZCUST_INFO.
DATA: NEW_CUST LIKE ZCUST_INFO OCCURS 0 WITH HEADER LINE.
SELECT * FROM ZCUST_INFO INTO NEW_CUST.
LOOP AT NEW_CUST.
WRITE: / NEW_CUST-CMR_NAME.
ENDLOOP.
ENDSELECT.
¡¿Podría alguien ayudar por favor?!
Gracias y saludos,
Sunil
REPORT ZCUST_INFO_PRG.
TABLES: ZCUST_INFO.
DATA: NEW_CUST TYPE STANDARD TABLE OF ZCUST_INFO.
SELECT * FROM ZCUST_INFO INTO NEW_CUST.
LOOP AT NEW_CUST.
WRITE: / NEW_CUST-CMR_NAME.
ENDLOOP.
Message was edited by:
Prashant Patil
¡Hola Gopi!
He editado el programa de la misma manera que me lo diste... ¡Ahora está funcionando!
¡MUCHAS GRACIAS!
Gracias y saludos,
Sunil
Hola Gopi,
Gracias por tu respuesta, pero he activado y almacenado bajo un paquete z_ides. Todavía muestra el mismo error...
Gopi, ¿me puedes ayudar? Mi id de gtalk es sapsuni@gmail.com
o sunil_ckm@yahoo.com
Gracias y saludos,
Sunil
Es posible que no hayas activado el programa.
Por favor activa el programa antes de ejecutarlo.
De otra manera, la mejor forma de escribir este programa es:
REPORT ZCUST_INFO_PRG.
" VER LOS CAMBIOS EN ROJO
TABLES: ZCUST_INFO.
DATA: NEW_CUST TYPE TABLE OF ZCUST_INFO INITIAL SIZE 0,
WA_CUST TYPE ZCUST_INFO. " AGREGAR ESTO COMO ÁREA DE TRABAJO
SELECT * FROM ZCUST_INFO INTO TABLE NEW_CUST.
IF NOT NEW_CUST[] IS INITIAL.
LOOP AT NEW_CUST INTO WA_CUST. " INCLUIR TAMBIÉN EL ÁREA DE TRABAJO
WRITE: / WA_CUST-CMR_NAME. " CAMBIAR A WA_CUST
CLEAR : WA_CUST. " AGREGAR ESTO
ENDLOOP.
ELSE.
WRITE: / 'NO SE ENCONTRARON REGISTROS'.
ENDIF.
Saludos
Gopi
contacto@primeinstitute.com
(+51) 1641 9379
(+57) 1489 6964
© 2024 Copyright. Todos los derechos reservados.
Desarrollado por Prime Institute
