Билет 13
Оперативный учет
В компании используется оборудование, имеющее ограничения к эксплуатации. Для каждого устройства устанавливается срок годности и срок использования. Срок годности считается с момента приобретения оборудования и указывается в документе поступления, а срок эксплуатации с момента его ввода в эксплуатацию и указывается непосредственно для оборудования и не меняется. Поступление оборудования отражается документом «Приходная накладная». Через некоторое время оборудование вводится в эксплуатацию документом «Ввод в эксплуатацию».
При передаче оборудования в эксплуатацию в первую очередь передастся оборудование, у которого минимальный срок годности. В документе «Ввод в эксплуатацию» указывается перечень и количество передаваемого оборудования. При проведении должна происходить проверка на наличие оборудования и его срок годности. В том случае, если срок годности истек или оборудования недостаточно, документ не проводится и выдается соответствующее сообщение.
Раз в месяц формируется регламентный документ «Выбытие оборудования», который при проведении проверяет эксплуатируемое оборудование и, если оно негодно, то списывает его. При проверке определяется, вышел ли срок эксплуатации устройства с момента его ввода в эксплуатацию. Если срок эксплуатации истек или истек срок годности, то оборудование должно быть списано. Кроме того, этот же документ должен списывать еще не введенное в эксплуатацию оборудование, но срок годности, которого уже истек.
Учет оборудования в разрезе складов не ведется. Себестоимость оборудования рассчитывается как средняя.
Необходимо создать отчет о состоянии эксплуатируемого оборудования на выбранную дату.
Состояние оборудования в эксплуатации на 31.01.2010
Оборудование | Кол-во | Сумма | Оставшийся срок годн. | Оставшийся срок эксп. |
Кинокамера | 3 | 3 000 | 60 | 20 |
Портсигар | 2 | 400 | 500 | 520 |
Справочник «Номенклатура», рекв. СрокЭксплуатации (число)
Документ «ПриходнаяНакладная»
ТЧ СписокНоменклатуры: Номенклатура, СрокГодности (число), Количество, Сумма
Процедура ОбработкаПроведения(Отказ, Режим)
День = 24*60*60;
Движения. Оборудование. Очистить();
Движения. Оборудование. Записать();
Движения. ОстаткиНоменклатуры. Очистить();
Движения. ОстаткиНоменклатуры. Записать();
Движения. Оборудование. Записывать = Истина;
Движения. ОстаткиНоменклатуры. Записывать = Истина;
Для Каждого ТекСтрокаСписокНоменклатуры Из СписокНоменклатуры Цикл
// регистр ОстаткиНоменклатуры Приход
Движение = Движения. ОстаткиНоменклатуры. Добавить();
Движение. ВидДвижения = ВидДвиженияНакопления. Приход;
Движение. Период = Дата;
Движение. Номенклатура = ТекСтрокаСписокНоменклатуры. Номенклатура;
Движение. Количество = ТекСтрокаСписокНоменклатуры. Количество;
Движение. Сумма = ТекСтрокаСписокНоменклатуры. Сумма;
// регистр Оборудование Приход
Движение = Движения. Оборудование. Добавить();
Движение. ВидДвижения = ВидДвиженияНакопления. Приход;
Движение. Период = Дата;
Движение. Номенклатура = ТекСтрокаСписокНоменклатуры. Номенклатура;
Движение. СрокГодности = Дата + ТекСтрокаСписокНоменклатуры. СрокГодности*День;
Движение. Количество = ТекСтрокаСписокНоменклатуры. Количество;
КонецЦикла;
КонецПроцедуры
Документ «ВводВЭксплуатацию»
ТЧ СписокНоменклатуры: Номенклатура, Количество
Процедура ОбработкаПроведения(Отказ, Режим)
Движения. Оборудование. Очистить();
Движения. Оборудование. Записать();
Движения. Оборудование. Записывать = Истина;
День = 24*60*60;
Блокировка = Новый БлокировкаДанных;
ЭлементБлокировки = Блокировка. Добавить("РегистрНакопления. Оборудование");
ЭлементБлокировки. ИсточникДанных = СписокНоменклатуры;
ЭлементБлокировки. ИспользоватьИзИсточникаДанных("Номенклатура", "Номенклатура");
Блокировка. Заблокировать();
Запрос = Новый Запрос;
Запрос. Текст =
"ВЫБРАТЬ
| ВводВЭксплуатациюСписокНоменклатуры. Номенклатура,
| СУММА(ВводВЭксплуатациюСписокНоменклатуры. Количество) КАК КоличествоДок
|ПОМЕСТИТЬ ВТ_ТЧ
|ИЗ
| Документ. ВводВЭксплуатацию. СписокНоменклатуры КАК ВводВЭксплуатациюСписокНоменклатуры
|ГДЕ
| ВводВЭксплуатациюСписокНоменклатуры. Ссылка = &Ссылка
|
|СГРУППИРОВАТЬ ПО
| ВводВЭксплуатациюСписокНоменклатуры. Номенклатура
|;
|
|////////////////////////////////////////////////////////////////////////////////
|ВЫБРАТЬ
| ВТ_ТЧ. Номенклатура КАК Номенклатура,
| ВТ_ТЧ. КоличествоДок КАК КоличествоДок,
| ЕСТЬNULL(ОборудованиеОстатки. СрокГодности, ДАТАВРЕМЯ(1, 1, 1)) КАК СрокГодности,
| ЕСТЬNULL(ОборудованиеОстатки. КоличествоОстаток, 0) КАК КоличествоОстаток,
| ПРЕДСТАВЛЕНИЕ(ВТ_ТЧ. Номенклатура),
| ВТ_ТЧ. Номенклатура. СрокЭксплуатации КАК СрокЭксплуатации
|ИЗ
| ВТ_ТЧ КАК ВТ_ТЧ
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления. Оборудование. Остатки(
| &МоментВремени,
| Номенклатура В
| (ВЫБРАТЬ
| ВТ_ТЧ. Номенклатура
| ИЗ
| ВТ_ТЧ КАК ВТ_ТЧ)
| И СрокГодности >= &Дата
|
Из за большого объема этот материал размещен на нескольких страницах:
1 2 3 4 5 6 7 8 9 |


