lunes, 15 de febrero de 2010

Diccionario breve para entender mandatos AS400

Los mandatos del AS400 heredaron la nomenclatura de creación de comandos del S/38 de IBM, y la costumbre muy anglosajona de contraer las palabras usadas. Básicamente la idea, con excepciones, es utilizar las consonantes del verbo de la acción a realizar y de las palabras a utilizar mientras fueran legibles.
Por ejemplo unos de los mandatos mas utilizados del AS400 es "Trabajar con trabajos activos" y que es: WRKACTJOB (Work active jobs), realmente es simple y fácil de recordar.

A continuación os paso un breve diccionario para entender la nomenclatura de los mandatos del AS400 (no pretende ser una lista exhaustiva):

AUD  - Audit (Auditar)
AUT  - Authorization (Autorización)
AUTL - List of authorization (Lista de autorizaciones)
CFG  - Configuration (Configuración)
CHG  - Change (Cambiar)
CPY  - Copy (Copiar)
CRT  - Create (Crear)
CTL  - Controller (Controlador)
DEV  - Device (Dispositivo)
DFN  - Definition (Definición)
DIR  - Directory (Directorio)
DLT  - Delete (Eliminar)
DOC  - Document (Documento)
DSK  - Disk (Disco)
DSP  - Display (Visualizar)
DTA  - Data (Datos)
DUP  - Duplicate (Duplicar)
EDT  - Edit (Editar)
FIL  - File (Archivo)
GRP  - Group (Grupo)
GRT  - Grant (Autorizar)
HDW  - Hardware
INF  - Information (Información)
JOB - Job (Trabajo)
JRN  - Journal (Diario)
LCK  - Locks (Bloqueos)
LIB  - Library (Biblioteca)
LIN  - Line (Linea)
LNK  - Links (Enlaces)
OBJ  - Object (Objeto)
OUT  - Output (Salida)
OWN  - Owner (Propietario)
PGM  - Program (Programa)
PGP  - Primary group (Grupo primario)
PNL  - Panel (Panel de visualización)
PRF  - Profile (Perfil de usuario)
PRT  - Printer (Impresora)
QRY  - Query (Consulta)
RMT  - Remote (Remoto)
RMV  - Remove (Remover)
RSC  - Resource (Recurso)
RST  - Restore (Restaurar)
RVK  - Revoke (Revocar)
SAV  - Save (Salvar)
SRC  - Source (Origen, Fuente)
STR  - Start (Arrancar)
STS  - Status (Estado)
SYS  - System (Sistema)
TBL  - Table (Tabla)
TGT  - Target (Destino)
USR  - User (Usuario)
VAL  - Value (Valor)
WRK  - Work with (Trabajar con)
...

Algunos de especiales:
***E - Entry (Entrada de una lista)
D    - Description (Descripción)
Q    - Queue (Cola)
...

lunes, 8 de febrero de 2010

Desactivar usuarios sin uso

Es recomendable desactivar los usuarios inactivos, o sea con más de x días sin conectarse al sistema.

Para ello podemos utilizamos una herramienta del sistema, es recomendable conectarse como QSECOFR para realizar esta acciones:
  • Ir al menú GO SECTOOLS.
  • Seleccionar la opción "4. Analyze profile activity" (mandato ANZPRFACT) e introducir los días inactivos, por ejemplo 30 días.
  • Al pulsar Intro añade, o modifica si ya la teníamos, la entrada QSECIDL1 de los trabajos planificados del sistema.
  • Podemos ver o editar esta entrada con el mandato:
  • WRKJOBSCDE JOB(QSECIDL1)
  • Si, por ejemplo, queremos que se ejecute mensualmente (por omisión es semanal):
  • CHGJOBSCDE JOB(QSECIDL1) FRQ(*MONTHLY) SCDDATE(*MONTHEND) SCDDAY(*NONE) JOBQ(*LIBL/QSYSNOMAX) TEXT('Desactiva usuarios sin uso durante más de 30 días')
Si tenemos usuarios que no nos interesa que se desactiven nunca hemos de introducirlo en la lista de usuarios a omitir por este proceso, para ello:
  • Ir al menú GO SECTOOLS.
  • Seleccionar la opción "3. Change active profile list".
  • O utilizar el mandato CHGACTPRFL y pulsar F4.
  • Después introducimos el perfil de usuario que queremos omitir, por ejemplo QSECOFR:
  • CHGACTPRFL USRPRF(QSECOFR) ACTION(*ADD).
  • Para eliminar un usuario de la lista:
  • CHGACTPRFL USRPRF(ANYUSER) ACTION(*REMOVE)
  • Podemos visualizar, o imprimir, la lista de usuarios omitidos para desactivación automática con la opción "2.Display active profile list" (mandato DSPACTPRFL)