"Abgelaufen" Datum per LotusScript setzen

[Glombi]

Wie kann ich mittels LotusScript ein Dokument als abgelaufen am markieren?

Im Mail habe ich die Möglichkeit, mittels Aktionen - Werkzeuge - Dokument als 'Abgelaufen' markieren ein Datum zu setzen, welches dann für die Archivierung relevant ist.

Ich finde in den Dokumenteigenschaften aber kein Feld, wo das gespeichert wird. Auch habe ich keine Scriptfunktion gefunden.

Kann mir jemand einen Tipp geben?

Andreas

[koehlerbv]

Das $NoPurge-Item ist dafür verantwortlich, Glombi.

HTH,
Bernhard

[Glombi]

Hi Bernhard
das glaube ich nicht, denn wenn ich die Abgelaufen Markierung wieder aufhebe, bleibt $NoPurge unverändert. Auch steht dort ein anderes Datum drin.

Andreas

[Glombi]

Ok, es hat sich erledigt. Es ist das Item "ExpireDate".
Man kann zwar alles mögliche markieren, aber es werden nur bestimmte Masken berücksichtigt.
Das sieht man im Code des Agenten "SetExpire".
Was micht dort wundert ist die Programmierung der

Sub RenderExpireDate (Mydate As Notesdatetime)
   
   If Not (ExQues(0) = "1") And (MyDate Is Nothing) Then
      If doc.hasItem( "ExpireDate")   Then
         Call doc.removeitem ( "ExpireDate" )            
      End If
      'If doc.hasItem( "$NoPurge")   Then
      '   Call doc.removeitem ( "$NoPurge" )            
      'End If
   Else        
      Call doc.ReplaceItemValue ( "ExpireDate", MyDate )         
      'Call doc.ReplaceItemValue ( "$NoPurge", MyDate )         
   End If
   
   
End Sub

Original Code von IBM!
Was sollen denn die auskommentieren Zeilen 
Hoffentlich ist das zu Ende gedacht....

Andreas