Новости для бухгалтера, бухучет, налогообложение, отчетность, ФСБУ, прослеживаемость и маркировка, 1С:Бухгалтерия

Вход или Регистрация

Показывать по 10 20 40 сообщений
Новая тема Ответить
Письмо в техподдержку 1С
[Прочее]

Помогите новичку кодом

rnd_mlm
читатель
офлайн
Дата регистрации: 30.06.2008
Сообщений: 13
Пост №1
 
29.04.2011 15:10

Исходные данные:<br>Чистая конфигурация, с единсвенным справочником СправочникКлиентов с реквизитами (НаименованиеКлиента, Пол, ДатаРождения, МобТелефон)<br>Необходимо при добавлении нового клиента в справочник, что бы была проверка на уникальность поля МобТелефон, т.е. что бы не было повторений в справочнике.<br>Прошу помощи, нужен код...

rnd_mlm
читатель
офлайн
Дата регистрации: 30.06.2008
Сообщений: 13
Пост №2
 
29.04.2011 15:12

Забыл написать, что конфигурация 1С 8.2

Thorvardr
читатель
офлайн
Дата регистрации: 25.02.2005
Сообщений: 3082
Пост №3
 
29.04.2011 15:48

"<pre>&НаСервереФункция ПроверкаУникальности() Результат = Истина; Если Не ПустаяСтрока(Объект.МобТелефон) Тогда Запрос = Новый Запрос(" |ВЫБРАТЬ | 1 |ИЗ | Справочник.СправочникКлиентов КАК Клиенты |ГДЕ | Клиенты.МобТелефон = &МобТелефон | И Клиенты.Ссылка <> &Ссылка |"); Запрос.УстановитьПараметр("МобТелефон", Объект.МобТелефон); Запрос.УстановитьПараметр("Ссылка"      , Объект.Ссылка); Результат = Запрос.Выполнить().Пустой(); КонецЕсли; Возврат Результат;КонецФункции&НаКлиентеПроцедура ПередЗаписью(Отказ, ПараметрыЗаписи) Если Не ПроверкаУникальности()Тогда ... КонецЕсли;КонецПроцедуры </pre>"

rnd_mlm
читатель
офлайн
Дата регистрации: 30.06.2008
Сообщений: 13
Пост №4
 
29.04.2011 15:56

При проверки, выдает ошибки...<br>{Справочник.СправочникКлиентов.Форма.ФормаСписка.Форма(26,1)}: Неопознанный оператор<<?>>... (Проверка: Сервер){Справочник.СправочникКлиентов.Форма.ФормаСписка.Форма(26,1)}: Неопознанный оператор<<?>>... (Проверка: Тонкий клиент)

rnd_mlm
читатель
офлайн
Дата регистрации: 30.06.2008
Сообщений: 13
Пост №5
 
29.04.2011 15:59

"сорри сам увиди точки ....., но когда их убрал то имею следующее<br> <br>{Справочник.СправочникКлиентов.Форма.ФормаСписка.Форма(27,1)}: Неопознанный оператор<<?>>..... (Проверка: Сервер){Справочник.СправочникКлиентов.Форма.ФормаСписка.Форма(27,1)}: Неопознанный оператор<<?>>..... (Проверка: Тонкий клиент){Справочник.СправочникКлиентов.Форма.ФормаСписка.Форма(5,22)}: Переменная не определена (Объект)Если Не ПустаяСтрока(<<?>>Объект.МобТелефон) Тогда (Проверка: Сервер){Справочник.СправочникКлиентов.Форма.ФормаСписка.Форма(15,43)}: Переменная не определена (Объект) Запрос.УстановитьПараметр("МобТелефон", <<?>>Объект.МобТелефон); (Проверка: Сервер){Справочник.СправочникКлиентов.Форма.ФормаСписка.Форма(16,45)}: Переменная не определена (Объект) Запрос.УстановитьПараметр("Ссылка"      , <<?>>Объект.Ссылка); (Проверка: Сервер)"

mpika
читатель
офлайн
Дата регистрации: 27.09.2010
Сообщений: 167
Пост №6
 
29.04.2011 16:02

Покупаем и читаем нужные книжки про 8.2

BelikovS
читатель
офлайн
Дата регистрации: 05.03.2007
Сообщений: 1701
Пост №7
 
29.04.2011 16:12

Где вы разместили код? Судя по всему в модуле списка.<br>Попробуйте разместить код в модуле объекта. Думаю именно для него он был написан.

rnd_mlm
читатель
офлайн
Дата регистрации: 30.06.2008
Сообщений: 13
Пост №8
 
29.04.2011 16:29

"Результат размещения в модуле объекта:<br> <br>{Справочник.СправочникКлиентов.МодульОбъекта(4,22)}: Переменная не определена (Объект)Если Не ПустаяСтрока(<<?>>Объект.МобТелефон) Тогда (Проверка: Сервер){Справочник.СправочникКлиентов.МодульОбъекта(14,43)}: Переменная не определена (Объект) Запрос.УстановитьПараметр("МобТелефон", <<?>>Объект.МобТелефон); (Проверка: Сервер){Справочник.СправочникКлиентов.МодульОбъекта(15,45)}: Переменная не определена (Объект) Запрос.УстановитьПараметр("Ссылка"      , <<?>>Объект.Ссылка); (Проверка: Сервер)"

BelikovS
читатель
офлайн
Дата регистрации: 05.03.2007
Сообщений: 1701
Пост №9
 
29.04.2011 16:55

Попробуйте заменить Объект на ЭтотОбъект

rnd_mlm
читатель
офлайн
Дата регистрации: 30.06.2008
Сообщений: 13
Пост №10
 
29.04.2011 17:06

Ошибка ушла, но я специально набрал дважды клиента с одинаковым номером и записи записались в таблицу...., а хотелось бы что бы телефоны не повторялись

Показывать по 10 20 40 сообщений

Читают тему:

1 гостей
Быстрый переход
Для технических специалистов
  • Книга жалоб и предложений по работе сайта
  • Для технических специалистов
  • Представление регламентированной отчетности
  • Говорильня
  • Бухгалтерский учет: обсуждаем проекты нормативных актов и рекомендаций по ведению учета от БМЦ
  • Новый порядок применения ККТ (онлайн кассы с передачей сведений в ФНС)
  • Интернет-конференция: Оформление командировок по новым правилам
  • МАРКИРОВКА
  • ЕГАИС
  • Учет, налогообложение, автоматизация