Программно создается подчиненный документ (сделан на основе КорректировкаДолга), всё заполняется на основании документа-родителя.
Вопрос следующий: если Сумма отличная от Договор.ВалютаВзаиморасчетов, то СуммаВзаиморасчетов подчиненного документа = сумме, что не верно.
Но если в ручном режиме изменить валюту документа, то СуммаВзаиморасчетов пересчитывается правильно.
Сумма по документу прописана формула:
глФРМ(СуммаВзаиморасчетов, Договор.ВалютаВзаиморасчетов)
Подскажите, КАК сделать автоматический пересчет, чтобы не подчиненный документ сам правильно пересчитывал СуммуВзаиморасчетов без ручного изменения и пересчета валюты?
http://savepic.su/6225830.png

фигасе.

Ну вот проследи, какой код работает при изменении ручном. И задействуй его при вводе на основании

(0) Посмотреть какая функция вызывается при изменении Сумма, в ней найти изменени СуммаВзаиморасчетов

(2) Всё вроде правильно говорите, вызывается как и во всех остальных стандартных документах Процедура ПриИзмененииВалюты(). НО... она работает только в ручном режиме. Даже во всех остальных докуметах.

(4) ну так запхни ее в процедуру приВводеНаосновании() в доке. после заполнения еще и пройдись этой процедурой

сначала идет как идет заполнение цифр при вводе на основании, а затем добавь ПриИзмененииВалюты() она все и досчитает

(6) Я извиняюсь за тупые вопросы.
Есть еще Процедура ПересчетСуммыВзаиморасчетов().
Она прописана последней строкой в процедурах ПриИзмененииДаты / Валюты / Договора// Курса и т.д.
А может эту процедуру тогда было бы логично прописать в ВводНаОсновании(ДокументОснование)?

(7) можно. при вводе на основании либо что-то неак, либо не хватает этого финала про пересчет, который вызывается всегда при изменении табличных частей например.

(7) сначала заполняешь реквизиты документа (Сумма, Валюта, Курс, Договор) потом делаешь:
    
СуммаВзаиморасчетов = глПересчет(Сумма,
                    Валюта,Курс,
                    Договор.ВалютаВзаиморасчетов,ДатаДок);

ставь любую, которая выдает нужный тебе результат

Коллега. кстати как вас в Афган занесло. не часто такое тут увидишь.

(7) А ты хорошо посмотрел ВводНаОсновании?
У меня ТиС: в вводнаосновании есть заполнениепоитогам, там и идет пересчет взаиморасчетов.
Может чего не досмотрел?

(11) ну тут много российских компаний. только у них учет российский и им не нужно перед местной налоговой сдаваться.
мне же приходится делать 7ку под себя.

