Автор |
Тема: большая украинская I (Прочитано 2957 раз) |
|
Yura
Я люблю этот Форум!
Просмотреть Профиль |
Сообщений: 8
|
В некоторых реквизитах контрагента, которые хранятся в extrd.dat, присутствуют большие украинские буквы I, например в полном наименовании, адресе....При экспорте первичных документов в Excel они соответственно отображаются как точки. Как побороть? Сервер 4.21 на 10 юзеров, клиент clw. Варианты: вбивать английскую I, смену сервера и клиента не интересны.
|
|
Зарегистрирован |
|
|
|
Boris, Kiev.
Адепт ФБП с 1996г.
Просмотреть Профиль | E-мэйл
Сообщений: 874
|
Откройте Extrd.dat в редакторе и попробуйте простую замену(не забудьте про регистр). При определенных условиях - это может 100% решить вопрос. Когда-то под Far(ом) этот фокус проходил.
|
|
Зарегистрирован |
|
|
|
Yura
Я люблю этот Форум!
Просмотреть Профиль |
Сообщений: 8
|
Ну а как быть в таком случае при внесении новых реквизитов с этой буквой?
|
|
Зарегистрирован |
|
|
|
Boris, Kiev.
Адепт ФБП с 1996г.
Просмотреть Профиль | E-мэйл
Сообщений: 874
|
on 11.03.13 в 17:03:57, sdn wrote:Ну а как быть в таком случае при внесении новых реквизитов с этой буквой? |
| "Ну"-баранки гну. Так встречали такие обороты-обращения наши родители, Ваши, увы, наверное на это не обращали внимание. По существу: Здесь проще пареной репы. При вводе контролируете ввод всего что нужно и делаете подмены. Была подпрограммка-функция, которая контролила аналогичные акценты, те, что сейчас легли на модного клиента. Помню, что там было хорошее решение делать быстрые замены через предварительное изменение контекста-аргумента.
|
|
Зарегистрирован |
|
|
|
Yura
Я люблю этот Форум!
Просмотреть Профиль |
Сообщений: 8
|
Борис, спасибо за ответы. Какого-либо подконтекста в моем "ну" не было. Теперь по существу: пример A=[is 'Укажите полное наименование:',' ',100] * тут выполняем проверку на наличие буквы I GD=[PS '.',A] // реагирует только на точку IF GD>0 выполняем подмену ENDIF А если есть обычные точки? Какой я должен разработать алгоритм чтобы побороть одну единственную букву?
|
|
Зарегистрирован |
|
|
|
Boris, Kiev.
Адепт ФБП с 1996г.
Просмотреть Профиль | E-мэйл
Сообщений: 874
|
Честно, очень лень ещё раз вспоминать про проблемы кодировок в предыдущих версиях. Побороли и забыли. Для моих воспоминаний, в свой тестовый алгоритм, плз. сделайте дописку: A=[strip A] A:^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^A for II=1 to [length A] CP=[cp A,II,1] KS=[hc A,II] ^^^II. CP:^CP KS:^^^^KS endfor и выложите здесь результат, вспомним ещё раз. На искажения отображения при копировании пока не обращайте внимания. Конечно, можете картинку из клиента клипнуть куда-нибудь для просмотра.
|
« Изменён в : 12.03.13 в 09:36:40 пользователем: Boris, Kiev. » |
Зарегистрирован |
|
|
|
alushta
Я люблю этот Форум!
Просмотреть Профиль |
Сообщений: 192
|
Года 2 назад у меня была похожая проблема с вводом украинских фамилий в отчет ПФУ Светлана предложила такой вариант * проверка на вшивость фамилии s=F ss=0 for j=1 to [length s] x=[cp s,j,1]; x=[hc x,1] if x=244 x=242 elseif x=245 x=243 elseif x=46 x=73 elseif x=248 x=244 * elseif x=249 x=245 endif [a j,x] endfor ss=[ch [a 1]] for j=2 to [length s] ss=ss+[ch [a j]] F=ss endfor где буквы рассматриваются как коды CP866 пока работает...
|
|
Зарегистрирован |
|
|
|
Yura
Я люблю этот Форум!
Просмотреть Профиль |
Сообщений: 8
|
было внесено ВУЛ.ІНГУЛЬСЬКА A: ВУЛ..НГУЛЬСЬКА 1. CP:В KS: 130 2. CP:У KS: 147 3. CP:Л KS: 139 4. CP:. KS: 46 5. CP:. KS: 46 6. CP:Н KS: 141 7. CP:Г KS: 131 8. CP:У KS: 147 9. CP:Л KS: 139 10. CP:Ь KS: 156 11. CP:С KS: 145 12. CP:Ь KS: 156 13. CP:К KS: 138 14. CP:А KS: 128
|
|
Зарегистрирован |
|
|
|
Yura
Я люблю этот Форум!
Просмотреть Профиль |
Сообщений: 8
|
Форма достаточно большая, но вот скопировал кусок в новую форму: SC=[IA 361] N1=[GED SC+'YUR_AD'] IF N1=0 N1=''; ENDIF N1=[strip [is'ЮРИДИЧЕСКИЙ АДРЕС:',N1,100]] CALL UKRB(N1) N1=TT [SED SC+'YUR_AD',N1] stop :UKRB(ZM) ZM=[strip ZM] A: ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ZM BU='' for MM=1 to [length ZM] CP=[cp ZM,MM,1] KS=[hc ZM,MM] ^MM. CP:^CP KS: ^^^KS endfor ZM=BU TT=ZM STOP RETURN STOP
|
|
Зарегистрирован |
|
|
|
Denis, Dnepropetrovsk
Я люблю этот Форум!
Просмотреть Профиль | E-мэйл
Сообщений: 129
|
|
Re: большая украинская I
« Ответить #10 В: 12.03.13 в 11:22:59 » |
Цитировать | Править
|
А чем не нравится алгоритм, присланный Alushta Я подобным образом перевожу строки в другие кодировки и представляю строки в верхнем регистре, чтобы можно было сортировку программно сделать с учетом малых и больших букв, а также схожих по написанию русских английских (например "a" "p" и пр.).
|
|
Зарегистрирован |
|
|
|
Yura
Я люблю этот Форум!
Просмотреть Профиль |
Сообщений: 8
|
|
Re: большая украинская I
« Ответить #11 В: 12.03.13 в 11:31:22 » |
Цитировать | Править
|
Денис, по каким-то мистическим причинам код буквы I у меня совпадает с точкой, а обычные точки могут быть где угодно. В адресе конечно можно делать проверку на "вул.", как в прошлом примере - но это не выход.
|
|
Зарегистрирован |
|
|
|
Boris, Kiev.
Адепт ФБП с 1996г.
Просмотреть Профиль | E-мэйл
Сообщений: 874
|
|
Re: большая украинская I
« Ответить #14 В: 12.03.13 в 18:56:42 » |
Цитировать | Править
|
on 12.03.13 в 11:31:22, sdn wrote:... В адресе конечно можно делать проверку на "вул.", как в прошлом примере - но это не выход. |
| Вам остаётся строить умный алгоритм или взять последние версии и забыть об этих проблемах.
|
|
Зарегистрирован |
|
|
|
|
|