If a document is locked (an R6 feature), you can unlock it by running an agent with this formula:
FIELD $Writers := @DeleteField; FIELD $WritersDate := @DeleteField;