TRABAJOS DE CONTROL DE ACCESOS

Preliminares

	Se trata de impedir la reutilizacion de conexiones ODBC en el AS/400 y de controlar que las conexiones que se efectuen por parte de los usuarios sean exclusivamente a traves de los programas generados por progamadores.  Este control se realizara a traves de los Exit Point del AS/400 y solo cuando los trabajos de Prearranque QZDASOINIT no han sido utilizados antes.

Los Programas estan hechos en RPG-ILE. En este documento se indican los modulos que utiliza cada programa.
	


Implementacion ODBC 

Existe un fichero en el AS/400 (AUJOBAF) que permitira a los usuarios de programas generados por nosotros acceder a la base de datos del as400, en este se registraran los accesos autorizados, y los accesos sin autorizacion, los registros seran marcados cuando finalice el trabajo.

Programas:

AUJOBG: 	Graba en el fichero AUJOBAF datos para autorizar el acceso,(numero de trabajo y hora). Recupera el numero de trabajo con ASJOB.
AUJOBD: 	Elimina la conexión QZDASOINIT en el AS/400, el joblog que genera y marca el registro de AUJOBAF(Fin=X hora final).
	Lanza el programa AUJODS, ejecuta el programa AUJOBDG que marca el trabajo como finalizado.
AUJOBS: 	Comprueba que la conexión tiene datos en AUJOBAF, si no lo tiene elimina la conexión y graba un registro en AUJOBAF (acceso=S hora y datos de usuario, Fin=X hora final), si tiene datos graba en  AUJOBAF (acceso=P y datos de usuario). Es emitido desde el Exit-Point QIBM_QZDA_INIT con el programa EXITPOIN.
	Llama al programa AUJOBSR, este utiliza los modulos:
CHKGRP: comprobacion de usuario en el grupo informati.
API21 y API3: obtienen datos del trabajo via API.
API2B :	Comprueba cada 50 segundos todos los trabajos QZDASOINIT y Chequea que tengan autorizado el acceso en el fichero AUJOBAF (acceso=P), si no, elimina la conexión y graba un registro en AUJOBAF (acceso=S hora y datos de usuario, Fin=X hora final). Es un trabajo llamado CTLQZDASO en la QINTER. Este trabajo tambien controla que los registros activos (fin=’ ‘) existan en el sistema, en caso contrario graba en el registro (Fin=X hora final).
		Utiliza los siguientes modulos:
			API2B          *MODULE
APIRPGB        *MODULE
API3           *MODULE
CHKGRP         *MODULE
		Llama al programa:
			AUJOBDAT: Recupera la hora actual
			AUJOBP  : Chechea que el fichero AUJOBAF este
actualizado

	Programas PC:

		En todos los ejecutables que efectuan conexion ODBC se deben incluir dos programas:

- En los Eventos Star el Programa AUJOBG (“call ( ‘aUJOBG’)”).
- En los Eventos Exit el Programa AUJOBD (“call ( ‘aUJOBD’)”).

Desarrollado por: Pedro Pinedo Hernandez

ppinedo@tobepal.es
pederete@ozu.es