powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Программирование [игнор отключен] [закрыт для гостей] / Помогите люди добрые в 1с
1 сообщений из 1, страница 1 из 1
Помогите люди добрые в 1с
    #36749885
Strol
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Добрый день ! Помогите плизз.. В 1с 8.1 программирую мало очень опыта почти нет , только учусь .


Я немогу определить параметр который находиться в другой области макета . как это сделать подскажите ?



В коде в 4 области есть счета которые меня интересуют (7100) ,(7200)


вот код 4 области





ОбластьМакета = Макет.ПолучитьОбласть ("Область4");
Запрос.УстановитьПараметр("Счет", ПланыСчетов.Типовой.НайтиПоКоду("6010"));
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.П1 = Строки.СуммаОборотКт;
П1 = Строки.СуммаОборотКт;

Запрос.УстановитьПараметр("Счет", ПланыСчетов.Типовой.НайтиПоКоду("7010"));
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.П3 = Строки.СуммаОборотДт;
П1 = П1 - Строки.СуммаОборотДт;

Cписок = Новый СписокЗначений;
ОбластьМакета.Параметры.П4 = П1;

Запрос.УстановитьПараметр("Счет",ПланыСчетов.Типовой.НайтиПоКоду("7100"));
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.J7 = Строки.СуммаОборотДт;
П1 = П1 - Строки.СуммаОборотДт;

Запрос.УстановитьПараметр("Счет",ПланыСчетов.Типовой.НайтиПоКоду("7200"));
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.П8 = Строки.СуммаОборотДт;
П1 = П1 - Строки.СуммаОборотДт;

Cписок = Новый СписокЗначений;
ОбластьМакета.Параметры.F2 = П1;

Запрос.УстановитьПараметр("Счет", ПланыСчетов.Типовой.НайтиПоКоду("6010"));
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.П1 = Строки.СуммаОборотКт;
П1 = Строки.СуммаОборотКт;

Запрос.УстановитьПараметр("Счет", ПланыСчетов.Типовой.НайтиПоКоду("7010"));
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.П3 = Строки.СуммаОборотДт;
П1 = П1 - Строки.СуммаОборотДт;

Cписок = Новый СписокЗначений;
ОбластьМакета.Параметры.П4 = П1;

Запрос.УстановитьПараметр("Счет",ПланыСчетов.Типовой.НайтиПоКоду("7100"));
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.J7 = Строки.СуммаОборотДт;
П1 = П1 - Строки.СуммаОборотДт;

Запрос.УстановитьПараметр("Счет",ПланыСчетов.Типовой.НайтиПоКоду("7200"));
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.П8 = Строки.СуммаОборотДт;
П1 = П1 - Строки.СуммаОборотДт;

Cписок = Новый СписокЗначений;
ОбластьМакета.Параметры.K2 = П1;
ТабДокумент.Вывести(ОбластьМакета);





В 5 области мы их должны сложить с ("700")); и он должен показать итого расходов


Код 5 области макета





ОбластьМакета = Макет.ПолучитьОбласть ("Область5");

Запрос.УстановитьПараметр("Счет", ПланыСчетов.Типовой.НайтиПоКоду("7000"));
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.L1 = Строки.СуммаОборотДт;

Запрос.УстановитьПараметр("Счет", ПланыСчетов.Типовой.НайтиПоКоду("7000"));
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.L2 = Строки.СуммаОборотДт;
Запрос.УстановитьПараметр("Счет", ПланыСчетов.Типовой.НайтиПоКоду("7000"));
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.H1 = Строки.СуммаОборотДт;
Запрос.УстановитьПараметр("Счет", ПланыСчетов.Типовой.НайтиПоКоду("7000"));
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.Z0 = Строки.СуммаОборотДт;
Z0 = Строки.СуммаОборотДт;

Запрос.УстановитьПараметр("Счет", ПланыСчетов.Типовой.НайтиПоКоду("3350"));
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.L7 = Строки.СуммаОборотДт;
Запрос.УстановитьПараметр("Счет", ПланыСчетов.Типовой.НайтиПоКоду("3350"));
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.L8 = Строки.СуммаОборотДт;
Запрос.УстановитьПараметр("Счет", ПланыСчетов.Типовой.НайтиПоКоду("3350"));
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.X5 = Строки.СуммаОборотДт;
Запрос.УстановитьПараметр("Счет", ПланыСчетов.Типовой.НайтиПоКоду("3350"));
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.X112 = Строки.СуммаОборотДт;
Запрос.УстановитьПараметр("Счет", ПланыСчетов.Типовой.НайтиПоКоду("3220"));
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.M1 = Строки.СуммаОборотДт;
Запрос.УстановитьПараметр("Счет", ПланыСчетов.Типовой.НайтиПоКоду("3220"));
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.X6 = Строки.СуммаОборотДт;

