LINE FROM UTM

Материал из Фабиус wiki
Версия от 15:17, 20 апреля 2016; Hisava (обсуждение | вклад) (Новая страница: «Line_From_UTM - это функция из справочника R266 Чтение строки из XML файла УТМ = Полный текст ф…»)

(разн.) ← Предыдущая | Текущая версия (разн.) | Следующая → (разн.)
Перейти к: навигация, поиск

Line_From_UTM - это функция из справочника R266

Чтение строки из XML файла УТМ

Полный текст функции

parameters xml_text
local b1, b2, pref_from, pref_to
pref_from := 'url'
pref_to := '/url'
b1 := at( pref_from, xml_text )
b2 := at( pref_to, xml_text )
result := Copy( xml_text, b1 + len( pref_from ), b2 - b1 - len( pref_from ) )