Имя: Пароль:
1C
1C 7.7
v7: Программно указать договор в 1С 77 Бух
,
0 Santa4527
 
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
11:07
(8) Украли, зуб даю...
10 Ыщъ
 
16.04.12
12:49
(9) Последний? Не жалко?
11 ДенисЧ
 
16.04.12
12:55
(10) Не свой же...
12 Ыщъ
 
16.04.12
13:47
(11) Да ты такой. Я знаю.
Чужими СП бодяжишь. Чужие зубы раздаёшь.