v7: Программно указать договор в 1С 77 Бух

1C 7.7

16.04.12

✎

10:44

Договор = СоздатьОбъект("Справочник.Договоры");
Договор.НайтиПоКоду("000001");
ДоговорОсн = Договор.ТекущийЭлемент();
НовыйДокумент.Договор = ДоговорОсн;

Но в документе (НовыйДокумент) не заполняется договор. Подскажите что не так?

1 Ёпрст

гуру

16.04.12

✎

10:46

не найден по коду и всего лишь.
+неплохо указывать владельца перед поиском

2 Волесвет

16.04.12

✎

10:49

договоры - справочник подчиненный

3 Santa4527

16.04.12

✎

10:53

(1) А как указать владельца? И с таким кодом есть договор.

4 Ёпрст

гуру

16.04.12

✎

10:56

(3)
1.использоватьВладельца
2.в методе НайтиПоКоду есть пераметры + он возвращает значение, которое указывает как завершился поиск - удачно/не удачно

5 Santa4527

16.04.12

✎

10:59

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

Вот так примерно должно?

6 ДенисЧ

16.04.12

✎

11:01

(5)
Договор = СоздатьОбъект("Справочник.Договоры");
//Договор.НайтиПоКоду("000001");
//ДоговорОсн = Договор.ТекущийЭлемент();
//НовыйДокумент.Договор = ДоговорОсн;
Договор.ИспользоватьВладельца(НовыйДокумент.Контрагент);
Если Договор.НайтиПоКоду("000001") = 0 Тогда
Сообщить("А договора-то и нету... Украли... Сволочи...", "!!!");
Иначе
//ДоговорОсн = Договор.ТекущийЭлемент();
НовыйДокумент.Договор = Договор.ТекущийЭлемент();
КонецЕслИ;

Где-то так.

7 Santa4527

16.04.12

✎

11:05

(6) Спасибо! сейчас попробую.

8 Ыщъ

16.04.12

✎

11:07

(6) Ну прям, сразу украли.
Под столом валяется или между бумаг затесался.

9 ДенисЧ

16.04.12