|
Программое создание документа Поступление товаров в БП 2.0 | ☑ | ||
---|---|---|---|---|
0
pers200590
17.03.14
✎
06:49
|
Здравствуйте, уважаемые форумчане
Подскажите пожалуйста, есть процедура которая создает документ поступление недостающих товаров. как в обработке указать что не используется НДС? Процедура СозданиеОприходованияНаНедостающийТоварНажатие(Элемент) ДокО=ДокументПриход.ПолучитьОбъект() ; Для Каждого СтрД из СписокДок цикл Сообщить ("Обробатывается документ: "+СтрД.Ссылка); Для Каждого СтрТ из СтрД.Ссылка.Товары цикл Отбор=Новый Структура; Отбор.Вставить("Субконто1", СтрТ.Номенклатура); Отбор.Вставить("Счет", ПланыСчетов.Хозрасчетный.ТоварыНаСкладах); Отбор.Вставить("Субконто3", СтрД.Ссылка.Склад); Остаток=РегистрыБухгалтерии.Хозрасчетный.Остатки(СтрД.Ссылка.Дата, ,Отбор); Если СтрТ.Номенклатура.Наименование="Рычаг отжимной кор.сцеп.Т-4 лапка" тогда Сообщить(""); КонецЕсли; Если Остаток.Количество()=0 тогда Ост=0 иначе Ост=Остаток[0].КоличествоОстатокДт-Остаток[0].КоличествоОстатокКт; КонецЕсли; Если СтрТ.Количество>Ост тогда СтрО=ДокО.Товары.Добавить(); СтрО.Номенклатура=СтрТ.Номенклатура; СтрО.Количество=СтрТ.Количество-Ост; СтрО.Цена=СтрТ.Цена/1.05; СтрО.Сумма=СтрО.Количество*СтрО.Цена; СтрО.СуммаНДС=СтрО.Количество*СтрО.Цена*0.18; СтрО.СтавкаНДС=перечисления.СтавкиНДС.НДС18; СтрО.СчетУчета=ПланыСчетов.Хозрасчетный.ТоварыНаСкладах; СтрО.СчетУчетаНДС=ПланыСчетов.Хозрасчетный.НДСпоПриобретеннымМПЗ; КонецЕсли; КонецЦикла; ДокО.Записать(РежимЗаписиДокумента.Проведение); Док=СтрД.Ссылка.ПолучитьОбъект(); Док.Записать(РежимЗаписиДокумента.Проведение); КонецЦикла; |
|||
1
pers200590
17.03.14
✎
06:49
|
И вообще укажите пожалуйста на ошибки
|
|||
2
mehfk
17.03.14
✎
06:54
|
Здесь весь код одна сплошная ошибка.
|
|||
3
pers200590
17.03.14
✎
06:57
|
ну а как тогда
|
|||
4
pers200590
17.03.14
✎
06:57
|
я в обработке получаю список документов реализации вот этим кодом
Процедура СозданиеСпискаРеализацииНажатие(Элемент) Запрос=Новый Запрос; Запрос.Текст= "ВЫБРАТЬ | РеализацияТоваровУслуг.Ссылка |ИЗ | Документ.РеализацияТоваровУслуг КАК РеализацияТоваровУслуг |ГДЕ | РеализацияТоваровУслуг.Дата МЕЖДУ &ДатаОт И &ДатаДо | И РеализацияТоваровУслуг.Организация = &Организация"; запрос.УстановитьПараметр("датаОт",ДатаОт); Запрос.УстановитьПараметр("ДатаДо",КонецДня(ДатаДо)); Запрос.УстановитьПараметр("Организация",организация); Выборка=Запрос.Выполнить(); СписокДок.Загрузить(Выборка.Выгрузить()); КонецПроцедуры |
|||
5
pers200590
17.03.14
✎
06:58
|
ну а потом создаю документ поступления недостающих товаров
|
|||
6
pers200590
17.03.14
✎
07:02
|
В примере у меня НДС работает, а вот как сделать без ндс
|
|||
7
Мимохожий Однако
17.03.14
✎
07:21
|
В созданном документе обойди все строки и установи ставку без НДС, а сумму НДС приравняй к нулю.
|
|||
8
pers200590
17.03.14
✎
07:56
|
подскажите а как установить определенную дату созданного документа
|
|||
9
pers200590
17.03.14
✎
07:56
|
и подставить необходимого контрагента
|
|||
10
Рэйв
17.03.14
✎
08:15
|
(0)Что-то не видно где ты создаешь новый документ
|
|||
11
Рэйв
17.03.14
✎
08:16
|
Но насколько я помню в стандартных чтобы не учитывать НДС надо
Док.УчитыватьНДС=Ложь; |
|||
12
azt-yur
17.03.14
✎
08:17
|
(8),(9)
ДокО.Дата = Дата; ДокО.Контрагент = Контрагент; А вообще лучше получить запросом отрицательные остатки на конец периода, добавить их в документ поступления и уже затем при необходимости перепровести документы. |
|||
13
13_Mult
17.03.14
✎
08:19
|
А ещё лучше сделать контроль отрицательных остатков ))
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |