Заказы на доработку 1С (сервис удаленной работы)

Хранилище

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

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



> Создание документ ОперацияБух          
Юля Подменю пользователя
сообщение 10.06.19, 14:41
Сообщение #1

Оратор
*****
Группа: Пользователи
Сообщений: 402
Из: Хмельницький
Спасибо сказали: 19 раз
Рейтинг: 0

Привіт, бухгалтерія 2.0 потрібно обробкою створити документ Операції введені вручну. Тобто є форма на якій розміщена кнопка створити документ і заповнити. Документ створюється, але табличну частину не можу заповнити, таблицю бачу , бачу колонки, заповнити рне можу. Підкажіть, як звернутися до строк в таблиці. Потрібно прописати рах 231 - всі його субконто, відповідно суму...

sava1 Подменю пользователя
сообщение 10.06.19, 14:48
Сообщение #2

Живет на форуме
Иконка группы
Группа: Местный
Сообщений: 2688
Из: Проскуров
Спасибо сказали: 681 раз
Рейтинг: 659.7

Цитата(Юля @ 10.06.19, 15:41) *
як звернутися до строк в таблиці.


Для каждого строка из Таблица

а для Операции надо обращаться к Движениям

Юля Подменю пользователя
сообщение 13.06.19, 13:23
Сообщение #3

Оратор
*****
Группа: Пользователи
Сообщений: 402
Из: Хмельницький
Спасибо сказали: 19 раз
Рейтинг: 0

sava1 @ 10.06.19, 15:48 * ,

Не хочи добавляти субконто Дт , допоможіть будь-ласка. Помилки не видає, поля добавляє, суму, рахунки, а субконто ні.

&НаСервере
Процедура СоздатьДокументНаСервере()
    
     ДокОперация = Документы.ОперацияБух.СоздатьДокумент();
        ДокОперация.Дата = КонПериода;
        ДокОперация.Организация = Организация;
        ДокОперация.Ответственный = ПараметрыСеанса.ТекущийПользователь;
        ДокОперация.Содержание =  "створено програмно, Розподіл: " + НомГрупаГотова;
        ДокОперация.Комментарий = "Комментарий";
        //ДокОперация.СуммаОперации = Объект.ХозрасчетныйНаборЗаписей.Итог("Сумма");  
        ДокОперация.Записать();

        ДокОперацияСсылка = ДокОперация.Ссылка;
        
                // Добавляем в хозрастчет.
        РегХозрасчетный = РегистрыБухгалтерии.Хозрасчетный.СоздатьНаборЗаписей();
        РегХозрасчетный.Отбор.Регистратор.Значение = ДокОперацияСсылка;
                  
        
        Для Каждого Строка из Объект.ТабличнаяЧасть1 Цикл
        
            РегЗапись = РегХозрасчетный.Добавить();
            РегЗапись.Период = КонПериода;
            РегЗапись.Регистратор = ДокОперацияСсылка;
            РегЗапись.Организация = Организация;
          
            
            РегЗапись.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоКоду("231");
            РегЗапись.Сумма = Строка.Сумма;
            РегЗапись.НалоговоеНазначениеДт = Строка.НалогНазнач;
            БухгалтерскийУчет.УстановитьСубконто(РегЗапись.СчетДт,РегЗапись.СубконтоДт, "НоменклатурныеГруппы", Строка.НоменкГрупа);
            
            

            РегЗапись.СчетКт = КТ;
            
            //РегЗапись = РегХозрасчетный.Добавить();
            //РегЗапись.Сумма = -1 * Строка.Сумма;
             
            
                  
        КонецЦикла;
                        
        РегХозрасчетный.Записать();
    
КонецПроцедуры

sava1 Подменю пользователя
сообщение 13.06.19, 14:18
Сообщение #4

Живет на форуме
Иконка группы
Группа: Местный
Сообщений: 2688
Из: Проскуров
Спасибо сказали: 681 раз
Рейтинг: 659.7

Выше писал - нет в документе ТЧ - обращаться надо к НаборуЗаписей

создаем Хозрасчетный.НаборЗаписей
устанавливаем отбор по документу
считываем
обнуляем
пищем проводки прямо в НаборЗаписей
записываем.

Юля Подменю пользователя
сообщение 13.06.19, 14:47
Сообщение #5

Оратор
*****
Группа: Пользователи
Сообщений: 402
Из: Хмельницький
Спасибо сказали: 19 раз
Рейтинг: 0

sava1 @ Сегодня, 15:18 * ,
проводки создает, субконто не хочет прописовать(
может я не до конца понимаю - ИЗВИНИТЕ why.gif

sava1 Подменю пользователя
сообщение 13.06.19, 15:23
Сообщение #6

Живет на форуме
Иконка группы
Группа: Местный
Сообщений: 2688
Из: Проскуров
Спасибо сказали: 681 раз
Рейтинг: 659.7

Тогда отладчиком посмотреть, почему УстановитьСубконто не срабатывает

Юля Подменю пользователя
сообщение 14.06.19, 12:29
Сообщение #7

Оратор
*****
Группа: Пользователи
Сообщений: 402
Из: Хмельницький
Спасибо сказали: 19 раз
Рейтинг: 0

Заработало))))))
Вместо:
БухгалтерскийУчет.УстановитьСубконто(РегЗапись.СчетДт,РегЗапись.СубконтоДт, "НоменклатурныеГруппы", Строка.НоменкГрупа);

прописала так:
РегЗапись.СубконтоДт[ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.НоменклатурныеГруппы]= Строка.НомГрупа;

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


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

 

RSS Текстовая версия Сейчас: 20.04.24, 0:58
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!