Формирую данные по фин деятельности в групповых операциях.
Необходимо отобрать фирмы поставщиков, у которых суммы больше 50000. Суммировать по каждому и написать за что.
А всех остальных суммировать в прочие.
Использую функцию ПРОТОКОЛ, чтоб получить эти данные на экране.
Подскажите как организовать это в групповой.
Например
имеются следующие проводки:
Фирма1 150 000 - ремонт автомобиля
Фирма1 314 000 - ремонт автомобиля грузового
Фирма2 200 000 - продажа гаража
Фирма3 3 000 - ремонт принтера
Фирма4 1 500 - поставка канцтоваров
Должно получится
Фирма1 ремонт автомобиля 464 000
Фирма2 продажа гаража 200 000
Прочие 4 500
Применил данный код выбора проводок. Проводки выбрались. А как их отранжировать и рассортировать не знаю.
Валера вызови вызови в групповой функцию сделанную на харборе -пусть она сама все посчитает моментально и вернет обратно полученное значение в групповую и не мучайся
И работать будет моментально и не надо на псевдобейсике блох ловить
О великий друг Константин, ты так высоко паришь в познаниях харбора. Что для меня не понятен твой птичий язык.
Помоги кодом.
А мы уж с благодарностью будем нести подарки с нашего Центрального поволжья.
Модернизировал код, выбирает больше 50000т.р.
Возможно ли подработать его, что бы группировал по клиентам и с условием совпадения первых 6 букв слева.
Вроде стоит совместить с ШАУ и обработки текстовой строки ?
Обнаружили ошибку закрепленных переменных - не выводит гр1.КТ_ИМЯ, хотя КТ_ШАУ показывает.
Код
Р12А161 =гр1.КТ_ШАУ
Пока имеем такой код
Код
А1 = ДАТА()
А2 = ДАТА()
Б1 = "601"
А11 = "01/01/13"
А1 = СТР_ДАТА(А11),
А21 = "31/12/13"
А2 = СТР_ДАТА(А21),
СУМ1=0
ВВОД(("Дата начала ","А1","Д"),;
("Дата конца ","А2","Д"),;
("Номер счета....","Б1","СЧЕТ");
)
* ПОЛУЧАЕМ ПРОВОДКИ РАСХОДА С СУММОЙ МЕНЬШЕ 50000 РУБЛЕЙ
гр1 =ПОЛ_ПРОВ("2*",Б1,А1,А2)
В1 = "1"
ПОКА (В1 = "1")
Р12А168 = 0
Р12А168 = гр1.СУММА
ЕСЛИ (Р12А168 > 50000)
Р12А164 =гр1.ТЕКСТ
Р12А161 =гр1.КТ_ШАУ
ПРОТОКОЛ ( "0 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX; XXXXXXXXXXXXXX; 999999999.99;",Р12А164,Р12А161,Р12А168)
ИНАЧЕ
ВСЕ_ЕСЛИ
В1 =СЛЕД_ПРОВ(гр1)
ВСЕ_ПОКА
И получили следующий текст на основе проводок
Цитата
за работу самосвала камаз 55111 ак; 001505 ; 58300.00;
аренда автомобиля, акт №7 от 18.01; 001508 ; 183264.00;
вывоз снега, акт23 от 31.01.13 ; 001418 ; 204680.00;
транспортные услуги Камаз 55102,55; 001497 ; 182500.00;
Теплоэнергия январь 2013г. ; 000087 ; 64488.16;
Услуги генподряда 2,5% по дог.№43 ; 000087 ; 66896.68;
побдор мусора, подача контейнеров,; 001530 ; 308000.00;
Теплоэнергия февраль 2013г. ; 000087 ; 58025.20;
Услуги генподряда 2,5% по дог.№43 ; 000087 ; 65260.87;
сбор отходов сучьев, ветвей от лес; 001303 ; 92469.73;
транспортные услуги Камаз 55102 16; 001497 ; 178000.00;
побдор мусора, подача контейнеров,; 001530 ; 303544.00;
Теплоэнергия март 2013г. ; 000087 ; 65961.20;
Услуги генподряда 2,5% по дог.№43 ; 000087 ; 69028.03;
Услуги ген подряда март 2013 ; 000087 ; 167066.64;
побдор мусора, подача контейнеров,; 001530 ; 309600.00;
текущий ремонт груз-ой машины АГП; 001517 ; 141725.00;
сбор отходов сучьев, ветвей от лес; 001303 ; 66822.00;
побдор мусора, подача контейнеров,; 001530 ; 308918.00;
транспортные услуги Камаз 55102 11; 001497 ; 206900.00;
Услуги ген подряда май 2013г. ; 000087 ; 90672.72;
аренда экскаватора Хундай 56ч., ар; 001541 ; 218660.99;
побдор мусора, подача контейнеров,; 001530 ; 306502.00;
Текущее содерж.объектов озеленения; 001456 ; 2466059.37;
транспортные услуги Камаз 55102 98; 001497 ; 156200.00;
побдор мусора, подача контейнеров,; 001530 ; 301420.00;
Услуги ген подряда июль 2013г. ; 000087 ; 171169.51;
Аренда помещения по ул.Гагарина,63; 000087 ; 360450.00;
побдор мусора, подача контейнеров,; 001530 ; 282000.00;
Услуги ген подряда август 2013г. ; 000087 ; 305640.40;
Аренда помещения по ул.Гагарина,63; 000087 ; 120150.00;
сбор отходов сучьев, ветвей от лес; 001303 ; 94165.00;
ремонт ДВС Камаз, акт 571 от 23.09; 001052 ; 98000.00;
транспортные услуги Камаз 55102 10; 001497 ; 114550.00;
побдор мусора, подача контейнеров,; 001530 ; 281878.00;
Аренда помещения по ул.Гагарина,63; 000087 ; 120150.00;
ремонт погрузчика,сч.ф.514 от 30.1; 001551 ; 57550.00;
побдор мусора, подача контейнеров ; 001571 ; 280808.00;
Аренда помещения по ул.Гагарина,63; 000087 ; 120150.00;
Услуги ген подряда октябрь 2013г. ; 000087 ; 137415.75;
побдор мусора, подача контейнеров ; 001571 ; 399336.00;
Аренда помещения по ул.Гагарина,63; 000087 ; 120150.00;
сбор отходов сучьев, ветвей от лес; 001303 ; 113774.95;
транспортные услуги Камаз 55102 15; 001497 ; 169800.00;
Аренда помещения по ул.Гагарина,63; 000087 ; 120150.00;
побдор мусора, подача контейнеров ; 001571 ; 399336.00;
Услуги ген подряда декабрь 2013г. ; 000087 ; 97169.40;