RE: Enviar listado de AS400 a Officce, Adobe,...

[Juan Carlos Sevilla]

Hola:
Enhorabuena.
Aparte puede ser util si hay documentacion en una Web y no deseas 
imprimirlo, pero si guardartelo en pdf. Es decir, lo mandas a imprimir por la 
impresora CutePDF y tienes un pdf.
Un Saludo



De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En nombre de Matilde Vedia 
Molina
Enviado el: viernes, 17 de noviembre de 2006 16:00
Para: Forum.help400
Asunto: Enviar listado de AS400 a Officce, Adobe,...


Muchas gracias a todos por vuestras respuestas. Por fin lo hemos conseguido con 
CutePDF
 
Saludos 
Matilde Vedia Molina

Departamento Informática
Flexol España S.L.

__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

RE: [SPAM] Re: RE: [SPAM] Ejecutar trabajos planificados en clp sin wrkjobscde

[Juan Carlos Sevilla]

Hola:
  Me imagino que lo que andas buscando es por ejemplo, saber en que fichero 
del sistema se guarda dichos trabajos planificados. Entonces poder leerlo y 
someterlos. ¿no?. O tal vez a traves de un API.
  Lo que está claro es que en algun sitio debe de estar guardado dichas 
entradas.
 
Un Saludo, y a ver si alguien lo dice
 



De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En nombre de [EMAIL PROTECTED]
Enviado el: jueves, 16 de noviembre de 2006 17:03
Para: forum.help400@combios.es
Asunto: [SPAM] Re: RE: [SPAM] Ejecutar trabajos planificados en clp sin 
wrkjobscde


Es un clp que utilizo para arrancar todos los trabajos que tienen que correr en 
el sistema cuando hago ipl o en cualquier otro momento, tanto programas como 
subsistemas. Yo llamo directamente al programa con los parámetros que me dieron 
por defecto. Mis amigos de desarrollo lo cuelgan los trabajos en los trabajos 
planificados retenidos y cuando hace falta solamente sería someterlo 
inmediatamente con la opción 10 y ya está, pero son muchos lo trabajos y están 
mezclados con otros trabajos diarios y esto hace que sea un poco engorroso.
 
Como he dicho anteriormente mis amigos de desarrollo,  cuando hacen 
modificaciones de cualquier tipo que sea, jobd, parámetros nuevos,etc , como 
norma me lo tienen que comunicar,  pero cuando tienes que utilizarlos siempre 
hay algún programa que falla por lo mismo  que se les ha olvidado comunicarlo.
 
Por esto,  si hubiera alguna api o cualquier otra idea que pudiera ejecutar 
inmediatamente los trabajos planificados desde un clp me olvidaría si me hacen 
cambios.

Un saludo.

Félix




Félix Clemente González
Área de Sistemas
Sistemas y Comunicaciones
Real Automóvil Club de España
Tlf.: 91594-7433
[EMAIL PROTECTED]
www.race.es


[EMAIL PROTECTED] escribió: -



Para: 
De: "Javier Mora" <[EMAIL PROTECTED]>
Enviado por: [EMAIL PROTECTED]
Fecha: 16/11/2006 16h15
Asunto: RE: [SPAM] Ejecutar trabajos planificados en clp sin wrkjobscde


Hola Félix: 

¿Por qué no ejecutas directamente los programas en el CL? 




De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En nombre de 
[EMAIL PROTECTED] 
Enviado el: jueves, 16 de noviembre de 2006 12:54 
Para: forum.help400@combios.es 
Asunto: [SPAM] Ejecutar trabajos planificados en clp sin 
wrkjobscde 



Hola a todos. 
 
Necesito ejecutar en un CLP uno o varios trabajos que tengo 
planificado con WRKJOBSCDE  sin tener que utilizar el mismo con la opción 10 de 
someter inmediatamente. 
 
En los trabajos que tengo planificados los parámetros pueden 
cambiar de un día para otro. 
 
Con los  comandos CHGJOBSCDE, RLSJOBSCDE no me da la opción 
para que se ejecute inmediatamente. 
 
La pregunta es.:  

¿ Puedo de alguna forma, utilizar en un CLP los 
trabajos planificados para que se ejecuten inmediatamente ? 
 
Muchas gracias adelantadas. 

Un saludo. 

Félix 




Félix Clemente González 
Área de Sistemas 
Sistemas y Comunicaciones 
Real Automóvil Club de España 
Tlf.: 91594-7433 
[EMAIL PROTECTED] 
www.race.es  



=

RE: Enviar listado de AS400 a Officce, Adobe,...

[Juan Carlos Sevilla]

Hola:
    Utilizando la impresora AdobePDF que viene con 
el Acrobat Adobe Profesional, si haces una emulacion 5250 hacia esa impresora 
funciona.
    Tambien funciona con la impresora del 
CutePdf (gratuito)
Un Saludo.


