Электросеть
Joined: 11 May 2004
Posts: 1
Location: Черешнева
Occupation: Магаданэлектросеть
Interests: Магадан
|
 Posted: 11 May 2004 06:56 Post subject: Как считать массив из MEMO поля средствами Clipper5.2? |
 |
|
Вопрос Титову А.А.
В файле покупок book.(dbf,fpt) есть memo - поле sum_data, в котором хранится массив, определяющий по данной ставке НДС сумму НДС с текущего платежа. В самом БЭСТ-е данный массив можно получить при помощи функции GetArrEl(). Вопрос: как получить этот массив средствами FoxPro? Пожалуйста, пришлите хотя бы текст функции GetArrEl(). С надеждами и наилучшими пожеланиями из солнечного Магадана Анна.
Добавлено: теперь надо достать массив из мемо-поля с помощью клиппера версии 5.2 ( я получаю текст, а не массив !).
Last edited by Электросеть on 19 May 2004 03:47; edited 1 time in total |
|
Титов Александр
Joined: 26 Jul 2002
Posts: 975
Location: Титов Александр Александрович
Occupation: Компания БЭСТ
Interests: Москва
|
| Posted: 11 May 2004 12:22 Post subject: Re: Как считать массив из MEMO поля средствами FoxPro |
|
|
| Электросеть wrote: | Вопрос Титову А.А.
В файле покупок book.(dbf,fpt) есть memo - поле sum_data, в котором хранится массив, определяющий по данной ставке НДС сумму НДС с текущего платежа. В самом БЭСТ-е данный массив можно получить при помощи функции GetArrEl(). Вопрос: как получить этот массив средствами FoxPro? Пожалуйста, пришлите хотя бы текст функции GetArrEl(). С надеждами и наилучшими пожеланиями из солнечного Магадана Анна. |
Добрый день!
Я не знаю стандартного способа получения содержимого SIX-массивов с помощью FOXPRO, так как FOXPRO не работает с этим форматом. Можно попробовать какие-нибудь комбинации с FileEval'ом например, или с Clipper'ной подпрограммой. Функция GetArrEl() к этому отношения не имеет, так как уже разобранный SIX-драйвером массив подается на ее вход:
FUNCTION GetArrEl(aMas,aInd)
LOCAL nRes:=aMas,i
FOR i:=1 TO LEN(aInd)
nRes:=nRes[aInd[i]]
NEXT
RETURN nRes
Добавлено:
по поводу чтения Клиппером, Вам отправлено письмо по EMail.
_________________
С уважением, Александр Титов, Компания БЭСТ, Москва, отдел разрабо |
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
