Respecto a tu pregunta Fernando, se que falta en la definición de la DS,
d Ds_Lista Ds
d Dm_Lista dim(10)overlay(Ds_Lista:*next)
d L_Campo01 like(Campo01)overlay(Dm_Lista:*next)
d L_Campo02 like(Campo02)overlay(Dm_Lista:*next)
El anterior fue un ejemplo, pero también se probo con DS y ocurr(10) y no,
genero PCLM, pero cuando se hizo el siguiente laboratorio, permite generar el
pcml y utilizar el servicio desde un cliente.
d Ds_Lista Ds
d L_Campo01 dim(10) like(Campo01)
overlay(Ds_Lista:*next)
d L_Campo02 dim(10) like(Campo02)
overlay(Ds_Lista:*next)
Gracias por tu tiempo Fernando.
----- Original Message -----
From: Fernando Pérez
To: forum.help400
Sent: Monday, November 24, 2008 3:23 AM
Subject: Re: Error al generar PCML de un pgm
Por el mensaje que te da, el problema es que en tu DS Dm_Lista ocupa la
misma posición de memoria que los otros dos campos, y eso no le hace gracia al
PCML, supongo que porque java, php, o quien sea que vaya a llamar al programa
no van a poder replicar ese comportamiento. Tendrás que prescindir de campos de
DS que se solapen si quieres usar pcml.
Puedes prescindir del solapado de campos en la DS definiendo dm_lista como un
campo dentro del programa de la siguiente forma:
D @Dm_lista S * Inz(%Addr(Ds_Lista))
D Dm_Lista S Based(@Dm_Lista) dim(10) (... Por
cierto, ¿en tu ejemplo no falta algo en la definición de dm_lista?)
Saludos.
Fernando Pérez
Cerámica Saloni. Dpto. Auditoría y Organización
Jaime Villa Torres escribió:
Señores, tengo el siguiente, problema, es posible que me den una luz.
en los parámetro de entrada del programa, existe la siguiente sentencia.
pDsLista LikeDs(Ds_Lista)
lista registros
d Ds_Lista Ds
d Dm_Lista dim(10)overlay(Ds_Lista:*next)
d L_Campo01 like(Campo01)overlay(Dm_Lista:*next)
d L_Campo02 like(Campo02)overlay(Dm_Lista:*next)
cuando compilo el programa sin generar el pcml, todo esta ok, incluso,
tengo un programa rpg de pruebas para llamar es programa del problema, y
también funciona correctamente, pero al compilarlo para generar el pcml, me
esta dando el siguiente error.
<!-- Error: Subfields must not overlap -->
<struct name="DS_LISTA">
<data name="DM_LISTA" type="char" length="10" count="10"
usage="inherit" />
<data name="L_CAMPO01" type="char" length="5" count="10"
usage="inherit" />
<!-- Error: Subfields must not overlap -->
<data name="L_CAMPO02" type="char" length="5" count="10"
usage="inherit" />
<!-- Error: Subfields must not overlap -->
realmente no entiendo, mis conocimientos en pcml, nulos....
----------------------------------------------------------------------------
__________________________________________________
Forum.HELP400 es un servicio m&#225;s de NEWS/400.
&#169; 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
------------------------------------------------------------------------------
__________________________________________________
Forum.HELP400 es un servicio m&#225;s de NEWS/400.
&#169; 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__________________________________________________
Forum.HELP400 es un servicio m&#225;s de NEWS/400.
&#169; 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