Отправляет email-рассылки с помощью сервиса Sendsay

RFpro.ru: 1С для программиста

  Все выпуски  

RusFAQ.ru: 1С для программиста


Новое направление Портала RusFAQ.ru:
MosHoster.ru - Профессиональный хостинг

РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / 1С для программиста

Выпуск № 759
от 18.03.2008, 09:35

Администратор:Калашников О.А.
В рассылке:Подписчиков: 400, Экспертов: 54
В номере:Вопросов: 2, Ответов: 4

Нам важно Ваше мнение об этой рассылке.
Оценить этот выпуск рассылки >>


Вопрос № 126929: Добрый день уважаемое сообщество! У меня вопрос немного не стандартный: как подключить плагины T1CLister: Универсальный плагин для просмотра файлов 1С. Версия 1.7 beta (для Total Commander) (http://infostart.ru/projects/1191/#comm) и UniPlu...
Вопрос № 126990: Господа професионалы! Помогите, плз!! Проблема: есть справочник Контрагенты, идентификатор Наименование - Полное название контрагента, ид. кодЭДРПОУ - код плательщика налогов, КонтОС - контактное лицо от заказчика (контрагента)... Так вот, при за...

Вопрос № 126.929
Добрый день уважаемое сообщество!
У меня вопрос немного не стандартный: как подключить плагины T1CLister: Универсальный плагин для просмотра файлов 1С. Версия 1.7 beta (для Total Commander) (http://infostart.ru/projects/1191/#comm)
и UniPlugin к тоталу для просмотра и редактирования файлов 1С?
Отправлен: 12.03.2008, 11:27
Вопрос задал: Vlad Sarkozi (статус: Посетитель)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Коровин Александр
Здравствуйте, Vlad Sarkozi!
В архиве имеется файл ReadMe.txt. В нем написано, куда надо копировать плагин и как подключать.
Для того чтобы им пользоваться, необходимо, например, в левой панели TotalCommander выделить нужный файл и нажать Ctrl+Q. Тогда правая панель превратиться в просмотрщик. Чтобы вернуть все в исходное положение, надо еще раз нажать на указанное сочетание клавиш. Аналогично и для других плагинов.
Удачи!
Ответ отправил: Коровин Александр (статус: 3-ий класс)
Ответ отправлен: 12.03.2008, 12:02


Вопрос № 126.990
Господа професионалы! Помогите, плз!!
Проблема: есть справочник Контрагенты, идентификатор Наименование - Полное название контрагента, ид. кодЭДРПОУ - код плательщика налогов, КонтОС - контактное лицо от заказчика (контрагента)... Так вот, при записи нового элемента справочника нужно сделать перебор всех его элементов на проверку не существует ли он уже... Соответственно перебор нужно делать по Наименованию и вышеупомянутым реквизитам...

Помогите, плз!!!
Отправлен: 12.03.2008, 17:30
Вопрос задал: Троцюк Олександр Володимирович (статус: Посетитель)
Всего ответов: 3
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Maximush
Здравствуйте, Троцюк Олександр Володимирович!

в модуль формы элемента справочника (а если редактирование разрешено в диалоге, то и в модуль формы списка справочника) добавляем или модифицируем процедуру приЗаписи

Процедура ПриЗаписи()
//......
Если Выбран()=0 Тогда //проверку делаем только для нового элемента
спрК=СоздатьОбъект("Справочник.Контрагенты");
спрК.ВыбратьЭлементы(0); //перебираем все элементы
Пока спрК.ПолучитьЭлемент()=1 Цикл
Если спрК.ЭтоГруппа()=1 Тогда //группы не рассматриваем
Продолжить;
КонецЕсли;
НашлиДубликат=0;

//берем ВРЕГ(СокрЛП(х)) чтобы исключить пробелы справа слева и считать что "ИВанов" = "Иванов"

Если (ВРЕГ(СокрЛП(спрК.Наименование))= ВРЕГ(СокрЛП(Наименование)))
или (ВРЕГ(СокрЛП(спрК.кодЭДРПОУ)) = ВРЕГ(СокрЛП(кодЭДРПОУ)))
или (ВРЕГ(СокрЛП(спрК.КонтОС)) = ВРЕГ(СокрЛП(КонтОС)))
//остальные критерии "совпадаемости"
//...
//...
Тогда
НашлиДубликат=1; //нашли полностью совпадающий элемент
Прервать; //вышли из цикла (или, например, увеличили счетчик совпадений)
Тогда
КонецЕсли;
КонецЦикла;

Если НашлиДубликат=1 Тогда
Предупреждение("Найден полностью совпадающий элемент",10); //поругались с пользователем
СтатусВозврата(0); //сказали, БУ! Не буду сохранять
Возврат; //вышли из ПриЗаписи и замерли в тревожном ожидании
КонецЕсли;
КонецЕсли;
//....
КонецПроцедуры // ПриЗаписи

//возможно логичнее было бы искать не полное совпадение а совпадение по одному из критериев
//или более сложные условия накладывать вроде:
//1. код ЭДРПОУ - должен быть уникален
//2. сочетание (наименование и контактное лицо) должно быть уникальным
//и т.п.

удачи!

Max//
Ответ отправил: Maximush (статус: 2-ой класс)
Ответ отправлен: 12.03.2008, 18:19
Оценка за ответ: 5
Комментарий оценки:
Пасибки!

Отвечает: Ovr1970
Здравствуйте, Троцюк Олександр Володимирович!
Все указанные реквизиты нужно проиндексировать (поставить в диалоге создания реквизита галочку "Сортировка")
Соответсвенно при записи (Процедура "ПриЗаписи" в модуле формы диалога и в табличном представлении , если нужно) нужно искать реквизит с помощью процедуры "НайтиПоРеквизиту", наименование - искать с помощью функции "НайтиПоНаименованию". Хотя я бы ориентироваться на Наименование и контактное лицо не стал бы, они могут повторяться - но это Ваше дело.Поверять или не проверять.
Ответ отправил: Ovr1970 (статус: Практикант)
Ответ отправлен: 12.03.2008, 19:23

Отвечает: Вильгоненко Станислав Викторович
Здравствуйте, Троцюк Олександр Володимирович!
В дополнение ответа Maximush, возможен вариант с отбором по реквизиту, если Вы уверены в стандартном написании реквизитов (для этого возможно использование шаблонов в поле ввода), особенно для кодов. Естесственно для проверяемых реквизитов признак "сортировка" должен быть установлен.
Я тоже считаю, что проверять можно только "кодЭДРПОУ".
В варианте Maximush по моему при перезаписи будет выдаваться предупреждение, т.к процедура будет находить свой же элемент.
Успехов Вам в работе.

Приложение:

Ответ отправил: Вильгоненко Станислав Викторович (статус: 2-ой класс)
Ответ отправлен: 13.03.2008, 09:31
Оценка за ответ: 5
Комментарий оценки:
Спасибо Вам! Уже все получилось... Благодаря Вам и Maximush (где я только делаю проверку на все совпадения, т.е. кодЭДРПОУ и КонтОс относятся к Наименование).... Так держать, надеюсь в следующих моих вопросах я могу надеяться на Вашу поддержку и помощь!!!!


Вы имеете возможность оценить этот выпуск рассылки.
Нам очень важно Ваше мнение!
Оценить этот выпуск рассылки >>

Отправить вопрос экспертам этой рассылки

Приложение (если необходимо):

* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!

Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.


© 2001-2008, Портал RusFAQ.ru, Россия, Москва.
Авторское право: ООО "Мастер-Эксперт Про"
Техподдержка портала, тел.: +7 (926) 535-23-31
Хостинг: "Московский хостер"
Поддержка: "Московский дизайнер"
Авторские права | Реклама на портале
Версия системы: 4.72.5 от 17.03.2008
Яндекс Rambler's Top100
RusFAQ.ru | MosHoster.ru | MosDesigner.ru | RusIRC.ru
Kalashnikoff.ru | RadioLeader.ru | RusFUCK.ru

В избранное