Запрос.УстановитьПараметр("Счет", ПланыСчетов.Типовой.НайтиПоКоду("3210"));
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.M8 = Строки.СуммаОборотДт;

Запрос.УстановитьПараметр("Счет", ПланыСчетов.Типовой.НайтиПоКоду("3210"));
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.X93 = Строки.СуммаОборотДт;


Список = Новый СписокЗначений;
Список.Очистить();
Список.Добавить(ПланыСчетов.Типовой.НайтиПоКоду("2400"));
Список.Добавить(ПланыСчетов.Типовой.НайтиПоКоду("2700"));
Запрос.УстановитьПараметр("Счет",Список);
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.M2 = Строки.СуммаОборотКт;
Список = Новый СписокЗначений;
Список.Очистить();


Список = Новый СписокЗначений;
Список.Очистить();
Список.Добавить(ПланыСчетов.Типовой.НайтиПоКоду("2400"));
Список.Добавить(ПланыСчетов.Типовой.НайтиПоКоду("2700"));
Запрос.УстановитьПараметр("Счет",Список);
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.X7 = Строки.СуммаОборотКт;
Список = Новый СписокЗначений;
Список.Очистить();


Запрос.УстановитьПараметр("Счет", ПланыСчетов.Типовой.НайтиПоКоду("3220"));
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.M6 = Строки.СуммаОборотДт;

Запрос.УстановитьПараметр("Счет", ПланыСчетов.Типовой.НайтиПоКоду("3220"));
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.X91= Строки.СуммаОборотДт;


Список = Новый СписокЗначений;
Список.Очистить();
Список.Добавить(ПланыСчетов.Типовой.НайтиПоКоду("2400"));
Список.Добавить(ПланыСчетов.Типовой.НайтиПоКоду("2700"));
Запрос.УстановитьПараметр("Счет",Список);
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.M7 = Строки.СуммаОборотКт;
Список = Новый СписокЗначений;
Список.Очистить();


Список = Новый СписокЗначений;
Список.Очистить();
Список.Добавить(ПланыСчетов.Типовой.НайтиПоКоду("2400"));
Список.Добавить(ПланыСчетов.Типовой.НайтиПоКоду("2700"));
Запрос.УстановитьПараметр("Счет",Список);
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.X92 = Строки.СуммаОборотКт;
Список = Новый СписокЗначений;
Список.Очистить();


Запрос.УстановитьПараметр("Счет", ПланыСчетов.Типовой.НайтиПоКоду("7010"));
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.i = Строки.СуммаОборотДт;



Запрос.УстановитьПараметр("Счет",ПланыСчетов.Типовой.НайтиПоКоду("7100"));
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.J7 = Строки.СуммаОборотДт;
L1 = L1 + Строки.СуммаОборотДт;



Запрос.УстановитьПараметр("Счет",ПланыСчетов.Типовой.НайтиПоКоду("7200"));
Строки = Запрос.Выполнить().Выбрать();
Строки.Следующий();
ОбластьМакета.Параметры.П8 = Строки.СуммаОборотДт;
L1 = L1 + Строки.СуммаОборотДт;




Cписок = Новый СписокЗначений;
ОбластьМакета.Параметры.N87 = L1;

ТабДокумент.Вывести(ОбластьМакета);


Делаю отладку и он ругаеться {Форма.ФормаОтчета(497)}: Поле объекта не обнаружено (J7)
ОбластьМакета.Параметры.J7 = Строки.СуммаОборДт

{Форма.ФормаОтчета(497)}: Поле объекта не обнаружено (П8)
ОбластьМакета.Параметры.П8 = Строки.СуммаОборДт



Форма.ФормаОтчета(497)}: Поле объекта не обнаружено (N87)
ОбластьМакета.Параметры.N87 = Строки.СуммаОборДт







Макет я просмотрел в конфигураторе параметры все правильные





Подскажите плиз зарываюсь ....
...
Рейтинг: 0 / 0
1 сообщений из 1, страница 1 из 1
Форумы / Программирование [игнор отключен] [закрыт для гостей] / Помогите люди добрые в 1с
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]