RE: formato erróneo CPYTOIMPF
¿Lo estas visualizando desde el iseries navigator? Si es así, prueba desde excel, abriendo el documento en la carpeta del iseries o copiándolo a tu pc. Pedro Pinedo Hernandez TIPO Programmer/Analyst AS400 Analista-Programador Departamento de Informática / IT Department tfno.:+34 941 28 60 90 - 941 03 01 39 fax: +34 941 03 01 39 Amcor Flexibles T +34 941 286 090 F +34 941 207 543 www.amcor.com P Antes de imprimir, piensa en el MEDIO AMBIENTE P From: Vicenç Torrella vtorre...@cassa.es To: 'forum.help400' forum.help400@listas.combios.es Date: 08/03/2010 09:26 Subject: RE: formato erróneo CPYTOIMPF Gracias! Cuando hago el DSPPFM lo visualizo correctamente desde una sesión 5250. Viene cuando hago el CPYTOIMPF y lo visualizao directamente desde el enlace /home/myfile.csv en el propio ISeries, es cuando el formato es otro ( no se si cambiando el parámetro DPAG se solucionaria). Saludos, Vicenç Torrella Responsable de Suport a l´Usuari Sistemes d´Informació i Organització Grup CASSA (+34 93 715 57 21 / Mòbil: 659 685 855 - +34 93 726 27 56 * c/ Concepció, 20 08202 Sabadell vtorre...@cassa.es www.cassa.es P Abans d?imprimir aquest missatge, asseguri?s que és necessari. El medi ambient està en la nostra mà ** AVIS LEGAL ** Aquest missatge es dirigeix exclusivament al seu destinatari i pot contenir informació privilegiada o CONFIDENCIAL. Si vostè no és el destinatari indicat, queda notificat de que la utilització, divulgació i/o còpia sense autorització està prohibida en virtut de la legislació vigent. Si per error ha rebut aquest missatge li preguem ens ho comuniqui immediatament per aquesta mateixa via i procedeixi a la seva destrucció. P Antes de imprimir este mensaje, asegúrese de que es necesario. El medio ambiente está en nuestra mano ** AVISO LEGAL ** Este mensaje se dirige exclusivamente a su destinatario y puede contener información privilegiada o CONFIDENCIAL. Si no es vd. el destinatario indicado, queda notificado de que la utilización, divulgación y/o copia sin autorización está prohibida en virtud de la legislación vigente. Si ha recibido este mensaje por error, le rogamos nos lo comunique inmediatamente por esta misma vía y proceda a su destrucción. P Before printing this message, think if this is necessary. Environment is in our hand *** DISCLAIMER ** This message is intended exclusively for its addressee and may contain information that is CONFIDENTIAL and protected by professional privilege. If you are not the intended recipient you are hereby notified that any dissemination, copy or disclosure of this communication is strictly prohibited by law. If this message has been received in error, please immediately notify us via e-mail and delete it. De: forum.help400-boun...@listas.combios.es [ mailto:forum.help400-boun...@listas.combios.es] En nom de alex martinez Enviat: viernes, 05 de marzo de 2010 16:34 Per a: forum.help400 Tema: Re: formato erróneo CPYTOIMPF Hola: A mi me parece que lo que estás viendo son datos en ASCII, que se ven mal desde una sesión 5250. Quizás el archivo tiene un CCSID EBCDIC y los datos (su contenido es ASCII)... ¿El fichero myfile.csv lo visualizas con DSPF? Asi es así cuando veas los datos, prueba a verlos en EBCDIC y/o a utilizar F15=Servicios para ver la codificación CCSID del archivo. Salu2 El 5 de marzo de 2010 14:02, Vicenç Torrella vtorre...@cassa.es escribió: Hola, Antes de hacer elCPYTIOIMPF he hecho: 1) crtpf file(qtemp/myfile) rcdlen(199) 2) cpysplf file(myspool) tofile(qtemp/myfile) job(nbr/user/job) splnbr(splnbr) Visualizo correctamente el contenido de qtemp/myfil y cuando hago : 3) CPYTOIMPF FROMFILE(QTEMP/MYFILE *FIRST) TOSTMF('/home/myfile.csv') STMFCO DPAG(*PCASCII) RCDDLM(*CRLF) STRDLM(*NONE) es cuando lo veo mal en el \home del ISeries. Gracias, Vicenç Torrella Responsable de Suport a l´Usuari Sistemes d´Informació i Organització Grup CASSA (+34 93 715 57 21 / Mòbil: 659 685 855 - +34 93 726 27 56 * c/ Concepció, 20 08202 Sabadell vtorre...@cassa.es www.cassa.es P Abans d?imprimir aquest missatge, asseguri?s que és necessari. El medi ambient està en la nostra mà ** AVIS LEGAL ** Aquest missatge es dirigeix exclusivament al seu destinatari i pot contenir informació privilegiada o CONFIDENCIAL. Si vostè no és el destinatari indicat, queda notificat de que la utilització, divulgació i/o còpia sense autorització està prohibida en virtut de la legislació vigent. Si per error ha rebut aquest missatge li preguem ens ho comuniqui immediatament per aquesta mateixa via i procedeixi a la seva destrucció. P Antes de imprimir este mensaje, asegúrese de que es necesario. El medio ambiente está en nuestra mano ** AVISO LEGAL ** Este mensaje se dirige exclusivamente
Para mas que Isaurios
Buenos días, ¿alguien tiene un ejemplo de lectura de primario y Secundario por M1 y M2 para comparar registros? Saludos José M. Sánchez Rble. Dpto. Informática Productos Climax, S.A Pol. Ind. Sector Mollet C/A Nº 1 08150 - Parets del Valles (Barcelona) Tlf: 93 562 13 11 - Fax: 93 562 14 13 Nota de Confidencialidad Este mensaje se envía desde el sistema de correo electrónico de la empresa Productos Climax, S.A.. Podría contener por lo tanto secretos de empresa y otra información confidencial tutelados por las leyes de la Unión Europea y otros Estados. Si Vd. lo recibiera por error o sin ser una de las personas indicadas en el encabezamiento, deberá destruirlo sin copiarlo ni revelarlo o cualquier otra acción relacionada con el contenido del mensaje e informar inmediatamente por correo electrónico al emisor del mensaje. Las personas y entidades que violen sus deberes de confidencialidad podrán ser perseguidas ante los Tribunales de Justicia al amparo de la legislación civil, penal y administrativa nacional e internacional. Gracias por su colaboración. Política de Privacidad En base a la Ley 34/2002 de Servicios de la Sociedad de la Información y de Comercio Electrónico (LSSICE), en vigor desde el 12 de octubre de 2002 y de la Ley Orgánica 15/1999 del 13/12/1999 de Protección de Datos Personales, le comunicamos que su dirección de correo electrónico forma parte de nuestro fichero automatizado, al objeto de continuar enviándole ofertas de nuestros servicios y / o el mantenimiento de las comunicaciones en nuestras relaciones contractuales. En virtud de las Leyes antes mencionadas, tiene derecho de oposición, acceso, rectificación y cancelación de sus datos. Le recordamos que sus datos nunca son suministrados a terceros bajo ningún concepto, siendo únicamente utilizados para el envío de nuestras comunicaciones con Vd. © 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
Re: Para mas que Isaurios
Hola Jose M Te envío unas notas de ficheros primario y seguncadrio con MR _ f...@bibl1 IP F 406DISK f...@bibl2 IS F 406DISK ** i...@bibl1 NS 01 I 24 33 ODOBNML1M1 I 34 41 ODOBTP M2 ** i...@bibl2 NS 02 I 24 33 ODOBNML1M1 I 34 41 ODOBTP M2 **- ** Inicializar campos por L1 **- C *INL1 IFEQ *ON C ENDIF **- ** Campos primer fichero **- C *IN01 IFEQ *ON C ENDIF **- ** Campos segundo fichero **- C *IN02 IFEQ *ON C ENDIF **- ** Registros con pareja **- C *INMR IFEQ *ON C ENDIF Un saludo Sonia Buenos días, ¿alguien tiene un ejemplo de lectura de primario y Secundario por M1 y M2 para comparar registros? Saludos José M. Sánchez Rble. Dpto. Informática Productos Climax, S.A Pol. Ind. Sector Mollet C/A Nº 1 08150 - Parets del Valles (Barcelona) Tlf: 93 562 13 11 - Fax: 93 562 14 13 Nota de Confidencialidad Este mensaje se envía desde el sistema de correo electrónico de la empresa Productos Climax, S.A.. Podría contener por lo tanto secretos de empresa y otra información confidencial tutelados por las leyes de la Unión Europea y otros Estados. Si Vd. lo recibiera por error o sin ser una de las personas indicadas en el encabezamiento, deberá destruirlo sin copiarlo ni revelarlo o cualquier otra acción relacionada con el contenido del mensaje e informar inmediatamente por correo electrónico al emisor del mensaje. Las personas y entidades que violen sus deberes de confidencialidad podrán ser perseguidas ante los Tribunales de Justicia al amparo de la legislación civil, penal y administrativa nacional e internacional. Gracias por su colaboración. Política de Privacidad En base a la Ley 34/2002 de Servicios de la Sociedad de la Información y de Comercio Electrónico (LSSICE), en vigor desde el 12 de octubre de 2002 y de la Ley Orgánica 15/1999 del 13/12/1999 de Protección de Datos Personales, le comunicamos que su dirección de correo electrónico forma parte de nuestro fichero automatizado, al objeto de continuar enviándole ofertas de nuestros servicios y / o el mantenimiento de las comunicaciones en nuestras relaciones contractuales. En virtud de las Leyes antes mencionadas, tiene derecho de oposición, acceso, rectificación y cancelación de sus datos. Le recordamos que sus datos nunca son suministrados a terceros bajo ningún concepto, siendo únicamente utilizados para el envío de nuestras comunicaciones con Vd. © 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 © 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
Re: Para mas que Isaurios
Espero que te sirva este ejemplo : Ffiche1 ip E K DISK Ffiche2 us E K DISK Iffiche1 01 I cla claM1 Iffiche2 02 I cla cla M1 /free if *in02 = '1' and *inmr = '1'; campoy= campo1 campox= campo2 update ffiche2 %fields(campoy: campox); endif; /end-free Saludos E.Jurado Dpto. Informática (F.Soria, S.A.) Tlf.: 914791512 - AVISO DE CONFIDENCIALIDAD: La información contenida en este mensaje y archivos adjuntos es privada, confidencial y de uso exclusivo de la(s) persona(s) y entidad(es) a la(s) que va dirigido. Si Ud. no es el destinatario de esta información se le notifica que está expresamente prohibida la declaración, reproducción, distribución o la toma de cualquier acción basada en el contenido de esta comunicación. Si ha recibido este mensaje por error, le rogamos que nos lo comunique inmediatamente y proceda a eliminarlo de todos sus sistemas. Francisco Soria Melguizo, S.A. no asume responsabilidad legal por el contenido de esta comunicación, ni representa la opinión de la firma, salvo que expresamente se especifique lo contrario y que el remitente esté autorizado para hacerlo. Gracias. - Original Message - From: Dpto.Informática Productos Climax(Jose Sánchez) To: forum.help400@listas.combios.es Sent: Monday, March 08, 2010 10:48 AM Subject: Para mas que Isaurios Buenos días, ¿alguien tiene un ejemplo de lectura de primario y Secundario por M1 y M2 para comparar registros? Saludos José M. Sánchez Rble. Dpto. Informática Productos Climax, S.A Pol. Ind. Sector Mollet C/A Nº 1 08150 - Parets del Valles (Barcelona) Tlf: 93 562 13 11 - Fax: 93 562 14 13 Nota de Confidencialidad Este mensaje se envía desde el sistema de correo electrónico de la empresa Productos Climax, S.A.. Podría contener por lo tanto secretos de empresa y otra información confidencial tutelados por las leyes de la Unión Europea y otros Estados. Si Vd. lo recibiera por error o sin ser una de las personas indicadas en el encabezamiento, deberá destruirlo sin copiarlo ni revelarlo o cualquier otra acción relacionada con el contenido del mensaje e informar inmediatamente por correo electrónico al emisor del mensaje. Las personas y entidades que violen sus deberes de confidencialidad podrán ser perseguidas ante los Tribunales de Justicia al amparo de la legislación civil, penal y administrativa nacional e internacional. Gracias por su colaboración. Política de Privacidad En base a la Ley 34/2002 de Servicios de la Sociedad de la Información y de Comercio Electrónico (LSSICE), en vigor desde el 12 de octubre de 2002 y de la Ley Orgánica 15/1999 del 13/12/1999 de Protección de Datos Personales, le comunicamos que su dirección de correo electrónico forma parte de nuestro fichero automatizado, al objeto de continuar enviándole ofertas de nuestros servicios y / o el mantenimiento de las comunicaciones en nuestras relaciones contractuales. En virtud de las Leyes antes mencionadas, tiene derecho de oposición, acceso, rectificación y cancelación de sus datos. Le recordamos que sus datos nunca son suministrados a terceros bajo ningún concepto, siendo únicamente utilizados para el envío de nuestras comunicaciones con Vd. -- © 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 © 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
RE: Para mas que Isaurios
No utilizo ese sistema desde el año 1989, cuando estudiaba RPG II en el S/36. De: forum.help400-boun...@listas.combios.es [mailto:forum.help400-boun...@listas.combios.es] En nombre de Dpto.Informática Productos Climax(Jose Sánchez) Enviado el: lunes, 08 de marzo de 2010 10:49 Para: forum.help400@listas.combios.es Asunto: Para mas que Isaurios Buenos días, ¿alguien tiene un ejemplo de lectura de primario y Secundario por M1 y M2 para comparar registros? Saludos José M. Sánchez Rble. Dpto. Informática Productos Climax, S.A Pol. Ind. Sector Mollet C/A Nº 1 08150 - Parets del Valles (Barcelona) Tlf: 93 562 13 11 - Fax: 93 562 14 13 Nota de Confidencialidad Este mensaje se envía desde el sistema de correo electrónico de la empresa Productos Climax, S.A.. Podría contener por lo tanto secretos de empresa y otra información confidencial tutelados por las leyes de la Unión Europea y otros Estados. Si Vd. lo recibiera por error o sin ser una de las personas indicadas en el encabezamiento, deberá destruirlo sin copiarlo ni revelarlo o cualquier otra acción relacionada con el contenido del mensaje e informar inmediatamente por correo electrónico al emisor del mensaje. Las personas y entidades que violen sus deberes de confidencialidad podrán ser perseguidas ante los Tribunales de Justicia al amparo de la legislación civil, penal y administrativa nacional e internacional. Gracias por su colaboración. Política de Privacidad En base a la Ley 34/2002 de Servicios de la Sociedad de la Información y de Comercio Electrónico (LSSICE), en vigor desde el 12 de octubre de 2002 y de la Ley Orgánica 15/1999 del 13/12/1999 de Protección de Datos Personales, le comunicamos que su dirección de correo electrónico forma parte de nuestro fichero automatizado, al objeto de continuar enviándole ofertas de nuestros servicios y / o el mantenimiento de las comunicaciones en nuestras relaciones contractuales. En virtud de las Leyes antes mencionadas, tiene derecho de oposición, acceso, rectificación y cancelación de sus datos. Le recordamos que sus datos nunca son suministrados a terceros bajo ningún concepto, siendo únicamente utilizados para el envío de nuestras comunicaciones con Vd. © 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
Para mas que Isaurios desde Argentina
FOREROS Buenos dias, Javier y Jose a mi me pasaba lo mismo hasta el año pasado trabaje en RPG II , luego RPG/400 y luego ILERPG. Peor el año pasado me toco entrar a trabajar en una empresa que tiene mas del 50 % de programas en S/36 y yo estoy tratando de Nativizar todo. O sea que trabajo ahora en los dos RPG400 y RPG 2, que se le va a hacer y les comento que en Argentina esta donde estoy no es la unica con Partes en S/36. Si bien son minimas. Saludos JOSE LUIS DA SILVA JARA _ De: forum.help400-boun...@listas.combios.es [mailto:forum.help400-boun...@listas.combios.es] En nombre de Javier Mora Enviado el: Lunes, 08 de Marzo de 2010 07:46 a.m. Para: forum.help400 Asunto: RE: Para mas que Isaurios No utilizo ese sistema desde el año 1989, cuando estudiaba RPG II en el S/36. _ De: forum.help400-boun...@listas.combios.es [mailto:forum.help400-boun...@listas.combios.es] En nombre de Dpto.Informática Productos Climax(Jose Sánchez) Enviado el: lunes, 08 de marzo de 2010 10:49 Para: forum.help400@listas.combios.es Asunto: Para mas que Isaurios Buenos días, ¿alguien tiene un ejemplo de lectura de primario y Secundario por M1 y M2 para comparar registros? Saludos José M. Sánchez Rble. Dpto. Informática Productos Climax, S.A Pol. Ind. Sector Mollet C/A Nº 1 08150 - Parets del Valles (Barcelona) Tlf: 93 562 13 11 - Fax: 93 562 14 13 Nota de Confidencialidad Este mensaje se envía desde el sistema de correo electrónico de la empresa Productos Climax, S.A.. Podría contener por lo tanto secretos de empresa y otra información confidencial tutelados por las leyes de la Unión Europea y otros Estados. Si Vd. lo recibiera por error o sin ser una de las personas indicadas en el encabezamiento, deberá destruirlo sin copiarlo ni revelarlo o cualquier otra acción relacionada con el contenido del mensaje e informar inmediatamente por correo electrónico al emisor del mensaje. Las personas y entidades que violen sus deberes de confidencialidad podrán ser perseguidas ante los Tribunales de Justicia al amparo de la legislación civil, penal y administrativa nacional e internacional. Gracias por su colaboración. Política de Privacidad En base a la Ley 34/2002 de Servicios de la Sociedad de la Información y de Comercio Electrónico (LSSICE), en vigor desde el 12 de octubre de 2002 y de la Ley Orgánica 15/1999 del 13/12/1999 de Protección de Datos Personales, le comunicamos que su dirección de correo electrónico forma parte de nuestro fichero automatizado, al objeto de continuar enviándole ofertas de nuestros servicios y / o el mantenimiento de las comunicaciones en nuestras relaciones contractuales. En virtud de las Leyes antes mencionadas, tiene derecho de oposición, acceso, rectificación y cancelación de sus datos. Le recordamos que sus datos nunca son suministrados a terceros bajo ningún concepto, siendo únicamente utilizados para el envío de nuestras comunicaciones con Vd. © 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
RE: Para mas que Isaurios desde Argentina
Pues será de Isaurios pero a veces va bien y en el proceso que tengo que modificar es perfecto el sistema de M1-M2. Gracias a todos De: forum.help400-boun...@listas.combios.es [mailto:forum.help400-boun...@listas.combios.es] En nombre de Jose Luis Da Silva Enviado el: lunes, 08 de marzo de 2010 11:58 Para: 'forum.help400' Asunto: Para mas que Isaurios desde Argentina FOREROS Buenos dias, Javier y Jose a mi me pasaba lo mismo hasta el año pasado trabaje en RPG II , luego RPG/400 y luego ILERPG. Peor el año pasado me toco entrar a trabajar en una empresa que tiene mas del 50 % de programas en S/36 y yo estoy tratando de Nativizar todo. O sea que trabajo ahora en los dos RPG400 y RPG 2, que se le va a hacer y les comento que en Argentina esta donde estoy no es la unica con Partes en S/36. Si bien son minimas. Saludos JOSE LUIS DA SILVA JARA De: forum.help400-boun...@listas.combios.es [mailto:forum.help400-boun...@listas.combios.es] En nombre de Javier Mora Enviado el: Lunes, 08 de Marzo de 2010 07:46 a.m. Para: forum.help400 Asunto: RE: Para mas que Isaurios No utilizo ese sistema desde el año 1989, cuando estudiaba RPG II en el S/36. De: forum.help400-boun...@listas.combios.es [mailto:forum.help400-boun...@listas.combios.es] En nombre de Dpto.Informática Productos Climax(Jose Sánchez) Enviado el: lunes, 08 de marzo de 2010 10:49 Para: forum.help400@listas.combios.es Asunto: Para mas que Isaurios Buenos días, ¿alguien tiene un ejemplo de lectura de primario y Secundario por M1 y M2 para comparar registros? Saludos José M. Sánchez Rble. Dpto. Informática Productos Climax, S.A Pol. Ind. Sector Mollet C/A Nº 1 08150 - Parets del Valles (Barcelona) Tlf: 93 562 13 11 - Fax: 93 562 14 13 Nota de Confidencialidad Este mensaje se envía desde el sistema de correo electrónico de la empresa Productos Climax, S.A.. Podría contener por lo tanto secretos de empresa y otra información confidencial tutelados por las leyes de la Unión Europea y otros Estados. Si Vd. lo recibiera por error o sin ser una de las personas indicadas en el encabezamiento, deberá destruirlo sin copiarlo ni revelarlo o cualquier otra acción relacionada con el contenido del mensaje e informar inmediatamente por correo electrónico al emisor del mensaje. Las personas y entidades que violen sus deberes de confidencialidad podrán ser perseguidas ante los Tribunales de Justicia al amparo de la legislación civil, penal y administrativa nacional e internacional. Gracias por su colaboración. Política de Privacidad En base a la Ley 34/2002 de Servicios de la Sociedad de la Información y de Comercio Electrónico (LSSICE), en vigor desde el 12 de octubre de 2002 y de la Ley Orgánica 15/1999 del 13/12/1999 de Protección de Datos Personales, le comunicamos que su dirección de correo electrónico forma parte de nuestro fichero automatizado, al objeto de continuar enviándole ofertas de nuestros servicios y / o el mantenimiento de las comunicaciones en nuestras relaciones contractuales. En virtud de las Leyes antes mencionadas, tiene derecho de oposición, acceso, rectificación y cancelación de sus datos. Le recordamos que sus datos nunca son suministrados a terceros bajo ningún concepto, siendo únicamente utilizados para el envío de nuestras comunicaciones con Vd. © 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
Programa ejemplo para trabajar con espacios de usuario
Saludos ¿Alguien tiene un programa de ejemplo en RPG para trabajar con espacios de usuario? para recuperar y grabar datos Gracias © 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
RE: Programa ejemplo para trabajar con espacios de usuario
¿Qué quieres hacer? ¿Aprender a utilizarlos para guardar tu propia información? ¿O para usarlos con APIs? Puedo pasarte algo, pero tengo que buscarlo. Un saludo. Javier Mora De: forum.help400-boun...@listas.combios.es [mailto:forum.help400-boun...@listas.combios.es] En nombre de JUAN García Enviado el: lunes, 08 de marzo de 2010 12:16 Para: forum. help400 Asunto: Programa ejemplo para trabajar con espacios de usuario Saludos ¿Alguien tiene un programa de ejemplo en RPG para trabajar con espacios de usuario? para recuperar y grabar datos Gracias © 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
Re: Programa ejemplo para trabajar con espacios de usuario
Hola Quiero aprender a utilizarlos tanto en RPG como con APIS Un saludo El 8 de marzo de 2010 12:47, Javier Mora jm...@musgrave.es escribió: ¿Qué quieres hacer? ¿Aprender a utilizarlos para guardar tu propia información? ¿O para usarlos con APIs? Puedo pasarte algo, pero tengo que buscarlo. Un saludo. Javier Mora -- *De:* forum.help400-boun...@listas.combios.es [mailto: forum.help400-boun...@listas.combios.es] *En nombre de *JUAN García *Enviado el:* lunes, 08 de marzo de 2010 12:16 *Para:* forum. help400 *Asunto:* Programa ejemplo para trabajar con espacios de usuario Saludos ¿Alguien tiene un programa de ejemplo en RPG para trabajar con espacios de usuario? para recuperar y grabar datos Gracias © 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 © 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
Diario de seguridad del sistema y receptores
Hola a t...@s: Creía que no tenía activada la auditoría del sistema y he intentado cambiar unos valores con el siguiente mandato: CHGSECAUD QAUDCTL(*AUDLVL *NOQTEMP) QAUDLVL(*AUTFAIL *SEGURITY *SERVICE *PGMFAIL) JRNRCV(JRNLIB/AUDRCV0001) Antes de este cambio el valor del sistema QAUDLVL estaba a *NONE. Veo que ya ha cambiado a los nuevos valores, pero el receptor de diario no lo ha creado en la biblioteca JRNLIB. No tengo mucha experiencia con esto de los diarios, pero veo que QSYS/QAUDJRN tiene receptores en la biblioteca QGPL y, parece, que se están generando registros. ¿Cómo puede reenganchar el diario QAUDJRN con un nuevo receptor en la biblioteca JRNLIB? Un saludo y gracias por vuestros comentarios. Javier Mora © 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
Re: Programa ejemplo para trabajar con espacios de usuario
Hola Juan, Aqui tienes un ejemplo de la propia IBM: http://publib.boulder.ibm.com/infocenter/iseries/v5r4/index.jsp?topic=/apiref/apiexdelsp.htm Martí Riera 2010/3/8 JUAN García homeryb...@gmail.com Hola Quiero aprender a utilizarlos tanto en RPG como con APIS Un saludo El 8 de marzo de 2010 12:47, Javier Mora jm...@musgrave.es escribió: ¿Qué quieres hacer? ¿Aprender a utilizarlos para guardar tu propia información? ¿O para usarlos con APIs? Puedo pasarte algo, pero tengo que buscarlo. Un saludo. Javier Mora -- *De:* forum.help400-boun...@listas.combios.es [mailto: forum.help400-boun...@listas.combios.es] *En nombre de *JUAN García *Enviado el:* lunes, 08 de marzo de 2010 12:16 *Para:* forum. help400 *Asunto:* Programa ejemplo para trabajar con espacios de usuario Saludos ¿Alguien tiene un programa de ejemplo en RPG para trabajar con espacios de usuario? para recuperar y grabar datos Gracias © 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 © 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 © 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
Re: Diario de seguridad del sistema y receptores
Hola Javier, Tenia una entrada pendiente de publicar en los proximos dias en mi blog y que he adelantado para ver si te puede servir de ayuda. Configurar seguridad del sistemahttp://as400howto.blogspot.com/2010/03/configurar-seguridad-del-sistema.html En cuanto a conectar los jrnrcv al diario de auditoria debes hacelo con CHGJRN JRN(QAUDJRN) JRNRCV(QGPL/QAUDJRN). Antes comprueba donde estan los receptores y en que biblioteca con WRKJRNA QAUDJRN + F17. Si no tienes mucho movimiento puedes dejarlos en la QGPL. Tambien se puede crear una biblioteca especifica para ello y asi controlar su tamaño, salvbado y borrado más facilmente. Saludos Martí Riera 2010/3/8 Javier Mora jm...@musgrave.es Hola a t...@s: Creía que no tenía activada la auditoría del sistema y he intentado cambiar unos valores con el siguiente mandato: CHGSECAUD QAUDCTL(*AUDLVL *NOQTEMP) QAUDLVL(*AUTFAIL *SEGURITY *SERVICE *PGMFAIL) JRNRCV(JRNLIB/AUDRCV0001) Antes de este cambio el valor del sistema QAUDLVL estaba a *NONE. Veo que ya ha cambiado a los nuevos valores, pero el receptor de diario no lo ha creado en la biblioteca JRNLIB. No tengo mucha experiencia con esto de los diarios, pero veo que QSYS/QAUDJRN tiene receptores en la biblioteca QGPL y, parece, que se están generando registros. ¿Cómo puede reenganchar el diario QAUDJRN con un nuevo receptor en la biblioteca JRNLIB? Un saludo y gracias por vuestros comentarios. Javier Mora © 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 © 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
RE: Diario de seguridad del sistema y receptores
Gracias Martí. ¿Debo parar la auditoría? Parece que no me hace mucho caso. Actualmente el diario QAUDJRN tiene conectado un receptor que está en la QGPL. Quiero que a partir de ahora estén en la biblioteca JRNLIB. Lo que hay en la QGPL no me interesa ni sé lo que hay. Estoy ejecutando a las bravas lo siguiente: CHGJRN JRN(QAUDJRN) JRNRCV(JRNLIB/AUDRCV0001) SEQOPT(*RESET) Pero no encuentra el receptor. La última vez que toqué algo de auditoría de seguridad fue hace más de un año y no recuerdo muy bien que hice. ¿Una ayudita? :-/ Javier Mora De: forum.help400-boun...@listas.combios.es [mailto:forum.help400-boun...@listas.combios.es] En nombre de Marti Riera Enviado el: lunes, 08 de marzo de 2010 14:02 Para: forum.help400 Asunto: Re: Diario de seguridad del sistema y receptores Hola Javier, Tenia una entrada pendiente de publicar en los proximos dias en mi blog y que he adelantado para ver si te puede servir de ayuda. Configurar seguridad del sistema http://as400howto.blogspot.com/2010/03/configurar-seguridad-del-sistema.html En cuanto a conectar los jrnrcv al diario de auditoria debes hacelo con CHGJRN JRN(QAUDJRN) JRNRCV(QGPL/QAUDJRN). Antes comprueba donde estan los receptores y en que biblioteca con WRKJRNA QAUDJRN + F17. Si no tienes mucho movimiento puedes dejarlos en la QGPL. Tambien se puede crear una biblioteca especifica para ello y asi controlar su tamaño, salvbado y borrado más facilmente. Saludos Martí Riera 2010/3/8 Javier Mora jm...@musgrave.es Hola a t...@s: Creía que no tenía activada la auditoría del sistema y he intentado cambiar unos valores con el siguiente mandato: CHGSECAUD QAUDCTL(*AUDLVL *NOQTEMP) QAUDLVL(*AUTFAIL *SEGURITY *SERVICE *PGMFAIL) JRNRCV(JRNLIB/AUDRCV0001) Antes de este cambio el valor del sistema QAUDLVL estaba a *NONE. Veo que ya ha cambiado a los nuevos valores, pero el receptor de diario no lo ha creado en la biblioteca JRNLIB. No tengo mucha experiencia con esto de los diarios, pero veo que QSYS/QAUDJRN tiene receptores en la biblioteca QGPL y, parece, que se están generando registros. ¿Cómo puede reenganchar el diario QAUDJRN con un nuevo receptor en la biblioteca JRNLIB? Un saludo y gracias por vuestros comentarios. Javier Mora © 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 © 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
RE: Diario de seguridad del sistema y receptores
Crea primero el receptor JRNLIB/AUDRCV0001 y luego ejecutas lo indicado. Slds. Anthony Gallegos C. Procesos de Medios de Pago Central: +51 1 213 1600 anx 5450 Cel: +51 1 980293038 / RPM: #767375 mail: agalle...@mc.com.pe para alcanzar algo que nunca has tenido, tendrás que hacer algo que nunca hiciste... La Voluntad de Dios no te llevará donde la Gracia de Dios no te proteja... De: forum.help400-boun...@listas.combios.es [mailto:forum.help400-boun...@listas.combios.es] En nombre de Javier Mora Enviado el: Lunes, 08 de Marzo de 2010 10:26 a.m. Para: forum.help400 Asunto: RE: Diario de seguridad del sistema y receptores Gracias Martí. ¿Debo parar la auditoría? Parece que no me hace mucho caso. Actualmente el diario QAUDJRN tiene conectado un receptor que está en la QGPL. Quiero que a partir de ahora estén en la biblioteca JRNLIB. Lo que hay en la QGPL no me interesa ni sé lo que hay. Estoy ejecutando a las bravas lo siguiente: CHGJRN JRN(QAUDJRN) JRNRCV(JRNLIB/AUDRCV0001) SEQOPT(*RESET) Pero no encuentra el receptor. La última vez que toqué algo de auditoría de seguridad fue hace más de un año y no recuerdo muy bien que hice. ¿Una ayudita? :-/ Javier Mora De: forum.help400-boun...@listas.combios.es [mailto:forum.help400-boun...@listas.combios.es] En nombre de Marti Riera Enviado el: lunes, 08 de marzo de 2010 14:02 Para: forum.help400 Asunto: Re: Diario de seguridad del sistema y receptores Hola Javier, Tenia una entrada pendiente de publicar en los proximos dias en mi blog y que he adelantado para ver si te puede servir de ayuda. Configurar seguridad del sistema http://as400howto.blogspot.com/2010/03/configurar-seguridad-del-sistema.html En cuanto a conectar los jrnrcv al diario de auditoria debes hacelo con CHGJRN JRN(QAUDJRN) JRNRCV(QGPL/QAUDJRN). Antes comprueba donde estan los receptores y en que biblioteca con WRKJRNA QAUDJRN + F17. Si no tienes mucho movimiento puedes dejarlos en la QGPL. Tambien se puede crear una biblioteca especifica para ello y asi controlar su tamaño, salvbado y borrado más facilmente. Saludos Martí Riera 2010/3/8 Javier Mora jm...@musgrave.es Hola a t...@s: Creía que no tenía activada la auditoría del sistema y he intentado cambiar unos valores con el siguiente mandato: CHGSECAUD QAUDCTL(*AUDLVL *NOQTEMP) QAUDLVL(*AUTFAIL *SEGURITY *SERVICE *PGMFAIL) JRNRCV(JRNLIB/AUDRCV0001) Antes de este cambio el valor del sistema QAUDLVL estaba a *NONE. Veo que ya ha cambiado a los nuevos valores, pero el receptor de diario no lo ha creado en la biblioteca JRNLIB. No tengo mucha experiencia con esto de los diarios, pero veo que QSYS/QAUDJRN tiene receptores en la biblioteca QGPL y, parece, que se están generando registros. ¿Cómo puede reenganchar el diario QAUDJRN con un nuevo receptor en la biblioteca JRNLIB? Un saludo y gracias por vuestros comentarios. Javier Mora © 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 © 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
Re: Programa ejemplo para trabajar con espacios de usuario
Gracias Javier y Marti por vuestra ayuda, voy a repasar los ejemplos para estudiarlos Un saludo El 8 de marzo de 2010 13:37, Marti Riera marti.ri...@gmail.com escribió: Hola Juan, Aqui tienes un ejemplo de la propia IBM: http://publib.boulder.ibm.com/infocenter/iseries/v5r4/index.jsp?topic=/apiref/apiexdelsp.htm Martí Riera 2010/3/8 JUAN García homeryb...@gmail.com Hola Quiero aprender a utilizarlos tanto en RPG como con APIS Un saludo El 8 de marzo de 2010 12:47, Javier Mora jm...@musgrave.es escribió: ¿Qué quieres hacer? ¿Aprender a utilizarlos para guardar tu propia información? ¿O para usarlos con APIs? Puedo pasarte algo, pero tengo que buscarlo. Un saludo. Javier Mora -- *De:* forum.help400-boun...@listas.combios.es [mailto: forum.help400-boun...@listas.combios.es] *En nombre de *JUAN García *Enviado el:* lunes, 08 de marzo de 2010 12:16 *Para:* forum. help400 *Asunto:* Programa ejemplo para trabajar con espacios de usuario Saludos ¿Alguien tiene un programa de ejemplo en RPG para trabajar con espacios de usuario? para recuperar y grabar datos Gracias © 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 © 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 © 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 © 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
RE: Diario de seguridad del sistema y receptores
OK. Gracias Anthony. Martí, reviso de vez en cuando tu blog pero no encuentro nada sobre manejo de diarios, receptores de diario, auditoría del sistema. En alguna ocasión creo que leí alguna entrada sobre estos temas, pero ahora no la encuentro. ¿Hay algo o lo he soñado? Un saludo. Javier Mora De: forum.help400-boun...@listas.combios.es [mailto:forum.help400-boun...@listas.combios.es] En nombre de Gallegos, Anthony Enviado el: lunes, 08 de marzo de 2010 17:03 Para: forum.help400 Asunto: RE: Diario de seguridad del sistema y receptores Crea primero el receptor JRNLIB/AUDRCV0001 y luego ejecutas lo indicado. Slds. Anthony Gallegos C. Procesos de Medios de Pago Central: +51 1 213 1600 anx 5450 Cel: +51 1 980293038 / RPM: #767375 mail: agalle...@mc.com.pe para alcanzar algo que nunca has tenido, tendrás que hacer algo que nunca hiciste... La Voluntad de Dios no te llevará donde la Gracia de Dios no te proteja... De: forum.help400-boun...@listas.combios.es [mailto:forum.help400-boun...@listas.combios.es] En nombre de Javier Mora Enviado el: Lunes, 08 de Marzo de 2010 10:26 a.m. Para: forum.help400 Asunto: RE: Diario de seguridad del sistema y receptores Gracias Martí. ¿Debo parar la auditoría? Parece que no me hace mucho caso. Actualmente el diario QAUDJRN tiene conectado un receptor que está en la QGPL. Quiero que a partir de ahora estén en la biblioteca JRNLIB. Lo que hay en la QGPL no me interesa ni sé lo que hay. Estoy ejecutando a las bravas lo siguiente: CHGJRN JRN(QAUDJRN) JRNRCV(JRNLIB/AUDRCV0001) SEQOPT(*RESET) Pero no encuentra el receptor. La última vez que toqué algo de auditoría de seguridad fue hace más de un año y no recuerdo muy bien que hice. ¿Una ayudita? :-/ Javier Mora De: forum.help400-boun...@listas.combios.es [mailto:forum.help400-boun...@listas.combios.es] En nombre de Marti Riera Enviado el: lunes, 08 de marzo de 2010 14:02 Para: forum.help400 Asunto: Re: Diario de seguridad del sistema y receptores Hola Javier, Tenia una entrada pendiente de publicar en los proximos dias en mi blog y que he adelantado para ver si te puede servir de ayuda. Configurar seguridad del sistema http://as400howto.blogspot.com/2010/03/configurar-seguridad-del-sistema.html En cuanto a conectar los jrnrcv al diario de auditoria debes hacelo con CHGJRN JRN(QAUDJRN) JRNRCV(QGPL/QAUDJRN). Antes comprueba donde estan los receptores y en que biblioteca con WRKJRNA QAUDJRN + F17. Si no tienes mucho movimiento puedes dejarlos en la QGPL. Tambien se puede crear una biblioteca especifica para ello y asi controlar su tamaño, salvbado y borrado más facilmente. Saludos Martí Riera 2010/3/8 Javier Mora jm...@musgrave.es Hola a t...@s: Creía que no tenía activada la auditoría del sistema y he intentado cambiar unos valores con el siguiente mandato: CHGSECAUD QAUDCTL(*AUDLVL *NOQTEMP) QAUDLVL(*AUTFAIL *SEGURITY *SERVICE *PGMFAIL) JRNRCV(JRNLIB/AUDRCV0001) Antes de este cambio el valor del sistema QAUDLVL estaba a *NONE. Veo que ya ha cambiado a los nuevos valores, pero el receptor de diario no lo ha creado en la biblioteca JRNLIB. No tengo mucha experiencia con esto de los diarios, pero veo que QSYS/QAUDJRN tiene receptores en la biblioteca QGPL y, parece, que se están generando registros. ¿Cómo puede reenganchar el diario QAUDJRN con un nuevo receptor en la biblioteca JRNLIB? Un saludo y gracias por vuestros comentarios. Javier Mora © 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 © 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
datamatrix
Hola buenas tardes; Quisiera saber si alguien de vosotros a trabajado en datamatrix. En las dds no hay suficiente variabilidad como para otros códigos tipo EAN, etc. ¿Prodria darle mas capacidad? por ejemplo con APIS, o con otras adaptaciones. Gracias Un saludo © 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
Activación de Trigger producto de un FTP
Hola foreros, Tengo un problema, sucede que adiciono registros a una tabla via FTP, el problema es que la tabla que recibe estos registros tiene activados unos trigger y en el FTP me da error 426, al usuario que utilizo para el FTP le adicioné una Job Description con la lista de librerias necesarias pero igual da error. Alguien tiene alguna idea para solucionar este asunto. Gracias, Helar Salas Supervisor de Programación Departamento de Sistemas INCALPACA TPX S.A. © 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
TERMNAL 3486
Hola a todos, tengo un terminal 3486 y estoy intentando conectar una impresora HP1100, he probado con distintas configuraciones tanto en el terminal como en el AS/400 pero no imprime. Sabría alguno de Vds. como puedo solucionarlo. Gracias de antemano Saludos attachment: Alejandro_Recio_-_Mensaque_P__rez.vcf © 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
Re: TERMNAL 3486
Hola, me supongo que estas conectando la impresora al terminal?, y para eso debes de configurarle una dirección mas para esa impresora... armensa...@servinform.es 03/08 1:02 p.m. Hola a todos, tengo un terminal 3486 y estoy intentando conectar una impresora HP1100, he probado con distintas configuraciones tanto en el terminal como en el AS/400 pero no imprime. Sabría alguno de Vds. como puedo solucionarlo. Gracias de antemano Saludos © 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
Re: Para mas que Isaurios desde Argentina
Espero que este enlace te puede servir. Lo único que no veo en el tutorial es una mención a que, una vez que se produce el matching, se activa el indicador genérico MR, con el que se pueden condicionar las sentencias de cálculo. http://www.jaymoseley.com/hercules/rpgtutor/rpg019.htm Saludos El 8 de marzo de 2010 12:15, Dpto.Informática Productos Climax(Jose Sánchez) informat...@productosclimax.com escribió: Pues será de Isaurios pero a veces va bien y en el proceso que tengo que modificar es perfecto el sistema de M1-M2. Gracias a todos *De:* forum.help400-boun...@listas.combios.es [mailto: forum.help400-boun...@listas.combios.es] *En nombre de *Jose Luis Da Silva *Enviado el:* lunes, 08 de marzo de 2010 11:58 *Para:* 'forum.help400' *Asunto:* Para mas que Isaurios desde Argentina FOREROS Buenos dias, Javier y Jose a mi me pasaba lo mismo hasta el año pasado trabaje en RPG II , luego RPG/400 y luego ILERPG. Peor el año pasado me toco entrar a trabajar en una empresa que tiene mas del 50 % de programas en S/36 y yo estoy tratando de Nativizar todo. O sea que trabajo ahora en los dos RPG400 y RPG 2, que se le va a hacer y les comento que en Argentina esta donde estoy no es la unica con Partes en S/36. Si bien son minimas. Saludos JOSE LUIS DA SILVA JARA -- *De:* forum.help400-boun...@listas.combios.es [mailto: forum.help400-boun...@listas.combios.es] *En nombre de *Javier Mora *Enviado el:* Lunes, 08 de Marzo de 2010 07:46 a.m. *Para:* forum.help400 *Asunto:* RE: Para mas que Isaurios No utilizo ese sistema desde el año 1989, cuando estudiaba RPG II en el S/36. -- *De:* forum.help400-boun...@listas.combios.es [mailto: forum.help400-boun...@listas.combios.es] *En nombre de *Dpto.Informática Productos Climax(Jose Sánchez) *Enviado el:* lunes, 08 de marzo de 2010 10:49 *Para:* forum.help400@listas.combios.es *Asunto:* Para mas que Isaurios Buenos días, ¿alguien tiene un ejemplo de lectura de primario y Secundario por M1 y M2 para comparar registros? Saludos** * * *José M. Sánchez** *** *Rble. Dpto. Informática** *** *Productos Climax, S.A * Pol. Ind. Sector Mollet C/A Nº 1 08150 - Parets del Valles (Barcelona) Tlf: 93 562 13 11 - Fax: 93 562 14 13 *Nota de Confidencialidad* Este mensaje se envía desde el sistema de correo electrónico de la empresa *Productos Climax, S.A.*. Podría contener por lo tanto secretos de empresa y otra información confidencial tutelados por las leyes de la Unión Europea y otros Estados. Si Vd. lo recibiera por error o sin ser una de las personas indicadas en el encabezamiento, deberá destruirlo sin copiarlo ni revelarlo o cualquier otra acción relacionada con el contenido del mensaje e informar inmediatamente por correo electrónico al emisor del mensaje. Las personas y entidades que violen sus deberes de confidencialidad podrán ser perseguidas ante los Tribunales de Justicia al amparo de la legislación civil, penal y administrativa nacional e internacional. Gracias por su colaboración. *Política de Privacidad* En base a la Ley 34/2002 de Servicios de la Sociedad de la Información y de Comercio Electrónico (LSSICE), en vigor desde el 12 de octubre de 2002 y de la Ley Orgánica 15/1999 del 13/12/1999 de Protección de Datos Personales, le comunicamos que su dirección de correo electrónico forma parte de nuestro fichero automatizado, al objeto de continuar enviándole ofertas de nuestros servicios y / o el mantenimiento de las comunicaciones en nuestras relaciones contractuales. En virtud de las Leyes antes mencionadas, tiene derecho de oposición, acceso, rectificación y cancelación de sus datos. Le recordamos que sus datos nunca son suministrados a terceros bajo ningún concepto, siendo únicamente utilizados para el envío de nuestras comunicaciones con Vd. © 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 © 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
Re: Para mas que Isaurios desde Argentina
¡Vaya! Olvidé adjuntar lo más importante... http://www.jaymoseley.com/hercules/rpgtutor/rpg018.htm El 8 de marzo de 2010 20:32, Miguel A. Aragonés mangel.arago...@gmail.comescribió: Espero que este enlace te puede servir. Lo único que no veo en el tutorial es una mención a que, una vez que se produce el matching, se activa el indicador genérico MR, con el que se pueden condicionar las sentencias de cálculo. http://www.jaymoseley.com/hercules/rpgtutor/rpg019.htm Saludos El 8 de marzo de 2010 12:15, Dpto.Informática Productos Climax(Jose Sánchez) informat...@productosclimax.com escribió: Pues será de Isaurios pero a veces va bien y en el proceso que tengo que modificar es perfecto el sistema de M1-M2. Gracias a todos *De:* forum.help400-boun...@listas.combios.es [mailto: forum.help400-boun...@listas.combios.es] *En nombre de *Jose Luis Da Silva *Enviado el:* lunes, 08 de marzo de 2010 11:58 *Para:* 'forum.help400' *Asunto:* Para mas que Isaurios desde Argentina FOREROS Buenos dias, Javier y Jose a mi me pasaba lo mismo hasta el año pasado trabaje en RPG II , luego RPG/400 y luego ILERPG. Peor el año pasado me toco entrar a trabajar en una empresa que tiene mas del 50 % de programas en S/36 y yo estoy tratando de Nativizar todo. O sea que trabajo ahora en los dos RPG400 y RPG 2, que se le va a hacer y les comento que en Argentina esta donde estoy no es la unica con Partes en S/36. Si bien son minimas. Saludos JOSE LUIS DA SILVA JARA -- *De:* forum.help400-boun...@listas.combios.es [mailto: forum.help400-boun...@listas.combios.es] *En nombre de *Javier Mora *Enviado el:* Lunes, 08 de Marzo de 2010 07:46 a.m. *Para:* forum.help400 *Asunto:* RE: Para mas que Isaurios No utilizo ese sistema desde el año 1989, cuando estudiaba RPG II en el S/36. -- *De:* forum.help400-boun...@listas.combios.es [mailto: forum.help400-boun...@listas.combios.es] *En nombre de *Dpto.Informática Productos Climax(Jose Sánchez) *Enviado el:* lunes, 08 de marzo de 2010 10:49 *Para:* forum.help400@listas.combios.es *Asunto:* Para mas que Isaurios Buenos días, ¿alguien tiene un ejemplo de lectura de primario y Secundario por M1 y M2 para comparar registros? Saludos** * * *José M. Sánchez** *** *Rble. Dpto. Informática** *** *Productos Climax, S.A * Pol. Ind. Sector Mollet C/A Nº 1 08150 - Parets del Valles (Barcelona) Tlf: 93 562 13 11 - Fax: 93 562 14 13 *Nota de Confidencialidad* Este mensaje se envía desde el sistema de correo electrónico de la empresa *Productos Climax, S.A.*. Podría contener por lo tanto secretos de empresa y otra información confidencial tutelados por las leyes de la Unión Europea y otros Estados. Si Vd. lo recibiera por error o sin ser una de las personas indicadas en el encabezamiento, deberá destruirlo sin copiarlo ni revelarlo o cualquier otra acción relacionada con el contenido del mensaje e informar inmediatamente por correo electrónico al emisor del mensaje. Las personas y entidades que violen sus deberes de confidencialidad podrán ser perseguidas ante los Tribunales de Justicia al amparo de la legislación civil, penal y administrativa nacional e internacional. Gracias por su colaboración. *Política de Privacidad* En base a la Ley 34/2002 de Servicios de la Sociedad de la Información y de Comercio Electrónico (LSSICE), en vigor desde el 12 de octubre de 2002 y de la Ley Orgánica 15/1999 del 13/12/1999 de Protección de Datos Personales, le comunicamos que su dirección de correo electrónico forma parte de nuestro fichero automatizado, al objeto de continuar enviándole ofertas de nuestros servicios y / o el mantenimiento de las comunicaciones en nuestras relaciones contractuales. En virtud de las Leyes antes mencionadas, tiene derecho de oposición, acceso, rectificación y cancelación de sus datos. Le recordamos que sus datos nunca son suministrados a terceros bajo ningún concepto, siendo únicamente utilizados para el envío de nuestras comunicaciones con Vd. © 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 © 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
Por favor una de SQL
Requiero actualizar una columna de un archivo, pero basandome en dos archivos mas. tabla uno T1 NOPRODUTO NOMBRECLIENTE (se requiere actualizar este campo) tabla dos T2 En esta tabla el id del cliente puede estar n veces, de acuerdo a la cantidad de productos que tenga. NOPRODUCTO IDCLIENTE tabla tres T3 IDCLIENTE NOMBRECLIENTE. con el campo NOMBRECLIENTE de T3 se requiere actualizar el NOMBRECLIENTE de T1 He realizado las sentencias sql que mis conocimientos me dan, pero nada. Alguna idea, gracias de antemano © 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
Re: Diario de seguridad del sistema y receptores
Hola, Lo que te ha dicho Anthony es lo correcto. Si hay cosas publicadas en el blog sobre diarios usa la busqueda: http://www.google.com/cse?cx=003574383753491028375%3Apcqqjsifzx0ie=UTF-8q=diariosa=Buscarsiteurl=as400howto.blogspot.com%2F Saludos Martí Riera 2010/3/8 Javier Mora jm...@musgrave.es OK. Gracias Anthony. Martí, reviso de vez en cuando tu blog pero no encuentro nada sobre manejo de diarios, receptores de diario, auditoría del sistema. En alguna ocasión creo que leí alguna entrada sobre estos temas, pero ahora no la encuentro. ¿Hay algo o lo he soñado? Un saludo. Javier Mora -- *De:* forum.help400-boun...@listas.combios.es [mailto: forum.help400-boun...@listas.combios.es] *En nombre de *Gallegos, Anthony *Enviado el:* lunes, 08 de marzo de 2010 17:03 *Para:* forum.help400 *Asunto:* RE: Diario de seguridad del sistema y receptores Crea primero el receptor JRNLIB/AUDRCV0001 y luego ejecutas lo indicado. Slds. Anthony Gallegos C. Procesos de Medios de Pago Central: +51 1 213 1600 anx 5450 Cel: +51 1 980293038 / RPM: #767375 mail: agalle...@mc.com.pe ** *para alcanzar algo que nunca has tenido, tendrás que hacer algo que nunca hiciste... La Voluntad de Dios no te llevará donde la Gracia de Dios no te proteja...* -- *De:* forum.help400-boun...@listas.combios.es [mailto: forum.help400-boun...@listas.combios.es] *En nombre de *Javier Mora *Enviado el:* Lunes, 08 de Marzo de 2010 10:26 a.m. *Para:* forum.help400 *Asunto:* RE: Diario de seguridad del sistema y receptores Gracias Martí. ¿Debo parar la auditoría? Parece que no me hace mucho caso. Actualmente el diario QAUDJRN tiene conectado un receptor que está en la QGPL. Quiero que a partir de ahora estén en la biblioteca JRNLIB. Lo que hay en la QGPL no me interesa ni sé lo que hay. Estoy ejecutando a las bravas lo siguiente: CHGJRN JRN(QAUDJRN) JRNRCV(JRNLIB/AUDRCV0001) SEQOPT(*RESET) Pero no encuentra el receptor. La última vez que toqué algo de auditoría de seguridad fue hace más de un año y no recuerdo muy bien que hice. ¿Una ayudita? :-/ Javier Mora -- *De:* forum.help400-boun...@listas.combios.es [mailto: forum.help400-boun...@listas.combios.es] *En nombre de *Marti Riera *Enviado el:* lunes, 08 de marzo de 2010 14:02 *Para:* forum.help400 *Asunto:* Re: Diario de seguridad del sistema y receptores Hola Javier, Tenia una entrada pendiente de publicar en los proximos dias en mi blog y que he adelantado para ver si te puede servir de ayuda. Configurar seguridad del sistemahttp://as400howto.blogspot.com/2010/03/configurar-seguridad-del-sistema.html En cuanto a conectar los jrnrcv al diario de auditoria debes hacelo con CHGJRN JRN(QAUDJRN) JRNRCV(QGPL/QAUDJRN). Antes comprueba donde estan los receptores y en que biblioteca con WRKJRNA QAUDJRN + F17. Si no tienes mucho movimiento puedes dejarlos en la QGPL. Tambien se puede crear una biblioteca especifica para ello y asi controlar su tamaño, salvbado y borrado más facilmente. Saludos Martí Riera 2010/3/8 Javier Mora jm...@musgrave.es Hola a t...@s: Creía que no tenía activada la auditoría del sistema y he intentado cambiar unos valores con el siguiente mandato: CHGSECAUD QAUDCTL(*AUDLVL *NOQTEMP) QAUDLVL(*AUTFAIL *SEGURITY *SERVICE *PGMFAIL) JRNRCV(JRNLIB/AUDRCV0001) Antes de este cambio el valor del sistema QAUDLVL estaba a *NONE. Veo que ya ha cambiado a los nuevos valores, pero el receptor de diario no lo ha creado en la biblioteca JRNLIB. No tengo mucha experiencia con esto de los diarios, pero veo que QSYS/QAUDJRN tiene receptores en la biblioteca QGPL y, parece, que se están generando registros. ¿Cómo puede reenganchar el diario QAUDJRN con un nuevo receptor en la biblioteca JRNLIB? Un saludo y gracias por vuestros comentarios. Javier Mora © 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 © 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 © 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
RE: Por favor una de SQL
Yo no veo como hacerlo con SQL, ya que, según veo en la estructura del archivo, al relacionar la tabla T2 con la tabla T3, te puede dar mas de un nombre de cliente, ya que un producto puede estar relacionado con varios clientes, por lo tanto, dicha sentencia te regresaría mas de una fila, y entonces, si lo hicieras manual, que nombre de cliente le pondrías al producto?, el primero?, el ultimo?. Es discrecional, y por lo menos en la version 5.2, no se puede utilizar el fetch first 1 row Orly en sub sentencias (No se si en otras versiones lo soporta). Si solo existiera la relación de un producto = un cliente, la sentencia quedaría de la siguiente manera sin lo que esta en rojo: update t1 set nombrecliente = ( select distinct t3.nombrecliente from t2 inner join t3 on t2.idcliente = t3.idcliente where t1.noproducto = t2.noproducto fetch first 1 rows only) where (select distinct t3.nombrecliente from t2 inner join t3 on t2.idcliente = t3.idcliente where t1.noproducto = t2.noproducto) is not null (Lo rojo lo puse solo por si lo soporta tu version de AS) El where con la sub sentencia lo usaría en caso de que no encuentre la relación producto cliente, por lo cual la sentencia regresaría un valor nulo. Si esto no te sirve, espero que alguien mas sepa la forma de resolverlo en SQL, así aprendemos los dos. Saludos. _ From: forum.help400-boun...@listas.combios.es [mailto:forum.help400-boun...@listas.combios.es] On Behalf Of Jaime Villa Torres Sent: Lunes, 08 de Marzo de 2010 04:45 p.m. To: forum.help400 Subject: Por favor una de SQL Importance: High Requiero actualizar una columna de un archivo, pero basandome en dos archivos mas. tabla uno T1 NOPRODUTO NOMBRECLIENTE (se requiere actualizar este campo) tabla dos T2 En esta tabla el id del cliente puede estar n veces, de acuerdo a la cantidad de productos que tenga. NOPRODUCTO IDCLIENTE tabla tres T3 IDCLIENTE NOMBRECLIENTE. con el campo NOMBRECLIENTE de T3 se requiere actualizar el NOMBRECLIENTE de T1 He realizado las sentencias sql que mis conocimientos me dan, pero nada. Alguna idea, gracias de antemano © 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
RE: Por favor una de SQL
Prueba con esto: Update T1 set T1.NOMBRECLIENTE = (select max(T3.NOMBRECLIENTE) from T2 inner join T3 on T2.IDCLIENTE=T3.IDCLIENTE where T1.NOPRODUCTO=T2.NOPRODUCTO) Where exists (select * from T2 inner join T3 on T2.IDCLIENTE=T3.IDCLIENTE where T1.NOPRODUCTO=T2.NOPRODUCTO) El problema es que si tienes asociado un producto a más de 1 cliente, te actualizará con uno de ellos (con el que tenga el valor mayor en el campo NOMBRECLIENTE, porque he puesto max). Si un producto sólo tiene un cliente, creo que lo hará bien. Saludos De: forum.help400-boun...@listas.combios.es [mailto:forum.help400-boun...@listas.combios.es] En nombre de Jaime Villa Torres Enviado el: lunes, 08 de marzo de 2010 23:45 Para: forum.help400 Asunto: Por favor una de SQL Importancia: Alta Requiero actualizar una columna de un archivo, pero basandome en dos archivos mas. tabla uno T1 NOPRODUTO NOMBRECLIENTE (se requiere actualizar este campo) tabla dos T2 En esta tabla el id del cliente puede estar n veces, de acuerdo a la cantidad de productos que tenga. NOPRODUCTO IDCLIENTE tabla tres T3 IDCLIENTE NOMBRECLIENTE. con el campo NOMBRECLIENTE de T3 se requiere actualizar el NOMBRECLIENTE de T1 He realizado las sentencias sql que mis conocimientos me dan, pero nada. Alguna idea, gracias de antemano __ Sus datos personales serán incorporados a un fichero de MUTUA BALEAR para que pueda ponerse en contacto con usted y realizar comunicaciones por cuestiones derivadas de su actividad. Para el ejercicio de sus derechos de acceso, rectificación, cancelación y oposición puede dirigirse por escrito a MUTUA BALEAR, Mutua de Accidentes de Trabajo y Enfermedades Profesionales de la Seguridad social número 183, c/ Bisbe Campins, 4 de Palma de Mallorca. Este mensaje y sus documentos adjuntos son confidenciales. Si usted no es el destinatario, por favor póngalo en conocimiento del remitente y elimine esta comunicación y los documentos adjuntos de su sistema, sin reproducir ni comunicar sus contenidos. La transmisión de correo electrónico no garantiza que sea seguro o libre de error, por lo que declinamos cualquier responsabilidad al respecto. © 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