Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
22 ноя 2024, 23:34

Помогите новичку

Автор gopsmile, 06 мая 2011, 12:24

0 Пользователей и 1 гость просматривают эту тему.

gopsmile

Платформа 7.7 (7.70.027)
Конфигурация  ТиС (Торговля и склад) (7.70.941)

Отчет остатки ТМЦ

ТМЦ                            Магазин 1                Магазин 2              Магазин 3                 Склад (Основной)           Новая Колонка
                                  Кол-во  Сумма          Кол-во  Сумма        Кол-во  Сумма           Кол-во  Сумма               Сумма (По Всем Магазинам)
Наименование 1               1          20                 2         10              3          10                4         23                 Сумма (По Всем Магазинам)
Наименование 2               3          10                 1         30              4          30                2         22                 
...
Итого                             4           30                 3         40              7          40                6         45                Сумма (По Всем Магазинам)


Прошу прошения за предыдущую тему, не смог удалить.

Не подскажете как добавить Новую колонку и посчитать сумму по все магазинам кроме основного склада.

prog1c7.7

Сумма как должна получаться? цена какая берется за основу?

gopsmile

Сумма берется скажем из справочника цен - закупочные

prog1c7.7

ну это не сложно, запросы составлял когда нить?

prog1c7.7

//вернее нужен запрос по регистру остаткитмц на определенную дату , с группировкой по складу, это легко можно //даже конструктором.
//а вот цены брать щас объясню как (для любых типов, я гдето писал такое уже):
//1.вешай на форму поле с выбором - обзови  "ТипЦеныТек", тип - справ. ТипыЦен
//2. в модуле:(в данном случае спрном1 - это спр. номенклатура)
// Ищем цены на период отчета по типу цен
   Цены = СоздатьОбъект("Справочник.Цены");   
   Цены.ИспользоватьВладельца(СпрНом1.ТекущийЭлемент());
   Цены.ВыбратьЭлементы();
   
   Пока Цены.ПолучитьЭлемент()  = 1 Цикл   
      Если ТипЦеныТек.Рассчитывается = 1  тогда

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

      
       ИначеЕсли ТипЦеныТек.Рассчитывается <> 1 Тогда
         Если Цены.ТипЦен <> ТипЦеныТек Тогда
             Продолжить;
          КонецЕсли;
           РеалЦенаОб = Цены.ТекущийЭлемент();
            РеалЦена = РеалЦенаОб.Цена.Получить(ДатаОтчета);
   
       КонецЕсли;   
   КонецЦикла;

//3. Т.е. будет в зависимости от выбранного типа цен у тебя актуальная цена на определенную дату - РеалЦена

gopsmile

//// ну это не сложно, запросы составлял когда нить?

В этом то и беда, не составлял. Ну буду разбираться, с синтаксисом никак не разберусь. Если долго долго мучиться что нить получиться. Большое Вам спасибо.

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск