Ошибка поле владелец не заполнено 1с

Суть проблемы еще заключается в том, что контрагент по ТЗ создается после вот этой проверки.

Вот само ТЗ:
3.2 Если значение в файле в колонке «J»(БИК) заполнено, поиск по коду в справочнике Банки. Т.е. код справочника = БИК из файла.
3.2.1 Если Банк не найден, создать элемент справочника «Банки», код = «БИК» (колонка J), наименование = «БАНК ПОЛУЧАТЕЛЬ…» (колонка F), ГОРОД = «ГОРОД…» (колонка G), КоррСчет = «КОР. СЧЕТ» (колонка K). Записать новый элемент справочника «Банки».
3.2.2 Следом, создать элемент справочника «БанковскиеСчета», реквизит «Банк» заполнить элементом справочника из п. 3.2.1, записать созданный элемент справочника «»БанковскиеСчета»
3.2.3
проверить запросом»
ВЫБРАТЬ
Контрагенты.Ссылка
ИЗ
Справочник.Контрагенты КАК Контрагенты
ГДЕ
Контрагенты.ОсновнойБанковскийСчет.Банк.Код = &Код»
есть ли в системе контрагент, у которого основной банковский счет принадлежит банку с кодом (БИК-ом) банка из п.3.2
Если контрагент не найден, создать новый элемент справочника «Контрагенты», наименование = наименование элемента справочника Банки из п.3.2,
Основной банковский счет = БанковскийСчет из п.3.2.2.
ИНН заполнить как ИНН из файла (колонка H)
КПП заполнить как КПП из файла (колонка I)
Записть элемент справочника «Контрагенты».
3.2.4 — Если значение в файле в колонке «J»(БИК) НЕ заполнено, предполагается что банка нет.
Ищем контрагнета в справочнике «Контрагенты» по наименвоанию, колонка «F»
Если контрагент не найден, создаем контрагента аналогично п.3.2.3, Но реквизит «Основной банковский счет» не заполняется, никаких запросов проверки тоже нет, только алгоритм создания. Наименование = значение колонки «F»

Вот код, который я прописываю (не судите строго, всего неделю как изучаю программирование 1с)————————————————————————————

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56

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

Подскажите, где я ошибаюсь в написании кода

Ошибка «Значение поля «Владелец»…»

1. 04.11.2011, 22:50

   
   

   #1

   

   
   Пришел за помощью
   

   ---

   Значение поля «Владелец» не заполнено (Обмен между 1С предприятие и 1С ЗУП )
   

   Здравствуйте. Подскажите, пожалуйста. Создала чистую конфигурацию 1С «Зарплата и управление персоналом». Из 1С выгрузила первоначальные данные в эту конфигурацию — все загрузилось без ошибок. Начала заполнять данные в ЗУП. Однако при создании подразделения организации выскакивает вот такая ошибка «Значение поля «Владелец» не заполнено или заполнено неверно»
   и вообще в этой ЗУП не отражается в документах организация и выбрать ее нельзя, хотя она в справочнике «Организации» есть. Подскажите, может кто сталкивался с такой проблемой :confused:

   ---

2. 06.11.2011, 18:50

   
   

   #2

   

   
   Просто юзер
   

   ---

   
   

   Честно не знаю, я бы посоветовал сделать чистую ЗП затем в ней уже создать элемент справочника организация . это нужно для того что бы БП и ЗП синхрогнизировалось по акому либо принипу в данному случае по организации***

   ---

3. Пользователь сказал cпасибо:

   ---

Reclaim

16.11.15

✎

08:10

Горогуля

16.11.15

✎

08:11

заполнить поле? нет, не то

tixis

16.11.15

✎

08:11

Заполнить владельца наверное

Горогуля

16.11.15

✎

08:12

(2) это слишком просто, автор явно уже подумал об этом

Reclaim

16.11.15

✎

08:16

Непонятки еще заключаются в том, что при запуске обработки, эта ошибка вылезает каждый раз по разному. Т.е. в первом запуске ошибка вылезает после обработки 5 строк, при втором запуске после 11 строк, при третьем после 30 строк…

cw014

16.11.15

✎

08:18

(4) Наверное потому, что где то как то у тебя все таки владелец заполняется

Горогуля

16.11.15

✎

08:19

(4) вот так выглядит работа условного перехода

Мимохожий Однако

16.11.15

✎

08:19

НовыйЭлемент.Записать();                      

НовыйЭЛ = Справочники.БанковскиеСчета.СоздатьЭлемент();

НовыйЭЛ.Владелец = НовыйЭлемент.Ссылка;

НовыйЭЛ.Банк = БанкЭК;

НовыйЭЛ.Записать();

Горогуля

16.11.15

✎

08:20

а вообще, нехорошо банки создавать. для этого целый классификатор естт

Reclaim

