Как отобрать проводки по кредиту счета в 1С и поместить их в регистр?

База знаний Одина — Одинэсника Форумы ODIN — Форум по 1С Предприятию Как отобрать проводки по кредиту счета в 1С и поместить их в регистр?

Просмотр 1 ветки ответов
  • Автор
    Сообщения
    • #32851
      Телеграм группа https://t.me/odineskiOdineski
      Участник

        Отобрать все проводки по Кредиту счета и поместить их в отдельный регистор

      • #32852
        bot_avaOdin — Одинэсник
        Участник

          Привет, Ivanliba!

          Для того чтобы отобрать все проводки по кредиту счета и поместить их в отдельный регистор в 1С:Предприятии, вам нужно выполнить следующие шаги:

          1. **Создание регистра**: Сначала создайте новый регистр, который будет хранить данные о проводках. Например, это может быть регистр «Проводки по кредиту».

          2. **Определение структуры регистра**: Определите, какие поля будут в вашем регистре. Например, это могут быть:
          — Дата
          — Счет
          — Сумма
          — Контрагент
          — Документ

          3. **Отбор проводок**: Используйте запрос для отбора проводок по кредиту счета. Пример запроса может выглядеть так:

          1C
             Запрос = Новый Запрос;
             Запрос.Текст = "
             ВЫБРАТЬ
                 Проводки.Дата,
                 Проводки.Счет,
                 Проводки.Сумма,
                 Проводки.Контрагент,
                 Проводки.Документ
             ИЗ
                 РегистрБухгалтерии.Проводки КАК Проводки
             ГДЕ
                 Проводки.Счет = &Счет
                 И Проводки.Тип = 'Кредит'";
             Запрос.УстановитьПараметр("Счет", "60"); // Укажите нужный счет
             

          4. **Заполнение регистра**: После того как вы получили данные из запроса, необходимо перебрать их и записать в созданный регистр. Пример кода для записи в регистр:

          1C
             Результат = Запрос.Выполнить();
             Выборка = Результат.Выбрать();
             
             Пока Выборка.Следующий() Цикл
                 НовыйЗапись = Регистры.ИмяРегистра.Добавить();
                 НовыйЗапись.Дата = Выборка.Дата;
                 НовыйЗапись.Счет = Выборка.Счет;
                 НовыйЗапись.Сумма = Выборка.Сумма;
                 НовыйЗапись.Контрагент = Выборка.Контрагент;
                 НовыйЗапись.Документ = Выборка.Документ;
                 НовыйЗапись.Записать();
             КонецЦикла;
             

          5. **Проверка результата**: После выполнения кода проверьте, что данные корректно записались в новый регистр.

          Таким образом, вы сможете отобрать все проводки по кредиту счета и поместить их в отдельный регистор. Если у вас возникнут дополнительные вопросы, не стесняйтесь спрашивать!

          Рекомендую посмотреть здесь: https://infostart.ru/1c/articles/1513079/

      Просмотр 1 ветки ответов
      • Для ответа в этой теме необходимо авторизоваться.
      База знаний 1С