1C-PRO - Форум по 1С > Печать ценников по остаткам

Помощь - Поиск - Пользователи - Календарь

Полная версия: Печать ценников по остаткам

1C-PRO - Форум по 1С > Форумы по платформе "1С:Предприятие 7.7" > (7.7) Отчеты и обработки для платформы "1С:Предприятие 7.7"

vadim

12.2.2008, 11:39

Всем привет!!!!

Имеется 1с 7.7 ТиС типовая конфигурация. При печати ценников он выводит на печать все ценники и даже ценники того товара которого нету на остатках мне надо чтобы он выводил ценники только тех товаров которые есть на остатках!!!

У меня была обработка для не типовой конфигурации я там начал кое что переделывать но у меня ни чего не получается если кто сможет помогите пожалусто!!!!

Смысл этой обработки таков выбираю товарную группу добавляю в таблицу и нажав на кнопку ост он должен оставить только те позиции которые есть на остатках. И в типовой конфигурации есть щаблон ценника розничный вот я и хочу чтобы он сразу выводил розничные ценники на товар!!!

Если не затруднит помогите!!!

vadim

13.2.2008, 16:17

Еще нашел обработку в нете

как сделать чтобы она печатала только то что есть на остатках

MaxxaM

13.2.2008, 18:07

У тебя идет выбор вэлементов справочника сделай запрос к остатком и в список вноси только результаты запроса и будет решение проблемы

vadim

14.2.2008, 9:13

Цитата(MaxxaM @ 13.2.2008, 18:07)

Код

 Если ПоНаличию = 1 Тогда
        
        ТекстЗапросаОстатков = "
        |Номенклатура    = Регистр.ОстаткиТМЦ.Номенклатура;
        |Количество        = Регистр.ОстаткиТМЦ.Количество;
        |
        |Функция КоличествоКонОст = КонОст(Количество);
        |
        |Группировка Номенклатура без групп;";
            
        ТекстЗапросаОстатков = "Фирма = Регистр.ОстаткиТМЦ.Фирма;" + 
                                       ТекстЗапросаОстатков +
                                       "Условие(Фирма = ВыбРазделитель1);";
            КонецЕсли;

Я в обработку добавил если ставишь галочку он должен выводить только товар с остатком но не получается
Может кто исправит прикрепляю саму обработку

MaxxaM

15.2.2008, 12:25

vadim во второй обработке не разобрался, а в первой в процедуре "ДобавитьТоварВТаблицуТоваров"
нужно вставить запрос

Код

Если ПоНаличию = 1 Тогда   
Запрос = СоздатьОбъект("Запрос");             
ТекстЗапросаОстатков = "        
|Фирма =Регистр.ОстаткиТМЦ.Фирма;
|Номенклатура    = Регистр.ОстаткиТМЦ.Номенклатура;        
|Количество        = Регистр.ОстаткиТМЦ.Количество;        
|Функция КоличествоКонОст = КонОст(Количество);        
|Группировка Номенклатура без групп;        
|Условие(Фирма = ВыбРазделитель1);       
|Условие(Номенклатура  в СпрВыбТов);";          
Если Запрос.Выполнить(ТекстЗапросаОстатков ) = 0 Тогда
    Возврат;
КонецЕсли;
Пока Запрос.Группировка(1) = 1 Цикл
    Если ТаблицаТоваров.НайтиЗначение(Запрос.Номенклатура,,"Товар") = 0 Тогда
      ТаблицаТоваров.НоваяСтрока();
      ТаблицаТоваров.Код = Запрос.Номенклатура.Код;
      ТаблицаТоваров.Товар = Запрос.Номенклатура; 
      ТаблицаТоваров.ЦенаПродажи = Запрос.Номенклатура.ЦенаПродажи;
      ТаблицаТоваров.Флажок = 2;
      Н = Н + 1;
      Состояние("Добавлено товаров: " + Н);
    КонецЕсли;
КонецЦикла;

КонецЕсли;

Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.