Имя: Пароль:
1C
1C 7.7
v7: помогите правильно написать
,
0 taril115
 
22.12.11
11:17
Функция глКурсДляВалюты(Валюта,ДатаКурса) Экспорт
   Кратность=Валюта.Кратность.Получить(ДатаКурса);
   Возврат Валюта.Курс.Получить(ДатаКурса)/?(Кратность=0,1,Кратность);
   
   КоэффициентВалюты = Константа.КоэффициентВалюты;
   Если "Валюта евро"  Тогда "Курс = Курс * КоэффициентВалюты;  
   КонецЕсли;
КонецФункции  // глКурсДляВалюты()


Как узнать что в документе установлена валюта ЕВРО?
1 filh
 
22.12.11
11:18
Проверить Валюта на ЕВРО?
2 Tatitutu
 
22.12.11
11:21
Если Валюта.Код="978" Тогда
3 taril115
 
22.12.11
11:22
угу! и если валюта евро, то умножать на коэффициент из константы
4 taril115
 
22.12.11
11:22
о спс   Tatitutu
5 zak555
 
22.12.11
11:22
что такое "КоэффициентВалюты" ?
6 filh
 
22.12.11
11:23
(5) Константа)))
7 Tatitutu
 
22.12.11
11:24
+(5) вот и я  о том же ?????
(0) что за конфигурация, зачем придумывать велосипед.
в справочнике Валюты реквизит Кратность - угадай для чего ?
8 filh
 
22.12.11
11:27
(7) так у него вычисляется все, а те 3 строчки ему ничего не дадут, ибо возврата не идет. Пук в лужу, так сказать
:)
9 taril115
 
22.12.11
11:28
т.е. чтоб к курсу добавлять 4% можно использовать кратность??? хм ...
10 filh
 
22.12.11
11:32
на:

Функция глКурсДляВалюты(Валюта,ДатаКурса) Экспорт
   Кратность=Валюта.Кратность.Получить(ДатаКурса);
   Курс = Валюта.Курс.Получить(ДатаКурса)/?(Кратность=0,1,Кратность);
   
   Если Валюта.Код="978"  Тогда
       Курс = Курс * Константа.КоэффициентВалюты;  
   КонецЕсли;
   Возврат Курс;
КонецФункции  // глКурсДляВалюты()
11 zak555
 
22.12.11
11:35
(9) расшифруй
12 155153144627
 
22.12.11
11:35
Так Кратность разве не для того чтобы курс правильнее был? Если в курсе 4 знака после запятой, а рубль стоит 10001 условную единицу, то курс по 1 единице будет 0,1000. А по 10 уже 1,0001.
Коэффициент валюты у нас используют для сделок в валюте, договор в валюте, а платежи идут в рублях, тогда применют валютный коэффициент. Чтоб компенсировать конвертацию и др.
13 Злой Бобр
 
22.12.11
11:37
А не будет ли многоуважаемый автор ... А не снизойдет ли ... Ну в общем - читайте описание справочника валют и не рвите гланды через ненужное место.
14 filh
 
22.12.11
11:37
(11) протелепатирую:
в рублях ты купишь сиськи за 100руб.
в евро ты купишь в пересчете на рубли за 104руб.
15 zak555
 
22.12.11
11:41
(14) так есть же функции пересчета из одной валюты в другую
16 filh
 
22.12.11
11:56
(15) я как понял, если продажа у евро, тупо цена на 4% повышается. Короче, это обратное от скидки)))
17 taril115
 
22.12.11
12:11
перевозчик берёт курс на день + 4%
вот это и нужно учесть ...
при создании док-та сразу считается курс + 4% к нему
18 zak555
 
22.12.11
12:11
(17) конфа какая ?
19 taril115
 
22.12.11
12:14
а вот другая проблема  ...
Есть документ Поступление ТМЦ Доп. Расходы
он , как я понял, раскидывает доп расходы (транспортировка к примеру) на документы поступления ТМЦ (указанные в спецификации этого документа)
и пропорционально раскидывает по позициям этих поступлений. это если верить описанию из книги ...
Только вот нефига не раскидывается (((
20 taril115
 
22.12.11
12:15
1С 7.7 ТиС не новая )
21 zak555
 
22.12.11
12:23
(19) у меня раскидывает

(20) номер

+ в ТиСе есть понятие как типы цен, в которых можно указать наценку
22 taril115
 
22.12.11
12:25
сейчас проверю в другой конфе, будет раскидывать или нет ... мож что-то не так делаю ...
23 taril115
 
22.12.11
12:26
конфа писанная - переписанная ... написано релиз 1.007 ))))
24 zak555
 
22.12.11
12:33
укр ?
25 taril115
 
22.12.11
12:37
украина? россия )
26 zak555
 
22.12.11
12:39
(23) где написано ?
27 taril115
 
