Sí, es uno de esos mensajes que despistan más que ayudan.

Saludos!

Get Outlook for Android<https://aka.ms/AAb9ysg>

________________________________
From: Forum.help400 <[email protected]> on behalf of 
Javier Baca Lechuga <[email protected]>
Sent: Thursday, July 8, 2021 8:27:27 PM
To: forum.help400 <[email protected]>
Subject: RE: Error en RUNSQLSTM


Buenas tardes,



Sí, era una de las cosas que te iba proponer mañana probar pero no veo relación 
causa-efecto.

No entiendo que por un lado haya una supuesta limitación de buffer pero que 
ésta desaparezca al desactivar COMMIT.



Saludos,

Javier



De: Sergi Sitjes<mailto:[email protected]>
Enviado: jueves, 8 de julio de 2021 12:58
Para: forum.help400<mailto:[email protected]>
Asunto: RE: Error en RUNSQLSTM



Hola,



Al final he encontrado la solución en una segunda búsqueda más exhaustiva en 
Google. He desactivado el commit en el la llamada al SQL y arreglado! Por si a 
alguien le sucediera lo mismo aquí cómo ha quedado el comando:



RUNSQLSTM  SRCFILE(GENEBRE/FONTVAR) SRCMBR(SYNARTPIMQ) COMMIT(*NONE)



Saludos y gracias igualmente,



[cid:[email protected]]

Sergi Sitjes
Director Sistemes d'Informació/CIO
GENEBRE GROUP
E-mail: [email protected]
Web:   http://www.genebre.es
Tel:  +34 93 298 80 02
Fax: +34 93 298 80 07



De: Forum.help400 <[email protected]> En nombre de 
Sergi Sitjes
Enviado el: jueves, 8 de julio de 2021 8:13
Para: forum.help400 <[email protected]>
Asunto: RE: Error en RUNSQLSTM



Buenos días,



Aquí tienes el CL:



PGM



             CLRPFM     FILE(GENEBRE/SYNARTPIM)

             MONMSG     MSGID(CPF0000)



             RUNSQLSTM  SRCFILE(GENEBRE/FONTVAR) SRCMBR(SYNARTPIMQ)





Y aquí el SQL:



insert into genebre/synartpim select mmcono, mmitno, mmitds, mmfuds, a.mditds,

a.mdfuds,  b.mditds, b.mdfuds, mmitty, mmitgr, mmstat, ecd1qt, mmnewe, mmgrwe,

m9csno, c.mppopn, d.mppopn, d.mpremk, e.mppopn, e.mpremk

from m3fdbprd/mitmas

left join m3fdbprd/mitlad a on mmcono = a.mdcono and mmitno = a.mditno and

a.mdlncd = 'GB'

left join m3fdbprd/mitlad b on mmcono = b.mdcono and mmitno = b.mditno and

a.mdlncd = 'PT'

left join m3fdbprd/mpacit on mmcono = eccono and mmitno = ecitno

left join m3fdbprd/mitpop c on mmcono = c.mpcono and mmitno = c.mpitno and

(c.mppopn between '8428381000000' and '8428381300000' or

c.mppopn between '8434055000000' and '8434055300000')

left join m3fdbprd/mitpop d on mmcono = d.mpcono and mmitno = d.mpitno and

(d.mppopn between '8428381300000' and '8428381600000' or

d.mppopn between '8434055300000' and '8434055600000')

left join m3fdbprd/mitpop e on mmcono = e.mpcono and mmitno = e.mpitno and

(e.mppopn between '8428381600000' and '8428381900000' or

e.mppopn between '8434055600000' and '8434055900000')

inner join m3fdbprd/mitfac on mmcono = m9cono and mmitno = m9itno and

m9faci = '111'





Gracias,



[cid:[email protected]]

Sergi Sitjes
Director Sistemes d'Informació/CIO
GENEBRE GROUP
E-mail: [email protected]<mailto:[email protected]>
Web:   http://www.genebre.es
Tel:  +34 93 298 80 02
Fax: +34 93 298 80 07



