Заказы на доработку 1С (сервис удаленной работы)

Хранилище

База знаний
Бесплатные отчеты, обработки, конфигурации, внешние компоненты для 1С Статьи, описание работы, методики по работе с 1С

Здравствуйте, гость ( Вход | Зарегистрироваться )



> Создание документа Поступление товаров и услуг          
SPBatyus Подменю пользователя
сообщение 07.02.18, 16:32
Сообщение #1

Общительный
**
Группа: Пользователи
Сообщений: 25
Спасибо сказали: 3 раз
Рейтинг: 0

Колеги, вітаю.

Конфігурація: Бухгалтерія для України, редакція 1.2. (1.2.43.1)

Намагаюсь програмно створити документ "Надходження товарів і послуг".
Заповнюю всі необхідні реквізити, проводжу документ.
Заходжу в документ через графічний інтерфейс користувача.
В табличній частині "Товари" не бачу ряд реквізитів, які я програмно заповнював. Відповідно немає необхідних проводок.
А саме, немає суми ПДВ і проводки по ПДВ.

Хоча при створенні даного документа через графічний інтерфейс користувача всі поля присутні, їх можна заповнити і при проведенні документа проводка по ПДВ формується.

Прошу Вашої допомоги.


podcast Подменю пользователя
сообщение 07.02.18, 16:39
Сообщение #2

Оратор
Иконка группы
Группа: Местный
Сообщений: 306
Спасибо сказали: 74 раз
Рейтинг: 0

SPBatyus @ Сегодня, 16:32 * ,
Реквизит УчитыватьНДС заполняете?

logist Подменю пользователя
сообщение 07.02.18, 16:49
Сообщение #3

Про1С-ник
Иконка группы
Квалифицированный бухгалтерГений телепатии и социального моделированияЗа заслуги на форуме в 2010 годуМодератору Про1С (за заслуги в 2011 году)
Группа: Местный
Сообщений: 9564
Из: Kharkiv, UA
Спасибо сказали: 2536 раз
Рейтинг: 0

При программном создании документа используйте те же процедуры которые выполняются при интерактивном создании (напр.: ЗаполнениеДокументов.ЗаполнитьОбязательныеРеквизитыШапкиНовогоДокумента и т.д.), т.е. всё что описано в форме ПриОткрытии и условии ЭтоНовый()


Signature
Личные бесплатные консультации не даю, для этого есть форум!

SPBatyus Подменю пользователя
сообщение 07.02.18, 16:59
Сообщение #4

Общительный
**
Группа: Пользователи
Сообщений: 25
Спасибо сказали: 3 раз
Рейтинг: 0

Додав. Не допомогло.

Але звернув увагу, що в проводці з ПДВ Зміст - Оприходование ТМЦ

А в мене - Зачет аванса поставщику

logist Подменю пользователя
сообщение 07.02.18, 17:02
Сообщение #5

Про1С-ник
Иконка группы
Квалифицированный бухгалтерГений телепатии и социального моделированияЗа заслуги на форуме в 2010 годуМодератору Про1С (за заслуги в 2011 году)
Группа: Местный
Сообщений: 9564
Из: Kharkiv, UA
Спасибо сказали: 2536 раз
Рейтинг: 0

Когда программно добавляете номенклатуру в ТЧ так же выполняйте то что происходит интерактивно, в ТоварыНоменклатураПриИзменени, ТоварыКоличествоПриИзменении и т.п.


Signature
Личные бесплатные консультации не даю, для этого есть форум!

Petre Подменю пользователя
сообщение 07.02.18, 17:12
Сообщение #6

Живет на форуме
Иконка группы
Группа: Местный
Сообщений: 2902
Из: Київ, Україна
Спасибо сказали: 1144 раз
Рейтинг: 1225

SPBatyus @ Сегодня, 16:32 * ,
Щоб знайти помилку у коді, потрібно бачити код.


Signature
Допрацьовую:
- "Бухгалтерія для України 2.1";
- "Альфа-Авто: Автосалон+Автосервіс+Автозапчастини, українська версія".

Спасибо сказали: Vofka,

SPBatyus Подменю пользователя
сообщение 08.02.18, 9:45
Сообщение #7

Общительный
**
Группа: Пользователи
Сообщений: 25
Спасибо сказали: 3 раз
Рейтинг: 0

Код скорочено, але смисл має бути зрозумілим:

Для Каждого СтрТЗСпискаПриходныхНакладных из ТЗСписокПриходныхНакладных Цикл

НовыйДокумент = Документы.ПоступлениеТоваровУслуг.СоздатьДокумент();

