Audit Trail: registrazione automatica ad ogni salvataggio di un form

Last updated on

 

' Il seguente snippet può essere utilizzato per forzare la registrazione di una entry nell'Audit Trail ad ogni salvataggio di un form. Ciò può essere utile per creare automaticamente una copia di backup dei dati.
' NOTA: lo snippet è applicabile dalla release 2015.17.2e in poi, e dalla versione 2015.17.2p il pulsante “AUDIT TRAIL” comparire nella toolbar anche per le categorie documentali NON-GMP dove è stato fatto uso dell’Audit Trail. 

' **** EVENTOSALVA
' La seguente istruzione va inserita nell'EventoSalva e serve per richiedere la registrazione nell'AuditTrail effettuata all'interno dell'EventoRender
form.findcontrol("SALVA").tag="saved"
' **** FINE EVENTOSALVA

' **** EVENTORENDER
' La seguente istruzione va inserita nell'EventoRender e serve per effettuare la registrazione nell'AuditTrail nel caso sia stato effettuato il salvataggio e questo sia andato a buon fine
if form.findcontrol("SALVA").tag="saved" 
   if not form.IsNew()
      dim msg as string
	  msg=AuditTrail_Save(form.GetSession(),form.form_state.dmd_ref.DOCUMENT.rowset.fields("_IDDOC").value,form.form_state.dmd_ref.DOCUMENT.rowset.fields("_CODDOC").value, Get_Document_Descr(form.GetSession(),form.form_state.dmd_ref.DOCUMENT.rowset.fields("_IDDOC").value,form.form_state.dmd_ref.DOCUMENT.rowset.fields("_CODDOC").value),"Salvataggio",form.GetUserCode(),form.GetUserName())

	  if msg<>""
	     form.alert("Errore nel salvataggio dei dati nell'Audit Trail: "+msg)
	  end if 
    end if    

    form.findcontrol("SALVA").tag=nothing
end if	
' **** EVENTORENDER 


' Per creare una registrazione iniziale nell'audit trail di tutti i documenti di una categoria utilizzare la query scaricabile da qui: http://help.qualiware.it/qw-help/wp-content/uploads/SALVATAGGIO-AUDIT-TRAIL-CATEGORIA-DOCUMENTALE.zip