Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
26 ноя 2024, 13:38

Нужно сформировать договор с контрагентом.

Автор vurdalak, 11 мар 2011, 00:58

0 Пользователей и 2 гостей просматривают эту тему.

vurdalak

Я создаю документ ABC классификация.
По кнопке «Сформировать» сделать новый договор «по договору в целом», «с покупателем», допустимая сумма задолженности  = кредитная линия. Процент предоплаты = процент предоплаты.
Создать док. Событие.
Подскажите пожалуйста как начать все это, какими методами?

vurdalak


vurdalak

С частью задания справился, а вот как значения перенести из одной процедуры в другую пока не понял. Если кто знает  подскажите, буду благодарен.

cska-fanat-kz

Переведите "как значения перенести из одной процедуры в другую".

Например "внешней" переменной.

Перем А;

Процедура Проц1
    А = 1;
КонецПроцедура

Процедура Проц2
   Сообщить(А); //1
КонецПроцедуры
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

vurdalak

Спасибо. Вот еще проблема у меня.При создании "Договора с контрагентом" очень много кнопок недоступно.

cska-fanat-kz

ну может надо Контрагента выбрать?
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

Klyacksa

Договор контрагента лучше создавать из формы элемента самого Контрагента
xxx: Спасибо! Я бы загуглил, но ты интересней. Материшься. Злишься. Послать можешь...

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

vurdalak

Спасибо я разобрался с этим. Теперь проблема в присваение значения процента предоплаты. Пишу:
Процедура ОсновныеДействияФормыДействие1()

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

Договора = Справочники.ДоговорыКонтрагентов;
НовыйДоговор = Договора.СоздатьЭлемент();
НовыйДоговор.Владелец =  ЭлементыФормы.Контрагент.Значение;
НовыйДоговор.ВедениеВзаиморасчетов =  Перечисления.ВедениеВзаиморасчетовПоДоговорам.ПоДоговоруВЦелом;
НовыйДоговор.ВидДоговора = Перечисления.ВидыДоговоровКонтрагентов.СПокупателем;
НовыйДоговор.ЭтотОбъект.ПроцентПредоплаты = СтрокаТабл.ПроцентПредоплаты; //вот это не работает
НовыйДоговор.КонтролироватьСуммуЗадолженности = Истина;
НовыйДоговор.ДопустимаяСуммаЗадолженности = СтрокаТабл.КредитнаяЛиния;
НовыйДоговор.ПолучитьФорму().Открыть();



КонецПроцедуры
Уважаемые специалисты помогите пожалуйста.

cska-fanat-kz

А вы "КонецЦикла;" подальше поставьте например после

НовыйДоговор.ПолучитьФорму().Открыть();

и будет вам счастье...
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

vurdalak

Все вроде нормально, но не работает((
Теперь вот так:

Процедура ОсновныеДействияФормыДействие1()

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

Договора = Справочники.ДоговорыКонтрагентов;
НовыйДоговор = Договора.СоздатьЭлемент();
НовыйДоговор.Владелец =  ЭлементыФормы.Контрагент.Значение;
НовыйДоговор.ВедениеВзаиморасчетов =  Перечисления.ВедениеВзаиморасчетовПоДоговорам.ПоДоговоруВЦелом;
НовыйДоговор.ВидДоговора = Перечисления.ВидыДоговоровКонтрагентов.СПокупателем;
НовыйДоговор.ПроцентПредоплаты = СтрокаТабл.ПроцентПредоплаты; //эта строчка так и не заработала
НовыйДоговор.КонтролироватьСуммуЗадолженности = Истина;
НовыйДоговор.ДопустимаяСуммаЗадолженности = СтрокаТабл.КредитнаяЛиния;
НовыйДоговор.ПолучитьФорму().Открыть();
КонецЦикла;

Документы.Событие.СоздатьДокумент().ПолучитьФорму().Открыть();

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

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск