A Useful Little Routine to Change Data in Fields

Level: Beginner Development

Today I thought I'd just share with you a little routine that I use when I want to make field level changes to a lot of documents without having to edit them. It's beginner stuff but I use it a lot.

What you need
A document, or group of documents with a field called DocNumber
A view where you can select those documents.
Notes Designer.

Creating the Agent

Open Designer on the database (or template)
Click on Shared Code then Agents
Click on the button marked New Agent
In the Properties box, give your agent a Name eg: Change Document Number
It should be a Shared Agent
In the Target Section, it should read All Selected Documents
You don't need to change anything else in the properties box, so just close it.
Now, in the intialize event of your Agent (just click on the word initialize and type in the box that appears).
Type your code (or paste it from this page).
When you've finished, Close the agent windows and choose YES to save your changes.

The code

Sub Initialize
   Dim NewSection As String
   Dim Counter As Long

   Dim ses As New notessession
   Dim doc As notesdocument
   Dim db As notesdatabase
   Dim col As notesdocumentcollection

   Counter = 0
   NewSection = Trim$(Inputbox$("What is the name of the New Category?"))

   If NewSection = "" Then
      Print "You did not specify a category to move documents to. No documents moved."
      Exit Sub
   End If

   Set db = ses.currentdatabase
   Set col = db.unprocesseddocuments

   Set doc=col.getfirstdocument

   While Not doc Is Nothing
      doc.DocNumber = NewSection
      Counter = Counter +1
      Call doc.Save(True, True)

      Set doc=col.getnextdocument(doc)
   Wend
   Print Trim$(Str$(Counter)) + " document(s) moved to category: " + NewSection
End Sub

How to Use the Routine
Simply tag a whole heap of documents then click on Actions, then Change Document Number (from the Lotus Notes Menu). You'll be prompted for a new number and then it will change all the selected documents.

I use this routine a lot when I want to move documents from one section/category to another.

Comments

How to Change Your Notification Options for New Lotus Notes Mail in version 8.x

Don't worry, I'm not patronizing you (my readers), I just decided to re-document this for one of our internal users and thought you might want to be able to use it in your own user documentation. WHAT IS THIS DOCUMENT ABOUT? Some people who don't get a lot of mail, like to be notified when such an event occurs. Notification can be; via a sound via a pop-up box via the system tray (where the computer clock is) The pop up box looks like this; Other people, who like myself, get too much mail would rather not be notified. The aim of this document is to tell you how (and where) to turn these options on and off. CHANGING YOUR SETTINGS To change your settings from the Notes 8.x client; On the Menu, click File , then Preferences... On the left hand side , click on the little plus sign to the left of Mail to expand the options. Click on the option marked Sending and Receiving . In the middle section, under receiving, you can control your notifications. If you untick the box mark...

How to Create a Bootable DVD Using Nero Burning ROM 9

I often need to create bootable CDs and DVDs but it's weird because I frequently end up buring myself a new coaster instead. It's not that the process is difficult, just that nero has a few too many options and I forget which ones to choose and end up picking the wrong one. I figured that the best way to avoid this mistake in future would be to write the steps down. Procedure Insert CD or DVD into your DVD Burner. Start Nero Burning ROM 9 Choose DVD-ROM (Boot) or CD-ROM (Boot) depending on what you're creating You'll be prompted for a disk image source. Choose a Nero Source - you'll usually find them somewhere like this... C:\Program Files\Nero\Nero9\Nero Burning Rom\DOSBootImage.ima Leave the Boot Locale as English - unless you really need a different keyboard layout Tick the box marked [X] Enable Expert Settings Choose Hard Drive Emulation and leave any other settings as they are. Click the button marked New Add any files you want but don't try to add operati...

How to Create an Auto-Response Mail Message in Lotus Notes 8.5.3+

Why would you do this? Suppose that you have an externally accessible generic email address for your company; support@mycompany.com or info@mycompany.com. You might expose this to the web and allow people to send messages to you. Setting up an auto-response email will tell the senders that their message reached its destination and that it will be dealt with accordingly. It's also good practice to include links to FAQs or other useful information. Why 8.5.3 The techniques we'll be using here work in older versions of Notes but some of the options seem to have moved around in 8.5.3. I figured it was a good time to show you where they've moved to. The Procedure Start Domino Designer and open the Mail file to be modified. A really quick way to do this is to right-click on the application tab and choose "Open in Designer". In the Left hand panel of designer, expand Code and then double-click Agents. A new window should appear. Click the action ...

Real World Computing

Search This Blog