Nadya,

Change your code to this and you won't care about teh column numbers;

FOR EACH oCool IN THIS.Columns
   oCol.ReadOnly = llAllowEditing
ENDFOR