16.11.15

✎

08:30

В принципе в какой стороне искать решение понял, пошел разбираться. Всем спасибо!

Reclaim

16.11.15

✎

08:42

Горогуля

16.11.15

✎

08:43

а можно я не буду читать гору букв, а спрошу: что не так?

Reclaim

16.11.15

✎

09:01

Т.е. при выборе владельца, для элемента справочника «БанковскиеСчета» я не могу выбрать нужного контрагента, т.к. у меня нет нужных контрагентов в справочнике, а создаю я их только после того, как записываю элемент справочника «БанковскиеСчета»

Горогуля

16.11.15

✎

09:02

это очень хорошо

Reclaim

16.11.15

✎

09:03

Проблема в том, либо это ТЗ неправильно составлена, либо я что-то не понимаю (а учитывая уровень моих знаний в 1с, то я больше склонен к этой версии)

redding

16.11.15

✎

09:03

(12) А в чем проблема делать наоборот?)

Мимохожий Однако

16.11.15

✎

09:06

(12)Для еще не сохраненного объекта можно получить ссылку нового, а потом использовать для других объектов.

aleks_default

16.11.15

✎

09:11

(16) не учите его плохому, пусть ТЗ правильно составляют

Reclaim

16.11.15

✎

09:12

Мимохожий Однако

16.11.15

✎

09:12

(17)Что же плохого? (если это всерьёз)

Мимохожий Однако

16.11.15

✎

09:14

Включи отладчик и пошагово посмотри в своём коде. Тогда твои ощущения перейдут в практическое исправление ошибок.

Reclaim

16.11.15

✎

09:22

Горогуля

16.11.15

✎

09:23

пошаговая отладка запроса в принципе невозможна

aleks_default

16.11.15

✎

09:25

А то что он сейчас будет заморачиваться с ПолучитьСсылкуНового и в итоге может получить «Объект не найден»(если будет делать не в транзакции) и дальнейшие проблемы, вместо того чтобы правильно составить ТЗ и создавать сначала владельца, а потом банковский счет.

Мимохожий Однако

16.11.15

✎

09:25

(21)Для отладки текста запроса есть Консоль запросов.

Если остановиться на результате запроса, то его можно выгрузить в ТЗ и посмотреть. Например, Результат.Выгрузить()

Мимохожий Однако

16.11.15

✎

09:26

(23)Думаешь, ему будут повторно ТЗ составлять?

aleks_default

16.11.15

✎

09:28

(25) сам не дурак должен быть

hhhh

16.11.15

✎

09:38

Мимохожий Однако

16.11.15

✎

09:41

ОФФ:(26)Строг ты, батенька. Мы также начинали.

cw014

16.11.15

✎

09:42

Reclaim

16.11.15

✎

09:56

cw014

16.11.15

✎

10:07

(30) Ну вот теперь голову в руки, руки с одного места на правильное пересади и делай в соответствии с ТЗ

Reclaim

16.11.15

✎

10:18

Руки в правильном месте. Знаний в голове пока нету. От этого и куча вопросом и непоняток

aleks_default

16.11.15

✎

10:21

(29)Собеседование через мисту? Круто, че.

ТС спалился походу, теперь не возьмут…

hhhh

16.11.15

✎

10:22

кто вообще составлял это тз? как может название контрагента совпасть с названием банка?

ДенисЧ

16.11.15

✎

10:22

(34) А кто сказал, что не может?

Reclaim

16.11.15

✎

10:37

aleks_default

16.11.15

✎

10:40

(36)Начинай с вдумчивого чтения ТЗ. Лучше несколько раз.

Reclaim

16.11.15

✎

10:44

Да, уже на своем недельном опыте начинаю это понимать. Внимательность и грамотное обдумывание, ну и конечно знания, без них никуда.

 Процедура ИмяФайлаНачалоВыбора(Элемент, СтандартнаяОбработка)

	 	 // Отключение стандартной обработки

	 СтандартнаяОбработка = Ложь;

	 
	 // Выбор файла Microsoft Excel

	 ВыборФайла = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие);

	 ВыборФайла.Фильтр = "Документ Excel (*.xls)|*.xls";

	 ВыборФайла.ПроверятьСуществованиеФайла = Истина;

	 ВыборФайла.ПолноеИмяФайла = ИмяФайла;

	 Выбор = ВыборФайла.Выбрать();

	 Если НЕ Выбор Тогда

		 
		 Возврат;

		 
	 КонецЕсли;

	 
	 ИмяФайла = ВыборФайла.ВыбранныеФайлы[0];


КонецПроцедуры


