Сборник задач для подготовки к экзамену «1С:Специалист»

Необходимо использовать объект конфигурации "Последовательность" и добавить в нее документ "Продажа". Таким образом всегда можно видеть границу последовательности.

Да, через последовательности делают.
Программно управляют ей.
На see1c.ru видел решение есть.

(Удалено)

спасибо огромное , щас попробую сделать

Делаешь Последовательность на поступление товаров и услуг. Могу кинуть свое решение. В общем у тебя должна обработка и регламентное задание. У меня на эказамене этот билет попался. Жесть. Много кода . Но сдал )))

А лучше всего читай форум Чистова там все есть

chistov ru ?

или forum отдельно ?

Где и как найти

на форуме чистова есть все решения= поищи там - да и задача в принципе не сильно трудная - недавно как раз такая задача на практике была - так как прорешивал этот задачник - то быстро справился

Процедура ОбработкаПроведения(Отказ, РежимПроведения)
Движения.ОстаткиНоменклатуры.БлокироватьДляИзменения=Истина;
Движения.ОстаткиНоменклатуры.Записывать=Истина;
Движения.Продажи.Записывать=Истина;
Запрос=Новый запрос("ВЫБРАТЬ
| РасходнаяНакладнаяСписокНоменклатуры.Ссылка,
| РасходнаяНакладнаяСписокНоменклатуры.Ссылка.Дата как период,
| РасходнаяНакладнаяСписокНоменклатуры.Ссылка.Склад,
| РасходнаяНакладнаяСписокНоменклатуры.Номенклатура КАК Номенклатура,
| СУММА(РасходнаяНакладнаяСписокНоменклатуры.Количество) КАК Количество,
| СУММА(РасходнаяНакладнаяСписокНоменклатуры.Сумма) КАК Сумма
|ИЗ
| Документ.РасходнаяНакладная.СписокНоменклатуры КАК РасходнаяНакладнаяСписокНоменклатуры
|ГДЕ
| РасходнаяНакладнаяСписокНоменклатуры.Ссылка = &Ссылка
|
|СГРУППИРОВАТЬ ПО
| РасходнаяНакладнаяСписокНоменклатуры.Ссылка,
| РасходнаяНакладнаяСписокНоменклатуры.Номенклатура,
| РасходнаяНакладнаяСписокНоменклатуры.Ссылка.Дата,
| РасходнаяНакладнаяСписокНоменклатуры.Ссылка.Склад");

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

Запрос.Текст="ВЫБРАТЬ
| РасходнаяНакладнаяСписокНоменклатуры.Номенклатура,
| РасходнаяНакладнаяСписокНоменклатуры.Ссылка.Склад
|ПОМЕСТИТЬ ДокТЧ
|ИЗ
| Документ.РасходнаяНакладная.СписокНоменклатуры КАК РасходнаяНакладнаяСписокНоменклатуры
|ГДЕ
| РасходнаяНакладнаяСписокНоменклатуры.Ссылка = &Ссылка
|
|СГРУППИРОВАТЬ ПО
| РасходнаяНакладнаяСписокНоменклатуры.Номенклатура,
| РасходнаяНакладнаяСписокНоменклатуры.Ссылка.Склад
|;
|
|////////////////////////////////////////////////////////////­////////////////////
|ВЫБРАТЬ
| ОстаткиНоменклатурыОстатки.Склад,
| ОстаткиНоменклатурыОстатки.Номенклатура,
| ОстаткиНоменклатурыОстатки.КоличествоОстаток как Количество
|ИЗ
| РегистрНакопления.ОстаткиНоменклатуры.Остатки(
| &МоментВремени,
| (Номенклатура, Склад) В
| (ВЫБРАТЬ
| д.Номенклатура,
| д.Склад
| ИЗ
| ДокТЧ КАК д)) КАК ОстаткиНоменклатурыОстатки
|ГДЕ
| ОстаткиНоменклатурыОстатки.КоличествоОстаток < 0
|;
|
|////////////////////////////////////////////////////////////­////////////////////
|УНИЧТОЖИТЬ ДокТЧ";

Запрос.УстановитьПараметр("Ссылка",Ссылка);
Запрос.УстановитьПараметр("МоментВремени",Новый Граница(МоментВремени(),ВидГраницы.Включая));
р=Запрос.Выполнить();
Если р=Неопределено Тогда
Отказ=Истина;
Иначе
в=р.Выбрать();
Пока в.Следующий() Цикл
Сообщить("На складе:"+в.Склад+" не хватает номенклатуры: "+в.Номенклатура+" в количестве :"+в.Количество);
КонецЦикла;
КонецЕсли;

Если Последовательности.Себестоимость.ПолучитьГраницу().Сравнить(МоментВремени())=1 Тогда
Последовательности.Себестоимость.УстановитьГраницу(МоментВремени());
КонецЕсли;

КонецПроцедуры

Процедура УчетСебестоимости() Экспорт
Запрос=Новый запрос("ВЫБРАТЬ
| РасходнаяНакладная.Ссылка
|ИЗ
| Документ.РасходнаяНакладная КАК РасходнаяНакладная
|ГДЕ
| РасходнаяНакладная.МоментВремени >= &МоментВремени");
Запрос.УстановитьПараметр("МоментВремени",Последовательности.Себестоимость.ПолучитьГраницу());
в=Запрос.Выполнить().Выбрать();
МенДок=Документы.РасходнаяНакладная;
Пока в.Следующий() Цикл
МенДок.РасчетСебестоимости(в.Ссылка);
Последовательности.Себестоимость.УстановитьГраницу(В.Ссылка.МоментВремени());
КонецЦикла;
КонецПроцедуры

Понятно, спасибо ...

о здесь МенДок.РасчетСебестоимости(в.Ссылка);

РасчетСебестоимости Это Общий модуль ?

Ошибка в схеме компоновки данных
по причине:
Ошибка получения информации набора данных
по причине:
Ошибка в запросе набора данных
по причине:
{(5, 33)}: Поле не найдено "ОстаткиТоваровОбороты.СуммаРасход"
ЕСТЬNULL(ОстаткиТоваровОбороты.<<?>>СуммаРасход, 0) КАК Себестоимость,

это ошибка отчета

регистры продажи - фиксирует продажи ...создал регламентное задание но не видно рабочем столе

и функционально тоже ни работает

Добрый день! Не подскажите где можно скачать сборник задач по программированию по платформе?