• form name missing

    By MAILLET Benoit 8 years ago

    Hi and thanks for this great application.

    I'm trying to audit who delete what on one of my databases and if everything is working, i am just wondering why i can't have the form name and document noteid displayed in an audit log ?

    on the Logger, here is what we got:

    '// Get the log db
            Set logdb = session.getdatabase(session.CurrentDatabase.server, amConfigDoc.logLocation(0))
            If Not logdb.IsOpen Then
                Call logdb.Open( "", "" )
            End If
            '// create log doc
            Set logdoc = New NotesDocument ( logdb )
            logdoc.AM_Initiator = ts.UserName
            logdoc.AM_DatabaseTitle = db.title
            logdoc.AM_DatabaseReplicaID = db.replicaid
            logdoc.AM_Server = db.Server
            logdoc.AM_DatabasePath = db.filepath
            logdoc.AM_ActionTime = Now()
            logdoc.AM_DocumentUNID = ts.UniversalID
            logdoc.AM_EventType = ts.EventId
            logdoc.Form = "Log"
            Set logrtitem = New NotesRichTextItem( logdoc, "Body" )

     

    i do not see something for Form or Document NoteID...

    How can i enable them ?

    thanks by advance.

    • form name missing

      By MAILLET Benoit 8 years ago

      hi all.

      i've found how to add the form name of the deleted documents:

      '// Get the log db
              Set logdb = session.getdatabase(session.CurrentDatabase.server, amConfigDoc.logLocation(0))
              If Not logdb.IsOpen Then
                  Call logdb.Open( "", "" )
              End If
              '// create log doc
              Set logdoc = New NotesDocument ( logdb )
              logdoc.AM_Initiator = ts.UserName
              logdoc.AM_DatabaseTitle = db.title
              logdoc.AM_DatabaseReplicaID = db.replicaid
              logdoc.AM_FormName = newdoc.Form(0)
              logdoc.AM_Server = db.Server
              logdoc.AM_DatabasePath = db.filepath
              logdoc.AM_ActionTime = Now()
              logdoc.AM_DocumentUNID = ts.UniversalID
              logdoc.AM_EventType = ts.EventId
              logdoc.Form = "Log"
              Set logrtitem = New NotesRichTextItem( logdoc, "Body" )

       

      but the form name is added only if it is a user who delete a document.

      If the deletion occurs during a replication, no form name is written on the log doc.