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

Хранилище

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

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



2 страниц V   1 2 >

>  Создание набора записей регистра накопления с пересекающимися измерениями
Bon Jovi
Отправлено: 25.03.21, 16:25


Общительный
**

Группа: Пользователи
Сообщений: 40
Регистрация: 08.05.20
Пользователь №: 69333


logist @ Сегодня, 13:58 * ,

Именно это мне и не нужно. При едином наборе данных будет общая нумерация двух записей, а мне нужно чтобы это были 2е разные записи с 2мя разными нумерациями строк

Vofka @ Сегодня, 13:53 * ,

при любом раскладе он добавляет записи уже к существующим, и нумерация строк этих движений по 1у документу становится общей.

Тема закрыта. Всё правильно делал и советы были верны. По одному регистратору создаётся общий набор записей и его нельзя разбить . Неправильно поняли друг друга с коллегой.
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #171851 · Ответов: 3 · Просмотров: 1323
 

>  Создание набора записей регистра накопления с пересекающимися измерениями
Bon Jovi
Отправлено: 25.03.21, 13:28


Общительный
**

Группа: Пользователи
Сообщений: 40
Регистрация: 08.05.20
Пользователь №: 69333


Добрый день. УТ 10, 8.3, обычные формы. Подскажите пожалуйста, в обработчике события "ОбработкаПроведения" документа хочу добавить возможность добавить создание дополнительной записи в регистр накопления. То есть в определённый регистр запись уже формируется, но при определённом условие в этот же регистр с формированием первой записи хочу добавить формирование ещё одной записи. В этом регистре накопления (к примеру) 7 измерений и 2 ресурса. При формировании первой записи используются все поля, а при формировании ДОПОЛНИТЕЛЬНОЙ записи используются 4 измерения и 1 ресурс. Получается не используются 3 измерения и 1 ресурс, и одно из одинаковых измерений имеет разные данные. По факту это же разные записи/движения в регистре, но никак не создаётся дополнительная запись. Добавляю так:

НаборДвижений = РегистрыНакопления.НазваниеРегистраНакопления.СоздатьНаборЗаписей();
НаборДвижений.Отбор.Регистратор.Установить(Ссылка);
НаборДвижений.Период = Дата;
НаборДвижений.ТаблицаСоВсемиПолямиРегистра = ТаблицаСоВсемиЗначениямиДляВсехПолейРегистра;
НаборДвижений.Записать();
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #171847 · Ответов: 3 · Просмотров: 1323
 

>  Форма "Редактирование списка значений"
Bon Jovi
Отправлено: 26.02.21, 17:35


Общительный
**

Группа: Пользователи
Сообщений: 40
Регистрация: 08.05.20
Пользователь №: 69333


Bon Jovi @ Сегодня, 16:15 * ,

На сколько я узнал, сделать такое невозможно (редактирование стандартной формы). Поэтому осталось только одно решение, которым и воспользовался (хоть и не хотел вначале), создать свою - максимально похожую.
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #171085 · Ответов: 1 · Просмотров: 1339
 

>  Форма "Редактирование списка значений"
Bon Jovi
Отправлено: 26.02.21, 16:15


Общительный
**

Группа: Пользователи
Сообщений: 40
Регистрация: 08.05.20
Пользователь №: 69333


Добрый день. УТ 10, 8.3, обычные формы. Подскажите пожалуйста, возможно ли убрать кнопку "Подбор" из формы "редактирование списка значений"? Если да, то подскажите как или подскажите, как я могу "словить" эту форму, чтобы её редактировать (если конечно это возможно)?


 ! 

Правила: 8
 
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #171079 · Ответов: 1 · Просмотров: 1339
 

>  Расширение редактора "встроенный язык" поля текстового документа
Bon Jovi
Отправлено: 17.02.21, 12:26


Общительный
**

Группа: Пользователи
Сообщений: 40
Регистрация: 08.05.20
Пользователь №: 69333


sava1 @ Сегодня, 10:34 * ,
А не подскажите, как я могу полученный результат обратно преобразовать в выражение? Предполагаю, что нужно в отдельной переменной хранить текст выражения, а вот как этот текст преобразовать обратно в редактор встроенного языка?
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #170779 · Ответов: 4 · Просмотров: 1558
 

>  Расширение редактора "встроенный язык" поля текстового документа
Bon Jovi
Отправлено: 17.02.21, 10:37


