Replace is_locked With .F. IN drawing_extended_data(Or move the 'SELECT drawing_extended_data' line)
..... Case drawing_extended_data.is_locked = .T. &&UnLock Replace drawing_extended_data.is_locked With .F. = TABLEUPDATE(.T.,.T.,"drawing_extended_data") Select drawing_extended_data Browse>>