VPF::1C - отчет, штрих коды. v7.7 - Форум программистов

bamchi

Дата 18.2.2010, 14:50 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 1
Регистрация: 18.2.2010

Репутация: нет
Всего: нет

в конфигурации Торговля и склад, есть отчет. Отчеты-> товары-> остатки товаров.
стояло две задачи, в сформированном отчете сделать сортировку по группам товара и по цене.

Код

        
        Запрос=СоздатьОбъект("Запрос");
    ТекстЗапроса="";
    ТекстЗапроса= ТекстЗапроса+"                         
        |ПЕРИОД С ДатаКонца По ДатаКонца;
        |Фирма=Регистр.ОстаткиТоваров.Фирма;
        |Склад=Регистр.ОстаткиТоваров.Склад;
        |Товар=Регистр.ОстаткиТоваров.Товар;
        |Кол=Регистр.ОстаткиТоваров.ОстатокТовара;

         |Группировка Товар Упорядочить по Товар.УчетнаяЦена"+?(ПоказатьОстатки.ТекущаяСтрока()>=2," Все","")+";
//    |Группировка Товар Упорядочить по Товар.Наименование"+?(ПоказатьОстатки.ТекущаяСтрока()>=2," Все","")+"; //так было раньше
        |Группировка Склад Все ВошедшиеВЗапрос;
        |Функция КонКол=КонОст(Кол);
        |Условие (Фирма=глПустаяФирма);";

При правке Упорядочить товар по наименованию, на учетная цена, происходит сортировка по цене, но переодически по тексту отчета встречается

130руб

хотя  никакой закономерности выявить не удалось
Вопрос - почему так может быть.

Вопрос номер два:
В том же самом отчете необходимо напротив каждого товара вывести его штрих-код, для формирования штрих-кода используется  barcode.ocx
Сейчас у меня выводится с таком виде:
наименование   шт      цена     штрихкод
Велосипед        100     500руб   2000001419014

а интересно, что необходимо дописать, что бы формировался сам штрих-код(черточки - полосочки)

Код


     // получим параметры цены
            
        ЦенаЦены    = ЦенаТовара.Цена.Получить(ДатаКонца);
        ПечЦена = ЦенаЦены;                                               
        ПечСумма = Число(ПечОстаток)*ЦенаЦены;
        ОбщС = ОбщС + Число(ПечСумма);
      //   ВыбТовар=(Запрос.Товар.ШтрихКод);
     //    АВС=СоздатьОбъект("BARCODE.BarcodeCtrl.1");
    // ПечШтрихкод=Строка(ШтрихКод);
       
        ПечШтрихкод=(Запрос.Товар.ШтрихКод); // этот запрос формирует мне цифровой штрихкод

Zero

Дата 24.2.2010, 22:39 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2169
Регистрация: 23.10.2004
Где: Россия, г. Рязань

Репутация: 15
Всего: 24

Цитата(bamchi @ 18.2.2010, 14:50

)

что необходимо дописать, что бы формировался сам штрих-код(черточки - полосочки)

Во первых должен быть установлен шрифт EanGnivc
Во вторых посмотри как организован вывод штрихкода, в регламентированных отчётах и сделай по аналогии.

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| 1C: Предприятие, SAP, ERP и учётные системы \| Следующая тема »