В стандартной УСН есть ли функция возвращающая среднюю стоимость товара?

v7 Пардон!

Есть.
Оборотка по 10. Сумму на количество раздели

(2) Поподробнее. Обработка по 10? Это что? Я специализируюсь по торговли. Подскажите место в конфе и название функции!

(0)Кури Бух. Учет.

(4) Что это значит?

(3) Оборотка, а не обработка.
Оборотно-сальдовая ведомость.
Функции в явном виде нет. Используй бух-запрос

(6) Подскажи, в бухгалтерии профан, как получить среднюю стоимость товара?

СредняяСтоимость=?????

С такой полоской, как не ай-яй-яй? :)

(7) также как и в оперучёте. Делишь общую стоимость на количество

Би = СоздатьОбъект("БухгалтерскиеИтоги");
Би.ИспользоватьСубконто(ВидыСубконто.Номенклатура,, 2);
Би.ВыполнитьЗапрос(ВыбНачПериода, ВыбКонПериода, "41.1")
Би.ВыбратьСубконто(1);
Пока Би.ПолучитьСубконто(1) = 1 Цикл
 ОстСумма = Би.СКД(1);
 ОстКолво = Би.СКД(2);
 СредняяЦена = ОстСумма / ОстКолво;
КонецЦикла;

(10) Спасибо! А почему цикл?

по привычке. простой перебор всей номенклатуры

т.е. так?:

Би = СоздатьОбъект("БухгалтерскиеИтоги");
Би.ИспользоватьСубконто(ВидыСубконто.Номенклатура,, 2);
Би.ВыполнитьЗапрос(ВыбНачПериода, ВыбКонПериода, "41.1")
Би.ВыбратьСубконто(1);
Если Би.ПолучитьСубконто(1) = 1 Тогда
 ОстСумма = Би.СКД(1);
 ОстКолво = Би.СКД(2);
 СредняяЦена = ОстСумма / ОстКолво;
КонецЕсли;

(13)
Би.ИспользоватьСубконто(ВидыСубконто.Номенклатура, ВыбНужнаяНоменклатура, 2);

Спасибо всем!

Ошибка!:

Би.ВыполнитьЗапрос(Константа.ДатаПереходаНаУСН,ДатаДок,"41.1");
{Документ.СписаниеТМЦ.Модуль Документа(8)}: За данный период бухгалтерские итоги не рассчитаны!

Как поставить правильно конец периода?

(16) Так итоги-то рассчитай...

Операции, Управление бухгалтерскими итогами

(16) глПроверкаПериода();

Би=СоздатьОбъект("БухгалтерскиеИтоги");
Би.ИспользоватьСубконто(ВидыСубконто.Номенклатура,Номенклатура,2);
Би.ВыполнитьЗапрос(Константа.ДатаПереходаНаУСН,ДатаДок,"41.1");
Би.ВыбратьСубконто(1);
Если Би.ПолучитьСубконто(1) = 1 Тогда
    ОстСумма=Би.СКД(1);
    ОстКолво=Би.СКД(2);
    СредняяЦена=ОстСумма/ОстКолво;
КонецЕсли;                  
Сообщить(СредняяЦена);

Завел новый товар "Тест", сделал поступление 5 шт по 1000 рублей за каждое изделие. Провожу свой документ и он мне по моему товару Тест среднюю цену 0 дает. Документ оформлен, после поступления. Даже с датой на следующий день не получается!!!

(20) Когда документ оформлен - разницы нет. Потому что ты получаешь итоги на дату перехода на УСН.

(21) т.е. мне надо узнать цену на дату документа. Т.е. я должен как поставить период?:

ДатаДок,ДатаДок+1

Стаж: 4 г.

параметр у процедуры БИ.ВыполнитьЗапрос(): <ТипИтогов> = 5

(23) не умничай, я занимаюсь ТиС и УТ. Автоматизация розницы. А не бухучет, умник.

(22) Выдержка из синтаксис-помощника про ВыполнитьЗапрос
Параметры:
<НачалоПериода> - дата, документ или позиция начала периода запроса.
<КонецПериода> - дата, документ или позиция конца периода запроса.
Кто мешает указать начальную дату - документ? И получать сальдо начальное, то есть до движений этого документа? В ТиС же обычно РассчитатьРегистрыНа, а не РассчитатьРегистрыПо используется.

А в ТиС есть функция, возвращающая среднюю стоимость?)

(25) какая разница, чем ты занимаешься, если в карточке у тебя написано "Программист" ?

(27) отчёты там есть
со средней ценой =)

(29) Прям со средней? Не помню)

(26) да не нужно мне начальное сальдо. товар приходил в течении года: 100, 110, 98, 76, 101. Мне надо, чтобы он расчитал с самого начала по  текущий документ.

Я и поставил: дату перехода на усн (01.01.03) и тек. документ (02.11.11)

