Заказы на доработку 1С (сервис удаленной работы)
Хранилище
База знаний
Неназначенных незавершенных заказов: 1
 Бесплатные отчеты, обработки, конфигурации, внешние компоненты для 1С Статьи, описание работы, методики по работе с 1С

Здравствуйте, гость ( Вход | Зарегистрироваться )



> БухЗапро по Контрагенту          
mavrik Подменю пользователя
сообщение 25.10.11, 14:29
Сообщение #1

Завсегдатай
****
Группа: Пользователи
Сообщений: 120
Из: Украина
Спасибо сказали: 2 раз
Рейтинг: 0

Помогите написать запрос который выводит по СКД всех Контрагентов.У меня есть какие то размышления но ничего не выходит

        Ит = СоздатьОбъект("БухгалтерскиеИтоги");
    Ит.ВключатьСубсчета(-1);    
    Если ВибГрупа.Выбран()=0 Тогда
        Ит.ИспользоватьСубконто(ВидыСубконто.Контрагенти,,,1); 
        КонецЕсли;
    Ит.ВыполнитьЗапрос(НачПериод, КонПериод,"37,1",,, 1,, "С");
        Ит.СКД("37.1");

nysysimara Подменю пользователя
сообщение 25.10.11, 15:21
Сообщение #2

Оратор
Иконка группы
Группа: Местный
Сообщений: 312
Из: Бердянск
Спасибо сказали: 110 раз
Рейтинг: 0 

    
Ит = СоздатьОбъект("БухгалтерскиеИтоги");
Ит.ИспользоватьПланСчетов(ПланыСчетов.Основной); 
Ит.ВключатьСубсчета(-1); 
Ит.ИспользоватьСубконто(ВидыСубконто.Контрагенты);
Ит.ВыполнитьЗапрос(НачПериод,КонПериод,"37,1",,, 1,,"С");  

Ит.ВыбратьСубконто(1);
Пока Ит.ПолучитьСубконто(1)=1 Цикл            
    Контр    = Ит.Субконто(1);
    ОстСум    = Ит.СКД("С");
КонецЦикла;


кокто так

КАКто так


Signature
1С Предприятие 7.7: Бух. учет для Украины (активно дописанная) + самописка (учет производства и ЗП)
1С Предприятие 8.3: Бух.предприятия 3.0 + самописка
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Кроме высшего образования, нужно иметь хотя бы среднее соображение

Спасибо сказали: mavrik,

mavrik Подменю пользователя
сообщение 25.10.11, 15:45
Сообщение #3

Завсегдатай
****
Группа: Пользователи
Сообщений: 120
Из: Украина
Спасибо сказали: 2 раз
Рейтинг: 0

Цитата(nysysimara @ 25.10.11, 16:21) *
    
Ит = СоздатьОбъект("БухгалтерскиеИтоги");
Ит.ИспользоватьПланСчетов(ПланыСчетов.Основной); 
Ит.ВключатьСубсчета(-1); 
Ит.ИспользоватьСубконто(ВидыСубконто.Контрагенты);
Ит.ВыполнитьЗапрос(НачПериод,КонПериод,"37,1",,, 1,,"С");  

Ит.ВыбратьСубконто(1);
Пока Ит.ПолучитьСубконто(1)=1 Цикл            
    Контр    = Ит.Субконто(1);
    ОстСум    = Ит.СКД("С");
КонецЦикла;


кокто так

КАКто так


Пасиба большое получилось

nysysimara Подменю пользователя
сообщение 25.10.11, 15:46
Сообщение #4

Оратор
Иконка группы
Группа: Местный
Сообщений: 312
Из: Бердянск
Спасибо сказали: 110 раз
Рейтинг: 0

нема за що


Signature
1С Предприятие 7.7: Бух. учет для Украины (активно дописанная) + самописка (учет производства и ЗП)
1С Предприятие 8.3: Бух.предприятия 3.0 + самописка
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Кроме высшего образования, нужно иметь хотя бы среднее соображение

Не нашли ответа на свой вопрос?
Зарегистрируйтесь и задайте новый вопрос.

 

Ответить Новая тема
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

RSS Текстовая версия Сейчас: 01.11.24, 1:01
Форум IP.Board © 2024  IPS, Inc.
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!