|
Загрузить данные в док Бухгалтерская опер (Операция (бухгалтерский и налоговый ) | ☑ | ||
---|---|---|---|---|
0
anisa8310
03.12.12
✎
09:44
|
1С:Предприятие 8.2 (8.2.16.368)
Бухгалтерия предприятия, редакция 2.0 (2.0.39.6) Доброе утро! На забалансовом счете 001 арендованные ОС-есть Сальдо. Организация закрывается, с 001 отдать обратно нужно арендованные ОС, их чертовски много(. вывела таблицу в файлик excel, воспользовалась обработкой Загрузка из табличного документа- но видимо я не поняла как работать с этим документом в обработке, табличную часть выбираю , например "Таблица регистров накопления", но поля- "Имя" и "Представление" - что в них представлять то... ведь нужно прописать:сумму, наименование, счет и контрагента. Кто сталкивался с такой потребностью в 1с, подскажите что можно сделать, или эта обработка не предназначена для таких целей БухОпер или я чего не понимаю? Заранее всех благодарю! |
|||
1
pessok
03.12.12
✎
09:45
|
тебе нужен регистр бухгалтерии (хозрасчетный). зачем морозиться с РН?
|
|||
2
anisa8310
03.12.12
✎
09:47
|
Так его выбирать значит нужно!
|
|||
3
anisa8310
03.12.12
✎
09:48
|
Но там всего 4 табличных части: 1) Запрашиваемые параметры, 2)табл РС, 3)табл РН, 4)Заполнение движений
|
|||
4
Spieluhr
03.12.12
✎
09:49
|
(0) нужно напрямую к Движения.Хозрасчетный обращаться
|
|||
5
pessok
03.12.12
✎
09:49
|
(3) ну вот в заполнение движений
|
|||
6
Lys
03.12.12
✎
09:49
|
Искать статью на ИТС "Особенности документа "Операция(бух. и нал. учет)"".
Думать... |
|||
7
anisa8310
03.12.12
✎
09:52
|
(6) О спасибо! Обязательно прочту! Результат сообщу! Всем отличного настроения и СПАСИБО!
|
|||
8
anisa8310
03.12.12
✎
09:54
|
(7) и (4)Спасибы)
|
|||
9
anisa8310
03.12.12
✎
09:55
|
ой, не (7) а (5)!
|
|||
10
anisa8310
03.12.12
✎
10:36
|
(6)не могу найти статью "Особенности документа "Операция(бухгалтерский и налоговый учет)"" в ИТС Октябрь2012
|
|||
11
Lys
03.12.12
✎
10:58
|
(10) Раньше была, точно помню.
Сам попробовал поискать - безрезультатно. Сорри за неверную наводку. Вкратце суть - у документа ОперацияБух нет реквизитов, хранящих данные проводок, и модуля проведения. При работе с ним пользователь работает непосредственно с набором записей регистра бухгалтерии, отобранным по регистратору (текущему документу ОперацияБух). Сооответственно, при загрузке данных в ручную операцию - надо работать не с ее реквизитами, а с набором записей регистра бухгалтерии, непосредственно. При этом сам документ ОперацияБух надо создавать только для того, чтобы он был регистратором для данного набора записей. |
|||
12
anisa8310
03.12.12
✎
11:01
|
вот как... мда... сейчас буду эксперементировать заполнять движения..но видимо Кнопка "События" там нужно все дописывать сами движения...скорее всего так..
|
|||
13
anisa8310
03.12.12
✎
17:08
|
Короче пишу обработку....для заполнения бух справки, файл так выглядет: (TOYOTA CAMRY №12648|588673,8)-знак табуляции "|", всего одномерный массив [2] из двух
Функция ПолучитьПоле(ВходСтрока,НомерПоля, Видразделителя) Перем Строка1, Строка2, НашеПоле; Перем Позиция1, Позиция2; Перем ДлинаРазд, ЧислоРазд; ДлинаРазд = СтрДлина(Видразделителя); ЧислоРазд = СтрЧислоВхождений(ВходСтрока,Видразделителя); Если (ЧислоРазд+1) < НомерПоля Тогда Сообщить("Номер поля за пределами строки!!!", СтатусСообщения.ОченьВажное); Возврат "ЭтоФигня" КонецЕсли; Колполей = 0; Строка1 = ВходСтрока; Для ии = 1 По ЧислоРазд Цикл Позиция1 = Найти(Строка1, Видразделителя); НашеПоле = Лев(Строка1, Позиция1-1); Если ии = НомерПоля Тогда Возврат НашеПоле; ИначеЕсли ии = ЧислоРазд Тогда НашеПоле = Сред(Строка1, Позиция1 + ДлинаРазд); Возврат НашеПоле; Иначе Строка1 = Сред(Строка1, Позиция1 + ДлинаРазд); КонецЕсли; КонецЦикла; КонецФункции Процедура КнопкаВыполнитьНажатие(Кнопка) Док = ПолучитьCOMОбъект(Путь); счСтроки = 1; Пока Док.Sheets(1).Cells(счСтроки,1).Value <>Неопределено Цикл Стр=Док.Sheets(1).Cells(счСтроки,1).Value; //////////////Формирование массива услуги Массив = Новый Массив(2); Для Сч=1 По 2 Цикл Позиция = Найти(Стр, "|"); Массив.Вставить(сч,Сред(Стр, 1, Позиция-1)); стр = Сред(Стр, Позиция + 1); КонецЦикла; НовыйДокумент= Документы.ОперацияБух.СоздатьДокумент(); //НовыйДокумент.Организация = Организация ; СчКт = ПланыСчетов.Хозрасчетный.АрендованныеОсновныеСредства.Код; СубконтоКт1= Справочники.Контрагенты.НайтиПоКоду("000003173"); СубконтоКт2= Справочники.ОсновныеСредства.НайтиПоНаименованию(СтрЗаменить(Массив[1],Символ(34),"")); Сумма = Массив[2]; КонецЦикла; НовыйДокумент.Записать(); счСтроки = счСтроки + 1; Док.Application.Quit(); КонецПроцедуры Процедура ВыбФайлНачалоВыбора(Элемент, СтандартнаяОбработка) // Вставить содержимое обработчика. ДиалогВыбораФайла = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие); ДиалогВыбораФайла.Фильтр = "Текстовые файлы (*.csv)|*.csv"; ДиалогВыбораФайла.Заголовок = "Выберите файл для загрузки данных"; ДиалогВыбораФайла.ПредварительныйПросмотр = Ложь; ДиалогВыбораФайла.Расширение ="csv"; ДиалогВыбораФайла.ИндексФильтра = 0; ДиалогВыбораФайла.ПолноеИмяФайла = Путь; Если ДиалогВыбораФайла.Выбрать() Тогда Путь = ДиалогВыбораФайла.ПолноеИмяФайла; КонецЕсли; КонецПроцедуры Не работает...блин |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |