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
Téléchargez cette ressource
Plan de sécurité Microsoft 365
Les attaquants savent comment prendre le contrôle de votre tenant Microsoft 365, et vous, savez-vous comment le reprendre en main ?