(12) у меня Комплексная
Там так:
Процедура ВводНаОсновании(ДокументОснование)
        
    СинонимДокумента    = ПредставлениеВида();
    СинонимОснования    = ДокументОснование.ПредставлениеВида();
    
    Список    = глПолучитьСписокВводимыхНаОсновании(ДокументОснование);
    Поз        = Список.НайтиЗначение(Вид());
    
    // выполним проверку, можно ли вводить документ на основании ДокументОснование
    Если Поз = 0 Тогда
        // ДокументОснование не найден в списке разрешенных
        Предупреждение("Документ """ + СинонимДокумента +
                        """ нельзя вводить на основании """ + СинонимОснования + """", 60);
        СтатусВозврата(0);
        Возврат;
    КонецЕсли;
    
    КодОперации    = Перечисление.КодыОпераций.Продажа;
    глЗаполнитьШапкуНаОсн(Контекст,ДокументОснование);
    
    ДатаОплаты = глБанковскаяДата(ДатаДок, Договор.ГлубинаКредита);
    
    // По умолчанию выписываем в той же валюте и по тому же курсу, что и документ-основание
    Валюта = ДокументОснование.Валюта;
    Курс   = ДокументОснование.Курс;
    Кратность = ДокументОснование.Кратность;
    ДокОснование = ДокументОснование.ТекущийДокумент();

    СтарыйКонтрагент    = Контрагент;
    СтарыйДоговор        = Договор;
        
КонецПроцедуры // ВводНаОсновании()

(14) Вижу. А где заполнение таб. части на основании?

(9) Так это всё прописано стандартно здесь:
Процедура ПересчетСуммыВзаиморасчетов()
        
    Если ПустоеЗначение(Договор.ВалютаВзаиморасчетов) = 1 Тогда
        СуммаВзаиморасчетов    = 0;    
    Иначе
        СуммаВзаиморасчетов = глПересчет(Сумма, Валюта,Курс, Договор.ВалютаВзаиморасчетов,ДатаДок,Кратность);
    КонецЕсли;
    
    Форма.Обновить();

КонецПроцедуры // ПересчетСуммыВзаиморасчетов()

(15) У меня нет Таб.части в этом документе. Это документ КорректировкаДолга в типовой

(17) У меня в КорректировкаДолга нет ВводНаОсновании. Есть ВводНового:

Процедура ВводНового(Скопирован)
                      
    глЗаполнитьШапку(Контекст, Скопирован);
    
    Если Скопирован = 1 Тогда    //копирование документа
        ПересчетСуммыВзаиморасчетов();
        Возврат;
    КонецЕсли;
    
    Если Форма.Параметр = "Покупатель" Тогда  
        ВидОперации = Перечисление.ВидыОперацийКоррДолга.Покупатель;
    Иначе
        ВидОперации = Перечисление.ВидыОперацийКоррДолга.Поставщик;
    КонецЕсли;    
    
КонецПроцедуры

(18) Такое тоже есть. 1 в 1

(19) Показывай, что в ПересчетСуммыВзаиморасчетов.

(20) Получается по факту, что документ заполняется на основании родителя. И валюта правильно заполняется. НО... не пересчитывает, только если ручками происходит типа изменение валюты.

Процедура ПересчетСуммыВзаиморасчетов()
        
    Если ПустоеЗначение(Договор.ВалютаВзаиморасчетов) = 1 Тогда
        СуммаВзаиморасчетов    = 0;    
    Иначе
        СуммаВзаиморасчетов = глПересчет(Сумма, Валюта,Курс, Договор.ВалютаВзаиморасчетов,ДатаДок,Кратность);
    КонецЕсли;
    
    Форма.Обновить();

КонецПроцедуры// ПересчетСуммыВзаиморасчетов()

(21) Один в один...
Только ради тебя ( :)))) ) - сейчас ввела корректировку долга (новую, без основания) по новому договору в евро - у меня все шикарно сразу же отображается на форме.
Попробуй - без основания (просто новый док-т) тоже глючит?

(22) В том то и дело(((, что Корректировка у меня обязана создаваться программно (по галочке) на основании ПКО/РКО/Банк +/Банк-

(23) То есть ты её сам писал?

(24) Зачем?!)))
Просто скопировал типовой Корректировка. Переименовал, как мне надо.
В родителях дописал Функцию СоздатьДокументWithholdingTaxOnContractor(Док)
с заполненим данных

(25) Понятно. А ПересчетСуммыВзаиморасчетов воткнул? В ВводНаОсновании. В (14) не вижу.

(0) >  Сумма отличная от Договор.ВалютаВзаиморасчетов
сумма всегда не равна валюте взаиморасчетов

(26) Да, не работает((((
....
    // По умолчанию выписываем в той же валюте и по тому же курсу, что и документ-основание
    Валюта = ДокументОснование.Валюта;
    Курс   = ДокументОснование.Курс;
    Кратность = ДокументОснование.Кратность;
    ДокОснование = ДокументОснование.ТекущийДокумент();
    ПересчетСуммыВзаиморасчетов();
    
    СтарыйКонтрагент    = Контрагент;
    СтарыйДоговор        = Договор;
        
КонецПроцедуры // ВводНаОсновании()

(27) Выебнулся!? Доволен!?
Да, ошибся! Конечно же ВАЛЮТА не равна ... и далее по тексту.

(28) Со мной отладчик не разговаривает, поэтому я использую Сообщить(). Либо смотри отладчиком, либо вставляй Сообщить() и лови, где и в чем косяк.
(29) Не надо ругаться.

(30) [Со мной отладчик не разговаривает, поэтому я использую Сообщить()]

о_О !!!

(16) я в курсе, только это не вызывается при вводе на основании...

(31) Что "о_О"? Да, не разговаривает.

(33) ДАй посмотреть что у тебя там твоится

(33) что-то ты не договариваешь...
если у тебя реквизиты документы совпадают, то и суммаВзаиморасчетов должна совпадать без всяких пересчетов

показывай целиком ВводаНаОсновании

(36) (14)

(37) ну а сумма где?

(38) Да, сказала уже.

ВСЕМ СПАСИБО!
Особенно Масяньке и HawkEye-за наводку.
Спасла такая конструкция в родителе:
Док.СуммаВзаиморасчетов    = глПересчет(Док.Сумма,Док.Валюта,Док.Курс,Док.Договор.ВалютаВзаиморасчетов,Док.ДатаДок,Док.Кратность);

Может и неправильно, зато работает.)))

(40) Мне - шоколадку :)))))

(39) я все не читал )))


(40) можно и так, но зачем лезть в код "Родителя"?
надо просто в ВводНаОсновании()
добавить:
Сумма = ДокументОснование.Сумма
СуммаВзаиморасчетов    = ДокументОснование.СуммаВзаиморасчетов

Я на эту Док.СуммаВзаиморасчетов уже наступал и не раз. движения и проводки идут по этому реквизиту и после перезаполнения таблички доки если не пересчитать его - проблемы.

+42... блин ты же программно создаешь документ.. при чем тут вообще тогда ВводНаОсновании.....

(44) а программно через ввод на основании нельзя? я так делал ;)

а при программном вообще 100% надо этот Док.СуммаВзаиморасчетов пересчитывать в итоге

(40)
так пиши в коде где создаешь документ...
Док.Сумма = Сумма
Док.СуммаВзаиморасчетов    = СуммаВзаиморасчетов.

(42) (44) Не знаю полной задачи. Вполне вероятно, что можно и не создавать новый док-т (в конфигураторе).

(42) Неее, так не пойдет, потому что ДокументОснование у меня может быть на миллион, а подчиненный документ только на 2 или 7% от этой суммы. И подчиненный создается автоматом от родителя. поэтому в родителе и дописал.

(44) как причем!? именно на основании родителя и создается документ и заполняется тоже.

(45) при чем тут льзя\нельзя... он же не так делает...

(48) так тебя же 100 раз спросили.. как сумму подчиненного рассчитываешь...

п.2 - читай описание методов... в твоем случае - он не причем...

(34) В смысле, "отладчик не разговаривает"?

Не запускается, не срабатывает по точке останова или не умеешь им пользоваться?

(51) последнее...

(51) Не начинай.
Мне уже и help рисовали... Не получается. А может привыкла к Сообщить...

(41) ТС пожалел? Ну, так и я тебя пожалею, держи: http://taline.ru/wp-content/uploads/2012/01/2012-02-26-Масяня-768x1024.jpg :)


ЗЫ. Проблема ТС решена. Смысл обсуждать личность?

(51) ну я, например, не умею и не понимаю, как им пользоваться. Не давно показали.
И чЁ!?
Литературы, написанной ЧЕЛОВЕЧЕСКИМ языком нет. А остальные умничают, а показать слабо, т.к. сами не умеют.

(54) Канибализмом попахивает :)))))))))))))))))))

(55) Поддержу.
В классике (языки программирования) таких проблем не было (у меня) :(

(55) чего там уметь то?
минимум кликаешь на желтой полосе мышкой - получишь точку останова, запускаешь 1С как алгоритм дойдет до поставленной  точки - откроется отладчик... и смотри значение любой переменной... или дальше шагай по строчкам...

(55) описание работы в нём не особенно нужно.
Список иконок сверху, пройдись мышой, и будет ясно, как работать
А также применить Метод научного тыка - залог победы тобой  отладчика.

(55) Если хочешь - давай мыло, я тебе отправлю help.

(60) Исключительно вечный Метод научного тыка помогает решать возникающие проблемы по 1С.
Вам хорошо - Вы все программисты и учились на это. А когда надо работать и нет возможности ждать, приходится учиться и  использовать Метод научного тыка.

(62) Как раз "программисты" очень мешает. Очень :(

(61) Конечно же хочу)))
bestship@mail.ru

(64) Лови :)

(62) начало работы, путь в отладчик: http://pics.rsh.ru/img/22_uvnniplr.png

(66) А не ты мне делал help по отладчику?

+66 продолжение, правда, это анализ производительности:
http://pics.rsh.ru/img/22_fpml6st1.png

(67) кажись, я :) остались doc"и :)

(68) Вот я и скинула автору :)
Еще раз - спасибо :)

(69) да не за что :)

1с-овский отладчик очень напоминает клипперовский, году так в 1993-м пришлось заниматься отладкой прожки-бухучета, очень помогал :)
Правда, в клиппере только значения переменных.. Но это не суть важно :)

(71) Не соглашусь. В Clipper'е всё было легко и просто.
И маленький ОФФ: - Дедушка, а ты динозавров видел? :)))))))

(72) видел! они такиииеее!! вот такие :)

(69) Мася, спасибо за help. Буду разбираться и тыкать по кнопочкам по инструкции)))

(74) По большей части, "спасибо" не мне, а aka AMIGO. :)

PS А как вставлять ник, как ссылку?

(75) пкм на нике, копировать ссылку, в поле сообщения пкм вставить :)

альтернатива - лкм на нике, тащить его в поле Сообщщения :)

или собаку перед ником поставить

vicof
пробую

(76) (77) (78) Спасибо огромное!

к конфигуратору советую поставить набор плагинов расширения конфигуратора. собраны в одном пакте от пенконфа помоему. там и телепат есть

(81) Да подождите Вы с портретом... Дайте ему со статуей разобраться. (С)
Если автор не бросит это гиблое дело, то - дойдет :)

(29) да ты не представляешь как я доволен!
как пишем - так и думаем.
ошибки в письме (концептуальные) - следствие беспорядка и непоследовательности мышления - о чем здесь говорить...? Одно дело вместо "здравствуйте" написать "зрдаствуйте" - это я еще могу понять.. и простить... Но сравнить сумму с валютой - не, мое чувство прекрасного - бунтует!

(72) Clarion 2.1 по сравнению с Clipper был как небоскреб с лачугой нищего...