Файл: Разработка конфигурации «Взаиморасчеты с клиентами» в среде 1С:Предприятие 8.3..pdf

ВУЗ: Не указан

Категория: Курсовая работа

Дисциплина: Не указана

Добавлен: 29.03.2023

Просмотров: 228

Скачиваний: 11

ВНИМАНИЕ! Если данный файл нарушает Ваши авторские права, то обязательно сообщите нам.

Запрос.Текст =

"ВЫБРАТЬ

| ДокМ.Номенклатура,

| СУММА(ДокМ.Количество) КАК Количество,

| СУММА(ДокМ.Сумма) КАК Сумма,

| МАКСИМУМ(ЕСТЬNULL(ОстМ.КоличествоОстаток, 0)) КАК КоличествоОстаток

|

|ИЗ

| Документ.СписаниеМатериалов.Сервис КАК ДокМ

| ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.ОстаткиМатериалов.Остатки(&МоментВремени) КАК ОстМ

| ПО ДокМ.Номенклатура = ОстМ.Номенклатура

|ГДЕ

| ДокМ.Ссылка = &Ссылка

|

|СГРУППИРОВАТЬ ПО

| ДокМ.Номенклатура";

Запрос.УстановитьПараметр("МоментВремени", МоментВремени());

Запрос.УстановитьПараметр("Ссылка", Ссылка);

Результат = Запрос.Выполнить();

ВыборкаДЗ = Результат.Выбрать();

Движения.ОстаткиМатериалов.Записывать=Истина;

Пока ВыборкаДЗ.Следующий() Цикл

Если ВыборкаДЗ.Количество()>ВыборкаДЗ.КоличествоОстаток Тогда

Сообщить("Недостаточное количество материала "

+ ВыборкаДЗ.Номенклатура+", необходимо: " + ВыборкаДЗ.Количество()+", в наличии: "

+ ВыборкаДЗ.КоличествоОстаток);

Отказ=Истина;

Движения.ОстаткиМатериалов.Записывать=Ложь;

КонецЕсли;

Если Отказ Тогда

Продолжить;

КонецЕсли;

Движение = Движения.ОстаткиМатериалов.Добавить();

Движение.ВидДвижения = ВидДвиженияНакопления.Расход;

Движение.Период = Дата;

Движение.Номенклатура = ВыборкаДЗ.Номенклатура;

Движение.Количество = ВыборкаДЗ.Количество;

Движение.Сумма = ВыборкаДЗ.Сумма;

Движение.Ответственный = Ответственный;

КонецЦикла;

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

Регистратором прихода является документ «Заказ» , листинг проведения движения которого представлен ниже:

Код изменения статуса аналогичен и имеет следующую структуру:

МенеджерЗаписи = РегистрыСведений.СостояниеЗаказа.СоздатьМенеджерЗаписи();

МенеджерЗаписи.Заказ = Ссылка;

МенеджерЗаписи.Состояние = Перечисления.СостоянияЗаказа.принят;

МенеджерЗаписи.Дата = ТекущаяДата();

МенеджерЗаписи.Записать();

Листинг отчетов:

1. «ОборотноСальдоваяВедомость» – данный отчет предназначен для получения сводной информации обо всех движениях расходных материалов на складе в бухгалтерском учете.

Данный отчет формируется на основе запроса:

ВЫБРАТЬ

ОстаткиМатериаловОстаткиИОбороты.Номенклатура,

ОстаткиМатериаловОстаткиИОбороты.КоличествоНачальныйОстаток,

ОстаткиМатериаловОстаткиИОбороты.СуммаНачальныйОстаток,

ОстаткиМатериаловОстаткиИОбороты.КоличествоПриход,