Общительный
**

Группа: Пользователи
Сообщений: 40
Регистрация: 08.05.20
Пользователь №: 69333


One @ Сегодня, 10:33 * ,

Не понял/не нашёл, как применить.

sava1 @ Сегодня, 10:34 * ,
Спасибо. То что нужно. По крайней мере получилось реализовать так, как планировал.
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #170777 · Ответов: 4 · Просмотров: 1558
 

>  Расширение редактора "встроенный язык" поля текстового документа
Bon Jovi
Отправлено: 17.02.21, 10:21


Общительный
**

Группа: Пользователи
Сообщений: 40
Регистрация: 08.05.20
Пользователь №: 69333


Добрый день. УТ 10, 8.3, обычные формы. Подскажите пожалуйста, как реализовывается этот функционал? Не могу найти информации. Мне нужно получить результат выражения, заданного в поле текстового документа с расширение "встроенный язык". Как "запустить" мне тест?
P.S. Возможно очень бредово описала ситуацию, но иначе не могу сформулировать мысль.
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #170774 · Ответов: 4 · Просмотров: 1558
 

>  Отступ при выводе табличного документа
Bon Jovi
Отправлено: 29.01.21, 12:17


Общительный
**

Группа: Пользователи
Сообщений: 40
Регистрация: 08.05.20
Пользователь №: 69333


Видать форум уже не тот... Но ничего, решение всё же нашёл и поделюсь им с другими разработчиками, которые столкнулись с подобной загвоздкой.
Цитата
В случае, когда построителю отчета устанавливается внешний макет и при необходимости его оформления, необходимо дополнительно вызвать метод построителя ОформитьМакет(). При этом построитель применит макет оформления к установленному макету.

ПостроительОтчета.МакетОформления = ПолучитьМакетОформления(СтандартноеОформление.Классика);
ПостроительОтчета.Макет = ПолучитьМакет("МойМакет");
ПостроительОтчета.ОформитьМакет();




Название областей я брал из стандартного макета построителя.
Для меня, это оптимальное решение.


 ! 

Правила: 8
 
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #170237 · Ответов: 3 · Просмотров: 1344
 

>  Отступ при выводе табличного документа
Bon Jovi
Отправлено: 29.01.21, 9:34


Общительный
**

Группа: Пользователи
Сообщений: 40
Регистрация: 08.05.20
Пользователь №: 69333


Цитата(Vofka @ 29.01.21, 9:16) *
В конфигураторе "взяться" за верхнюю границу табличного документа и опустить ее ниже.


я пользуюсь "ПолучитьМакетОформления(СтандартноеОформление.Интерфейс)". Поэтому он мне автоматом формирует.
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #170233 · Ответов: 3 · Просмотров: 1344
 

>  Отступ при выводе табличного документа
Bon Jovi
Отправлено: 28.01.21, 17:17


Общительный
**

Группа: Пользователи
Сообщений: 40
Регистрация: 08.05.20
Пользователь №: 69333


