Скачать: CL | DM;

1С данные за предыдущие месяцы   Найти похожие ветки 

← →
xyzzz   (2009-03-20 09:32) [0]

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

---

← →
tesseract_   (2009-03-20 10:26) [1]

У нас что тут миста, что про 1с вопросы ? К тому же я такого извращенного кода не видел в жизни - оборотка по счету, чем не устраивает ?

---

← →
nnov   (2009-03-20 10:32) [2]

1с сам по себе извращенный.
как именно по счету? желательно наброски в виде кода)

---

← →
tesseract_   (2009-03-20 10:39) [3]

> 1с сам по себе извращенный.


1с нормальный, просто извращенцы всякие внедряют. По счету пример  в виде кода в отчетах начинающихся с "Оборотно-сальдовая".

---

← →
nnov   (2009-03-20 10:41) [4]

понял. сейчас попробую

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.008 c