Заказы на доработку 1С (сервис удаленной работы)

Хранилище

База знаний
Бесплатные отчеты, обработки, конфигурации, внешние компоненты для 1С Статьи, описание работы, методики по работе с 1С

Здравствуйте, гость ( Вход | Зарегистрироваться )



> Обработка заполнения Расходной Накладной остатками номенклатуры на складе          
Sirius83 Подменю пользователя
сообщение 17.07.19, 10:28
Сообщение #1

Говорящий
***
Группа: Пользователи
Сообщений: 52
Спасибо сказали: 3 раз
Рейтинг: 0

1С 7,7 7.70.27 ABBY Торговля + Склад
Доброго дня,
Прошу помощи:
Ищу Обработку заполнения Расходной Накладной остатками номенклатуры на складе.
Заранее благодарен.

Naghual Подменю пользователя
сообщение 17.07.19, 12:56
Сообщение #2

Завсегдатай
****
Группа: Пользователи
Сообщений: 102
Из: Днепропетровск
Спасибо сказали: 21 раз
Рейтинг: 0

Проще написать под себя чем найти непонятно что и переделывать.


Signature
Я желаю всем Счастья!

Винила Подменю пользователя
сообщение 18.07.19, 11:17
Сообщение #3

Молчаливый
*
Группа: Пользователи
Сообщений: 4
Спасибо сказали: 0 раз
Рейтинг: 0

Sirius83 @ Вчера, 11:28 * ,
Можно сделать так:

ТЗ_Номенклатур = СоздатьОбъект("ТаблицаЗначений");

ТекстЗапроса = "
    |select
    |    Рег.Товар as [Товар $Справочник.Номенклатура],
    |    sum(Рег.КоличествоОстаток) as Количество
    |from
    |  $РегистрОстатки.ОстаткиТМЦ(
    |        :КонДата~,
    |        ,Склад in (select val from #tmp4))
    |       ,(Товар,Склад),) as Рег
    |group by Рег.Товар";

        лRecordSet=СоздатьОбъект("ODBCRecordSet");

        лRecordSet.УстановитьТекстовыйПараметр("КонДата",ТекущаяДата());
    лRecordSet.УложитьСписокОбъектов(ВыбСклады,"#tmp4", "Склады");

    лRecordSet.Отладка(0);
    Если лRecordSet.Открыть(ТекстЗапроса)=0 Тогда
        Сообщить(лRecordSet.ПолучитьОписаниеОшибки());
    КонецЕсли;

        лRecordSet.ПолучитьРезультатыВ_ТЗ(ТЗ_Номенклатур, 1);

        ТЗ_Номенклатур.ВыбратьСтроки();
        Пока ТЗ_Номенклатур.ПолучитьСтроку() = 1 Цикл
                _Номенклатура = ТЗ_Номенклатур.Товар;
                _Количество = ТЗ_Номенклатур.Количество;
        КонецЦикла;


Сообщение отредактировал Vofka - 18.07.19, 11:26

Не нашли ответа на свой вопрос?
Зарегистрируйтесь и задайте новый вопрос.


Ответить Новая тема
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

RSS Текстовая версия Сейчас: 29.03.24, 7:28
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!