Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2009.05.24;
Скачать: 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 вся ветка

Текущий архив: 2009.05.24;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.009 c
15-1236782150
Urk
2009-03-11 17:35
2009.05.24
Когда выйдет Update 3 для Delphi 2009?


11-1200709306
Jon
2008-01-19 05:21
2009.05.24
Binary search


3-1221141096
greg123
2008-09-11 17:51
2009.05.24
Помогите написать запрос на select


15-1237811203
немо2
2009-03-23 15:26
2009.05.24
Индексы в msqql2000. Эквивалентны ли такие действия?


2-1239114286
микола
2009-04-07 18:24
2009.05.24
делфи и єксель