Добрый день
Подскажите пожалуйста, как сделать что бы при импорте банковской выписки в 1с устанавливалось значение ФИРМА и при этом ставился основной расчетный счет?
Спр = СоздатьОбъект("Справочник.Фирмы");
Если Спр.НайтиПоНаименованию("наименование фирмы",0,1)=1 ТОгда
Выписка.Фирма=Спр.ТекущийЭлемент();
КонецЕсли;
Спр = СоздатьОбъект("Справочник.Фирмы");
Если Спр.НайтиПоНаименованию("наименование фирмы",0,1)=1 ТОгда
Выписка.Фирма=Спр.ТекущийЭлемент();
КонецЕсли;
Выписка.ВидДвижения = Перечисление.ВидиДвиженийПоРасчетномуСчету.Поступление;
Выписка.НазначитьТип("ВидПриходаРасхода","Перечисление.ВидыПриходаДенег");
Выписка.ВидПриходаРасхода=Перечисление.ВидыПриходаДенег.ВыручкаОтРеализации;
//И соответственно
Выписка.ВидДвижения = Перечисление.ВидыДвиженийПоРасчетномуСчету.Списание;
Выписка.НазначитьТип("ВидПриходаРасхода","Перечисление.ВидыРасходаДенег");
Выписка.ВидПриходаРасхода=Перечисление.ВидыРасходаДенег.НаВедениеХозДеятельности
;
Выписка.ВидДвижения = Перечисление.ВидиДвиженийПоРасчетномуСчету.Поступление;
Выписка.НазначитьТип("ВидПриходаРасхода","Перечисление.ВидыПриходаДенег");
Выписка.ВидПриходаРасхода=Перечисление.ВидыПриходаДенег.ВыручкаОтРеализации;
//И соответственно
Выписка.ВидДвижения = Перечисление.ВидыДвиженийПоРасчетномуСчету.Списание;
Выписка.НазначитьТип("ВидПриходаРасхода","Перечисление.ВидыРасходаДенег");
Выписка.ВидПриходаРасхода=Перечисление.ВидыРасходаДенег.НаВедениеХозДеятельности
;
Процедура ВводНового(Признак)
Если Признак=1 тогда
глУстановитьНомер(Контекст);
Возврат;
КонецЕсли;
глУстановитьТипучета(Контекст);
глУстановитьФирму(Контекст);
РСчет=Фирма.РС;
ИспользоватьСчетНДС=глИспользоватьСчетНДС(ДатаДок);
ИзмРСчет();
КонецПроцедуры