viernes, 17 de septiembre de 2010

Recuperar trabajos de un usuario

La utilidad RTVUSRJOB nos sirve para recuperar los trabajos de los usuarios, pudiendo seleccionar por nombre de usuario, nombre de trabajo (incluido genéricos), estado del trabajo y tipo de trabajo (Batch, Interactivo o todos).
La salida del mandato puede ser a archivo de spool o directamente a fichero, no se contempla la salida a pantalla porque ya existe el mandato WRKUSRJOB que realiza dicha función.
Pulsando F1 podemos acceder a la ayuda del mandato.

pd: También esta disponible en el Grupo Recursos AS400 de IBM MydW para su descarga.

jueves, 2 de septiembre de 2010

Limpiar automaticamente mensajes, joblogs, dumps, ...

Una de las tareas básicas de cualquier administrador de un sistema es mantener los logs del sistema. Nuestro AS400 incluye una funcionalidad para realizar estas tareas, de una forma sencilla y automática.

Para ello solo hemos de ejecutar el mandato GO MENU(CLEANUP) que nos mostrará un menú con las siguientes opciones:
 Primero definiremos que acciones y periodos queremos limpiar, para ello seleccionamos la opción 1, que nos mostrará la siguiente pantalla:
En esta pantalla definimos los periodos de retención de los mensajes, diarios y logs del sistema, así como la hora de ejecución diaria de la limpieza. Pulsar Intro para guardar los cambios y otra vez para salir. 
Nota1: La limpieza de joblogs la realiza solo de los listados ubicados en  las colas de salida QUSRSYS/QEZJOBLOG y QUSRSYS/QEZDEBUG.
Nota2: Para que los listados de los joblogs, dumps y vuelcos de servicio vayan a parar a las colas QEZ* correspondientes, ejecutar los siguientes mandatos:
  CHGPRTF    FILE(*ALL/QPJOBLOG) OUTQ(*LIBL/QEZJOBLOG)
  CHGPRTF    FILE(*ALL/QPPGMDMP) OUTQ(*LIBL/QEZDEBUG)
  CHGPRTF    FILE(*ALL/QPSRVDMP) OUTQ(*LIBL/QEZDEBUG)
A continuación solo nos queda activar la limpieza automática seleccionando la opción 2.

Nota3:  Para que se ejecute la limpieza diaria debe estar activo el Planificador de trabajos del sistema. Trabajo QSYSSCD en subsistema QCTL o QBASE, este trabajo somete el trabajo QCLNUSRMSG, así como los trabajos planificados.

También podemos lanzar la limpieza automática inmediatamente con la opción 3, o cancelar su ejecución con la opción 4.

miércoles, 4 de agosto de 2010

Goodbye, AS/400, Old Friend

Interesante Articulo con una retrospectiva de la historia del AS400 y sus orígenes, publicado en ITJungle en Abril de 2008 por Brian Kelly:

http://www.itjungle.com/tfh/tfh040708-story05.html

El siguiente enlace al documento "20 years of the AS/400", podemos ver el timeline de la historia de este sistema.

Aprovechad el verano para su lectura.

sábado, 24 de julio de 2010

Auditar la seguridad en AS400

La gente de PowerTech tiene colgada una guía donde nos explica los conceptos de seguridad del As400 y algunos ejemplos para comprobar nuestro estado. Recomiendo su lectura ya que puede sernos muy interesante a la vez que aprendemos mas sobre nuestro sistema:


Además realizando este tipo de análisis muchas veces descubrimos problemas ocultos en nuestras aplicaciones.

miércoles, 14 de julio de 2010

Trabajos QZDASOINIT

Los trabajos QZDASOINIT dan servicio a las conexiones ODBC de los usuarios y/o aplicaciones remotas realizan desde cliente (PC,o Servidor). Estos trabajos se ejecutan con el usuario QUSER.
QZDASOINIT es un trabajo de prearranque del subsistema QUSRWRK; para ver estas entradas usar el mandato DSPSBSD SBSD(QUSRWRK) y seleccionar la opción 10 "Prestart job entries". En esas entradas podemos ver, con la opción 5, la configuración de este servicio y sobre todo el numero inicial de trabajos y  numero máximo de trabajos permitidos.
Para arrancar el servicio (es necesario que este levantado el subsistema QSERVER):
STRHOSTSVR SERVER(*DATABASE)                                                     
    The database server daemon is started in the QSERVER subsystem
    The daemon job is named QZDASRVSD.  The associated server jobs
    are named QZDASOINIT, QZDASSINIT, and QTFPJTCP.


Para detener el servicio:
ENDHOSTSVR SERVER(*DATABASE)                                        
    The active connections being serviced by the        
    QZDASOINIT and QZDASSINIT server jobs will be ended.
    The server jobs servicing these connections will be 
    ended.
Si ejecutamos el mandato WRKACTJOB JOB(QZDASOINIT) vemos, rápidamente, que usuarios están conectados en ese momento al servicio, ya que desde la V5R4 del OS400 se modifico este mandato para mostrar el Current User en la columna User, si no hay nadie conectado en ese momento se muestra QUSER.