dim x_props as EA.Collection
    dim x_element, x, j

    set x_props = getelementbyid(x_element.elementid).customproperties

for j = 0 to x_props.Count - 1
   set x = x_props.GetAt(j)
   if x.Name = "isID" then
     Session.Output(x.value)
     exit for
   end if
next