Il faudra parfois supprimer des enregistrements en double (dont toutes les valeurs de champs correspondantes sont égales) d'un fichier, et donc, ne garder qu'un exemplaire de chaque enregistrement dans le fichier. Pour supprimer, par exemple, les enregistrements en double de MYLIB/DBFILE, procéder ainsi :
1 - Dupliquer le DBFILE qui
contient les enregistrements en double dans un WRKFILE vide en utilisant la commande :
CRTDUPOBJ DBFILE MYLIB *FILE TOLIB(MYLIB) NEWOBJ(WRKFILE) DATA(*NO)
2 – Peupler le WRKFILE avec des enregistrements uniques provenant de DBFILE en utilisant l’instruction SQL :
INSERT INTO MYLIB/WRKFILE SELECT DISTINCT * FROM MYLIB/DBFILE
3 – Recopier le nouveau WRKFILE dans l’ancien DBFILE en utilisant la commande :
CPYF FROMFILE(MYLIB/WRKFILE) TOFILE(MYLIB/DBFILE) MBROPT(*REPLACE)
Jay Oswal, Client Services Manager (Houston)
Artesia Data Systems, Inc.
Dallas, Texas
Longtemps sous-estimée, la sécurisation d’un système d’impression d’entreprise doit être pleinement prise en compte afin de limiter le risque de fuite d’informations sensibles. Voici les 3 principales précautions à prendre.
