v7: Коротко но надеюсь ясно

1C 7.7

11.01.12

✎

12:05

//*******************************************
Процедура Выполнить()
СпрД = СоздатьОбъект("Справочник.Должности");
СпрСД = СоздатьОбъект("Справочник.ДолжностиВидСпецОдежды");
СпрД.ВыбратьЭлементы();
Пока СпрД.ПолучитьЭлемент() = 1 Цикл
СпрСД.ИспользоватьВладельца(СпрД.ТекущийЭлемент().Наименование);
СпрСД.ВыбратьЭлементы();
Пока СпрСД.ПолучитьЭлемент() = 1 Цикл
СпрСД.Классификатор = СпрСД.ВидСпецодежды.классификатор;
СпрСД.Количество = 1;
СпрСД.ЕдИзм = СпрСД.ВидСпецодежды.ЕдИзм;
СпрСД.СрокНоски = СпрСД.ВидСпецодежды.СрокиНоски;
КонецЦикла;
КонецЦикла;
КонецПроцедуры

2-е недели в 1с 7-м не пишу коментариев надеюсь поймете.. Не заполнянет где косяк??? (Коментарии типо: "В ДНК" не ставьте и так знаю =)))))

1 Vitello

11.01.12

✎

12:06

СпрСД.ИспользоватьВладельца(СпрД.ТекущийЭлемент().Наименование);

2 povar

11.01.12

✎

12:07

снеговик сожрал твой мозг ?

3 Джинн

11.01.12

✎

12:07

Комментарий - учитесь правильно оформлять темы.
http://www.forum.mista.ru/rules.php#rec

4 Любитель XML

11.01.12

✎

12:07

+(1) СпрСД.Записать();

5 ЧеловекДуши

11.01.12

✎

12:07

ДНК... Даже для снеговика, это Крутое ДНК :)

6 Ёпрст

гуру

11.01.12

✎

12:09

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

7 Tatitutu

11.01.12

✎

12:10

(0) что ты хочешь сделать вообще ?
так и нужно ?
СпрСД.Классификатор = СпрСД.ВидСпецодежды.классификатор;

(6) .Записать() забыл ?

8 Alexor

11.01.12

✎

12:17

Еще тут ошибка
СпрСД.ИспользоватьВладельца(СпрД.ТекущийЭлемент().Наименование);
надо
СпрСД.ИспользоватьВладельца(СпрД.ТекущийЭлемент());

9 povar

11.01.12