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&amp;#225;s de NEWS/400. &amp;#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
begin:vcard
fn;quoted-printable:Fernando P=C3=A9rez
n;quoted-printable:P=C3=A9rez;Fernando
org;quoted-printable:;Auditor=C3=ADa y Organizaci=C3=B3n
email;internet:[EMAIL PROTECTED]
tel;work:Ext. 627
x-mozilla-html:TRUE
version:2.1
end:vcard

__________________________________________________
Forum.HELP400 es un servicio m&amp;#225;s de NEWS/400.
&amp;#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

Responder a