Процедура ЧтениеXLSФайла(Элемент)

	
	Если ПустаяСтрока(ИмяФайла) Тогда

		Предупреждение("Для запуска обработки необходимо предварительно выбрать файл Microsoft Excel.");

		Возврат;

	КонецЕсли;

	
	Попытка

	 	// Загрузка Microsoft Excel

	 	Состояние("Загрузка Microsoft Excel...");

	 	ExcelПриложение = Новый COMОбъект("Excel.Application");

	Исключение

	 	Сообщить("Ошибка при загрузке Microsoft Excel." + Символы.ПС + ОписаниеОшибки(), СтатусСообщения.Внимание);

	 	Возврат;

	КонецПопытки;

	
	Попытка

		// Открытие файла Microsoft Excel

		Состояние("Открытие файла Microsoft Excel...");

		ExcelФайл = ExcelПриложение.WorkBooks.Open(ИмяФайла);

	Исключение

		Сообщить("Ошибка открытия файла Microsoft Excel." + ИмяФайла + Символы.ПС + ОписаниеОшибки(), СтатусСообщения.Внимание);

	КонецПопытки;

	
	Попытка

		// Обработка файла Microsoft Excel

		Состояние("Обработка файла Microsoft Excel...");

		// Читаем данные первого листа книги

		ExcelЛист = ExcelФайл.Sheets(1);

		
		// Определить количество строк и колонок выбранного листа книги Excel

		xlCellTypeLastCell = 11;

		ExcelПоследняяСтрока = ExcelЛист.Cells.SpecialCells(xlCellTypeLastCell).Row;

		ExcelПоследняяКолонка = ExcelЛист.Cells.SpecialCells(xlCellTypeLastCell).Column;

	Исключение

		Сообщить("Ошибка открытия листа №1 Microsoft Excel." + Символы.ПС + ОписаниеОшибки(), СтатусСообщения.Внимание);

		// Закрыть COM соединение для экономии памяти

	 	ExcelПриложение.Quit();

	КонецПопытки;

	
	// Создание описателя типов для таблицы значений

	КЧ = Новый КвалификаторыЧисла(15,2);

	КС = Новый КвалификаторыСтроки(50);

	Массив = Новый Массив;

	Массив.Добавить(Тип("Строка"));

	ОписаниеТиповС = Новый ОписаниеТипов(Массив, , КС);

	Массив.Очистить();

	Массив.Добавить(Тип("Число"));

	ОписаниеТиповЧ = Новый ОписаниеТипов(Массив, , ,КЧ);

	
	// Очистить предыдущие значения

	ТаблицаДокумента.Очистить();

	ТаблицаДокумента.Колонки.Очистить();

	
	// Создать колонки табличного документа

	ТаблицаДокумента.Колонки.Добавить(ExcelЛист.Cells(1, 1).Value,ОписаниеТиповС,ExcelЛист.Cells(1, 1).Value,50);

    ТаблицаДокумента.Колонки.Добавить(ExcelЛист.Cells(1, 2).Value,ОписаниеТиповС,ExcelЛист.Cells(1, 2).Value,50);

    ТаблицаДокумента.Колонки.Добавить(ExcelЛист.Cells(1, 3).Value,ОписаниеТиповС,ExcelЛист.Cells(1, 3).Value,50);

    ТаблицаДокумента.Колонки.Добавить(ExcelЛист.Cells(1, 4).Value,ОписаниеТиповЧ,ExcelЛист.Cells(1, 4).Value,50);

	
	// Последовательное чтение строк с выбранного листа

	Для Строка = 2 По ExcelПоследняяСтрока Цикл

				
		// Обработка нажатия Ctrl + Break

		ОбработкаПрерыванияПользователя();

		
		// Добавить данные в табличную часть экранной формы

		Стр=ТаблицаДокумента.Добавить();

		Попытка

			Стр[0]           = ExcelЛист.Cells(Строка, 1).Value;

            Стр[1]			 = ExcelЛист.Cells(Строка, 2).Value;

            Стр[2]           = ExcelЛист.Cells(Строка, 3).Value;

            Стр[3]           = ExcelЛист.Cells(Строка, 4).Value;

		Исключение

			// Не редко происходит ошибка конвертации отдельной ячейки документа

			Сообщить("Ошибка чтения строки файла Microsoft Excel." + Строка + Символы.ПС + ОписаниеОшибки(), СтатусСообщения.Внимание);

		КонецПопытки;

		// Отобразить информацию о ходе выполнения обработки

		Состояние("Обработка файла Microsoft Excel : "

		 + "строка " + Строка + " из " + ExcelПоследняяСтрока);

		 
	 КонецЦикла;

	 
	 // Закрыть COM соединение для экономии памяти

	 ExcelПриложение.Quit();

	 
	 // Отобразить результаты загрузки в форме элемента

	 ЭлементыФормы.ТаблицаДокумента.Значение = ТаблицаДокумента;

	 ЭлементыФормы.ТаблицаДокумента.СоздатьКолонки();

	 
 КонецПроцедуры // ЧтениеXLSФайла(Элемент)


 Процедура ОсновныеДействияФормыСоздать(Кнопка)

	  //ExcelЛист = ExcelФайл.Sheets(1);

	  //ExcelФайл = ExcelПриложение.WorkBooks.Open(ИмяФайла);

	  //	  Наименование = ExcelЛист.Cells(Строка, "Стр[1]").Value;

	  //  	Элем = Справочники.МестаХранения.НайтиПоНаименованию("Стр[1]");

	  //  	НовЭл.Владелец = ?(Элем = Неопределено, Справочники.МестаХранения.ПустаяСсылка(), Элем);

	 
	 
	  Для Каждого Стр Из ТаблицаДокумента Цикл

	    НовЭл = Справочники.МестаХранения.СоздатьЭлемент();

	    НовЭл.Наименование = Стр[2];

	    НовЭл.Код = Стр[0];

	    НовЭл.Владелец = Стр[0];//Справочники.Склады.НайтиПоКоду("СОС-01000");

	    НовЭл.Записать();

	  КонецЦикла;

	 
	
 КонецПроцедуры