НовыйДокумент.Дата = СтрТЗСпискаПриходныхНакладных.Дата;
НовыйДокумент.Организация = выбОрганизация;
НовыйДокумент.Контрагент = КонтрагентОбъектСсылка.Ссылка;
НовыйДокумент.Склад = СкладОбъектСсылка.ПолучитьОбъект().Ссылка;
НовыйДокумент.ВидОперации = Перечисления.ВидыОперацийПоступлениеТоваровУслуг.ПокупкаКомиссия;
НовыйДокумент.ВалютаДокумента = Справочники.Валюты.НайтиПоНаименованию("грн");
НовыйДокумент.УчитыватьНДС = Истина;
НовыйДокумент.СчетУчетаНДС = ПланыСчетов.Хозрасчетный.НайтиПоКоду("6442");
НовыйДокумент.СчетУчетаНДСПодтвержденный = ПланыСчетов.Хозрасчетный.НайтиПоКоду("6441");
НовыйДокумент.СчетУчетаРасчетовПоАвансам = ПланыСчетов.Хозрасчетный.НайтиПоКоду("3711");
НовыйДокумент.НомерВходящегоДокумента = СтрТЗСпискаПриходныхНакладных.НомерВход;
НовыйДокумент.ДатаВходящегоДокумента = СтрТЗСпискаПриходныхНакладных.ДатаВход;
НовыйДокумент.СчетУчетаРасчетовСКонтрагентом = ПланыСчетов.Хозрасчетный.НайтиПоКоду("631");
НовыйДокумент.ДоговорКонтрагента = ДоговорОбъектСсылка;

НоваяСтрокаТЧТОвары = НовыйДокумент.Товары.Добавить();
НоваяСтрокаТЧТОвары.Номенклатура = Справочники.Номенклатура.НайтиПоКоду("00000000083");
НоваяСтрокаТЧТОвары.Количество = 1;
НоваяСтрокаТЧТОвары.Коэффициент = 1;
НоваяСтрокаТЧТОвары.Цена = СтрТЗСпискаПриходныхНакладных.СуммаБезНДС;
НоваяСтрокаТЧТОвары.ЕдиницаИзмерения =  Справочники.КлассификаторЕдиницИзмерения.НайтиПоНаименованию("шт");
НоваяСтрокаТЧТОвары.Сумма = СтрТЗСпискаПриходныхНакладных.СуммаБезНДС;
НоваяСтрокаТЧТОвары.СуммаНДС = СтрТЗСпискаПриходныхНакладных.СуммаНДС;
НоваяСтрокаТЧТОвары.СтавкаНДС = Перечисления.СтавкиНДС.НДС7;
НоваяСтрокаТЧТОвары.СчетУчетаБУ = ПланыСчетов.Хозрасчетный.НайтиПоКоду("2821");
НоваяСтрокаТЧТОвары.НалоговоеНазначение = Справочники.НалоговыеНазначенияАктивовИЗатрат.НДС_Облагаемая;

НовыйДокумент.Записать(РежимЗаписиДокумента.Проведение, РежимПроведенияДокумента.Неоперативный);

ТЗСписокПриходныхНакладных.Очистить();

КонецЦикла;


Сообщение отредактировал Vofka - 08.02.18, 9:58

Petre Подменю пользователя
сообщение 08.02.18, 10:21
Сообщение #8

Живет на форуме
Иконка группы
Группа: Местный
Сообщений: 2902
Из: Київ, Україна
Спасибо сказали: 1144 раз
Рейтинг: 1225

SPBatyus @ Сегодня, 9:45 * ,
Щоб зрозуміти що не так, порівняйте дані документу (використовуючи консоль запиту) щойно створеного та ще не відкритого із самим собою після відкриття та перепроведення.
Ну а так за кодом не побачив присвоєння "КратностьВзаиморасчетов", "КурсВзаиморасчетов"...


Signature
Допрацьовую:
- "Бухгалтерія для України 2.1";
- "Альфа-Авто: Автосалон+Автосервіс+Автозапчастини, українська версія".

SPBatyus Подменю пользователя
сообщение 08.02.18, 11:50
Сообщение #9

Общительный
**
Группа: Пользователи
Сообщений: 25
Спасибо сказали: 3 раз
Рейтинг: 0

Petre @ Сегодня, 10:21 * ,

Дякую.

Добавив:

НовыйДокумент.КурсВзаиморасчетов = 1;
НовыйДокумент.КратностьВзаиморасчетов = 1;

і питання вирішилося.

Vofka Подменю пользователя
сообщение 08.02.18, 12:58
Сообщение #10

У нас здесь своя атмосфера...
***********
Группа: Основатель
Сообщений: 13948
Из: Киев
Спасибо сказали: 4514 раз
Рейтинг: 3635.6

SPBatyus, для спасибо у нас есть специальная кнопочка.

Не нашли ответа на свой вопрос?
Зарегистрируйтесь и задайте новый вопрос.


Ответить Новая тема
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

RSS Текстовая версия Сейчас: 28.03.24, 11:14
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!