De: Forum.help400 
<[email protected]<mailto:[email protected]>>
 En nombre de Javier Baca Lechuga
Enviado el: miércoles, 7 de julio de 2021 17:45
Para: forum.help400 
<[email protected]<mailto:[email protected]>>
Asunto: Re: Error en RUNSQLSTM



Buenas tardes Sergi :



Envíanos por favor las sentencias contenido exacto del CL y la sentencia SQL 
para que te podamos ayudar.



Saludos,
Javier





De: Forum.help400 
<[email protected]<mailto:[email protected]>>
 en nombre de Sergi Sitjes <[email protected]<mailto:[email protected]>>
Enviado: miércoles, 7 de julio de 2021 14:35
Para: forum.help400
Asunto: Error en RUNSQLSTM



Hola compañeros,



Os escribo para pediros orientación con un error que me tiene totalmente 
descolocado. Tengo un programa CL en el que pretendo lanzar una sentencia SQL 
usando el mandato RUNSQLSTM. Cuando lo hago recibo este error:



                         Additional Message Information



 Message ID . . . . . . :   CPF4011       Severity . . . . . . . :   10

 Message type . . . . . :   Diagnostic

 Date sent  . . . . . . :   07/07/21      Time sent  . . . . . . :   14:29:35



 Message . . . . :   Buffer length longer than record for member SYNARTPIM.

 Cause . . . . . :   The file record length for member SYNARTPIM file SYNARTPIM

   in library GENEBRE is 500. The buffer entry length is 959.  The remainder of

   the buffer entry is filled with blanks.

 Recovery  . . . :   If necessary, change the record length specified in the

   program to the length of the longest record in the member.  Then try your

   request again.



SYNARTPIM es el nombre del programa CL que llamo y la sentencia SQL es bastante 
larga, posiblemente la longitud sean esos 959 del mensaje de error.

Alguna idea de a que buffer se refiere y cómo solucionarlo?



Gracias por avanzado,



[cid:[email protected]]

Sergi Sitjes
Director Sistemes d'Informació/CIO
GENEBRE GROUP
E-mail: [email protected]<mailto:[email protected]>
Web:   http://www.genebre.es
Tel:  +34 93 298 80 02
Fax: +34 93 298 80 07



La información que contiene este correo electrónico es confidencial y compete 
exclusivamente al destinatario. Si Vd. ha recibido esta comunicación por error, 
por favor, notifíquelo inmediatamente al remitente y borre el mensaje junto con 
sus ficheros anexos sin leerlo, copiarlo, grabarlo, distribuirlo o divulgarlo o 
hacer cualquier otro uso de la información sin el consentimiento de Genebre 
S.A. El correo electrónico vía Internet no permite asegurar la confidencialidad 
o correcta recepción de los mensajes, por lo que Genebre no asume 
responsabilidad alguna por los daños causados. The information contained in 
this communication is confidential, may be privileged and is intended for the 
exclusive use of the above named addressee. If you receive this communication 
in error, please notify the sender immediately and delete it, and all its 
attached documents. If you are not the intended recipient, you are expressly 
prohibited from reading, copying, distributing, disseminating or, in any other 
way, using any of the information without the Genebre S.A. consent. Please note 
that Internet e-mail guarantees neither the confidentiality nor the proper 
receipt of the message sent, so that Genebre shall not be liable for any 
damages caused.

