Наткнулся на то что если использовать IF TYPE(label) EQ TYPE(FAR) генерируется сообщение об ошибке хотя если присвоить a=TYPE(label) и использовать IF a EQ TYPE(FAR) то всё типтоп.