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
Comment accélérer la transformation des environnements de travail ?
Dans un monde professionnel en pleine mutation, la mobilité, l’efficacité énergétique, la sécurité et l’intelligence embarquée sont devenues des critères décisifs pour les équipements informatiques. Découvrez comment les nouveaux PC Microsoft Surface dotés des processeurs Snapdragon X Series s’imposent comme une réponse stratégique aux nouveaux enjeux IT.