Manage Learn to apply best practices and optimize your operations.

Easily show and hide layers in a Lotus Notes database

SearchDomino.com member Jane Griscti provides simple instructions and LotusScript code that will easily allow you to show or hide layers in a Lotus Notes database.

Follow these instructions and paste in this LotusScript code to easily allow you to show or hide layers in a Lotus Notes database.

  1. Create a layer.
  2. Add a hidden 'layer state' field.
  3. Set the Hide/When formula for the paragraph containing the layer to layerStateFld = "0."
  4. Create a Hotspot action that calls the following sub routine.
Static Sub showAndHideLayer(stateFld$)
'-- Show or Hide a layer
'--   stateFld$ - name of the field 
referenced by the layer's hide formula
'--
Dim doc As NotesDocument
Dim layers List As String
Dim layerState$

If Not ( Iselement(layers(stateFld$)) ) Then
'-- first time user clicked the show/hide icon for this layer
layers(stateFld$) = "0"
End If

'-- ws is NotesUIWorkspace, declared in 
Form-Globals and set in Form-Initialize 
Set doc = ws.CurrentDocument.Document 
layerState$ = layers(stateFld$)

'-- change the layers display state 1=show 
0=hide If(layerState$ = "0") 
Then Call doc.ReplaceItemValue(stateFld$,"1")
Else
Call doc.ReplaceItemValue(stateFld$,"0")
End If

'-- save the layers new state
layers(stateFld$) = doc.GetItemValue(stateFld$)(0)

Call uidoc.RefreshHideFormulas
End Sub

Do you have comments on this tip? Let us know.

Related information from SearchDomino.com:

  • Learning Guide: LotusScript
  • FAQ: LotusScript advice
  • Tip: Create a Lotus Notes analyzer using LotusScript
  • Reference Center: LotusScript tips and resources

    This tip was submitted to the SearchDomino.com tip library by member Jane Griscti. Please let others know how useful it is via the rating scale below. Do you have a useful Lotus Notes, Domino, Workplace or WebSphere tip or code snippet to share? Submit it to our monthly tip contest and you could win a prize.

  • Dig Deeper on LotusScript

    Start the conversation

    Send me notifications when other members comment.

    Please create a username to comment.

    SearchWindowsServer

    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 ...

    SearchDataCenter

    SearchContentManagement

    Close