А в Кларионе, в одну строку, это можно написать так:KoMap писал(а):Вопрос в продолжение EVALUATE()
В фоксе можно писать так:
ch=Iif(Left(ch,1)='8' And Len(ch)<7 And SubStr(ch,2,1)<>'1', SubStr(ch,2), ch)
Код: Выделить всё
ch = Choose((ch[1]='8') AND (LEN(CLIP(ch))<7) AND (ch[2]<>'1'),ch[2:LEN(ch)],ch)
И вообще - советую хотя-бы бегло просмотреть в хелпе алфавитный раздел функций и операторов языка Кларион - по крайней мере, надеюсь, сразу отпадут подобные вопросы! А вот про Evaluate советую почитать более подробно - особенно, учитывая предыдущие вопросы, про оператор BINDEXPRESSION.
Кстати, для более оперативного и полного ответа советую подписаться на рассылку ClaList - там, в отличие от этого форума, присутствуют практически все "наши" кларионисты. Только там советую задавать вопросы более конкретно, сразу определив версию Клариона, используемые шаблоны и пр. мелочи, которые могут быть неочевидными для других.
Удачи!