Имя: Пароль:
1C
 
Обработка дополнительного реквизита
,
0 Natali17
 
29.10.23
19:12
Дали задание в колледже.
1.       В учебной версии 1С создать справочник «ФизЛица», с реквизитами: ИНН, СНИЛС, ДатРождения,ТабНомер
2.       Заполнить справочник несколькими данными.
3.       В 1С дополнить справочник ФизЛица дополнительным реквизитом «ИдентификаторПропуска» -строка 11 знаков
4.       Создать Excel файл – шаблон в котором находится информация ФИО физлица, табельный номер, ИдентификаторПропуска.
5.       Написать обработку заполнение дополнительного реквизита «ИдентификаторПропуска» справочника «ФизЛица» из файла Excel.

Разобралась как подключить файл к Excel. Есть код
&НаКлиенте
Процедура ПутьКФайлуНачалоВыбора(Элемент, ДанныеВыбора, СтандартнаяОбработка)
   СтандартнаяОбработка = Ложь;
   Диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие);
   Диалог.Заголовок = "Выберите excel - файл";
   Диалог.ПолноеИмяФайла = "";
   Диалог.МножественныйВыбор = Ложь;
   Диалог.Каталог = "";
   
   Если Диалог.Выбрать() Тогда
   ЭтаФорма.ПутьКФайлу = Диалог.ПолноеИмяФайла;
   КонецЕсли;
КонецПроцедуры

&НаСервере
Процедура ЗагрузкаНаСервере()
	Данные = ПолучитьИзВременногоХранилища (ЭтаФорма.АдресВХ);
	ИмяВФ = ПолучитьИмяВременногоФайла ("xlsx");
	Данные.Записать (ИмяВФ);
	
	Эксель.Очистить();
	табдок = новый ТабличныйДокумент;
	табдок.Прочитать (ИмяВФ,СпособЧтенияЗначенийТабличногоДокумента.Значение);
	высстрок = табдок.ВысотаТаблицы;
			
	  Для стр = 2 по высстрок цикл
		стрТЗ = Эксель.Добавить();
		стрТЗ.ТабельныйНомер = табдок.Область(стр, 2).Текст;
		стрТЗ.ИдентификаторПропуска = табдок.Область (стр, 3).Текст;
		
КонецЦикла;	
		
	КонецПроцедуры

&НаКлиенте
Процедура Загрузка(Команда)
	Файл = Новый ДвоичныеДанные (ПутьКФайлу);
	ЭтаФорма.АдресВХ = ПоместитьВоВременноеХранилище (Файл, ЭтаФорма.УникальныйИдентификатор);
	ЗагрузкаНаСервере();
КонецПроцедуры


Дальше без понятия, что делать, почти никакой информации нет про это. Помогите, пожалуйста
1 Волшебник
 
29.10.23
18:27
Хорошо оформили ветку, но лесенку программного кода не соблюдаете
2 Волшебник
 
29.10.23
18:28
Старайтесь
3 Natali17
 
29.10.23
18:37
(1) вы можете, пожалуйста, хотя бы дать наводку, вообще не понимаю как мне быть
4 Волшебник
 
29.10.23
19:12
(3) Я помог. Добавил оформление и исправил "Ecsel" на "Excel"
5 Natali17
 
29.10.23
23:37
(4) ну это уже вы помогли не мне, а тому кто составлял задание) тоже заметила эту ошибку
7 RomaH
 
naïve
30.10.23
06:14
записать все из ексель в таблицу значений (ТЗ)

ТЗ засунуть в запрос

внутренним соединением по табельному и СНИЛС найти физ лиц

и этим физ лицам прописать идентификатор
8 RomaH
 
naïve
30.10.23
06:17
высстрок = табдок.ВысотаТаблицы;
            
      Для стр = 2 по высстрок цикл


буквы экономите?

ВысотаВСтроках ?

почему не ВысотаТаблицы?

и зачем отдельная переменная?

Вполне сойдет

Для стр По табдок.ВысотаТаблицы Цикл



И почему названия переменных не с большой буквы?
9 RomaH
 
naïve
30.10.23
06:24
ну и надо быть в тренде

ДиалогВыбораФайла.ВыбратьАсинх()
10 Смотрящий
 
30.10.23
08:08
(0) Третий пункт - как у вас реализован в структуре данных допреквизит ИдентификаторПропуска ?
11 FirstLine Support
 
30.10.23
08:18
(0) работать с доп. реквизитами нужно через БСП, это сразу +2 к оценке в колледже
12 Saari
 
30.10.23
10:44
(0) задание еще актуально?
Я не хочу быть самым богатым человеком на кладбище. Засыпать с чувством, что за день я сделал какую-нибудь потрясающую вещь — вот что меня интересует. Стив Джобс