Установить ТекущийЭлемент
Показывать по
10
20
40
сообщений
- 1
- 2
26.05.2011
17:16
#1
"Прописываю создание проводки, и есть такой пункт, где через поиск нам надо найти определенный элемент, если он есть мы, устанавливаем субконто
БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт,Проводка.СубконтоДт,1,"Склады",Есть в справочнике);
Иначе
//Создаем новый элемент и устанавливаем его в субконто, не могу понять , как прописать, этот новый, ругается на Булево.
Помогите....."
БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт,Проводка.СубконтоДт,1,"Склады",Есть в справочнике);
Иначе
//Создаем новый элемент и устанавливаем его в субконто, не могу понять , как прописать, этот новый, ругается на Булево.
Помогите....."
26.05.2011
18:57
#2
> //Создаем новый элемент и устанавливаем его в субконто, не могу понять , как прописать, этот новый, ругается на Булево.
Хоть часть кода приведите и текст ошибки. Не вижу причин, по которым вновь созданный и записанный элемент нельзя было бы использовать.
Хоть часть кода приведите и текст ошибки. Не вижу причин, по которым вновь созданный и записанный элемент нельзя было бы использовать.
26.05.2011
22:43
#3
А что такое "Есть в справочнике"? И я бы посмотрел, что надо передавать в процедуру "УстановитьСубконто".
27.05.2011
08:36
#4
"в v7.7 так:
в v8, видимо, примерно так:
Склады=СоздатьОбъект("Справочник.Склады");Если Склады.НайтиПоНаименованию("Магазин")=0 Тогда Склады.Новый(); Склады.Наименование="Магазин"; Склады.Записать();КонецЕсли;Операция.Дебет.МестаХранения=Склады.ТекущийЭлемент(); в v8, видимо, примерно так:
Склады = Справочники.Склады;Склад = Склады.НайтиПоНаименованию("Магазин");Если Склад.Пустая() Тогда Склад = Склады.СоздатьЭлемент(); Склад.Наименование = "Магазин"; Склад.Записать();КонецЕсли;БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт,Проводка.СубконтоДт,"Склады",Склад); " 27.05.2011
09:05
#5
"Вот мой код, вернее все равно, ругается на преобразование Булево(да,нет), субконто партии устанавливается нормально, а по складам ни в какую.
Для каждого СтрокаТЧ из ТаблицаПоТоварам Цикл
Проводка = Проводки.Добавить();
Проводка.Период = СтруктураШапкиДокумента.Дата;
Проводка.Организация = СтруктураШапкиДокумента.Организация;
//Проводка.Содержание = "Возмещение расходов по импортному товару";
Проводка.Сумма = СтрокаТЧ.СуммаБУ;
Если СокрЛП(СтрокаТЧ.СчетУчета)="41.1П" Тогда
Проводка.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоКоду("ИМТ.41");
ИначеЕсли СокрЛП(СтрокаТЧ.СчетУчета)="44.01" Тогда
Проводка.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоКоду("ИМТ.44");
КонецЕсли;
Склады = Справочники.Склады;
Склад = Склады.НайтиПоНаименованию(ЗначениеИзМассива);
Если Склад.Пустая()Тогда
Склад = Склады.СоздатьЭлемент();
Склад.Наименование = ЗначениеИзМассива;
Склад.ВидСклада = Перечисления.ВидыСкладов.Оптовый;
Склад.Записать();
БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт,Проводка.СубконтоДт,1,"Склады",Склад);бесполезно, ругается на булево
//Иначе
//БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт,Проводка.СубконтоДт,1,"Склады",ЗначениеИзМассива.Ссылка);
КонецЕсли;
// БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт,Проводка.СубконтоДт,1,"Склады",НовыйЭлементСправочника);
БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт,Проводка.СубконтоДт,"Партии",2,СтруктураШапкиДокумента.Ссылка);//с этим все нормально"
Для каждого СтрокаТЧ из ТаблицаПоТоварам Цикл
Проводка = Проводки.Добавить();
Проводка.Период = СтруктураШапкиДокумента.Дата;
Проводка.Организация = СтруктураШапкиДокумента.Организация;
//Проводка.Содержание = "Возмещение расходов по импортному товару";
Проводка.Сумма = СтрокаТЧ.СуммаБУ;
Если СокрЛП(СтрокаТЧ.СчетУчета)="41.1П" Тогда
Проводка.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоКоду("ИМТ.41");
ИначеЕсли СокрЛП(СтрокаТЧ.СчетУчета)="44.01" Тогда
Проводка.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоКоду("ИМТ.44");
КонецЕсли;
Склады = Справочники.Склады;
Склад = Склады.НайтиПоНаименованию(ЗначениеИзМассива);
Если Склад.Пустая()Тогда
Склад = Склады.СоздатьЭлемент();
Склад.Наименование = ЗначениеИзМассива;
Склад.ВидСклада = Перечисления.ВидыСкладов.Оптовый;
Склад.Записать();
БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт,Проводка.СубконтоДт,1,"Склады",Склад);бесполезно, ругается на булево
//Иначе
//БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт,Проводка.СубконтоДт,1,"Склады",ЗначениеИзМассива.Ссылка);
КонецЕсли;
// БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт,Проводка.СубконтоДт,1,"Склады",НовыйЭлементСправочника);
БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт,Проводка.СубконтоДт,"Партии",2,СтруктураШапкиДокумента.Ссылка);//с этим все нормально"
27.05.2011
09:19
#6
Наверное нужно посмореть какие аргументы в УстановитьСубконто() ожидаются. Я смотрю в Комплексная автоматизация, редакция 1.1 (1.1.8.1), здесь так:
то есть, третий аргумент, который у вас 1 или 2, тут вообще не ожидается. Посмотрите как у вас описана процедура
Процедура УстановитьСубконто(Счет, Субконто, ИмяСубконто, ЗначениеСубконто, Сообщать = Ложь, Заголовок = ", ВидыСубконтоСчета = Неопределено) Экспорт
то есть, третий аргумент, который у вас 1 или 2, тут вообще не ожидается. Посмотрите как у вас описана процедура
27.05.2011
09:27
#7
"блин, пишу по аналогии:
БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт,Проводка.СубконтоДт,"Партии",2,СтруктураШапкиДокумента.Ссылка);//с этим все нормально
попробую, через отладчик , посмотреть процедуру УстановитьСубконто"
БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт,Проводка.СубконтоДт,"Партии",2,СтруктураШапкиДокумента.Ссылка);//с этим все нормально
попробую, через отладчик , посмотреть процедуру УстановитьСубконто"
27.05.2011
09:54
#8
"БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт,Проводка.СубконтоДт,"Склады",Склад.Ссылка);
БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт,Проводка.СубконтоДт,"Партии",?(ПартионныйУчет, СтруктураШапкиДокумента.Ссылка, Неопределено));
//По партии дописала "Неопределенно", проводка формируется, но склад все равно не заполняется, зЭараза"
БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт,Проводка.СубконтоДт,"Партии",?(ПартионныйУчет, СтруктураШапкиДокумента.Ссылка, Неопределено));
//По партии дописала "Неопределенно", проводка формируется, но склад все равно не заполняется, зЭараза"
27.05.2011
09:54
#9
"> блин, пишу по аналогии:
> БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт,Проводка.СубконтоДт,"Партии",2,СтруктураШапкиДокумента.Ссылка);//с этим все нормально
> попробую, через отладчик , посмотреть процедуру УстановитьСубконто
Ну я бы не сказал что это:
> БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт,Проводка.СубконтоДт,1,"Склады",Склад);бесполезно, ругается на булево
аналог: после Проводка.СубконтоДт в первом случае идет "Партии", а потом 2; в вашем "аналоге" наборот 1, потом "Склад". К тому же Склад в вашем случае может оказаться Объектом.
Да и в УПП параметры (Счет, Субконто, ИмяСубконто, ЗначениеСубконто, Сообщать = Ложь, Заголовок = """", ВидыСубконтоСчета = Неопределено)
Попробуйте так:
> БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт,Проводка.СубконтоДт,"Партии",2,СтруктураШапкиДокумента.Ссылка);//с этим все нормально
> попробую, через отладчик , посмотреть процедуру УстановитьСубконто
Ну я бы не сказал что это:
> БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт,Проводка.СубконтоДт,1,"Склады",Склад);бесполезно, ругается на булево
аналог: после Проводка.СубконтоДт в первом случае идет "Партии", а потом 2; в вашем "аналоге" наборот 1, потом "Склад". К тому же Склад в вашем случае может оказаться Объектом.
Да и в УПП параметры (Счет, Субконто, ИмяСубконто, ЗначениеСубконто, Сообщать = Ложь, Заголовок = """", ВидыСубконтоСчета = Неопределено)
Попробуйте так:
БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт,Проводка.СубконтоДт,"Склады",Склад.Ссылка);"
- 1
- 2
Читают тему
(гостей: 1)