DSPAUTE est un outil qui vous permettra de faciliter la gestion de vos postes d''authentification
En effet à ce jour il n'existe pas de commande pour voir vos postes sur plusieurs utilisateurs
La commande DSPSVRAUTE ne permet de voir que les postes pour un utilisateur, ce qui peut être
long si vous avez beaucoup d'inscriptions à faire.
Les Objets:
DSPAUTE CMD la commande
DSPAUTEC CLP le programme qui génère le fichier global
DSPAUTEC1 CLP le programme qui génère les informations pour un utilisateur
DSPAUTEE DSPF l'écran d'affichage
DSPAUTER SQLRPGLE le programme de gestion
Installation :
Compiler les 2 programmes DSPAUTEC , DSPAUTEC1
compiler la commande dspaute avec comme paramètre PGM(DSPAUTEC)
compiler le qmqry commande crtqmqry
compiler l'écran
Pour compiler le programme RPG, le mieux est de lancer la commande une fois pour rien
elle créera les fichiers dans qtemp,et après il vous suffit de compiler en INTERACTIF
Restriction :
le qmqry utilise des fonctions uniquement disponibles à partir de la v5r3
quand vous supprimez un poste il n'est pas supprimé dans le sous fichier il faut ressortir
Remarque :
Pour réafficher une deuxième base faire <F5>
EXEMPLE :
DSPAUTE BDNAME(ORION120)
BIOEUPRO Affichage des postes d'authentification 20/04/05
BERTHOPL 14:58:40
Base de donnée... : ORION120
2 Modifier 4 Supprimer
Utilisateur
Opt Base de donnée Local Distant
ORION120 ABERU DFTDDM
ORION120 AVERELL DFTDDM
ORION120 PLOTY DFTDDM
ORION120 A2005 DFTDDM
ORION120 BEDNERD DFTDDM
ORION120 BERNARD DFTDDM
ORION120 PLBERTHO DFTDDM
ORION120 BILBINM DFTDDM
ORION120 BONNET DFTDDM
ORION120 BRANDICHE DFTDDM
ORION120 BUNNY DFTDDM
ORION120 BUSTER DFTDDM
F3=Exit F5=Réafficher
Voici une petite procédure qui peut permettre de tracer lorsqu'un fichier
se trouve avec des données en erreurs après le passage d'un traitement batch
Vous pourrez trouver l'utilisateur, le travail, ou même le programme Fautif
Voici trois petits programmes à compiler :
Le premier est à lancer avant votre traitement
Le deuxième lorsque le traitement est terminé
Le troisième lorsque vous n'avez plus besoin de la journalisation
1) Démarrage de la journalisation
PGM PARM(&FIC &LIB) /*-----------------------------------------------*/
/* MISE EN PLACE DE LA JOURNALISATION SUR UN FICHIER */
/*-------------------------------------------------------------------*/
DCL &FIC *CHAR 10
DCL &LIB *CHAR 10
/*-------------------------------------------------------------------*/
/* CREATION DU RECEPTEUR DE JOURNAL */
/*-------------------------------------------------------------------*/
CRTJRNRCV JRNRCV(&LIB/JOURNRCV) THRESHOLD(500000) +
TEXT('Journalisation pour' *BCAT &FIC)
/*-------------------------------------------------------------------*/
/* CREATION DU JOURNAL */
/*-------------------------------------------------------------------*/
CRTJRN JRN(&LIB/JOUR000001) JRNRCV(&LIB/JOURNRCV) +
MNGRCV(*SYSTEM) TEXT('Journalisation +
pour' *BCAT &FIC)
/*-------------------------------------------------------------------*/
/* DEMARRAGE DE LA JOURNALISATION */
/*-------------------------------------------------------------------*/
STRJRNPF FILE(&LIB/&FIC) JRN(&LIB/JOUR000001) +
IMAGES(*BOTH)
ENDPGM
2) Consultation
PGM PARM(&FIC &LIB) /*-----------------------------------------------*/
/* AFFICHAGE RESULTAT */
/*-------------------------------------------------------------------*/
DCL &FIC *CHAR 10
DCL &LIB *CHAR 10
/*-------------------------------------------------------------------*/
/* AFFICHAGE DU JOURNAL */
/*-------------------------------------------------------------------*/
DSPJRN JRN(&LIB/JOUR000001) FILE((&LIB/&FIC)) +
RCVRNG(*CURCHAIN) OUTPUT(*OUTFILE) +
OUTFILE(votrebib/JOURNRES)
/*-------------------------------------------------------------------*/
/* Traitement automatique du fichier */
/* Par exemple un query ou sql */
/* RUNQRY .... */
/* */
/*-------------------------------------------------------------------*/
ENDPGM
2) Arrêt de la journalisation et suppression de l'environnement
PGM PARM(&FIC &LIB) /*-----------------------------------------------*/
/* ARRET DE LA JOURNALISATION SUR UN FICHIER */
/*-------------------------------------------------------------------*/
DCL &FIC *CHAR 10
DCL &LIB *CHAR 10
/*-------------------------------------------------------------------*/
/* ARRET DE LA JOURNALISATION */
/*-------------------------------------------------------------------*/
ENDJRNPF FILE(&LIB/&FIC)
/*-------------------------------------------------------------------*/
/* SUPPRESSION JOURNAL */
/*-------------------------------------------------------------------*/
DLTJRN JRN(&LIB/JOUR00*)
/*-------------------------------------------------------------------*/
/* SUPRESSION RECEPTEUR DE JOURNAL */
/* ATTENTION SI PAS SAUVEGARDER * ERREUR * */
/*-------------------------------------------------------------------*/
DLTJRNRCV JRNRCV(&LIB/JOURNRCV)
ENDPGM
remarque :
Lorsque vous aurez trouvé le résultat, n'oubliez pas de supprimer le fichier
votrelib/journres
ADDSMTPA est un outil qui vous permettra d'ajouter en automatique les informations smtp sur un user dans la directory entry par exemple à la création.
Remarque :
à ce jour 2 possibilités mais aucune en automatiquewrkdire
option 2
<f19>
ou
WRKNAMSMTP
Les Objets:
ADDSMTPA CMD la commande
ADDSMTPA1 TXT La commande (si le fichier DSPARP.CMD a été détruit par votre FW)
ADDSMTPAC CLP Le programme
ADDSMTPAR SQLRPGLE le programme de gestion
Installation :
compiler le programme ADDSMTPAR
compiler le programme ADDSMTPAC
Compiler la commande ADDSMTPA avec comme paramètre PGM(ADDSMTPAC) si vous ne trouvez pas le fichier .cmd
renommerle fichier ADDSMTPA1.txt
Restriction :
aucune