22.12.11
12:44
zak555 подскажи лучше как у тебя раскидывает расходы?
попробовал в другой конфе, тож нефига ...
Вот к примеру:
Поступление ТМЦ (купля-продажа) - 1 позиция на 10р
Вводим документ Доп. Расходы, основанием указываю  это поступление. Ввожу сумму 2р
В итоге должно получиться что? В поступлении ТМЦ эта 1 позиция -12р??? Т.е. увеличение себестоимости позиции с учётом транспортного расхода?
28 taril115
 
22.12.11
12:45
9.2 конфа
29 zak555
 
22.12.11
12:57
(27) посмотри движения документа доп расходы
+ ведомость по ТМЦ и ты увидишь увеличение
30 taril115
 
22.12.11
13:25
zak555 Спасибо за помощь =)
31 taril115
 
22.12.11
18:26
Ещё вопрос...
Как получить сумму документа?
Документ Поступление(Доп.Расходы). там подбираются документы основание Поступление (купля-продажа)
Как получить сумму этих документов основания?
Нужно добавить ещё одну колонку в табличной части.
32 zak555
 
22.12.11
18:28
(31) какую колонку 7
33 taril115
 
22.12.11
18:37
ну новую создал в табличной части. Туда нужно вывести сумму документа ...
К примеру:
Номер  | Документ поступление ТМЦ 00001 |  Сумма документа |
34 taril115
 
22.12.11
18:39
35 taril115
 
23.12.11
13:47
Перем СуммаДоставки;
Перем СуммаПоставки;
Перем СуммаВсехПоставок;
Перем СчетчикЦикла;
Перем ВсегоПоступлений;

//*******************************************
Процедура Сформировать()
   
СуммаДоставки = 0;
СуммаПоставки = 0;
СуммаВсехПоставок =0;


ВвестиЧисло(СуммаДоставки,"Введите сумму доставки",14,2,);      
Сообщить("Сумма доставки " + СуммаДоставки ,);
   
ВвестиЧисло(ВсегоПоступлений,"Введите число поступлений",2,0,);
СчетчикЦикла = 0;
Для СчетчикЦикла = 1 По ВсегоПоступлений Цикл
ВвестиЧисло(СуммаПоставки,"Введите сумму поставки",14,2,);
Очистить
   СуммаВсехПоставок =  СуммаВсехПоставок + СуммаПоставки;
   Счётчик = Счётчик + 1;    
КонецЦикла;        
   
Сообщить("СуммаВсехПоставок "+ СуммаВсехПоставок);
Сообщить("Счётчик " + ВсегоПоступлений);

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


Вопрос. Как можно очистить окно "ВвестиЧисло" ??? Если подряд вводится несколько значений то в окне показывается предыдущее введённое значение
36 Ёпрст
 
23.12.11
13:51
(35) СуммаДоставки=0 воткни перед ввестичисло
37 Базис
 
naïve
23.12.11
13:53
Автор, ты чего хочешь? Если просто курс валюты к другой на дату, то дл этого в любой типовой кроме ЗиК есть подходящая глобальная функция.
38 taril115
 
23.12.11
13:57
неее... там всё сложнее ))
Есть документ Поступление.ДопРасходы (транспортные расходы)
В него допустим впихиваются 10 поступлений ТМЦ.
Есть общая сумма транспортных расходов, к примеру 50р
И напротив каждого поступления в документе доп.расходов нужно раскидать эти 50р пропорционально сумме каждого поступления ....
39 taril115
 
23.12.11
13:57
конфа ТиС
40 taril115
 
23.12.11
13:58
(34) выше есть ссылка на скрин
41 taril115
 
23.12.11
14:13
Перем СуммаДоставки;
Перем СуммаПоставки;
Перем СуммаВсехПоставок;
Перем СчетчикЦикла;
Перем ВсегоПоступлений;


//*******************************************
Процедура Сформировать()
   
СуммаДоставки = 0;
СуммаПоставки = 0;
СуммаВсехПоставок =0;


ВвестиЧисло(СуммаДоставки,"Введите сумму доставки",14,2,);
ВвестиЧисло(ВсегоПоступлений,"Введите число поступлений",2,0,);  

СчетчикЦикла = 0;

Для СчетчикЦикла = 1 По ВсегоПоступлений Цикл
   СуммаПоставки = 0;
   ВвестиЧисло(СуммаПоставки,"Введите сумму поставки",14,2,);
 
   СуммаВсехПоставок =  СуммаВсехПоставок + СуммаПоставки;
   Счётчик = Счётчик + 1;    
КонецЦикла;        

Сообщить("Сумма доставки " + СуммаДоставки ,);
Сообщить("Сумма всех поставок " + СуммаВсехПоставок);
Сообщить("Всего поступлений " + ВсегоПоступлений);

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


Ещё маленький вопросик ....
Нужно рассчитать стоимость доставки.

СтоимостьДоставки = (СуммаПоставки * 100 / СуммуВсехПоставок) * СуммуДоставки / 100

Куда и как записывать СуммуПоставки до момента сложения? Она ведь нужна при расчётах.
Как вывести количество СтоимостьДоставки = количеству ВсегоПоступлений ???

ЗапуТлился что-то в этих 3-х соснах =)
42 taril115
 
23.12.11
14:25
походу через ТаблицуЗначений ???