De: [EMAIL PROTECTED] 
[mailto:[EMAIL PROTECTED] En nombre de Matilde Vedia 
MolinaEnviado el: martes, 14 de noviembre de 2006 
12:54Para: Forum.help400Asunto: Enviar listado de AS400 a 
Officce, Adobe,... 

¿Alguien sabe si se puede convertir un listado 
hecho con AS400 a formato PDF o cualquier otro formato, para visualizar en 
entorno Windows? Agradezco cualquier sugerencia. 
 
Hasta ahora, lo que hago es crear un archivo de 
trabajo con un QRY y lo transfiero al PC, pero eso no es 
agil.   
 
Gracias por anticipado
 
Matilde Vedia MolinaDepartamento InformáticaFlexol España 
S.L.

RE: Pre-formato en color

[Juan Carlos Sevilla]

Title: Pre-formato en color



HOLA:
    
Funciona a partir de la V5R1 y en el 
dispositivo tienes que poner:
   
Cambiar descr disp (Impresora) (CHGDEVPRT) 
  
 Teclee elecciones, pulse 
Intro.  
  
 Información de publicación:  
PUBLISHINF  
   Admite dúplex  . . . . . . . 
.    
*UNKNOWN    Admite color . . . . . . . . 
.    
*UNKNOWN *SAME    
   
*NOCOLOR 
   
*COLOR   
   
*UNKNOWN    Páginas por minuto en negro  
.    
*UNKNOWN    
Páginas por minuto en color  
.    
*UNKNOWN    
Ubicación  . . . . . . . . . 
.    
*BLANK   



De: [EMAIL PROTECTED] 
[mailto:[EMAIL PROTECTED] En nombre de PacoEnviado 
el: miércoles, 08 de noviembre de 2006 12:32Para: 
forum.help400@combios.esAsunto: RE: Pre-formato en 
color


Prueba con esta IBM AFP 
300.
 

Saludos 
Paco Medina
Exclusivas Camacho, 
S.Ltda.
Dtor.Informatica
 




De: 
[EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En nombre de Juan Carlos 
ParedesEnviado el: miércoles, 
08 de noviembre de 2006 12:20Para: Forum Help 400Asunto: Pre-formato en 
color
 
Buenos días, foro: 

¿Alguien sabe qué impresora AFP debo 
instarlar en el PC para crear pre-formatos en color? Estoy utilizando 
la IBM AFP600 y, 
aunque el word desde el que lo genero tiene color, al convertirlo en preformato 
me lo pierde.
Gracias y saludos. 

Juan Carlos. 

RE: Permisos al crear sesiones de trabajo Client Acces

[Juan Carlos Sevilla]

Hola:
    En la Ayuda 
dice...
QCRTAUT 
    Autorización de 
creación.  Especifica la autorización de 
uso        público por 
omisión utilizada cuando se crean objetos en 
una        
biblioteca.  Cuando el valor *LIBCRTAUT de la palabra clave AUT de  
    un mandato crear objeto se utiliza para establecer una 
autorización     de uso público para un objeto, el valor 
CRTAUT de la biblioteca     donde se 
está creando el objeto determina qué autorización de uso   
    público se utilizará para el objeto.  Si el valor 
CRTAUT de la      biblioteca 
está establecido a *SYSVAL, el valor especificado en el  
    valor del sistema QCRTAUT se utiliza para establecer 
la 
    autorización pública para el objeto que se está 
creando.    
    El cambio del valor del 
sistema QCRTAUT a un valor más restrictivo      como 
*USE o *EXCLUDE limita el acceso de los nuevos 
objetos     
creados.  Puede ser necesario que el propietario de los objetos 
o       el responsable de seguridad tenga que 
otorgar autorización  
    adicional antes de que el objeto pueda utilizarse.  
Un ejemplo de       este caso sería la conexión de 
un dispositivo que acaba de crearse.     Cuando el 
dispositivo se crea por el mandato CRTDEVDSP o por. . 
.    

 
Un Saludo!p.d.: Hay que 
utilizar de vez en cuando el F1, F2..F20... :-)


De: [EMAIL PROTECTED] 
[mailto:[EMAIL PROTECTED] En nombre de 
[EMAIL PROTECTED]Enviado el: martes, 24 de octubre de 2006 
10:44Para: forum.help400@combios.esAsunto: Re: Permisos al 
crear sesiones de trabajo Client Acces
Tengo *EXCLUDE Pero ¿Esto será para los permisos de *PUBLIC? ¿no? 
En teoría, creo, al crear la cola debería 
de poner:         
*PUBLIC *Exclude       
  USUARIO  *ALL Saludos. 

  
  
[EMAIL PROTECTED] Enviado por: [EMAIL PROTECTED] 
  24/10/2006 09:39 
  


  
Por favor, responda 
aforum.help400@combios.es

  


  
Para
  forum.help400@combios.es 

  
cc
  

  
Asunto
  Re: Permisos al crear sesiones de 
trabajo Client Acces
  


  
  Hola que tienes en el valor del sistema QCRTAUT 
    Un 
saludo JMP 

  
  
"alex martinez" 
  <[EMAIL PROTECTED]> Enviado por: 
  [EMAIL PROTECTED] 
  24/10/2006 07:59 
  
  


  
Por favor, responda 
aforum.help400@combios.es
  

  


  
Para
  forum.help400@combios.es 

  
cc
  

  
Asunto
  Re: Permisos al crear sesiones de 
trabajo Client Acces
  


  
  ¿puedes dar algun dato más?¿algun log en el sistema? 
¿version? ¿nivel de ptfs? ¿Te sucede con todos los usuarios o con los de clase 
*SECOFR o *SYSOPR sí te funciona ?El día 23/10/06, [EMAIL PROTECTED] <[EMAIL PROTECTED]> escribió: 
Buenos días, 
tengo un problema, al crear una 
sesion nueva, crea un nuevo dispositivo "xxx", y para esta pantalla le crea su 
cola de mensajes.  Pero al usuario que a abierto la sesión y creado el 
dispositivo no le da autorización para la cola de mensajes. 
¿Alguien sabe porque? Gracias. 
-- Mi blog sobre as400http://www.ajut400.com 


L'integrite 
de ce message et des pieces jointes n'etant pas assuree sur Internet, 
Geodisou une de ses filiales ne peuvent etre tenus responsables de son 
contenu. Toute utilisationou diffusion non autorisee est interdite. Si vous 
n'etes pas destinataire de ce message,merci de le detruire et d'en avertir 
l'expediteur.The integrity of this message and its attachments cannot be 
guaranteed on the Internet.Geodis or one of its subsidiaries can not 
therefore be considered responsible for thecontents. Any unauthorized use or 
dissemination is prohibited. If you are not the intendedrecipient of this 
message, please destroy it and notify the 
sender. 

RE: Webfacing error de compilacion

[Juan Carlos Sevilla]

Hola:
Me imagino que te ocurre lo mismo que al entrar por la opc. 17 del pdm 
al dspf no encuentra el fichero donde estan referenciados los campos de 
pantalla.
Pienso que habria que ver en el Webfacing donde se pone la lista de 
bibliotecas y añadir dicha biblioteca.
Otra solucion, sería en la misma biblioteca donde esta las pantallas 
tener los ficheros donde estan referenciados los campos de la pantalla

Un Saludo! 

-Mensaje original-
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En nombre de Pablo Sanchez 
Marquez
Enviado el: jueves, 19 de octubre de 2006 9:49
Para: FORUM HELP400
Asunto: Webfacing error de compilacion

Hola foro:

Estamos haciendo pruebas compilando pantallas DSPF para  convertirlas con 
Webfacing y en algunas nos da error por contener el fuente de patalla campos 
referenciados a la base de datos.
Si quitamos esa referencia, compila bien.

¿Existe alguna forma de que compile a Webfacing sin tocar el fuente DSPF?.

Saludos,

-- 
Pablo Sánchez Márquez   

(Dpto.Administración)

FABRICANTES LINEA BLANCA, S.A.

=
 - AVISO LEGAL  -

La presente comunicación y sus anexos  tiene como destinatario la 
persona a la que

le va dirigida, por lo que si usted lo recibe por error debe notificarlo al 
remitente y

eliminarlo de su sistema, no pudiendo utilizarlo, total o parcialmente, para 
ningún fin.

Su contenido puede tener información confidencial o protegida legalmente y 
únicamente

expresa la opinión del remitente. El uso del correo electrónico vía Internet no 
permite 

asegurar ni la confidencialidad de los mensajes ni su correcta recepción. En el 
caso de 

que el destinatario no consintiera la utilización del correo electrónico, 
deberá ponerlo en 

nuestro conocimiento inmediatamente.

=



__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados 
http://www.help400.es _

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

RE: Transferencia de ficheros

[Juan Carlos Sevilla]

Hola!
    Comprueba la version del CA/400 (en 
Ayuda...acerca de...). Te lo comento por si en ese PC tenias instalado el 
Personal Communicator, se te habrá quedado las emulaciones. ello significa que 
los .ttos se ejecutan con otro programa(PCSAFT.DLL).
    La pantalla que 
te aparece es como:

 
    Un Saludo!


De: [EMAIL PROTECTED] 
[mailto:[EMAIL PROTECTED] En nombre de 
AdministracióEnviado el: jueves, 19 de octubre de 2006 
8:31Para: forum.help400@combios.esAsunto: Transferencia de 
ficheros

Buenos días,
 
Estoy automatizando unas transferencias. He creado 
un fichero .BAT que ejecuta el .TTO y posteriormente abre un fichero de Excel. 
En todos los equipos tengo instalado el Client Access Express. Allí donde tengo 
WXP o W98 me funciona sin problemas, pero en un equipo tengo W2000 y ahí no 
funciona. Lo que está fallando es la definición de la transferencia (TTO) que no 
la reconoce. Si ejecuto la transferencia desde la pantalla de Client Access, la 
pantalla que aparece no se parece en nada a la del resto de equipos. He 
reinstalado C.A.Express y sigue igual. ¿Se os ocurre como lo puedo 
solucionar?.
 
Gracias de antemano,
 
Albert Ortiz Biarge-- Este 
mensaje ha sido analizado por MailScanner en busca de virus 
y otros contenidos peligrosos, y se considera que está LIMPIO. 

RE: Servidores vinculados SQL

[Juan Carlos Sevilla]

Hola!
    Yo lo hice dentro del SQL Server a traves 
de:
    
DTS (Servicios de Transformación de Datos) en SQL 
Server
    Tan solo es necesario tener instalado el ODBC del 
CA/400
Un Saludo!


De: [EMAIL PROTECTED] 
[mailto:[EMAIL PROTECTED] En nombre de Oriol Pegueroles 
CasesEnviado el: martes, 17 de octubre de 2006 12:51Para: 
forum.help400@combios.esAsunto: Servidores vinculados 
SQL


 
 
Buenos 
dias,
 
Alguno de Uds. Ha vinculado tablas 
del AS400 con un Sql Server (servidores vinculados) 
¿?
 
 
He estado probando y no acabo de 
conseguir que me funcione. 
 
Como mucho he conseguido acceder a 
una sola biblioteca (la del usuario de conexión) 
Para ello, he definido como origen 
de datos la direccion ip del as400, y aunque he probado con 
/qsys.lib/biblioteca.lib, /biblioteca.lib, etc. en cadena del proveedor, no he 
conseguido nada (me da error en conexión). También he probado poniendo el nombre 
del as400 en origen de datos y nada.
 
Podriais indicarme como realizar 
esta conexión ¿?
 
 
Gracias.
 
 
 

RE: Usuario inhabilitado

[Juan Carlos Sevilla]

Hola:
    A priori pienso en 2 motivos
    1) Numero de intentos (mira por 
DSPLOG)
    2) mira por GO SECTOOLS (mira si tiene 
horarios)
 
Un Saludo


De: [EMAIL PROTECTED] 
[mailto:[EMAIL PROTECTED] En nombre de Paco 
SanchisEnviado el: jueves, 21 de septiembre de 2006 
19:17Para: forum.help400@combios.esAsunto: Usuario 
inhabilitado
Hola a todos, desde hace un mes el 
usuario que tengo en el AS400 se inhabilita solo. Tengo que entrar con otro 
usuario y volver a habilitarlo. No me aparece ningún mensaje ni en las 
anotaciones históricas aparece nada referente a este usuario. ¿Podéis darme 
alguna pista para solucionar este problema? Un saludo Paco

prueba: recibir msg. desde web

[Juan Carlos Sevilla]

un 
saludo.
 
Juan Carlos Sevilla Martínez. 
-  Departamento Técnico  
- ASOIN.21, S.L. 
C/ Doctor Sumsi, 9 y 11 
Tlf.: 96 335 40 04. Fax: 96 335 56 38 mailto:[EMAIL PROTECTED] 
  
 

prueba..

[Juan Carlos Sevilla]

es de prueba desde 
la web
 
Juan Carlos Sevilla Martínez. 
-  Departamento Técnico  
- ASOIN.21, S.L. 
C/ Doctor Sumsi, 9 y 11 
Tlf.: 96 335 40 04. Fax: 96 335 56 38 mailto:[EMAIL PROTECTED] 
  
 

RE: [SPAM] Terminar sesiones de usuario a una hora determinada

[Juan Carlos Sevilla]

HOLA:
    Que yo sepa, esta es una "deficiencia" que tiene 
el AS/400 versus Windows Server, referente a la Administracion de Usuarios con 
programacion de horarios.
    Lo unico que se me ocurre es controlarlo 
mediante programacion:
    1. Diseñar Fichero que 
contenga
    
* Usuario
* 
Hora Inicial
* 
Hora Final
2. En el perfil de usuario engancharle un programa que recupere el 
usuario (RTVJOBA) y acceda a la tabla y si esta fuera de horario haga 
SIGNOFF.

un saludo
 


De: [EMAIL PROTECTED] 
[mailto:[EMAIL PROTECTED] En nombre de Oscar 
TorreroEnviado el: jueves, 14 de septiembre de 2006 
9:36Para: forum.help400@combios.esAsunto: [SPAM] Terminar 
sesiones de usuario a una hora determinada


Hola a 
todos.
 
Me gustaría saber si se puede 
indicar al sistema, de una manera más o menos sencilla, que un usuario no inicie 
sesión a partir de una hora determinada y si ya está conectado que lo 
desconecte. 
 
Saludos.
Oscar Torrero. [EMAIL PROTECTED]
Serviplem, 
S.A.
 

RE: Contraseña

[Juan Carlos Sevilla]

Hola:
    En versiones anteriores a V5R1, puedes 
cambiar:
CHGSYSVAL SYSVAL(QSECURITY) VALUE('10')
    Es decir:
Valor sistema  . . . . :   
QSECURITY   
Descripción  . . . . . :   Nivel de seguridad del 
sistema  
   
   
Nivel seguridad sistema  . . :   10  10=Solamente 
seguridad física (sin contraseñas)

Esto surte efecto despues de 
hacer IPL (si no recuerdo mal).
Incovenientes: Que un mismo 
usuario, sin querer te habra más de un perfil (ej: ANTONIO, ANTON, 
ANTONI--> aunque se equivoque el AS/400 creará nuevos usuarios). 

    Es un paso muy importante el cambiar el nivel de 
seguridad.
    

    A partir de seguridad (20) el minimo para una 
contraseña es de 1 caracter
 
Un Saludo
   



De: [EMAIL PROTECTED] 
[mailto:[EMAIL PROTECTED] En nombre de Emma 
BedoyaEnviado el: miércoles, 13 de septiembre de 2006 
17:54Para: ForoAsunto: Contraseña

Buenas tardes.
 
¿Hay alguna manera de que un usuario no tenga 
contraseña? Al crear el usuario he puesto contraseña *none pero no me permite 
iniciar sesion porque no tiene contraseña.
 
Gracias.
 

RE: Salida duplicada de un QRYDFN

[Juan Carlos Sevilla]

Hola:
Si lo salvas (Salvar archivo en spool  . . . . SAVE=*YES), puedes 
hacerlo en el OVRPRTF, lo guarda en el spool y al liberarlo lo puedes mandar 
por otra impresora. Mientras tengas save *yes NO desaparece del spool.
Lo más facil seria ejecutar en la misma CL el qry para cada una de las 
colas de salida ¿no?
Un Saludo

-Mensaje original-
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En nombre de Angel Vicente
Enviado el: jueves, 07 de septiembre de 2006 10:10
Para: forum.help400@combios.es
Asunto: Salida duplicada de un QRYDFN

Hola a todos

Tengo una definicion de consulta (QRYDFN) que someto todas las noches, y genera 
un listado que sale por una impresora. Hasta aqui todo normal, ahora la duda:

¿Se puede hacer que ese listado salga por mas de una impresora?

Saludos y gracias de antemano


__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados 
http://www.help400.es _

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

RE: Problemas con TCP/IP

[Juan Carlos Sevilla]

Hola:
Agradezco esa opinión. Pero mi pregunta es: La V4R2M0 soporta la 
configuracion sin el IPCS. Es decir, al quitarlo se va a dejar configurar el 
TCP/IP y funcionará??
Por otra parte, como me aseguro que es el IPCS lo que está fallando?.
Como saber si es un fallo del OS/400 (el programa que "falla" no esta 
dañado)
Como saber si es solo el Hardware de la Tarjeta Ethernet. Es decir, si 
quito el IPCS y lo que falla es la tarjeta Ethernet...
Creo, que al final, será el Servicio Tecnico de IBM, quien tendrá que 
actuar?

Un Saludo y muchas gracias.


-Mensaje original-
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En nombre de [EMAIL PROTECTED]
Enviado el: jueves, 07 de septiembre de 2006 1:44
Para: forum.help400@combios.es
Asunto: RE: Problemas con TCP/IP

Si no estas utilizando el servidor integrado (solo lo usas como pasarela para 
tus sesiones de Client Access)  la solución es fácil, tíralo ¡¡¡.
Te quitaras problemas y mejoraras el rendimiento de tu máquina.
El 150 lleva una 2723 ( creo), la 2838 es la de 100, la tarjeta de red de tu 
máquina debe ser de 10.
Tiras el IPCS y usas la tarjeta de red a pelo.
Al quitar el IPCS te quedaran dos huecos, lo único es saber donde la pinchas.
Yo en este momento no tengo documentación para darte este dato pero si llamas a 
IBM  seguro que te ayudan.

Martín Ortega Novella
Saludos
Correo: [EMAIL PROTECTED]
Mi blog http://www.sidra400.com



   
 "Juan Carlos  
 Sevilla"  
 <[EMAIL PROTECTED]  To 
 com>
 Sent by:   cc 
 forum.help400-adm 
 [EMAIL PROTECTED] Subject 
   RE: Problemas con TCP/IP
   
 06/09/2006 17:56  
   
   
 Please respond to 
 [EMAIL PROTECTED] 
  bios.es  
   
   




Hola
La verdad, es que "este fue el precio a pagar" para que funcionase la 
V4R2 en un mod. 150 con tarjeta de red ethernet bajo TCP/IP.
Lo complicado fue montar toda la "paraeta" del Servidor PC 
integrado(FSIOA), el go NWSADM (para el FSIOP), etc... NADA que ver con los 
modernos GO TCPADM y la Tarjeta de Red (como tal) sin nada por medio 
Bueno, de nada vale quejarse, tan solo si pudiera comprobar o detectar 
que "diantres" puede ser?
Un Saludo.

De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
En nombre de alex martinez
Enviado el: miércoles, 06 de septiembre de 2006 16:56
Para: forum.help400@combios.es
Asunto: Re: Problemas con TCP/IP

Hola:

Quizás este fallando el IPCS y/o la tarjeta de red.

¿hay algun mensaje CPF, MCH sobre el error ?

La ultima PTF de V4R5M0 que tengo localizada que parchea este programa es la 
SF60526

¿la tienes instalada ?



El día 6/09/06, Juan Carlos Sevilla <[EMAIL PROTECTED]> escribió:
  Hola:
  Os cuento:
 El trabajo que "cuelga" de la linea de Etherline TCP/IP
  (para conectarse los PC's via TELNET/5250) :ejemplo:
  QTCP/QTCTELNETS/123456,
  finaliza (cuando quiere, y todavia no se la causa- sospecho que esta
  fallando la tarjeta de RED (ya que el programa que falla: QTGTNCSH no
  está dañado)), dejando sin conexion(red) a los PC's
  He intentado lo siguiene:
  a) Restaurar el objeto QTGTNCSH desde un SAVSYS anterior
  b) obtener informacion por IBM aunque no me queda
  claro???
  c) Desde la consola (Desactivar y activar el TCP/IP..
  comprobando la linea ETHERLINE

  En fin, si a alquien le ha pasada algo, y puede ayudarme,
  desde ya muchas gracias.


  Un Saludo.

  OS/400 V4R5M0 (Modelo 150) Tiene de peculiar que la tarjeta de red
  está configurada a traves de una tarjeta adaptadora de servidor PC
  integrado(NWSD), es decir, hay un Pentium200-pro integrado y que se
  utiliza como adaptador de la LAN a traves de un NWSD

RE: Forzar Shutdown cuando falla el suministro eléctri co

[Juan Carlos Sevilla]

Hola. 
En un programa .bat con la siguiente instruccion: 

RMTCMD PWRDWNSYS OPTION(*IMMED) //xxx.xxx.xxx.xxx 

(siendo //xxx.xxx.xxx.xxx = Direccion IP del AS/400 ó nombre del 
sistema-tambien puede ser una unidad de red mapeada) 

La ejecucion se hace en el AS/400 Y LO APAGA!!!. Encender puede ser con la 
instrucción: CHGSYSVAL SYSVAL(QIPLDATTIM) VALUE('080906 15')  
Un Saludo 

-Mensaje original-
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En nombre de Sistemas
Enviado el: miércoles, 06 de septiembre de 2006 17:45
Para: forum.help400@combios.es
Asunto: RE: Forzar Shutdown cuando falla el suministro eléctrico 



-Mensaje original-
De: Cesar Gonzalez
Enviado el: miércoles, 06 de septiembre de 2006 17:43
Para: 'forum.help400@combios.es'
Asunto: Forzar Shutdown cuando falla el suministro eléctrico 


Hola,
Conocéis alguna solución para gestionar los mensajes de una UPS de MGE, de
forma que desencadene el apagado o encendido del AS400.   Se trataría de
ejecutar un scprit en el servidor Windows que apagara o encendiera el AS400.
Tenemos un CL que cambia la planificación de apagado y encendido. ( menú go
power ).

Un saludo y gracias .



__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

RE: Problemas con TCP/IP

[Juan Carlos Sevilla]

Hola
    La verdad, es que "este fue el precio a pagar" 
para que funcionase la V4R2 en un mod. 150 con tarjeta de red ethernet bajo 
TCP/IP.
    Lo complicado fue montar toda la "paraeta" del 
Servidor PC integrado(FSIOA), el go NWSADM (para el FSIOP), etc... NADA que ver 
con los modernos GO TCPADM y la Tarjeta de Red (como tal) sin nada por medio 

    Bueno, de nada vale quejarse, tan solo si 
pudiera comprobar o detectar que "diantres" puede ser?
Un Saludo.


De: [EMAIL PROTECTED] 
[mailto:[EMAIL PROTECTED] En nombre de alex 
martinezEnviado el: miércoles, 06 de septiembre de 2006 
16:56Para: forum.help400@combios.esAsunto: Re: Problemas 
con TCP/IP
Hola:Quizás este fallando el IPCS y/o la tarjeta de 
red.¿hay algun mensaje CPF, MCH sobre el error ?La 
ultima PTF de V4R5M0 que tengo localizada que parchea este programa es la 
SF60526 ¿la tienes instalada ?
El día 6/09/06, Juan 
Carlos Sevilla <[EMAIL PROTECTED]> escribió: 

  
  
  Hola:
      Os cuento:
     El 
  trabajo que "cuelga" de la linea de Etherline TCP/IP (para conectarse los 
  PC's via TELNET/5250) :ejemplo: QTCP/QTCTELNETS/123456,
  finaliza (cuando quiere, y todavia no se la causa- sospecho que 
  esta fallando la tarjeta de RED (ya que el programa que falla: QTGTNCSH no 
  está dañado)), dejando sin conexion(red) a los PC's
      
  He intentado lo siguiene:
      
  a) Restaurar el objeto QTGTNCSH desde un SAVSYS anterior
      
  b) obtener informacion por IBM aunque no me queda claro???
      
  c) Desde la consola (Desactivar y activar el TCP/IP.. comprobando la linea 
  ETHERLINE
   
      En fin, si a alquien le ha pasada algo, y puede ayudarme, desde ya 
  muchas gracias.
   
   
  Un Saludo.
   
  OS/400 V4R5M0 (Modelo 150) Tiene de 
  peculiar que la tarjeta de red está configurada a traves de una tarjeta 
  adaptadora de servidor PC integrado(NWSD), es decir, hay un Pentium200-pro 
  integrado y que se utiliza como adaptador de la LAN a traves de un NWSD 
  (Servidor de red para servidor PC integrado):   crtnwsd. Todo 
  esto está -ok- puede ser el pentium???
   
   
  Juan Carlos Sevilla Martínez. 
  -  Departamento Técnico  
  - ASOIN.21, S.L. 
  C/ Doctor Sumsi, 9 y 11 
  Tlf.: 96 335 40 04. Fax: 96 335 56 38 mailto:[EMAIL PROTECTED]   
   -- Mi 
blog sobre as400http://www.ajut400.com 

RE: Problemas con TCP/IP

[Juan Carlos Sevilla]

  
 Condición de alerta  . . . . . . . . . :   
Sí 
 Número de apariciones  . . . . . . . . :   
35 
 Historia 
Problema 
 Fecha    
Hora ID 
Usuar   
Evento   
 01/09/06 22:33:56 
*SYSTEM    Abierta entrada de 
problema  
 01/09/06 22:34:01 
QTCP   Datos de APAR 
salvados   
 06/09/06 11:37:27 
QSECOFR    Datos de APAR 
salvados   
 06/09/06 11:37:45 
QSECOFR    Problema 
analizado   
 06/09/06 12:05:04 
QSECOFR    Problema 
analizado   
 06/09/06 12:05:41 
QSECOFR    Problema 
analizado   
  
Informe detallado del 
problema  
Página 2 5769SS1 V4R2M0  
980228SYSTEM400   
06/09/06  17:08:55 
 
***  Resultados Aislamiento   
*** 
  
Problema 
General 
 Causa posible  . . . . . . . . . . . . :   Se ha 
detectado un error en el programa de 
aplicación  
 Probabilidad . . . . . . . . . . . . . :   
100    
 ---Archivos en 
Spool   
 Archivo    Núm 
Arch Trabajo    
Usuario    
Número  
 QPSRVDMP 
0001   QTGTELNETS 
QTCP   
369008  
 QPJOBLOG 
0002   QTGTELNETS 
QTCP   
369008  
 QPDSPJOB 
0003   QTGTELNETS 
QTCP   
369008  
    
* * * * *   F I N   S A L I D A   I M P R E S 
A   M A Q U I N A   * * * * * 
==    Sabeis de alguna PTF para esta 
V4R2M0.
 
Gracias.
 
Un Saludo
 
 
 


De: [EMAIL PROTECTED] 
[mailto:[EMAIL PROTECTED] En nombre de alex 
martinezEnviado el: miércoles, 06 de septiembre de 2006 
16:56Para: forum.help400@combios.esAsunto: Re: Problemas 
con TCP/IP
Hola:Quizás este fallando el IPCS y/o la tarjeta de 
red.¿hay algun mensaje CPF, MCH sobre el error ?La 
ultima PTF de V4R5M0 que tengo localizada que parchea este programa es la 
SF60526 ¿la tienes instalada ?
El día 6/09/06, Juan 
Carlos Sevilla <[EMAIL PROTECTED]> escribió: 

  
  
  Hola:
      Os cuento:
     El 
  trabajo que "cuelga" de la linea de Etherline TCP/IP (para conectarse los 
  PC's via TELNET/5250) :ejemplo: QTCP/QTCTELNETS/123456,
  finaliza (cuando quiere, y todavia no se la causa- sospecho que 
  esta fallando la tarjeta de RED (ya que el programa que falla: QTGTNCSH no 
  está dañado)), dejando sin conexion(red) a los PC's
      
  He intentado lo siguiene:
      
  a) Restaurar el objeto QTGTNCSH desde un SAVSYS anterior
      
  b) obtener informacion por IBM aunque no me queda claro???
      
  c) Desde la consola (Desactivar y activar el TCP/IP.. comprobando la linea 
  ETHERLINE
   
      En fin, si a alquien le ha pasada algo, y puede ayudarme, desde ya 
  muchas gracias.
   
   
  Un Saludo.
   
  OS/400 V4R5M0 (Modelo 150) Tiene de 
  peculiar que la tarjeta de red está configurada a traves de una tarjeta 
  adaptadora de servidor PC integrado(NWSD), es decir, hay un Pentium200-pro 
  integrado y que se utiliza como adaptador de la LAN a traves de un NWSD 
  (Servidor de red para servidor PC integrado):   crtnwsd. Todo 
  esto está -ok- puede ser el pentium???
   
   
  Juan Carlos Sevilla Martínez. 
  -  Departamento Técnico  
  - ASOIN.21, S.L. 
  C/ Doctor Sumsi, 9 y 11 
  Tlf.: 96 335 40 04. Fax: 96 335 56 38 mailto:[EMAIL PROTECTED]   
   -- Mi 
blog sobre as400http://www.ajut400.com 

Problemas con TCP/IP

[Juan Carlos Sevilla]

Hola:
    
Os cuento:
   El 
trabajo que "cuelga" de la linea de Etherline TCP/IP (para conectarse los 
PC's via TELNET/5250) :ejemplo: QTCP/QTCTELNETS/123456,
finaliza (cuando quiere, y todavia no se la 
causa- sospecho que esta fallando la tarjeta de RED (ya que el programa que 
falla: QTGTNCSH no está dañado)), dejando sin conexion(red) a los 
PC's
    
He intentado lo siguiene:
    
a) Restaurar el objeto QTGTNCSH desde un SAVSYS anterior
    
b) obtener informacion por IBM aunque no me queda claro???
    
c) Desde la consola (Desactivar y activar el TCP/IP.. comprobando la linea 
ETHERLINE
 
    
En fin, si a alquien le ha pasada algo, y puede 
ayudarme, desde ya muchas gracias.
 
 
Un 
Saludo.
 
OS/400 V4R5M0 
(Modelo 150) Tiene de peculiar que la tarjeta de red está configurada a traves 
de una tarjeta adaptadora de servidor PC integrado(NWSD), es decir, hay un 
Pentium200-pro integrado y que se utiliza como adaptador de la LAN a traves de 
un NWSD (Servidor de red para servidor PC integrado):   crtnwsd. 
Todo esto está -ok- puede ser el pentium???
 
 
Juan Carlos Sevilla Martínez. 
-  Departamento Técnico  
- ASOIN.21, S.L. 
C/ Doctor Sumsi, 9 y 11 
Tlf.: 96 335 40 04. Fax: 96 335 56 38 mailto:[EMAIL PROTECTED] 
  
 

RE: mudanza de un 520

[Juan Carlos Sevilla]

Hola:
    Etiqueta todos los cables que le salen de la 
parte trasera(culo), así como accesorios que puedas tenerle enchufado. Vuelve a 
dejar todo conforme estaba. Cuidado con la Red (utiliza los mismos latiguillos, 
etc...).
 
    Suerte...
p.d.: Si en las nuevas oficinas hay redes inalambricas 
!cuidado!... encripta tu red... con contraseñas...


De: [EMAIL PROTECTED] 
[mailto:[EMAIL PROTECTED] En nombre de miguel 
miguelEnviado el: martes, 05 de septiembre de 2006 
8:48Para: forum. help400Asunto: mudanza de un 
520

Voy a realizar un porte de un 520, entiendo que con apagarle y tratarle con 
cuidado no hace falta mucho más. Mo obstante, si alguien tiene alguna sugerencia 
además de un save 21, será bienvenida.
 
saludos
 

RE: Limpieza Cola de Mensajes

[Juan Carlos Sevilla]

Hola:
    GO CLEANUP
 
    p.1. Cambiar opciones de 
limpieza
 Nº de dias a 
conservar
 
Un Saludo


De: [EMAIL PROTECTED] 
[mailto:[EMAIL PROTECTED] En nombre de PEREZ 
CelestinoEnviado el: viernes, 01 de septiembre de 2006 
15:47Para: forum.help400@combios.esAsunto: Limpieza Cola 
de Mensajes


Hola a 
todos.
 
Alguien conoce alguna 
forma o utilidad, para eliminar mensajes de una cola de mensajes, filtrados por 
la fecha de envío.
 
Muchas gracias, de 
antemano.
 




This message and any attachments are confidential and 
intendedsolely for the addressees. If you receive this message in 
error,please delete it and immediately notify the sender. If the 
readerof this message is not the intended recipient, you are 
herebynotified that any unauthorized use, copying or dissemination 
isprohibited. E-mails are susceptible to alteration. Neither LOREALnor 
any of its subsidiaries or affiliates shall be liable for themessage if 
altered, changed or falsified.

RE: Consulta SQL

[Juan Carlos Sevilla]

 SELECT DISTINCT CLIENTE, ACTIVIDADEF, AÑOEF*1+MESEF*100+DIAEF FROM EF
ORDER BY CLIENTE, 3 DESC   

-Mensaje original-
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En nombre de Juan Carlos Sevilla
Enviado el: jueves, 31 de agosto de 2006 19:59
Para: forum.help400@combios.es
Asunto: RE: Consulta SQL

Hola:
Prueba con:
SELECT DISTINCT CLIENTE, ACTIVIDAD, AÑOEF*1+MESEF*100+DIAF FROM EF
ORDER BY CLIENTE, 3 DESC

Un Saludo:
Pd.: DISTINCT es para: 
Se conserva un registro de cada conjunto de registros duplicados del 
archivo final de resultados.
3 es para:
Que ordene por el campo de resultado tercero(AÑOEF*1+MESEF*100+DIAF)
 

-Mensaje original-
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En nombre de Carlos Augusto 
Correa García Enviado el: jueves, 31 de agosto de 2006 19:37
Para: forum.help400@combios.es
Asunto: Consulta SQL

Una consulta sql, oajlá me puedan ayudar Tengo el sgte archivo: que corresponde 
a los estado financieros (EF) de mis clientes

CLIENTEACTIVIDADEFAÑOEFMESEFDIAEF 
25125620020512
36564520050422
25127520040915
36564520010525
79456720030725
25151420000609

Necesito una sentencia sql que me devuelva para cada cliente el ultimo (mas 
reciente) EF, Es decir algo asi:

CLIENTEACTIVIDADEFAÑOEFMESEFDIAEF 
25127520040915
36564520050422
79456720030725

Alguna idea??

Gracias por su ayuda

-
Carlos Augusto Correa García
CMAC PIURA S.A.C
Area de Sistemas
__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados 
http://www.help400.es _

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados 
http://www.help400.es _

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

RE: Consulta SQL

[Juan Carlos Sevilla]

Hola:
Prueba con:
SELECT DISTINCT CLIENTE, ACTIVIDAD, AÑOEF*1+MESEF*100+DIAF 
FROM EF
ORDER BY CLIENTE, 3 DESC

Un Saludo:
Pd.: DISTINCT es para: 
Se conserva un registro de cada conjunto de registros duplicados del 
archivo final de resultados.
3 es para:
Que ordene por el campo de resultado tercero(AÑOEF*1+MESEF*100+DIAF)
 

-Mensaje original-
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En nombre de Carlos Augusto 
Correa García
Enviado el: jueves, 31 de agosto de 2006 19:37
Para: forum.help400@combios.es
Asunto: Consulta SQL

Una consulta sql, oajlá me puedan ayudar Tengo el sgte archivo: que corresponde 
a los estado financieros (EF) de mis clientes

CLIENTEACTIVIDADEFAÑOEFMESEFDIAEF 
25125620020512
36564520050422
25127520040915
36564520010525
79456720030725
25151420000609

Necesito una sentencia sql que me devuelva para cada cliente el ultimo (mas 
reciente) EF, Es decir algo asi:

CLIENTEACTIVIDADEFAÑOEFMESEFDIAEF 
25127520040915
36564520050422
79456720030725

Alguna idea??

Gracias por su ayuda

-
Carlos Augusto Correa García
CMAC PIURA S.A.C
Area de Sistemas
__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados 
http://www.help400.es _

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

RE: Parámetros de un PGM

[Juan Carlos Sevilla]

Hola:
Si, debes de bajarte la version RISC. Yo lo estoy probando en 
V5R1. ok. Es una "joyita"...
Un Saludo 

-Mensaje original-
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En nombre de Walter Nasich
Enviado el: jueves, 31 de agosto de 2006 18:16
Para: Fernando
Asunto: Parámetros de un PGM

Hola Fernando,

   Lo encontré:
   http://digilander.libero.it/jadaxml/tools.html

   Esta disponible para bajar hasta la versión V3R7. Lo podré instalar
   y ejecutar en un V5R3?
   
Thursday, August 31, 2006, 12:17:15 PM, usted escribio:
--
F> Walter, si buscas en internet hay una biblioteca con muchisimas 
F> utilidades (una de ellas genera crossreference y arboles de
F> llamadas) denominada JADA o JADA TOOLS.


__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados 
http://www.help400.es _

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

RE: Saber IP dispositivos

[Juan Carlos Sevilla]

Hola
Con el mandato NETSTAT y con la opc.3 "Trabajar con Estado de 
Conexión TCP/IP"

Aparte, te adjunto un programita (clp) que dice la pantalla, 
puerto y direccion IP.
Un Saludo
aquí va el programa 
/*--*/


 pgm


/**/
/* declaration */
/**/


 DCLVAR(&RCVVAR) TYPE(*CHAR) LEN(1024)
 DCLVAR(&RCVLEN) TYPE(*CHAR) LEN(4) +
  VALUE(X'0400')
 DCLVAR(&FORMAT) TYPE(*CHAR) LEN(10) +
  VALUE(DEVD0600)
 DCLVAR(&TCPIP) TYPE(*CHAR) LEN(2) VALUE(X'02')
 DCLVAR(&IPADDR) TYPE(*CHAR) LEN(15)
 DCLVAR(&PORT) TYPE(*DEC) LEN(5)
 DCLVAR(&PORTBIN) TYPE(*CHAR) LEN(2)
 DCLVAR(&PORTCHAR) TYPE(*CHAR) LEN(5)
 DCLVAR(&DEVD) TYPE(*CHAR) LEN(10)
 DCLVAR(&ERRDTA) TYPE(*CHAR) LEN(116)
 DCLVAR(&ERRLEN) TYPE(*CHAR) LEN(4) +
  VALUE(X'0074')
 DCLVAR(&ERRAVL) TYPE(*DEC) LEN(15)
 DCLVAR(&BIN4) TYPE(*CHAR) LEN(4)
 DCLVAR(&MSG) TYPE(*CHAR) LEN(200)


 DCLVAR(&ERROR) TYPE(*LGL) /* std err */
 DCLVAR(&MSGID) TYPE(*CHAR) LEN(7) /* std err */
 DCLVAR(&MSGKEY) TYPE(*CHAR) LEN(4) /* std err */
 DCLVAR(&MSGDTA) TYPE(*CHAR) LEN(100) /* std err */
 DCLVAR(&MSGF) TYPE(*CHAR) LEN(10) /* std err */
 DCLVAR(&MSGFLIB) TYPE(*CHAR) LEN(10) /* std err */
 DCLVAR(&MSGTYP) TYPE(*CHAR) LEN(10) +
  VALUE('*DIAG') /* std err */
 DCLVAR(&MSGTYPCTR) TYPE(*CHAR) LEN(4) +
  VALUE(X'0001') /* std err */
 DCLVAR(&PGMMSGQ) TYPE(*CHAR) LEN(10) VALUE('*') +
  /* std err */
 DCLVAR(&STKCTR) TYPE(*CHAR) LEN(4) +
  VALUE(X'0001') /* std err */
 DCLVAR(&ERRBYTES) TYPE(*CHAR) LEN(4) +
  VALUE(X'') /* std err */


 MONMSG MSGID(CPF) EXEC(GOTO CMDLBL(ERROR))


/**/
/* Get my device */
/**/


 RTVJOBAJOB(&DEVD)
 CHGVAR VAR(&RCVVAR) VALUE(' ')
 CHGVAR VAR(&ERRDTA) VALUE(&ERRLEN)


 CALL   PGM(QDCRDEVD) PARM(&RCVVAR &RCVLEN &FORMAT +
  &DEVD &ERRDTA)


 CHGVAR VAR(&BIN4) VALUE(%SST(&ERRDTA 5 4))
 CHGVAR VAR(&ERRAVL) VALUE(%BIN(&BIN4))
 RMVMSG CLEAR(*ALL)


 /*--*/
/* Error found on the API, skip */
/*--*/


 IF COND(&ERRAVL > 0) THEN(DO)
 CHGVAR VAR(&ERRDTA) VALUE(%SST(&ERRDTA 1 &ERRAVL))
 CHGVAR VAR(&MSGID) VALUE(%SST(&ERRDTA 9 7))
 CHGVAR VAR(&MSGDTA) VALUE(%SST(&ERRDTA 17 100))
 GOTO   CMDLBL(END)


 ENDDO
/**/
/* Get the IP address for TCP/IP device. */
/* Network Protocol must equal = x'02' (pos 859) */
/**/


 IF COND(%SST(&RCVVAR 859 1) *NE &TCPIP) +
  THEN(GOTO CMDLBL(END))
 CHGVAR VAR(&PORTBIN) VALUE(%SST(&RCVVAR 860 2))
 CHGVAR VAR(&PORT) VALUE(%BIN(&PORTBIN))
 CHGVAR VAR(&PORTCHAR) VALUE(&PORT)
 CHGVAR VAR(&IPADDR) VALUE(%SST(&RCVVAR 878 15))


/**/
/* Display the information */
/**/

 CHGVAR VAR(&MSG) VALUE('Dispositivo:' *BCAT &DEVD +
  *BCAT 'Puerto:' *BCAT &PORTCHAR *BCAT +
  'Direccion IP:' *BCAT &IPADDR)
 SNDPGMMSG  MSG(&MSG)


 GOTO   CMDLBL(END)


/**/
/* error routine: */
/**/


 error:
 IF COND(&ERROR) THEN(GOTO CMDLBL(ERRORDONE))
 ELSE   CMD(CHGVAR VAR(&ERROR) VALUE('1'))
/*--*/
/* move all *DIAG message to *PRV program queue*/
/*--*/


 CALL   PGM(QMHMOVPM) PARM(&MSGKEY &MSGTYP +
  &MSGTYPCTR &PGMMSG

Hacer desaparecer del Display SRC error: A9003C60

[Juan Carlos Sevilla]

Hola:
    
He conectado la Consola de Operaciones (no es la asincorana) a traves de un PC. 
Al desconectarla, apareció en el Display el error:
    
A9003C60
    
Viendo el mensaje viene a decir que se "queja de que no esta conectada la 
Consola de Operaciones".
Las Soluciones pueden 
ser?:
    1. Hacer IPL 
con el cable (P/N: 97H7557) SIN conectar.??
    2. Lo mismo 
+ borrando configuracion de consola (DSP01) + entrando en STRSST y borrar 
recurso de CTL (Consola)??
 
    
Por favor, si alguien sabe que hacer, agradezco por adelantado sus 
respuestas...
 
Un 
Saludo
 
Juan Carlos Sevilla Martínez. 
-  Departamento Técnico  
- ASOIN.21, S.L. 
C/ Doctor Sumsi, 9 y 11 
Tlf.: 96 335 40 04. Fax: 96 335 56 38 mailto:[EMAIL PROTECTED] 
  
 

RE: impresión en PDF

[Juan Carlos Sevilla]

Hola:
    Exactamente no veo el problema. Es decir, al 
igual que cuando imprimes directamente desde el AS/400 imprimes respetando la 
cabecera y/o pie del documento (factura, albaran, etc), si se imprime desde un 
.pdf debe ser igual ¿no?. Tan solo es poner el papel 
adecuado.
Un 
Saludo.
 
p.d.: Yo sé de clientes que prefieren no tener preformato, 
ya que dá mejor imagen el logo de imprenta que el producido por un preformato, 
ya que este de no ser que el OS/400 sea de V5R1 en adelante no imprime en color, 
y el color deja un poco que desear (segun que software se use para crear el 
OVL). Ademas hay que valorar que impresoras son compatibles (pcl, etc) laser en 
color (precio), precio de la tinta, etc...Realmente para hacerlo muy 
"potito"(bonito) es para pensarselo...
 


De: [EMAIL PROTECTED] 
[mailto:[EMAIL PROTECTED] En nombre de Vicente Ferrer 
(AW)Enviado el: jueves, 27 de julio de 2006 14:26Para: 
forum.help400@combios.esAsunto: impresión en PDF

Hola,
Veamos si alguién me 
puede ayudar, necesito convertir facturas en spool de iseries en documentos PDF, 
hasta aquí ningún problema el problema es que yo las imprimo sobre un documento 
preimpreso
con la cabecera con 
los datos de la empresa y por lo tanto cuando lo convierto no tiene el logo y 
todos los demás datos, una opción sería trabajar con preformatos pero si hay 
otras opciones preferiría no utilizarlo ya que no lo necesito para todos los 
paises, ¿ se os ocurre alguna otra opción?
 
Gracias  de 
antemano.
 
Saludos
Vicente Ferrer 
Andreu World, S.A.
 

RE: Una fácil (espero) del IFS; De un PF a un TXT

[Juan Carlos Sevilla]

hOLA:
    mediante .tto por client 
access??
Un Saludo.


De: [EMAIL PROTECTED] 
[mailto:[EMAIL PROTECTED] En nombre de miguel 
miguelEnviado el: jueves, 27 de julio de 2006 13:36Para: 
forum. help400Asunto: Una fácil (espero) del IFS; De un PF a un 
TXT

quiero copiar los datos de un físico a un fichero plano.txt en el IFS
 
¿qué forma es la más fácil?
 
he intentado algo, pero los campos numéricos no me los pasa bien...
 
saludos
 

Hay algun valor del sistema para activar el balanceo de los discos (DASD)

[Juan Carlos Sevilla]

Buenos 
Dias:
    
Sabeis que es lo que puede producir un balanceo (con el 
tiempo) de los discos que componen un ASP. Es para evitar la solucion de Salvar, 
Borrar y Restaurar Bibliotecas para conseguir dicho cometido
    

   En 
espera de vuestras atentas respuestas, recibir un cordial
Saludo!
 
Juan Carlos Sevilla Martínez. 
-  Departamento Técnico  
- ASOIN.21, S.L. 
C/ Doctor Sumsi, 9 y 11 
Tlf.: 96 335 40 04. Fax: 96 335 56 38 mailto:[EMAIL PROTECTED] 
  
 

Mandato equivalente al STRASPBAL para V4R2

[Juan Carlos Sevilla]

Estimados 
"foreros":
  En primer lugar, 
aprovechar, que estoy muy contento por haber dado por un "foro" de "nivel" y de 
"soluciones-practicas" muy efectivas.
  Paso siguiente, os 
comento:   
   
Tengo entendido que a partir de la V4R4M0 y superiores hay un mandato llamado: 

    
Mandato Biblioteca  
Texto STRASPBAL   
QSYS    Arrancar equilibrado 
ASP
    

   El problema es que en la V4R2M0, tendria 
que utilizar algo similar ya que tengo 1 de los discos "descompensado". 

   
Recibir un cordial 
Saludo.
 
p.d.: He visto algo 
como esto:

Chapter 
7. OS/400 disk storage management tools
Maintaining an efficient use of AS/400 storage is an essential task and 
deserving
of high priority. Disk storage is an important component of any computer 
system
as it provides active and permanent access to the data necessary to run 
a
business. Efficient disk storage management helps maintain consistent 
access to
data, as well as prevents filling up disk storage before due 
time.
There are quite a few OS/400 utilities for you as a system administrator 
to use to
manage AS/400 disk resources in order to maintain its efficient 
utilization. In this
chapter, we describe disk management tools based on OS/400 V4R4. Some of
the tools discussed are also available in previous releases and noted 
accordingly.
The tools covered in this chapter are:
• Retrieve Disk Information (RTVDSKINF) and Print Disk 
Information
(PRTDSKINF) commands
• Trace ASP Balance (TRCASPBAL), Start ASP Balance 
(STRASPBAL) and
End ASP Balance (ENDASPBAL) commands
• Disk Balance (DSKBAL) 
command
• Management Central Disk Resource Utilization 
Monitor
• Start Disk Reorganization (STRDSKRGZ) and End Disk 
Reorganization
(ENDDSKRGZ) commands
Find additional information on these tools at the AS/400 Beyond 
Technology Web
    

 
Juan Carlos Sevilla Martínez. 
-  Departamento Técnico  
- ASOIN.21, S.L. 
C/ Doctor Sumsi, 9 y 11 
Tlf.: 96 335 40 04. Fax: 96 335 56 38 mailto:[EMAIL PROTECTED] 
  
 

RE: Codigo de barras en 2D

[Juan Carlos Sevilla]

Hola!
    
Desde el iSeriesNavigator-->Operaciones 
Basicas--> Salida de Impresora-->Seleccionas el deseado y al imprimir !y 
aquí viene el "TRUCO"!, seleccionas la impresora AdobePDF (v.7.0) Ó Destiler 
(v.5.0) [Adobe Profesional] y te genera el pdf.
 Con 
CutePDF tambien funciona
 
Un Saludo


De: [EMAIL PROTECTED] 
[mailto:[EMAIL PROTECTED] En nombre de 
[EMAIL PROTECTED]Enviado el: martes, 18 de julio de 2006 
13:34Para: forum.help400@combios.esAsunto: Re: Codigo de 
barras en 2D
La idea es la siguiente: 
Quiero generar un codigo de barras en 2D, 
en un prtf, que luego voy a convertir a PDF. La palabra clave BARCODE tiene unos parametros para poder 
generar ese codigo de barras, pero cuando convierto el prtf a pdf, el codigo de 
barras no me sale. A alguien le pasa 
lo mismo? Se puede hacer algo para convertir generar el PDF y que se vea el 
codigo de barras 2D.? Un 
saludo *Francisco 
Hergueta SanchezNAUTAS-TECHNOLOGIES S.A. - Depto. DesarrolloPza. 
Ruperto Chapí, 2 2º03001-ALICANTETEL:+34 965 98 03 30 FAX: +34 965 21 59 
48www.nautas-tech.commailto:[EMAIL PROTECTED]*

  
  
[EMAIL PROTECTED] Enviado por: [EMAIL PROTECTED] 
  17/07/2006 16:14 
  


  
Por favor, responda 
aforum.help400@combios.es

  


  
Para
  forum.help400@combios.es 

  
cc
  

  
Asunto
  Re: Codigo de barras en 
2D
  


  
   BARCODE(CODE3OF9 2 *HRZ *NOHRI)     
===La 
originalidad no esta en el "HECHO", esta en la"SOLUCIÓN"      
Cualquier cosa que gobierne tu vida te autodestruiráSino dices lo que 
piensas es que no piensas  - M i  O T a  O 
-=== .~./V\ 
  L   I   N   U   X// \\ >Phear the 
Penguin

RE: Uso comando JAR de QSH

[Juan Carlos Sevilla]

Hola!
  Creo que la compresion no le va muy bien al FTP. Es decir, hay mandarlo 
entero. Otra cosa es que por el Correo se compriman en un .zip.

Un saludo! 

-Mensaje original-
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En nombre de [EMAIL PROTECTED]
Enviado el: martes, 18 de julio de 2006 13:43
Para: forum.help400@combios.es
Asunto: RE: Uso comando JAR de QSH


¿Como haces el FTP del .zip? Tienes que hacerlo con el submandato bin 
en la sesion FTP. 



-Mensaje original-
De: Fernando Martínez [mailto:[EMAIL PROTECTED]
Enviado el: martes, 18 de julio de 2006 13:21
Para: forum.help400@combios.es
Asunto: Re: Uso comando JAR de QSH


Parece un problema de codificacion de caracteres. ¿Como estan codificados los 
archivos y que editor usas en el PC?

Salu2

Fernando

Jesús Manuel Sanchez Montaña escribió:
>
> Hola a todos:
>
>  
>
> A ver si alguien le ha pasado lo mismo que a mi y le a encontrado 
> solución, os comento:
>
>  
>
>1. Copio una serie de bases de datos al IFS por medio del CPYTOIMPF.
>2. Si edito las tablas generadas en el IFS con EDTF, las
>   veo(legibles sin problemas).
>3. Si hago un FTP de dichas tablas me lo hace sin problemas, en el
>   servidor FTP puedo tambien abrirlas sin problemas
>4. Ahora viene el problema, y es por esto que creo que el problema
>   debe estar en el comando JAR del entrono QSH:
>
> -  Con el comando JAR: 'jar --cfM /home/qsecofr/envio.zip 
> /home/qsecofr/*.txt' genero un fichero .zip
>
> -  Transfiero dicho .zip por FTP, y en principio me lo 
> transfiere correctamente; pero el problema está que al abrir el .zip 
> veo las tablas que lo componen, pero la información que contienen 
> dichas tablas no es legible.
>
>  
>
> Si alguien le ha pasado algo de esto o tiene alguna idea, será bienvenida.
>
>  
>
> Saludo2
>
>  
>
>  
>
>  
>


__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados 
http://www.help400.es _

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

RE: Seguridad en FTP. Conectar/Desconectar por Horario

[Juan Carlos Sevilla]

Hola!
 Creo que ya lo he entendido, es decir, con los mandatos:
ENDTCPSVR SERVER(*FTP) y STRTCPSVR SERVER(*FTP)
 se desconecta/conecta y a traves del WRKJOBSCDE poner un programa para que 
fuera de horario comercial desconectarlo.

Gracias a todos. 

-Mensaje original-
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En nombre de Carlos Veza 
Iglesias
Enviado el: martes, 18 de julio de 2006 11:01
Para: forum.help400@combios.es
Asunto: RE: Seguridad en FTP. Conectar/Desconectar por Horario

A la primera cuestión, con el planificador de trabajos puedes arrancar o parar 
el servidor de FTP y hacer que no arranque de forma automática al iniciar el 
TCP/IP.
 
Carlos Veza
EMALSA
 

  _  

De: Juan Carlos Sevilla [mailto:[EMAIL PROTECTED] Enviado el: martes, 18 de 
julio de 2006 8:59
Para: forum.help400@combios.es
Asunto: Seguridad en FTP. Conectar/Desconectar por Horario


Buenos Dias:
Sabe alguien por donde se puede "programar" los horarios de
apertura (conexion) de FTP asícomo tenerlo apagado (desconectado).
Tambien estaria interesado en condicionarlo por Usuarios, y
que solo pudiesen bajar/subir los objetos que son ellos propietarios.
Un Saludo
 

Juan Carlos Sevilla Martínez. 
-  Departamento Técnico  - 
ASOIN.21, S.L. 
C/ Doctor Sumsi, 9 y 11 
Tlf.: 96 335 40 04. 
Fax: 96 335 56 38 
mailto:[EMAIL PROTECTED] 
  

 

__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

Seguridad en FTP. Conectar/Desconectar por Horario

[Juan Carlos Sevilla]

Buenos 
Dias:
    
Sabe alguien por donde se puede "programar" los horarios 
de apertura (conexion) de FTP asícomo tenerlo apagado 
(desconectado).
    
Tambien estaria interesado en condicionarlo por Usuarios, y que solo pudiesen 
bajar/subir los objetos que son ellos propietarios.
Un 
Saludo
 
Juan Carlos Sevilla Martínez. 
-  Departamento Técnico  
- ASOIN.21, S.L. 
C/ Doctor Sumsi, 9 y 11 
Tlf.: 96 335 40 04. Fax: 96 335 56 38 mailto:[EMAIL PROTECTED] 
  
 

RV: Saber dia semana de una fecha

[Juan Carlos Sevilla]

 


De: Juan Carlos Sevilla Enviado el: 
lunes, 17 de julio de 2006 16:30Para: 
'forum.help400@combios.es'Asunto: RE: Saber dia semana de una 
fecha

Hola:
    Si tienes definido los campos tipo (DATE) 
entonces (Ejemplo):
SELECT DAYOFWEEK(FLDDAT1), QDFECH, DAYOFWEEK_ISO(FLDDAT1) 
FROM BIB/FILE.
 
p.d: DAYOFWEEK (1=Domingo...7=Sabado) 
[Americano]
    DAYOFWEEK_ISO 
(1=Lunes7=Domingo)

Si los campos no son tipo DATE que son 8.0 (mmdd) 
hay que hacer:
SELECT DAYOFWEEK(DATE(CAST(SUBSTRING(DIGITS(FLDNUM1), 7, 2 
) || '/' 
|| 
SUBSTRING(DIGITS(FLDNUM1), 5, 2 ) || '/' 
||  
 
SUBSTRING(DIGITS(FLDNUM1), 3, 2) AS 
DATE))), 
DAYOFWEEK_ISO(DATE(CAST(SUBSTRING(DIGITS(FLDNUM1), 7, 2 ) || '/' 
||   
 
SUBSTRING(DIGITS(FLDNUM1), 5, 2 ) || '/' 
||  
 
SUBSTRING(DIGITS(FLDNUM1), 3, 2) AS 
DATE))), 
PLDTE   
FROM  BIB / FILE 
WHERE  FLDNUM1 NOT IN(0, 
) 
  

 
p.d.: !Ojo! por que el 
valor numerico de FLDNUM1 tiene que ser una fecha valida, ya que si no es así 
devuelve datos erroneos: ++, y produce el error en un programa de SQL0181:'El 
valor en la serie de fecha, hora o indicación de la hora no es 
Válido.
   El signo 
'/' es segun los separadores y formato (*ISO, ETC)  que se dá en el 
programa. (por omision coge como los del trabajo). En un SQL INTERACTIVO: 
 
Start SQL 
Interactive Session (STRSQL) 
    

 Teclee elecciones, 
pulse Intro.    

 
   
 Control de 
compromiso  . . . . .   *NONE   *NONE, *CHG, *CS, *ALL... 

 Naming 
convention  . . . . . . .   *SYS    *SYS, *SQL    

 Statement processing 
. . . . . .   *RUN    *RUN, *VLD, *SYN  

 Library option . . . . . . . . .   *LIBL   Nombre, *LIBL, *USRLIBL...    

 List type  . . . . . . . . . . .   *ALL    *ALL, *SQL    

 Data refresh . . . . 
. . . . . .   *ALWAYS *ALWAYS, 
*FORWARD 

 Allow copy data  . . . . . . . .   *YES    *YES, *OPTIMIZE, *NO  

 Formato de fecha . . . . . . . 
.   *JOB    *JOB, *USA, *ISO, 
*EUR... 

 Carácter separador de fecha  . .   *JOB    *JOB, /, ., ,, -, ' ', 
*BLANK 

 Formato de hora  . . . . . . . .   *HMS     *HMS, *USA, *ISO, *EUR, *JIS  
 Carácter separador de hora . . .   *JOB *JOB, :, ., ,, ' ', 
*BLANK    

 Decimal point  . . . . . . . . .   *JOB *JOB, *PERIOD, 
*COMMA...  

 Sort sequence  . . . . . . . . .   *JOB Nombre, *HEX, 
*JOB... 

   Library  . . . . . . . . . . .    
Nombre, *LIBL, *CURLIB    
 Language 
identifier  . . . . . .   *JOB *JOB, *JOBRUN...   



De: [EMAIL PROTECTED] 
[mailto:[EMAIL PROTECTED] En nombre de DavidEnviado 
el: lunes, 17 de julio de 2006 13:55Para: 
forum.help400@combios.esAsunto: Saber dia semana de una 
fecha


Tengo el problema siguiente necesito 
saber el día de la semana de una fecha dada si alguien tiene algo en COBOL o en 
CL seria de gran ayuda
 
Estoy con la versión 5.2 y no si la 
función dayofweek del SQL funciona
 
Alguien podría escribir la sentencia 
muchas gracias
 
Dpto.Informático
Foisa. 
SA
 

RE: Saber dia semana de una fecha

[Juan Carlos Sevilla]

Hola:
    Si tienes definido los campos tipo (DATE) 
entonces (Ejemplo):
SELECT DAYOFWEEK(FLDDAT1), QDFECH, DAYOFWEEK_ISO(FLDDAT1) 
FROM BIB/FILE.
 
p.d: DAYOFWEEK (1=Domingo...7=Sabado) 
[Americano]
    DAYOFWEEK_ISO 
(1=Lunes7=Domingo)

Si los campos no son tipo DATE que son 8.0 (mmdd) 
hay que hacer:
SELECT DAYOFWEEK(DATE(CAST(SUBSTRING(DIGITS(FLDNUM1), 7, 2 
) || '/' 
|| 
SUBSTRING(DIGITS(FLDNUM1), 5, 2 ) || '/' 
||  
 
SUBSTRING(DIGITS(FLDNUM1), 3, 2) AS 
DATE))), 
DAYOFWEEK_ISO(DATE(CAST(SUBSTRING(DIGITS(FLDNUM1), 7, 2 ) || '/' 
||   
 
SUBSTRING(DIGITS(FLDNUM1), 5, 2 ) || '/' 
||  
 
SUBSTRING(DIGITS(FLDNUM1), 3, 2) AS 
DATE))), 
PLDTE   
FROM 
V81CWMSTRF/HPO 
WHERE PLDTE NOT IN(0, 
) 
  

 
p.d.: !Ojo! por que el 
valor numerico de FLDNUM1 tiene que ser una fecha valida, ya que si no es así 
devuelve datos erroneos: ++, y produce el error en un programa de SQL0181:'El 
valor en la serie de fecha, hora o indicación de la hora no es 
Válido.
   El signo 
'/' es segun los separadores y formato (*ISO, ETC)  que se dá en el 
programa. (por omision coge como los del trabajo). En un SQL INTERACTIVO: 
 
Start SQL 
Interactive Session (STRSQL) 
    

 Teclee elecciones, 
pulse Intro.    

 
   
 Control de 
compromiso  . . . . .   *NONE   *NONE, *CHG, *CS, *ALL... 

 Naming 
convention  . . . . . . .   *SYS    *SYS, *SQL    

 Statement processing 
. . . . . .   *RUN    *RUN, *VLD, *SYN  

 Library option . . . . . . . . .   *LIBL   Nombre, *LIBL, *USRLIBL...    

 List type  . . . . . . . . . . .   *ALL    *ALL, *SQL    

 Data refresh . . . . 
. . . . . .   *ALWAYS *ALWAYS, 
*FORWARD 

 Allow copy data  . . . . . . . .   *YES    *YES, *OPTIMIZE, *NO  

 Formato de fecha . . . . . . . 
.   *JOB    *JOB, *USA, *ISO, 
*EUR... 

 Carácter separador de fecha  . .   *JOB    *JOB, /, ., ,, -, ' ', 
*BLANK 

 Formato de hora  . . . . . . . .   *HMS     *HMS, *USA, *ISO, *EUR, *JIS  
 Carácter separador de hora . . .   *JOB *JOB, :, ., ,, ' ', 
*BLANK    

 Decimal point  . . . . . . . . .   *JOB *JOB, *PERIOD, 
*COMMA...  

 Sort sequence  . . . . . . . . .   *JOB Nombre, *HEX, 
*JOB... 

   Library  . . . . . . . . . . .    
Nombre, *LIBL, *CURLIB    
 Language 
identifier  . . . . . .   *JOB *JOB, *JOBRUN...   



De: [EMAIL PROTECTED] 
[mailto:[EMAIL PROTECTED] En nombre de DavidEnviado 
el: lunes, 17 de julio de 2006 13:55Para: 
forum.help400@combios.esAsunto: Saber dia semana de una 
fecha


Tengo el problema siguiente necesito 
saber el día de la semana de una fecha dada si alguien tiene algo en COBOL o en 
CL seria de gran ayuda
 
Estoy con la versión 5.2 y no si la 
función dayofweek del SQL funciona
 
Alguien podría escribir la sentencia 
muchas gracias
 
Dpto.Informático
Foisa. 
SA
 

RE: OPNQRYF

[Juan Carlos Sevilla]

Hola
 antes del OPNQRYF tienes que hacer 
un OVRDBF SHARE(*yES). Aprovecha aqui para hacer lo que quieres. Es decir, 
OVRDBF(AA) TOFILE(AA) MBR(MBR1) SHARE(*YES)
 
uN sALUDO


De: [EMAIL PROTECTED] 
[mailto:[EMAIL PROTECTED] En nombre de Matilde Vedia 
MolinaEnviado el: lunes, 17 de julio de 2006 13:51Para: 
Forum.help400Asunto: OPNQRYF 

Hola, 
quiero hacer un OPNQRYF de un archivo lógico que 
tiene (un) miembro que contiene datos de (varios) miembros de un archivo 
físico. 
 
 
 OPNQRYF    
FILE((*LIBL/ARCHIVOLOGICO &MBR1)) OPTION(*ALL) 
  
QRYSLT(&LIS1) KEYFLD((CPO1) (CPO2)) 
 
 
(&MBR1 Contiene el nombre del miembro que voy a 
utilizar)
(&LIS1 Contiene la selección que quiero 
hacer)
 
 
y recibo en siguiente mensaje CPD3103
 
   
 Mensaje . . . . :   Los valores de parámetro 
especificados hacen necesario       
OPTION(*INP).   
 Causa . . . . . :   El archivo sólo debe abrirse para 
operaciones de entrada     si las especificaciones de 
consulta requieren una de las 
siguientes    
condiciones:    
 -- Proceso de unión donde se especificaron 
múltiples archivos en el      
parámetro 
FILE. 
 -- Proceso por clave exclusiva donde se especificó 
el parámetro UNIQUEKEY. -- La suma de los campos de 
clave puede sobrepasar los 2000 bytes.    
 -- Debe consultarse una vista de SQL que tiene 
proceso diferenciado.   
-- Debe consultarse una vista de SQL que hace referencia a la misma tabla 
   que la tabla de subselección más 
externa.   

    -- Una copia de los datos 
para realizar las funciones 
solicitadas. 
    También se requiere el valor *INP del parámetro OPTION si 
se requiere    proceso de grupo debido a 
la utilización del parámetro GRPFLD, el parámetro    GRPSLT o una 
función de totales (%MIN o %MAX con un sólo argumento, %AVG,    
  %COUNT, %SUM, %STDDEV, o 
%VAR).  
    Para obtener más información acerca de las vistas SQL, 
consulte el tema      DB2 UDB for AS/400 SQL Reference, 
en Information 
Center, 
  http://www.as400.ibm.com/infocenter, 
o el tema DB2 UDB for AS/400 SQL    
  Programming, en Information Center, http://www.as400.ibm.com/infocenter. 
Recuperación  . :   Efectúe una de las siguientes acciones y 
vuelva a intentar   la 
petición: 
    -- Omita el parámetro 
OPTION.  
    -- Especifique el valor *INP para el parámetro 
OPTION. 
   -- Omita las especificaciones que 
limitan la apertura del archivo de  consulta a proceso de 
entrada.
 
 
Esto me está obligando a cambiar el parámetro 
OPTION DE *ALL a *INP, pero si hago esto, en el programa RPG que utiliza 
este archivo al cual le he hecho el OPNQUYF, NO ME PERMITE ACTUALIZAR 
DATOS.
 
   Esto está funcionando con otros programas cuando 
utilizo un fichero lógico contiene datos de un solo miembro de 
fichero físico.
 
¿PUEDE ALGUIEN AYUDARME A RESOLVER ESTE 
PROBLEMA?    

 
 
Muchas gracias a todos por vuestra ayuda
 
  
Matilde Vedia MolinaDepartamento InformáticaFlexol España 
S.L.

RE: Consultar una tabla SQL2000 desde un iSeries

[Juan Carlos Sevilla]

Hola.
He intentado hacer lo mismo y me dá el mismo error. No sé si el 
problema es de AS/400 ó Server/2000 (en cuanto al tema de permisos, contraseñas 
(cifradas), etc...
Un Saludo.
P.d. Lo usuarios son los mismos en Windows que en el SqlServer y en el AS/400 
(mismas contraseñas)... 

-Mensaje original-
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En nombre de [EMAIL PROTECTED]
Enviado el: viernes, 14 de julio de 2006 20:24
Para: forum.help400@combios.es
Asunto: Consultar una tabla SQL2000 desde un iSeries


Hola, buenas tardes.
Tenemos la necesidad de consultar algunas tablas de un servidor SQL desde un 
iSeries.
Dentro del iSeries definimos la base de datos relacional con WRKRDBDIRE.
Luego STRSQL ,
CONNECT TO basename USER DESADB USING xxx Muestra el siguiente error:
ID de mensaje  . . . . :   SQ30080   Gravedad . . . . . . . :   30
Tipo de mensaje  . . . :   Diagnóstico

Mensaje . . . . :   Se ha producido un error de comunicaciones durante el
  proceso de la base de datos distribuida.
Causa . . . . . :   Se ha producido un error de comunicaciones. Una posible
  lista de razones puede ser:
-- El sistema remoto no está disponible.
-- La red de comunicaciones no está disponible.
-- Es posible que el ID de usuario utilizado para iniciar la conexión no
  exista en el sistema remoto.
-- El sistema remoto tal vez exija que la contraseña esté cifrada.
-- Es posible que la contraseña no sea válida para el ID de usuario. Los
  caracteres y las mayúsculas o minúsculas de la contraseña especificada deben
  coincidir exactamente con la contraseña en el sistema remoto. Un servidor de
  aplicaciones AS/400 requiere que las contraseñas se especifiquen en

En el servidor remoto tiene que existir algún software instalado, algún 
servicio levantado?

Gracias.


___
Milena Garetto
Tecnología Informática
División Informática de AproAgro S.A.


__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados 
http://www.help400.es _

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

RE: Problemas con la Ñ en Apache/PHP/ODBC.

[Juan Carlos Sevilla]

Hola
El problema puede ser mas serio si esta cogiendo por defecto valores 
como ',' por '.', separadores de fecha, formato de fechas.. Americanos... Etc
   Un Saludo! 

-Mensaje original-
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En nombre de Carlos B.S.
Enviado el: lunes, 17 de julio de 2006 10:31
Para: forum.help400@combios.es
Asunto: Problemas con la Ñ en Apache/PHP/ODBC.

Hola foreros,
   
estamos desarrollando un módulo en PHP contra la DB2 del AS400, Apache en 
linux (OpenSuse 10.0). Si hacemos una consulta SQL en cuyo enunciado haya una 
Ñ, nos da el siguiente error y no se ejecuta la consulta:

[ODBC][7712][SQLError.c][379]
Exit:[SQL_SUCCESS]
SQLState = 37000
Native = 0xbfc3d7e4 -> -104
Message Text = [[unixODBC][IBM][Controlador ODBC de 
iSeries Access][DB2 UDB]SQL0104 - Texto de mensaje de error no disponible. El 
mensaje no se ]

Hemos probado con varias tablas de conversión de códigos, sin resultado. 
¿Alguna pista? Gracias de antemano.

Carlos Bartolomé.
Halcón Grupo, S.A.U.
   


__
LLama Gratis a cualquier PC del Mundo. 
Llamadas a fijos y móviles desde 1 céntimo por minuto. 
http://es.voice.yahoo.com
__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados 
http://www.help400.es _

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

RE: Problemas con la Ñ en Apache/PHP/ODBC.

[Juan Carlos Sevilla]

Hola
Seria conveniente plantearse no poner Ñ, aunque suene mal sonante, p.e. 
AÑO--> ANO (ó la Ñ por NY)...
Un Saludo.

P.d.  Es mejor ir corriente a favor que contra-corriente... 

-Mensaje original-
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En nombre de Carlos B.S.
Enviado el: lunes, 17 de julio de 2006 10:31
Para: forum.help400@combios.es
Asunto: Problemas con la Ñ en Apache/PHP/ODBC.

Hola foreros,
   
estamos desarrollando un módulo en PHP contra la DB2 del AS400, Apache en 
linux (OpenSuse 10.0). Si hacemos una consulta SQL en cuyo enunciado haya una 
Ñ, nos da el siguiente error y no se ejecuta la consulta:

[ODBC][7712][SQLError.c][379]
Exit:[SQL_SUCCESS]
SQLState = 37000
Native = 0xbfc3d7e4 -> -104
Message Text = [[unixODBC][IBM][Controlador ODBC de 
iSeries Access][DB2 UDB]SQL0104 - Texto de mensaje de error no disponible. El 
mensaje no se ]

Hemos probado con varias tablas de conversión de códigos, sin resultado. 
¿Alguna pista? Gracias de antemano.

Carlos Bartolomé.
Halcón Grupo, S.A.U.
   


__
LLama Gratis a cualquier PC del Mundo. 
Llamadas a fijos y móviles desde 1 céntimo por minuto. 
http://es.voice.yahoo.com
__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados 
http://www.help400.es _

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

RE: cambiar a usuario por defecto DST

[Juan Carlos Sevilla]

hOLA
Yo estoy en V5R1 y funciona con 
CHGDSTPWD
Un Saludo


De: [EMAIL PROTECTED] 
[mailto:[EMAIL PROTECTED] En nombre de JAVIER MOREDA 
FERNANDEZEnviado el: lunes, 17 de julio de 2006 11:12Para: 
forum.help400@combios.esAsunto: RE: cambiar a usuario por defecto DST 


En que 
versión estas
 
Tienes 
HMC???
 
La 
cosa cambian dependiendo de la versión.

  -Mensaje original-De: [EMAIL PROTECTED] 
  [mailto:[EMAIL PROTECTED]En nombre de PacoEnviado 
  el: lunes, 17 de julio de 2006 8:45Para: 
  forum.help400@combios.esAsunto: cambiar a usuario por defecto DST 
  
  
  Hola compañeros , como es para 
  cambiar el usuario y contraseña por defecto del 
  Usuario DST. Herramientas del 
  sistema
   Gracias.
   
  Saludos 
  Paco Medina
  Exclusivas Camacho, 
  S.Ltda.
  Dtor.Informatica
   

RE: cambiar a usuario por defecto DST

[Juan Carlos Sevilla]

Hola
con CHGDSTPWD PASSWORD(*DEFAULT)
pone los usuarios (dst): QSECOFR, QSRV, , 

con contraseñas igual a los usuarios.
Un Saludo


De: [EMAIL PROTECTED] 
[mailto:[EMAIL PROTECTED] En nombre de PacoEnviado 
el: lunes, 17 de julio de 2006 9:45Para: 
forum.help400@combios.esAsunto: cambiar a usuario por defecto DST 



Hola compañeros , como es para 
cambiar el usuario y contraseña por defecto del 
Usuario DST. Herramientas del 
sistema
 Gracias.
 
Saludos 
Paco Medina
Exclusivas Camacho, S.Ltda.
Dtor.Informatica
 

RE: RE: SQL con 2 ficheros y SUBSTR

[Juan Carlos Sevilla]

Hola 
    Es verdad, yo he probado 
:

UPDATE 
QGPL/IIM A SET A.IDESC = ( SELECT SUBSTR(A.IDESC, 1, 9) || 
SUBSTR(B.IDESC, 1, 3) FROM V81CWMSTRF/IIM B WHERE A.IPROD = B.IPROD)  490 
filas actualizadas en IIM de QGPL.
 
Y funciona -OK-. 

Un 
Saludo
p.d. Lo único especial es que con F4 el 
SQL (INTERACTIVO) NO reconocia la sintaxis, se ha ejecutado pulsando INTRO 
directamente.
 


De: [EMAIL PROTECTED] 
[mailto:[EMAIL PROTECTED] En nombre de alex 
martinezEnviado el: viernes, 14 de julio de 2006 
13:11Para: forum.help400@combios.esAsunto: Re: RE: SQL con 
2 ficheros y SUBSTR
Prueba así:UPDATE BIBL/FICH1 
A    
SET A.CAMPO1 = ( SELECT 
SUBSTR(A.CAMPO1, 1, 9) || SUBSTR(B.CAMPO2, 1, 3) FROM BIBL/FICH2 B 
WHERE A.CLAVE1 = B.CLAVE2 )
2006/7/14, RUBIO-ENRIQUEZ Franc < [EMAIL PROTECTED]>:

  
  
  Rafael: 
  lo he puesto y sigue dando el mismo error:
  Signo SUBSTR no válido. Signos válidos: 
  .
  Saludos,
  
  Francisco Rubio Enríquez Analista Cibernos 
  Consulting, SAU 
  - Mensaje Original - De: "Cubero, Rafael (R.)" < [EMAIL PROTECTED]> 
  Fecha: Viernes 14 Julio 2006 12:37 
  Asunto: RE: SQL con 2 ficheros y SUBSTR A: forum.help400@combios.es 
  > Te falta un ")" el el primer 
  substr. > Te lo he marcado en rojo en la sentencia > > 
  _ > > From: [EMAIL PROTECTED] [mailto: forum.help400- > [EMAIL PROTECTED]] On Behalf 
  Of RUBIO-ENRIQUEZ Franc > Sent: 14 July 2006 11:26 > To: Forum 
  Help/400 > Subject: SQL con 2 ficheros y SUBSTR > > 
  > > Hola a todos: > > estoy intentando ejecutar 
  esta sentencia SQL para actualizar un > campo con el contenido parcial 
  del mismo campo y unirlo con el > resultado de una SELECT del fichero 
  secundario en la que elijo > parte de un campo de este fichero, y no 
  hay manera. > > Os adjunto la sentencia SQL y el error que me 
  da: > > UPDATE BIBL/FICH1 A > SET A.CAMPO1 = 
  (SUBSTR(A.CAMPO1, 1, 9) ) || > > (SELECT SUBSTR(B.CAMPO2, 1, 3) 
  FROM BIBL/FICH2 B > WHERE A.CLAVE1 = B.CLAVE2)) > > y el 
  error me da en el segundo SUBSTR y es: > > > Signo SUBSTR 
  no válido. Signos válidos: + ) -. > > > > Saludos 
  y gracias de antemano, > > Francisco Rubio Enríquez > 
  Analista > Cibernos Consulting, SAU > > > > 
  _ > > -- Disclaimer  
  > Ce message ainsi que les eventuelles pieces jointes constituent 
  > une correspondance privee et confidentielle a l'attention > 
  exclusive du destinataire designe ci-dessus. Si vous n'etes pas le > 
  destinataire du present message ou une personne susceptible de > 
  pouvoir le lui delivrer, il vous est signifie que toute > divulgation, 
  distribution ou copie de cette transmission est > strictement 
  interdite. Si vous avez recu ce message par erreur, > nous vous 
  remercions d'en informer l'expediteur par telephone ou > de lui 
  retourner le present message, puis d'effacer immediatement > ce message 
  de votre systeme. > *** > This e-mail and any attachments is a 
  confidential correspondence > intended only for use of the individual 
  or entity named above. If > you are not the intended recipient or the 
  agent responsible for > delivering the message to the intended 
  recipient, you are hereby > notified that any disclosure, distribution 
  or copying of this > communication is strictly prohibited. If you have 
  received this > communication in error, please notify the sender by 
  phone or by > replying this message, and then delete this message from 
  your > system. > > 
  
  
  
  
  
  
  -- Disclaimer Ce message ainsi que les 
  eventuelles pieces jointes constituent une correspondance privee et 
  confidentielle a l'attention exclusive du destinataire designe ci-dessus. Si 
  vous n'etes pas le destinataire du present message ou une personne susceptible 
  de pouvoir le lui delivrer, il vous est signifie que toute divulgation, 
  distribution ou copie de cette transmission est strictement interdite. Si vous 
  avez recu ce message par erreur, nous vous remercions d'en informer 
  l'expediteur par telephone ou de lui retourner le present message, puis 
  d'effacer immediatement ce message de votre systeme. ***This e-mail 
  and any attachments is a confidential correspondence intended only for use of 
  the individual or entity named above. If you are not the intended recipient or 
  the agent responsible for delivering the message to the intended recipient, 
  you are hereby notified that any disclosure, distribution or copying of this 
  communication is strictly prohibited. If you have received this communication 
  in error, please notify the sender by phone or by replying this message, and 
  then delete this message from your system. 
  
  -- Mi blog sobre 
as400http://www.ajut400.com 

RE: SQL con 2 ficheros y SUBSTR

[Juan Carlos Sevilla]

Hola
prueba con SUBSTRING
uN SALUDO


De: [EMAIL PROTECTED] 
[mailto:[EMAIL PROTECTED] En nombre de RUBIO-ENRIQUEZ 
FrancEnviado el: viernes, 14 de julio de 2006 11:26Para: 
Forum Help/400Asunto: SQL con 2 ficheros y 
SUBSTR

Hola a todos:
estoy intentando ejecutar esta sentencia SQL para actualizar un campo con el 
contenido parcial del mismo campo y unirlo con el resultado de una SELECT del 
fichero secundario en la que elijo parte de un campo de este fichero, y no hay 
manera.
Os adjunto la sentencia SQL y el error que me da:
UPDATE BIBL/FICH1 
A    
SET A.CAMPO1 = (SUBSTR(A.CAMPO1, 1, 9) 
||    
  
(SELECT SUBSTR(B.CAMPO2, 1, 3) FROM BIBL/FICH2 
B    
WHERE A.CLAVE1 = B.CLAVE2)) 
 y el error me da en el segundo SUBSTR y es:
   
Signo SUBSTR no válido. Signos válidos: + ) 
-.   
Saludos y gracias de 
antemano,Francisco 
Rubio Enríquez Analista Cibernos Consulting, SAU



-- Disclaimer Ce message ainsi que les 
eventuelles pieces jointes constituent une correspondance privee et 
confidentielle a l'attention exclusive du destinataire designe ci-dessus. Si 
vous n'etes pas le destinataire du present message ou une personne susceptible 
de pouvoir le lui delivrer, il vous est signifie que toute divulgation, 
distribution ou copie de cette transmission est strictement interdite. Si vous 
avez recu ce message par erreur, nous vous remercions d'en informer l'expediteur 
par telephone ou de lui retourner le present message, puis d'effacer 
immediatement ce message de votre systeme.***This e-mail and any 
attachments is a confidential correspondence intended only for use of the 
individual or entity named above. If you are not the intended recipient or the 
agent responsible for delivering the message to the intended recipient, you are 
hereby notified that any disclosure, distribution or copying of this 
communication is strictly prohibited. If you have received this communication in 
error, please notify the sender by phone or by replying this message, and then 
delete this message from your system. 

RE: ¿Donde estas client access?

[Juan Carlos Sevilla]

Hola
Se llama algoa así como: iSeries Instalacion y operaciones (Version X, release 
x). Incluye iSerie Access para Windows y EZ-Setup para iSeries (SK3T-7768-01)...

Un Saludo
P.d.: al menos esto era para V5R2. 

-Mensaje original-
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En nombre de vicente
Enviado el: jueves, 13 de julio de 2006 15:35
Para: Forum. Help400 (E-mail)
Asunto: ¿Donde estas client access?

Hola a todos

He recibido recientemente mi flamante iSeries 520 (el mas modestito de
todos) y soy incapaz de encontrar los CD's del Client Access ó como se llame 
ahora, alguien me podria dar una pista (Antes cuando recibias 300.000 manuales 
con la compra del 36 era mas facilito)

PD: la version recibida es V5R3 del iseries


Saludos

Vicente Gómez



__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados 
http://www.help400.es _

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

RE: se puede pasar parametros a una trasnferencia DTF?

[Juan Carlos Sevilla]

Hola:
   Desde el Excel, si vas a Datos-->Obtener datos Externos-->Nueva Consulta a 
Base de Datos...(tienes que tener Microsoft Query), te lleva a un ODBC 
(previamente definido) y te deja hacer una consulta. En dicha consulta puedes 
poner parametros. Se puede actualizar. Hay que salvarlo como .xlt (plantilla de 
excel)

Un Saludo

-Mensaje original-
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En nombre de [EMAIL PROTECTED]
Enviado el: jueves, 13 de julio de 2006 12:22
Para: forum.help400@combios.es
Asunto: Re: se puede pasar parametros a una trasnferencia DTF?

He probado ha editar con Word 2003 la transferencia que yo genero y la original 
creada por el CA y, sorpresa: mientras la mia es como un txt normal y 
corriente, la original esta codificada como UNICODE. Si la editas con el EDIT 
del DOS, tambien se ve mal. La conclusion es que al RTOPCB hay que pasarle 
transferencias codificadas en UNICODE. ¿Sera cosa de la version (estoy en la 
5.3)?

He estado buscando algun parametro que pueda modificar esto pero no veo nada 
¿Alguna sugerencia?



Nueva Barra de Herramientas de OZÚ. Navega Más facilmente por Internet.
¡Descargatela gratis! http://barra.ozu.es/

Correo enviado desde http://www.ozu.es
__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados 
http://www.help400.es _

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

__
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400

RE: Para saber el dia de la semana de una fecha dada

[Juan Carlos Sevilla]

Buenos Dias:
   Este 
programa lo encontre en un NEWS/400 (Nov'1996) en Trucos y Tecnicas. Es el 
siguiente:
 * DAYOFWEEK = 1 - 7 (Domingo - 
Sabado)  
DDATEIN   
S   
D   DATFMT(*ISO)   
DDAYOFWEEK    
S  
7  
0    
 *   
C *ENTRY    
PLIST    
C   
PARM    
DATEIN   
C   
PARM    
DAYOFWEEK    
 *   
C DATEIN    
SUBDUR    D'1899-12-30' DayOfWeek:*D 
C   
DIV   
7 
DAYOFWEEK    
C   
MVR 
DAYOFWEEK    
 *   
C   
IF    DAYOFWEEK < 
1  
C   
EVAL  DAYOFWEEK = DAYOFWEEK + 7  
C   
ENDIF    
 *   
C   
EVAL  *INLR = 
*ON    

 

Funciona correctamente. Tan solo hay que correlacionar el 
DAYOFWEEK que retorna al dia de la semana español, es decir (1=Domingo, 
2=Lunes...7=Sabado) cuando en España (1=Lunes, 2=Martes... 
7=Domingo)
Un Saludo
p.d.: Es perpetuo. Habria que plantearse si hacerlo en un 
procedimiento (más que incluirlo en todos los fuentes. En este caso quitar el 
*ENTRY...)


De: [EMAIL PROTECTED] 
[mailto:[EMAIL PROTECTED] En nombre de DavidEnviado 
el: jueves, 13 de julio de 2006 8:39Para: 
forum.help400@combios.esAsunto: Para saber el dia de la semana de una 
fecha dada


Hay alguna función que me devuelva 
el día de la semana de una fecha que le pase 
 
 
 
Dpto.Informático
Foisa. 
SA
 

RE: (no subject)

[Juan Carlos Sevilla]

Hola
con el mandato Convertir Fecha (CVTDAT)
Un Saludo


De: [EMAIL PROTECTED] 
[mailto:[EMAIL PROTECTED] En nombre de DavidEnviado 
el: miércoles, 12 de julio de 2006 19:00Para: 
forum.help400@combios.esAsunto: (no subject)


Alguien conoce una función del 
AS-400 que devuelva la fecha juliana gracias.
 
 
Dpto.Informático
Foisa. 
SA
 

RE: consulta urgente

[Juan Carlos Sevilla]

con WRKSYSSTS


De: [EMAIL PROTECTED] 
[mailto:[EMAIL PROTECTED] En nombre de 
[EMAIL PROTECTED]Enviado el: martes, 11 de julio de 2006 
19:24Para: forum.help400@combios.esAsunto: consulta 
urgente
Tenfo un AS/400 Modelo 520 
Como puedo ver la capacidad total de 
disco duro, memoria RAM y Cache   Gracias

RE: Pasar SPLF a PDF

[Juan Carlos Sevilla]

Hola!
Puedes utilizar la impresora de Acrobat Destiller (Version 5.0) ó 
AdobePDF (Version 7.0). Es decir:
   1. Tienes que tener instalado el Acrobat Adobe Professional 7.0 (no el 
reader)
   2. Realizas una emulacion 5250 de impresora con la impresora conversora 
(AdobePDF)
   3. Arranca emulacion y redije las facturas a la cola creada (ej.: 
ADOBE400)
 
   Problemas: Ojo con Windows XP Profesional/Home y con la fuente .ttf 
(Courrier New) --> letra ilegible
Ojo con lentitud.
* Funciona bien con Windows 2000 (sp4).
  Otra solucion es con el CUTEPDF (se compra por 30Euros) y hace lo mismo. 
 
 Un Saludo



De: [EMAIL PROTECTED] en nombre de Rafa Martí
Enviado el: mar 11/07/2006 16:11
Para: forum.help400@combios.es
Asunto: Pasar SPLF a PDF


Hola a todos,
 
En mi empresa están estudiando el enviar las facturas a los proveedores 
mediante el PC en ficheros PDF. Yo conozca el aplicativo ezDocs pero me 
gustaría saber si conocéis algun otro para poder comparar.
Se que se podría utilizar el CPYSPLF pero no es lo que me interesa puesto 
que debes dar al usuario ciertas autorizaciones que, por seguridad, no nos 
interesa.
 
 
 
Gracias.
 
 
 
Rafa.
<>