Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: бухгалтеские итоги в режиме запроса
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Программисту > Программирование в 1С Предприятие 7.7
uanr81
03.04.12, 9:03
Здравствуйте, помогите пожалуйста получить остаток по товару "тов", с помощью запроса
счет 01.03 количеств активный субконто1 - Товар, субконто2-ПриходнаяНакладная
проводки по счету:
Операция.Дебет.Счет = СчетПоКоду("01.03",ПланыСчетов.Мой);
        Операция.Дебет.Товар = Код;
        Операция.Дебет.ПриходнаяНакладная = текущийдокумент();

запрос, при получить субконто передаёться субконто на которое нужно спозиционироваться 
глИТост=создатьобъект("бухгалтерскиеитоги");
  глИТост.ИспользоватьСубконто(видысубконто.Товар,);
  глИТост.Выполнитьзапрос(,текущаядата(),"01.03",,,,,5);
глИТост.выбратьсубконто(1);
глИТост.получитьсубконто(1,,тов);
MATEVI
03.04.12, 9:19
ДЛя чего? Для отображения в документе?
Функция Остаток()
ИтОст = СоздатьОбъект("БухгалтерскиеИтоги");
Возврат Строка(ИтОст.СКД("01.03",3,,МойТовар,МойДокумент));// читаем синтаксис
КонецФункции


Ваш код...

глИТост=создатьобъект("бухгалтерскиеитоги");
глИТост.ИспользоватьСубконто(видысубконто.Товар,тов,2);//тов- это фильтр, 2 -отбирать. читаем синтаксис
глИТост.Выполнитьзапрос(,текущаядата(),"01.03",,,,,5);
глИТост.выбратьсубконто(1);
Пока глИТост.получитьсубконто(1)=1 Цикл
        Ост = глИТост.СКД(3);
КонецЦикла;
uanr81
03.04.12, 9:45
В форме списка справочника текстовое поле(функция ост()), нужно чтобы отображались остатки по элементу на счете, поставил ваш код, всё равно не выдаёт

в отладчике проходит в цикл не залетает
Пока глИТост.получитьсубконто(1)=1 Цикл
        Ост = глИТост.СКД(3);
КонецЦикла;



Цитата(uanr81 @ 03.04.12, 10:41) необходимо зарегистрироваться для просмотра ссылки
В форме списка справочника текстовое поле(функция ост()), нужно чтобы отображались остатки по элементу на счете, поставил ваш код, всё равно не выдаёт


в отладчике проходит в цикл не залетает
Пока глИТост.получитьсубконто(1)=1 Цикл
        Ост = глИТост.СКД(3);
КонецЦикла;

в отладчике когда проходит
глИТост.выбратьсубконто(1);// расчитать глИТост.выбратьсубконто(1)=0 ???
MATEVI
03.04.12, 10:18
Цитата(uanr81 @ 03.04.12, 10:45) необходимо зарегистрироваться для просмотра ссылки
В форме списка справочника текстовое поле(функция ост()), нужно чтобы отображались остатки по элементу на счете, поставил ваш код, всё равно не выдаёт

Уберите документ. 
Строка(ИтОст.СКД(СчетПоКоду("01.03"),3,,МойТовар));



необходимо зарегистрироваться для просмотра ссылки
uanr81
03.04.12, 10:54
глИТост=создатьобъект("бухгалтерскиеитоги");
глИТост.ИспользоватьСубконто(видысубконто.Товар,,1);
глИТост.Выполнитьзапрос(,текущаядата(),"01.03",,,,,5);
глИТост.выбратьсубконто(1);// здесь выборка получается по всему товару в разрезе каждого

как теперь позиционировать на конкретный товар (товар)
MATEVI
03.04.12, 11:20
Если в форме списка справочника то 
МойТовар=ТекущийЭлемент();
//.... 
глИТост.ИспользоватьСубконто(видысубконто.Товар,МойТовар,2);
uanr81
03.04.12, 11:25
я имел ввиду получить указанное субконто из выборки

глИТост=создатьобъект("бухгалтерскиеитоги");
глИТост.ИспользоватьСубконто(видысубконто.Товар,,1);
глИТост.Выполнитьзапрос(,текущаядата(),"01.03",,,,,5);
глИТост.выбратьсубконто(1);// здесь выборка получается по всему товару в разрезе каждого

как дальше получить конкретное субконто "товар" ???
5_kopeek
03.04.12, 12:18
                
Если глИТост.ПолучитьСубконто(1,,ТекущийЭлемент()) = 1 Тогда
    Ост = глИТост.СКД("К");
КонецЕсли;
uanr81
03.04.12, 16:01
Всем огр омное спасибо, я передовал в коде вместо ссылку на субконто текст (баран), целую ночь промучался
Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.