Имя: Пароль:
1C
1C 7.7
v7: ПУБ 7 Проблемы после добавления новой валюты
0 aptomilov
 
04.09.13
08:56
скрин https://dl.dropboxusercontent.com/u/37772184/проводки.png
Привет всем, наши бухгалтера добавили еще одну валюту рубль с кодом 810 , объяснили что им это надо, наверняка делали чего то еще но ссуки не сознаются, играл и в доброго и в злого полицейского не помогло.
Короче щас две лишних проводки делает документ. при чом любой старый берешь и он сразу нехочет проводиться потому что курс выставляется в 0 ставишь его 1 оно проводиться с лишними проводками.
Как лечить эту проблему не могу пока найти.
1 vladko
 
04.09.13
09:18
1я проводка нормальная. Она должна быть по Дн07.04.1
2я проводка создаётся, т.к. комп считает, что валюта в УЕ. А считает её потому что в константе новая валюта не указана как рубли.
Нельзя иметь сразу 2 рублёвых валюты. Одна из них будет считаться за валюту УЕ
2 aptomilov
 
04.09.13
09:39
так есть в документах старая валюта  а в константе новая
3 aptomilov
 
04.09.13
09:43
Спасибо
4 aptomilov
 
04.09.13
10:14
Проблема так и не ушла выставил константу на старую валюту, в документе и договоре тоже стоит старая валюта, а в проводки один фиг пихает валютный учет.
5 aptomilov
 
04.09.13
10:38
Где еще можно посмотреть почему  база думает что надо валютный учет вести
6 ДенисЧ
 
04.09.13
10:42
Отладчик отняли?
7 Джинн
 
04.09.13
10:47
Применяйте на правильную валюту и не конопатьте мозг ни себе, ни и людям. 810 нужна только в определенных хитропопых случаях, которые ЦБ нам подарил. В жизни практически не встречается.
8 FlashC
 
04.09.13
23:40
(0,5) в ПУБе всё УЕ кроме глРубли, смотри глобальник процедуру ПриНачалеРаботыСистемы(). Там и задается что является рублем.
9 FlashC
 
04.09.13
23:58
(5) ПриНачалеРаботыСистемы()

    Валюта = СоздатьОбъект("Справочник.Валюты");
    Если (Валюта.НайтиПоКоду("643") = 0) Тогда
        Валюта.Новый();
        Валюта.Код = "643";
        Валюта.Наименование = "Руб";
        Валюта.ПолнНаименование = "Российский рубль";
        Валюта.Записать();
        Валюта.Кратность.Установить('01.01.1980',1);
        Валюта.Курс.Установить('01.01.1980',1);
    КонецЕсли;    
    
    глРубли = Валюта.ТекущийЭлемент();

поэтому читайте (7)
Выдавать глобальные идеи — это удовольствие; искать сволочные маленькие ошибки — вот настоящая работа. Фредерик Брукс-младший