[Специалист профессионал 1С 8.2 8.3 ]
Главная » 2013 » Октябрь » 03
Задача 1.6 Оперативный учет
 
 

Регистр сведений УчетнаяПолитика с реквизитом КонтролироватьОтрицательныеОстатки тип булево периодичность год

1)  Учет ведется в разрезе сроков годности .поэтому в регистры остатки ,продажи добавляем измерение СрокГодности тип дата и в таб часть Приходной.

2) в Приходной пишем след код :


Процедура ОбработкаПроведения(Отказ, Режим)
Движения.ОстаткиНоменклатуры.Записывать = Истина;
Движения.ОстаткиНоменклатуры.Записать();  
УчитыватьКонтрольОстатков = РегистрыСведени ... Читать дальше »
Просмотров: 5481 | Добавил: moshefoo | Дата: 03.10.2013 | Комментарии (1)

Задача 1.5
 
и в этой задаче  списание партий будет по фифо лифо,средняя

фиксироваться учетная политика будет отдельным документом  ИзменениеУчетнойПолитики

в этом документе 1 реквизит УчетнаяПолитика = ПеречислениеСсылка.УчетнаяПолитика.

также добавим в  перечисление учетная политика новое значение ПоСредней

1) в приходной код:


 

Процедура ОбработкаПроведения(Отказ, РежимПроведения)
Движения.ОстаткиНоменклатуры.Записывать = Истина;
////////////////////////////////////////////////////
УчетнаяПолитика = РегистрыСведений.УчетныеПолитики.ПолучитьПоследнее(МоментВремени( ... Читать дальше »
Просмотров: 3987 | Добавил: moshefoo | Дата: 03.10.2013 | Комментарии (0)

Задача 1.4 Оперативный учет
  списание товара в расходной не по средней будет .а согласно учетной политике 

1) в Приходной код:

Процедура ОбработкаПроведения(Отказ, Режим)
//{{__КОНСТРУКТОР_ДВИЖЕНИЙ_РЕГИСТРОВ
// Данный фрагмент построен конструктором.
// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!

// регистр ОстаткиНоменклатуры Приход
Движения.ОстаткиНоменклатуры.Записывать = Истина;
Для Каждого ТекСтрокаСписокНоменклатуры Из СписокНоменклатуры Цикл
Просмотров: 2975 | Добавил: moshefoo | Дата: 03.10.2013 | Комментарии (0)

Задача 1.3 Оперативный учет
 партию для списания в расходной мы теперь указываем в табличной части документа. об учетной политике в задании не слова поэтому списывать товар будем по средней и отчеты у нас стали посложнее

1)в приходной в модуле объекта пишем след код:

тут попробуем загрузить данные в регистр сразу из таб части документа 


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

Процедура ОбработкаПроведения(Отказ, РежимПроведения)
// Вставить содержимое обработчика.
Просмотров: 3343 | Добавил: moshefoo | Дата: 03.10.2013 | Комментарии (0)

Задача 1.2 Оперативный учет
Все те же яйца только в профиль

1) в этой задаче мы партии берем не из регистра остатки, а прямо из шапки документа расходная 


в приходной можно для красоты вставить след код: в модуле формы создадим форму документа приходная

&НаКлиенте
Процедура СписокНоменклатурыКоличествоПриИзменении(Элемент)
// Вставить содержимое обработчика.
ТД = Элементы.СписокНоменклатуры.ТекущиеДанные;
Тд.Сумма = Тд.Количество * ТД.Цена;
КонецПроцедуры

&НаКлиенте
Процедура СписокНоменклатурыЦенаПриИзменении(Элемент)
// Вставить содержимое обработчика.
Просмотров: 2777 | Добавил: moshefoo | Дата: 03.10.2013 | Комментарии (0)

Задача 1.1 оперативный учет
1) добавляем в справ номенклатура реквезит видНоменклатуры =ПеречислениеСсылка.ВидыНоменклатуры

2)фифо перв пришел перв ушел лифо послед пришел первым ушел

3) по партиям с переодичн  в год 
поэтому создаем регистр сведений УчетнаяПолитика с реквизитом ресурс  называем его как Значение  с ссылкой на перечисление ПеречислениеСсылка.УчетнаяПолитика  
4) в регистр  ОстаткиНоменклатуры  добавляем  измерение Партия с ссылкой на =ДокументСсылка.ПриходнаяНакладная и ресурс стоимость  
5)скопируем регистр ОстаткиНоменклатуры и сделаем его оборотным,переименуем его назовем Продажи  измерения не меняем, ресурсы будут такие количество .себестоимость.СуммаПродаж
5)в  модуле объекта приходной пишем след код :

Процедура ОбработкаПроведения(Отказ, Режим)
Просмотров: 4043 | Добавил: moshefoo | Дата: 03.10.2013 | Комментарии (0)