(31) Так надо разве не среднюю стоимость по остаткам? СуммаОстаток/КоличествоОстаток? Или нужно среднюю цену поступления за период?

(20) Товар на 41-м счете?

(32) Вот код:

Би=СоздатьОбъект("БухгалтерскиеИтоги");
Би.ИспользоватьСубконто(ВидыСубконто.Номенклатура,Номенклатура,2);
Би.ВыполнитьЗапрос(Константа.ДатаПереходаНаУСН,ДатаДок,"41.1");
Би.ВыбратьСубконто(1);
Если Би.ПолучитьСубконто(1) = 1 Тогда
    ОстСумма=Би.СКД(1);
    ОстКолво=Би.СКД(2);
    СредняяЦена=ОстСумма/ОстКолво;
КонецЕсли;                  
Сообщить(СредняяЦена);

Что не правильно?

41.1 - Товары, не приним. для НУ ?

(34) И что, даёт 0? А должен давать деление на 0 :-)
В СП загялнул или нет?

Отчет "Оборотно-сальдовая ведомость по счету" смотрел?

код где выполняется ?

(36) Би.ПолучитьСубконто(1)  = 0 надо полагать. Совсем ничего нету.

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

(36) по поводу чего?

(40) ппц. Мы поняли, что не шаришь, поэтому подсказали, куда посмотреть.
Порядок действий примерно такой же, как в любой другой конфе.
В ТиСе я бы для начала смотрел остатки по нужным измерениям. Но у тебя какое-то другое мышление.
Телепатирую: попробуй 41.1 заменить на 41.2.

Что говорит отладчик? Выполняется ли Если Би.ПолучитьСубконто(1) = 1 Тогда?

(31) Сначала читай (26), потом думай, потом читай (26), потом  только пиши.
Я не предлагал получать начальное сальдо на "начало времен". Я предлагал получать сальдо на начало позиции документа. Ты хоть раз видел такое в обработке проведения: РассчитатьРегистрыПо(ДатаДок)? Но почему подобное пытаешься состряпать тут?
И еще, если у тебя создание и заполнение переменной СредняяЦена идет внутри ветки условия, то что в этой переменной будет, если ты не попадаешь в ветку условия?

раз он не знает, что такое оборотка, ему сложно будет в программе прописать счет, где хранится товар. А вообще, может он товаром материалы называет

ладно уж


Би=СоздатьОбъект("БухгалтерскиеИтоги");
Би.ИспользоватьСубконто(ВидыСубконто.Номенклатура,Номенклатура,2);
Би.ВыполнитьЗапрос(ТекущийДокумент(),,"41.1");

ОстКолво=Би.СНД(2);
СредняяЦена= ? (ОстКолво, 0, Би.СНД(1)/ОстКолво );

только в цикл не суй

(46) ОстКолво=Би.СНД(2);
?

НАфига ты в количество валютную сумму пихаешь?

(31) Тебе нужно получить итоговые данные только на позицию документа, но ты с помощью ВыполнитьЗапрос('01.01.03','02.11.11') получаешь обороты за фиг знает сколько лет. Что не ну никак не может быть оптимально - производительным. Так что совет обычный: читать, думать, опять читать, снова думать, а уж потом делать.

(48) Так и я могу! :)

(48) очевидно, что там опечатка

(51) Ну и финальный код? (46) - не работает!

Би=СоздатьОбъект("БухгалтерскиеИтоги");
Би.ИспользоватьСубконто(ВидыСубконто.Номенклатура,Номенклатура,2);
Би.ВыполнитьЗапрос(ТекущийДокумент(),,СчетПоКоду("41.1"),,,1,,5);

ОстКолво=Би.СНД(2);
СредняяЦена= ? (ОстКолво, 0, Би.СНД(1)/ОстКолво );

ОстКолво=Би.СНД(3);
СредняяЦена= ? (ОстКолво, 0, Би.СНД(1)/ОстКолво );

опять забыл исправить =)


это всё из-за ебунты

(55) и счет 41.2

(53) А это принципиально отлицается от (34)?

в принципе нужно будет делать так :

Выгрузить ТЧ в ТЗ, далее выгрузить в СЗ
передать СЗ в Номенклатура и по ней считать

но я против сворачивания ТЗ

(56) а где тут нпро розницу было ?

(57) конечно
он какую-то там шнягу ищет

(59) В УСН это товары принимаемые к НУ.

(60) Ну с датами не очень. Хотя уже давно этого 7.7 не писал.

(61) я не помню, что там в усн =)

(62) ему нужно на позицию

Но если в течение дня еще не было списаний, то разница по СКД не будет заметна)

(65) чё ?

(66) СКД() по ДатаДок вернет остатки на конец дня. Если в этот день позиция списывалась одним документом - разницы в остатке при проведении между границей документа и датой не будет. Или я где-то ошибаюсь? А вообще, мне пофиг.

(67) смотри внимательно на (53) - там сНд