[belugin]

#localmacro.dimNo
   (SysDimension::%1 + 1)
#endmacro

while select forupdate  common
where (common.(fieldId2Ext(dictField.id(), #dimNo(Center))) == dim[#dimNo(Center)])