Здравствуйте.

В данной заметке я хочу рассказать как организовать работу с прикрепленными файлами для нового объекта в конфигурациях 1С, которые содержат библиотеку стандартных подсистем (БСП).

Задача. Создать новый документ и для этого документа добавить возможность прикреплять файлы.

Решение данной задачи будем осуществлять на конфигурации «1С: Управление торговлей 11.2», но все действия можно применять и к другим конфигурациям, содержащим БСП (ЗУП 3, БУ 3, ERP 2 и т.д.).

1. Чтобы добавить новый документ необходимо включить возможность редактирования нашей конфигурации.

2. Добавим новый документ с произвольной структурой

3. Добавим копированием новый справочник «БСП_НовыйДокументПрисоединенныеФайлы» и в реквизите «ВладелецФайла» изменим тип на «ДокументСсылка.БСП_НовыйДокумент». Для копирования был выбран справочник «ЗаказКлиентаПрисоединенныеФайлы».

Также не забываем изменить описание и представление объекта.

4. Добавляем в определяемые типы «ВладелецПрисоединенныхФайлов», «ПрисоединенныйФайл», «ПрисоединенныйФайлОбъект» новые объекты.

5. Если необходимо добавить возможность копирования присоединенных файлов при копировании документа, то необходимо в параметры формы документа добавить параметр «ЗначениеКопирования» и сделать его ключевым.

В модуль формы добавить процедуру «ПриЗаписиНаСервере».

 
&НаСервере
Процедура ПриЗаписиНаСервере(Отказ, ТекущийОбъект, ПараметрыЗаписи)
	ПрисоединенныеФайлы.ПриЗаписиНаСервере(Отказ, ТекущийОбъект, ПараметрыЗаписи, Параметры);
КонецПроцедуры

6. Для отображения в форме списка наличия прикрепленных файлов необходимо доработать форму списка.

Изменим текст запроса списка

 
ВЫБРАТЬ
	ДокументБСП_НовыйДокумент.Ссылка,
	ДокументБСП_НовыйДокумент.ПометкаУдаления,
	ДокументБСП_НовыйДокумент.Номер,
	ДокументБСП_НовыйДокумент.Дата,
	ДокументБСП_НовыйДокумент.Проведен,
	ДокументБСП_НовыйДокумент.Реквизит1,
	ДокументБСП_НовыйДокумент.Реквизит2,
	ДокументБСП_НовыйДокумент.МоментВремени,
	ВЫБОР
		КОГДА НаличиеПрисоединенныхФайлов.ЕстьФайлы ЕСТЬ NULL 
			ТОГДА 1
		КОГДА НаличиеПрисоединенныхФайлов.ЕстьФайлы
			ТОГДА 0
		ИНАЧЕ 1
	КОНЕЦ КАК ЕстьФайлы
ИЗ
	Документ.БСП_НовыйДокумент КАК ДокументБСП_НовыйДокумент
		ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.НаличиеПрисоединенныхФайлов КАК НаличиеПрисоединенныхФайлов
		ПО ДокументБСП_НовыйДокумент.Ссылка = НаличиеПрисоединенныхФайлов.ОбъектСФайлами

В форму списка добавим колонку «ЕстьФайлы» и изменим настройки отображения.

7. Тестирование.

Запускаем режим «1С:Предприятие» и с помощью обработки из набора внешних обработок библиотеки стандартных подсистем «ИнструментыРазработчикаОбновлениеВспомогательныхДанных.epf» обновляем наши новые данные.

Список документов

Форма документа

Прикрепленный файл

Популярность: 29%

Запись опубликована в рубрике Настройка и оптимизация с метками БСП. Добавьте в закладки постоянную ссылку.