<< Click to Display Table of Contents >> Navigation:  Programming Mechworks PDM > DBWCommandShell > Commands Reference > Revisions > UnFreeze

Description

UnFreezes the selected record ( if unique id is not passed ) or the record with the unique id assigned;
it works also in DrawingóPart Link Mode with all the related documents.

Syntax

call DBWShell("UnFreeze [UniqueID]")

Parameters

See also

Freeze command

Example

Sub main()

  DBWInit(TRUE)
  DBWShell("CurrentDocument")
  uid = DBWResult("@DOCUMENT_UNIQUE_ID")
  state = DBWQueryByUId(uid, DBWLookUp("NAME_FIELD_STATE"))
  If UCase(state) = UCase(DBWLookUp("NAME_STATE_OBSOLETE_STRING")) then
    DBWShell("Unfreeze " & uid)
  Else
    DBWMsgBox2 "the state of the record you selected is: " & state,48,"Unfreezing records"
  End if
End Sub