La información que contiene este correo electrónico es confidencial y compete 
exclusivamente al destinatario. Si Vd. ha recibido esta comunicación por error, 
por favor, notifíquelo inmediatamente al remitente y borre el mensaje junto con 
sus ficheros anexos sin leerlo, copiarlo, grabarlo, distribuirlo o divulgarlo o 
hacer cualquier otro uso de la información sin el consentimiento de Genebre 
S.A. El correo electrónico vía Internet no permite asegurar la confidencialidad 
o correcta recepción de los mensajes, por lo que Genebre no asume 
responsabilidad alguna por los daños causados. The information contained in 
this communication is confidential, may be privileged and is intended for the 
exclusive use of the above named addressee. If you receive this communication 
in error, please notify the sender immediately and delete it, and all its 
attached documents. If you are not the intended recipient, you are expressly 
prohibited from reading, copying, distributing, disseminating or, in any other 
way, using any of the information without the Genebre S.A. consent. Please note 
that Internet e-mail guarantees neither the confidentiality nor the proper 
receipt of the message sent, so that Genebre shall not be liable for any 
damages caused. La información que contiene este correo electrónico es 
confidencial y compete exclusivamente al destinatario. Si Vd. ha recibido esta 
comunicación por error, por favor, notifíquelo inmediatamente al remitente y 
borre el mensaje junto con sus ficheros anexos sin leerlo, copiarlo, grabarlo, 
distribuirlo o divulgarlo o hacer cualquier otro uso de la información sin el 
consentimiento de Genebre S.A. El correo electrónico vía Internet no permite 
asegurar la confidencialidad o correcta recepción de los mensajes, por lo que 
Genebre no asume responsabilidad alguna por los daños causados. The information 
contained in this communication is confidential, may be privileged and is 
intended for the exclusive use of the above named addressee. If you receive 
this communication in error, please notify the sender immediately and delete 
it, and all its attached documents. If you are not the intended recipient, you 
are expressly prohibited from reading, copying, distributing, disseminating or, 
in any other way, using any of the information without the Genebre S.A. 
consent. Please note that Internet e-mail guarantees neither the 
confidentiality nor the proper receipt of the message sent, so that Genebre 
shall not be liable for any damages caused.

La información que contiene este correo electrónico es confidencial y compete 
exclusivamente al destinatario. Si Vd. ha recibido esta comunicación por error, 
por favor, notifíquelo inmediatamente al remitente y borre el mensaje junto con 
sus ficheros anexos sin leerlo, copiarlo, grabarlo, distribuirlo o divulgarlo o 
hacer cualquier otro uso de la información sin el consentimiento de Genebre 
S.A. El correo electrónico vía Internet no permite asegurar la confidencialidad 
o correcta recepción de los mensajes, por lo que Genebre no asume 
responsabilidad alguna por los daños causados. The information contained in 
this communication is confidential, may be privileged and is intended for the 
exclusive use of the above named addressee. If you receive this communication 
in error, please notify the sender immediately and delete it, and all its 
attached documents. If you are not the intended recipient, you are expressly 
prohibited from reading, copying, distributing, disseminating or, in any other 
way, using any of the information without the Genebre S.A. consent. Please note 
that Internet e-mail guarantees neither the confidentiality nor the proper 
receipt of the message sent, so that Genebre shall not be liable for any 
damages caused.



La información que contiene este correo electrónico es confidencial y compete 
exclusivamente al destinatario. Si Vd. ha recibido esta comunicación por error, 
por favor, notifíquelo inmediatamente al remitente y borre el mensaje junto con 
sus ficheros anexos sin leerlo, copiarlo, grabarlo, distribuirlo o divulgarlo o 
hacer cualquier otro uso de la información sin el consentimiento de Genebre 
S.A. El correo electrónico vía Internet no permite asegurar la confidencialidad 
o correcta recepción de los mensajes, por lo que Genebre no asume 
responsabilidad alguna por los daños causados. The information contained in 
this communication is confidential, may be privileged and is intended for the 
exclusive use of the above named addressee. If you receive this communication 
in error, please notify the sender immediately and delete it, and all its 
attached documents. If you are not the intended recipient, you are expressly 
prohibited from reading, copying, distributing, disseminating or, in any other 
way, using any of the information without the Genebre S.A. consent. Please note 
that Internet e-mail guarantees neither the confidentiality nor the proper 
receipt of the message sent, so that Genebre shall not be liable for any 
damages caused.
____________________________________________________
�nete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 � Publicaciones Help400, S.L.

Reply via email to