Главная страница
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.012 c
15-1237464519
vajo
2009-03-19 15:08
2009.05.24
Помогите выбрать HDD


2-1239343514
Гость
2009-04-10 10:05
2009.05.24
Работа с потоками.


15-1237101209
MultIfleX
2009-03-15 10:13
2009.05.24
Delphi & Win Mobile


15-1237973404
Юрий
2009-03-25 12:30
2009.05.24
С днем рождения ! 25 марта 2009 среда


2-1239120004
tony
2009-04-07 20:00
2009.05.24
аналог EOMSG в Delphi