Approach User Support homepage Approach User Support
Answers to Frequently Asked Questions about Lotus Approach
Examples LotusScripts
Example databases
Links to other Lotus Approach support services

[Return to contents]

Example LotusScript: Handling Approach Object Errors

Last updated: before December, 1998

This example stops an error generation when no records from a Named Find
called from within LotusScript.

In Globals --> Declarations include the following statement on a line by itself. (Help says to leave a blank space after the statement, so I typed a space before a carraige return)

     %INCLUDE "C:\LOTUS\APPROACH\APRLSERR.LSS"

The aprlserr.lss declares as public constants some Approach specific errors.

The line "Public Const AprErrNAMEDFIND = 11022" gives you the error handler to use within a script. Open it with a text editor and print it for future reference.

This is an example of a button script that calls a Named Find. If no records are found, the flow of control passes to the end:

Sub Click(Source As Button, X As Long, Y As Long, Flags As Long)
        On Error 11022 Goto theend
        CurrentWindow.NamedFindSort = "A6"
        Exit Sub
theend:
        Print "Error"
        Exit Sub
End Sub

[Return to contents]

© Copyright, JohnBrown, Trademarks, Disclaimer, Acknowledgements.