Deleting Duplicate Documents

There will be many instances when one wants to find the duplicate documents & keep the latest (the most current) of them & delete the rest from the DB. This can be achevied by the following simple agent.


The most current is defined by a field called "AppDate".The unique identifier here is "DocNumber".

Create documents having same "DocNumber"& different "AppDate"s using a form & run this agent. The rest is done.

AllDup:=@DbLookup("Notes";"";"Duplicate";DocNumber;"AppDate");
Big:=@Subset(AllDup;-1)-[01/01/2000 01:01:01AM];
Current:=AppDate-[01/01/2000 01:01:01AM];
@If(Current = Big;"";@DeleteDocument);

--View Duplicate has two columns,the first column is sorted on "DocNumber",the second is sorted on "AppDate"(Ascending order).

Note: This only works when "AppDate" is greater than the given date(01/01/2000).

This was first published in November 2000

Dig deeper on Lotus Notes Domino Formula Language

0 comments

Oldest 

Forgot Password?

No problem! Submit your e-mail address below. We'll send you an email containing your password.

Your password has been sent to:

-ADS BY GOOGLE

SearchWinIT

Search400

  • iSeries tutorials

    Search400.com's tutorials provide in-depth information on the iSeries. Our iSeries tutorials address areas you need to know about...

  • V6R1 upgrade planning checklist

    When upgrading to V6R1, make sure your software will be supported, your programs will function and the correct PTFs have been ...

  • Connecting multiple iSeries systems through DDM

    Working with databases over multiple iSeries systems can be simple when remotely connecting logical partitions with distributed ...

SearchEnterpriseLinux

SearchVirtualDataCentre.co.UK

Close