* Permitir arrastrar las columnas del DW
dw_1.Object.DataWindow.Grid.ColumnMove = "Yes"
* No permitir arrastrar las columnas del DW
dw_1.Object.DataWindow.Grid.ColumnMove = "No"
Nota: También se puede utilizar Modifiy y Describe. Más detalles, ve la ayuda de ColumnMove. Sin embargo, las anteriores sentencias afectan a todas las columnas del DW; no sé si existirá algo para afectar a una sola columna.