Конфигурация: Trade (10.3.29.1) (http://v8.1c.ru/trade/), версия: 8.3.11.2867, обычные формы.
Добрый день. Подскажите пожалуйста с маленьким вопросом. Как я могу добавить отступ между табличным документом и верхней границей формы? Никак не могу найти решения.

  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #170205 · Ответов: 3 · Просмотров: 1344
 

>  Как найти все документы Установка цен номенклатуры, в табличной части которых есть позиции, у которых не заполнены цены
Bon Jovi
Отправлено: 06.10.20, 14:50


Общительный
**

Группа: Пользователи
Сообщений: 40
Регистрация: 08.05.20
Пользователь №: 69333


Конфигурация: Trade (10.3.29.1) (http://v8.1c.ru/trade/), версия: 8.3.11.2867, обычные формы.
Добрый день. Подскажите, как можно найти все документы (Установка цен номенклатуры), в табличной части которых есть позиции, у которых не заполнены цены (пустые строки)? Мой метод не совсем подходит:
ВЫБРАТЬ
    УстановкаЦенНоменклатурыТовары.Ссылка КАК ДокументУстановкиЦен,
    УстановкаЦенНоменклатурыТовары.ИндексСтрокиТаблицыЦен КАК ИндексСтрокиТаблицыЦен,
    УстановкаЦенНоменклатурыТовары.Номенклатура КАК Номенклатура
ИЗ
    Документ.УстановкаЦенНоменклатуры.Товары КАК УстановкаЦенНоменклатурыТовары

СГРУППИРОВАТЬ ПО
    УстановкаЦенНоменклатурыТовары.Ссылка,
    УстановкаЦенНоменклатурыТовары.ИндексСтрокиТаблицыЦен,
    УстановкаЦенНоменклатурыТовары.Номенклатура

ИМЕЮЩИЕ
    СУММА(УстановкаЦенНоменклатурыТовары.Цена) = 0

УПОРЯДОЧИТЬ ПО
    ИндексСтрокиТаблицыЦен УБЫВ
ИТОГИ ПО
    ДокументУстановкиЦен



 ! 

Правила: 4
 
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #167092 · Ответов: 1 · Просмотров: 1147
 

>  Не отображается цена табличной части
Bon Jovi
Отправлено: 06.10.20, 11:08


Общительный
**

Группа: Пользователи
Сообщений: 40
Регистрация: 08.05.20
Пользователь №: 69333


twilight_dream @ Вчера, 14:01 * ,

Хочу попробовать кое что ещё Не подскажите, как найти все документы, в табличной части которых есть позиции, у которых не заполнены цены типах цен (пустые строки)? Мой метод не совсем походит:
ВЫБРАТЬ
    УстановкаЦенНоменклатурыТовары.Ссылка КАК ДокументУстановкиЦен,
    УстановкаЦенНоменклатурыТовары.ИндексСтрокиТаблицыЦен КАК ИндексСтрокиТаблицыЦен,
    УстановкаЦенНоменклатурыТовары.Номенклатура КАК Номенклатура
ИЗ
    Документ.УстановкаЦенНоменклатуры.Товары КАК УстановкаЦенНоменклатурыТовары

СГРУППИРОВАТЬ ПО
    УстановкаЦенНоменклатурыТовары.Ссылка,
    УстановкаЦенНоменклатурыТовары.ИндексСтрокиТаблицыЦен,
    УстановкаЦенНоменклатурыТовары.Номенклатура

ИМЕЮЩИЕ
    СУММА(УстановкаЦенНоменклатурыТовары.Цена) = 0

УПОРЯДОЧИТЬ ПО
    ИндексСтрокиТаблицыЦен УБЫВ
ИТОГИ ПО
    ДокументУстановкиЦен
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #167090 · Ответов: 4 · Просмотров: 955
 

>  Не отображается цена табличной части
Bon Jovi
Отправлено: 05.10.20, 12:57


Общительный
**

Группа: Пользователи
Сообщений: 40
Регистрация: 08.05.20
Пользователь №: 69333


twilight_dream @ Сегодня, 13:42 * ,
Это всего лишь тестовый пример 1го документа. Мне же нужно найти все документы, у которых в табличной части товары есть такие строки.
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #167056 · Ответов: 4 · Просмотров: 955
 

>  Объединение виртуальных таблиц.
Bon Jovi
Отправлено: 05.10.20, 12:56


Общительный
**

Группа: Пользователи
Сообщений: 40
Регистрация: 08.05.20
Пользователь №: 69333


twilight_dream @ Сегодня, 13:46 * ,
Большое спасибо. Задание давно готово и написано личной мной. Да и вначале я не просил за меня работу делать, а только дать идею реализации задачи, но видно для гуру программистов оказать помощь это слишком, но вот оставить язвителный комментарии это они могут
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #167055 · Ответов: 10 · Просмотров: 1402
 

>  Не отображается цена табличной части
Bon Jovi
Отправлено: 05.10.20, 11:57


Общительный
**

Группа: Пользователи
Сообщений: 40
Регистрация: 08.05.20
Пользователь №: 69333


Конфигурация: Trade (10.3.29.1) (http://v8.1c.ru/trade/), версия: 8.3.11.2867, обычные формы.
Добрый день. Подскажите пожалуйста в следующем. Почему в табличной части документа Установка цен номенклатуры у номенклатуры нет цены (пусто / по нулям), а если через запрос вывести все поля табличной части, то находится цена? Также если получить объект документа и обратиться в табличной части товары, то в ТЗ выводится такой же результат, как и через запрос.
Например:
ВЫБРАТЬ
    *  
ИЗ
    Документ.УстановкаЦенНоменклатуры.Товары КАК УстановкаЦенНоменклатурыТовары
ГДЕ
    УстановкаЦенНоменклатурыТовары.Ссылка = &Ссылка

УПОРЯДОЧИТЬ ПО
    НомерСтроки


  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #167049 · Ответов: 4 · Просмотров: 955
 

>  Объединение виртуальных таблиц.
Bon Jovi
Отправлено: 01.10.20, 12:02


Общительный
**

Группа: Пользователи
Сообщений: 40
Регистрация: 08.05.20
Пользователь №: 69333


Petre @ Сегодня, 12:58 * ,
Вопрос был в том, как это сделать автоматически к большому количеству таблиц значений. Сам принцип объединения временных таблиц мне был понятен и известен.
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #166925 · Ответов: 10 · Просмотров: 1402
 

>  Объединение виртуальных таблиц.
Bon Jovi
Отправлено: 01.10.20, 11:38


Общительный
**

Группа: Пользователи
Сообщений: 40
Регистрация: 08.05.20
Пользователь №: 69333


Vofka @ 25.09.20, 10:12 * ,
Вот как с этой задачей справился я:
ТекстЗапроса1 = ""; ТекстЗапроса2 = ""; Счётчик = 0;
    Для каждого СтрокаПараметра Из Параметры Цикл    
        
        Если НЕ ТипЗнч(ЗначениеИзСтрокиВнутр(СтрокаПараметра)) = Тип("ТаблицаЗначений") ИЛИ ЗначениеИзСтрокиВнутр(СтрокаПараметра).Количество() = 0 Тогда
            Продолжить;            
        КонецЕсли;    
        
        Счётчик = Счётчик + 1;
        
        ТекстЗапроса1 = ТекстЗапроса1 + "ВЫБРАТЬ ТЗ" + Счётчик + ".Номенклатура, ТЗ" + Счётчик + ".Склад ПОМЕСТИТЬ ТЗ" + Счётчик + " ИЗ &ТЗ" + Счётчик + " КАК ТЗ" + Счётчик + ";";        
        ТекстЗапроса2 = ТекстЗапроса2 + "ВЫБРАТЬ ТЗ" + Счётчик + ".Номенклатура, ТЗ" + Счётчик + ".Склад ИЗ ТЗ" + Счётчик + " КАК ТЗ" + Счётчик + "";
        
        Если Счётчик <> 1 Тогда
            ТекстЗапроса2 = СтрЗаменить(ТекстЗапроса2, "ВЫБРАТЬ ТЗ" + Счётчик, " ОБЪЕДИНИТЬ ВЫБРАТЬ ТЗ" + Счётчик);        
        КонецЕсли;
        
        Запрос.УстановитьПараметр("ТЗ" + Счётчик, ЗначениеИзСтрокиВнутр(СтрокаПараметра).Скопировать(, "Номенклатура, Склад"));                         
        
    КонецЦикла;      
    
    Если Счётчик = 0 Тогда
        Возврат;
    КонецЕсли;

    Запрос.Текст = ТекстЗапроса1 + ТекстЗапроса2;
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #166922 · Ответов: 10 · Просмотров: 1402
 

>  Объединение виртуальных таблиц.
Bon Jovi
Отправлено: 25.09.20, 9:09


Общительный
**

Группа: Пользователи
Сообщений: 40
Регистрация: 08.05.20
Пользователь №: 69333


Bernet @ Вчера, 18:52 * ,
Немного ошибся (за что стыдно) ... Объединить не виртуальные, а временные таблицы...
И о таком методе как вы предложили я знаю, не подходит

sava1 @ Вчера, 20:23 * ,
Цитата
хочу объединить очень много таблиц в одну
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #166766 · Ответов: 10 · Просмотров: 1402
 

>  Объединение виртуальных таблиц.
Bon Jovi
Отправлено: 24.09.20, 17:05


Общительный
**

Группа: Пользователи
Сообщений: 40
Регистрация: 08.05.20
Пользователь №: 69333


Конфигурация: Trade (10.3.29.1) (http://v8.1c.ru/trade/), версия: 8.3.11.2867, обычные формы.
Добрый день. Подскажите пожалуйста в следующем. Хочу написать запрос, который будет формироваться по ходу обхода цикла, то есть каждая строка будет добавлять часть кода. Проблема в том, что я хочу объединить очень много таблиц в одну (полей всего два и они общие, есть у всех таблиц). Но на сколько я понимаю, нельзя объединять виртуальные таблицы. То есть такой метод не работает и выдаёт ошибку "Содержимое объекта данных может быть выбрано только во временную таблицу":
ВЫБРАТЬ
    ТЗ.Элемент1 КАК Элемент1 ,
    ТЗ.Элемент2 КАК Элемент2
ИЗ
    &ТЗ КАК ТЗ

ОБЪЕДИНИТЬ

ВЫБРАТЬ
    ТЗ2.Элемент1 ,
    ТЗ2.Элемент2
ИЗ
    &ТЗ2 КАК ТЗ2


Поделитесь информацией по этому поводу. Нужно именно таким способом, то есть каждая строка цикла должна добавить очередной кусок объединения.
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #166733 · Ответов: 10 · Просмотров: 1402
 

>  Номенклатура и её родители
Bon Jovi
Отправлено: 04.08.20, 15:59


Общительный
**

Группа: Пользователи
Сообщений: 40
Регистрация: 08.05.20
Пользователь №: 69333


Vofka @ Сегодня, 16:10 * ,
Согласен. Уровень заранее известен, но нужно сделать универсально и не программно, а сразу запросом. На сколько я знаю, это возможно и довольно просто. Вот только прийти к этому не получается.

Получилось решить следующим образом:
1) отбираю все существующие родители с признаком Истина и помещаю их в ВТ
2) во втором пакете задаю условие : КакойТоОбъект.Родитель В ИЕРАРХИИ (Выбрать ВТ.Родитель Из ВТ)
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #165316 · Ответов: 5 · Просмотров: 2252
 

>  Номенклатура и её родители
Bon Jovi
Отправлено: 04.08.20, 14:50


Общительный
**

Группа: Пользователи
Сообщений: 40
Регистрация: 08.05.20
Пользователь №: 69333


denis84 @ Сегодня, 14:31 * ,
Мне признак нужен не как параметр, а как Истина (всегда). А если его задать в условии как вы написали, то он будет фильтровать только по прямому родителю номенклатуры и поэтому не покажет номенклатуру, у которой (грубо говоря) родитель.родитель.родитель имеет признак истина.

Плюс мне также не подходит вариант, где количество уровней иерархии ограничено (не подходит вариант: номенклатура.родитель.родитель.родитель и т.д.)

Вариант с "Итоги по только иерархия" показывает очень подробно что я хочу:

1 - Л
1.1 - И
1.1.1
1.1.2
1.2 - Л
1.2.1
2 - И
2.1 - Л
2.1.1

И если правильно наложить условие (отбор), то должны остаться:

1.1.1
1.1.2
2.1.1
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #165314 · Ответов: 5 · Просмотров: 2252
 

>  Номенклатура и её родители
Bon Jovi
Отправлено: 04.08.20, 12:37


Общительный
**

Группа: Пользователи
Сообщений: 40
Регистрация: 08.05.20
Пользователь №: 69333


Конфигурация: Trade (10.3.29.1) (http://v8.1c.ru/trade/), версия: 8.3.11.2867, обычные формы.
Добрый день. Подскажите пожалуйста в следующем. Нужно запросом получить номенклатуру, родитель которой (или родитель родителя, или родитель родителя родителя и т.д.) имеет установленную галка (некий признак). В инете много тем есть о получении всех родителей номенклатуры (через Итоги по только иерархия), но как наложить условие (отбор)?
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #165310 · Ответов: 5 · Просмотров: 2252
 

>  Оприходование товара на основании документа Возврат от покупателей
Bon Jovi
Отправлено: 17.06.20, 9:02


Общительный
**

Группа: Пользователи
Сообщений: 40
Регистрация: 08.05.20
Пользователь №: 69333


Мой решение:
Процедура КнопкаВыполнитьНажатие(Кнопка)
    
    Запрос = Новый Запрос;
    Запрос.Текст =
    "ВЫБРАТЬ
    |    ВозвратТоваровОтПокупателяТовары.Номенклатура КАК Номенклатура,
    |    ВозвратТоваровОтПокупателяТовары.ДокументПартии КАК Реализация,
    |    ВозвратТоваровОтПокупателяТовары.ЕдиницаИзмерения КАК ЕдиницаИзмерения
    |ПОМЕСТИТЬ ЗапросПоВозврату
    |ИЗ
    |    Документ.ВозвратТоваровОтПокупателя.Товары КАК ВозвратТоваровОтПокупателяТовары
    |ГДЕ
    |    ВозвратТоваровОтПокупателяТовары.Ссылка = &ДокументВозврата
    |;
    |
    |////////////////////////////////////////////////////////////////////////////////
    |ВЫБРАТЬ
    |    ЗапросПоВозврату.Номенклатура КАК Номенклатура,
    |    ПартииТоваровНаСкладах.Количество КАК Количество,
    |    ЗапросПоВозврату.ЕдиницаИзмерения КАК ЕдиницаИзмерения,
    |    ПартииТоваровНаСкладах.Стоимость КАК Стоимость,
    |    ПартииТоваровНаСкладах.Склад КАК Склад
    |ИЗ
    |    ЗапросПоВозврату КАК ЗапросПоВозврату
    |        ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.ПартииТоваровНаСкладах КАК ПартииТоваровНаСкладах
    |        ПО ЗапросПоВозврату.Номенклатура = ПартииТоваровНаСкладах.Номенклатура
    |            И ЗапросПоВозврату.Реализация = ПартииТоваровНаСкладах.Регистратор
    |
    |УПОРЯДОЧИТЬ ПО
    |    Номенклатура,
    |    ПартииТоваровНаСкладах.ДокументОприходования УБЫВ
    |АВТОУПОРЯДОЧИВАНИЕ";
    
    Запрос.УстановитьПараметр("ДокументВозврата", ДокументВозврата);
    
    ВыборкаВыгрузка = Запрос.Выполнить().Выгрузить();          
    
    НовыйДокумент = Документы.ОприходованиеТоваров.СоздатьДокумент();
    
    Для каждого СтрокаДокументаВозврата Из ДокументВозврата.Товары Цикл
        
        Массив = ВыборкаВыгрузка.НайтиСтроки(Новый Структура("Номенклатура", СтрокаДокументаВозврата.Номенклатура));
        НеобходимоеКоличество = СтрокаДокументаВозврата.Количество;
        
        Для каждого СтрокаМассива Из Массив Цикл
            
            ТабличнаяЧасть = НовыйДокумент.Товары.Добавить();
            ТабличнаяЧасть.Номенклатура             = СтрокаМассива.Номенклатура;
            ТабличнаяЧасть.ЕдиницаИзмерения    = СтрокаМассива.ЕдиницаИзмерения;
            ТабличнаяЧасть.Коэффициент            = 1;                              
            
            Если НеобходимоеКоличество > СтрокаМассива.Количество Тогда
                НеобходимоеКоличество = НеобходимоеКоличество - СтрокаМассива.Количество;
                ТабличнаяЧасть.Количество         = СтрокаМассива.Количество;
                ТабличнаяЧасть.Цена                     = СтрокаМассива.Стоимость / СтрокаМассива.Количество;
                ТабличнаяЧасть.Сумма                 = СтрокаМассива.Стоимость;
            Иначе                  
                ТабличнаяЧасть.Количество         = НеобходимоеКоличество;
                ТабличнаяЧасть.Цена                     = СтрокаМассива.Стоимость / СтрокаМассива.Количество;
                ТабличнаяЧасть.Сумма                = ТабличнаяЧасть.Количество * ТабличнаяЧасть.Цена;
                НеобходимоеКоличество = 0;
                Прервать;
            КонецЕсли;
            
        КонецЦикла;        
        
    КонецЦикла;
    
    НовыйДокумент.Товары.Свернуть("Номенклатура, ЕдиницаИзмерения, Коэффициент, Цена, Сумма, Качество", "Количество");    
    НовыйДокумент.Дата                                            = ТекущаяДата();
    НовыйДокумент.Склад                                            = СтрокаДокументаВозврата.Склад;
    НовыйДокумент.ОтражатьВУправленческомУчете     = Истина;
    НовыйДокумент.Организация                                 = УправлениеПользователями.ПолучитьЗначениеПоУмолчанию(ПараметрыСеанса.ТекущийПользователь, "ОсновнаяОрганизация");    
    НовыйДокумент.Записать();
    
КонецПроцедуры
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #163948 · Ответов: 3 · Просмотров: 1096
 

>  Подсчёт количества дней номенклатуры на складе
Bon Jovi
Отправлено: 15.06.20, 16:44


Общительный
**

Группа: Пользователи
Сообщений: 40
Регистрация: 08.05.20
Пользователь №: 69333


Конфигурация: Trade (10.3.29.1) (http://v8.1c.ru/trade/), версия: 8.3.11.2867, обычные формы.
Подсчёт количества дней хранения номенклатуры на складе.
Добрый день. Подскажите пожалуйста идею, метод или способ, как можно реализовать следующее задание: Нужно подсчитать сколько дней номенклатура пролежала на складе за полтора года. Учитываются полные (то есть на начало дня есть остаток и на конец дня), рабочие дни. Также рабочим днём считается суббота. Но выходные (воскресенье) и праздничные не считаются.
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #163880 · Ответов: 0 · Просмотров: 789
 

>  Оприходование товара на основании документа Возврат от покупателей
Bon Jovi
Отправлено: 12.06.20, 15:08


Общительный
**

Группа: Пользователи
Сообщений: 40
Регистрация: 08.05.20
Пользователь №: 69333


stark @ Вчера, 17:59 * ,
Нужно как то сделать грамотный отбор после запроса,в котором будут сравниваться строки одной таблицы (возвраты) и другой (партий). Ну и одновременно высчитывать нужное количество из таблицы партий в таблицу возвратов.
Запрос = Новый Запрос;
    Запрос.Текст =
    "ВЫБРАТЬ
    |    ВозвратТоваровОтПокупателяТовары.Номенклатура КАК Номенклатура,
    |    ВозвратТоваровОтПокупателяТовары.Количество КАК Количество,
    |    ВозвратТоваровОтПокупателяТовары.ДокументПартии КАК Реализация,
    |    ВозвратТоваровОтПокупателяТовары.Склад КАК Склад,
    |    ВозвратТоваровОтПокупателяТовары.ЕдиницаИзмерения КАК ЕдиницаИзмерения
    |ПОМЕСТИТЬ ЗапросПоВозврату
    |ИЗ
    |    Документ.ВозвратТоваровОтПокупателя.Товары КАК ВозвратТоваровОтПокупателяТовары
    |ГДЕ
    |    ВозвратТоваровОтПокупателяТовары.Ссылка = &ДокументВозврата
    |;
    |
    |////////////////////////////////////////////////////////////­////////////////////
    |ВЫБРАТЬ
    |    ЗапросПоВозврату.Номенклатура КАК Номенклатура,
    |    ЗапросПоВозврату.Количество КАК КоличествоНоменклатурыВозврата,
    |    ПартииТоваровНаСкладах.Количество КАК Количество,
    |    ЗапросПоВозврату.ЕдиницаИзмерения КАК ЕдиницаИзмерения,
    |    ПартииТоваровНаСкладах.Стоимость КАК Стоимость,
    |    ЗапросПоВозврату.Склад КАК Склад
    |ИЗ
    |    ЗапросПоВозврату КАК ЗапросПоВозврату
    |        ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.ПартииТоваровНаСкладах КАК ПартииТоваровНаСкладах
    |        ПО ЗапросПоВозврату.Номенклатура = ПартииТоваровНаСкладах.Номенклатура
    |            И ЗапросПоВозврату.Реализация = ПартииТоваровНаСкладах.Регистратор
    |
    |УПОРЯДОЧИТЬ ПО
    |    Номенклатура,
    |    ПартииТоваровНаСкладах.ДокументОприходования УБЫВ
    |АВТОУПОРЯДОЧИВАНИЕ";
    
    Запрос.УстановитьПараметр("ДокументВозврата", ДокументВозврата);
    Выборка = Запрос.Выполнить().Выбрать();
    
    ТЗНоменклатурыВозврата    = ДокументВозврата.Товары.Выгрузить();
        
    Отбор = Новый Структура();
    Отбор.Вставить("Номенклатура", Выборка.Номенклатура);
    Строка = ТЗНоменклатурыВозврата.НайтиСтроки(Отбор);
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #163823 · Ответов: 3 · Просмотров: 1096
 

2 страниц V   1 2 >

Новые сообщения  Открытая тема (есть новые ответы)
Опрос  Опрос (есть новые голоса)
Нет новых сообщений  Открытая тема (нет новых ответов)
Нет новых голосов  Опрос (нет новых голосов)
Популярная тема  Горячая тема (есть новые ответы)
Закрыта  Закрытая тема
Нет новых  Горячая тема (нет новых ответов) Перемещена  Тема перемещена
 

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