Имя: Пароль:
1C
1С v8
Создание документа цен номенклатуры УТ 10.3
0 Простенький вопросик
 
30.11.11
09:30
Вот пишу такой код, надо всем позициям для начала поставить цену = 1.

   Запрос1 = Новый Запрос();
   Запрос1.Текст = "ВЫБРАТЬ
                   |    Номенклатура.Ссылка
                   |ИЗ
                   |    Справочник.Номенклатура КАК Номенклатура";
                 
       
                   
   ТаблицаНом = Запрос1.Выполнить().Выгрузить();
ЦеныНом=Документы.УстановкаЦенНоменклатуры.СоздатьДокумент();
Для каждого строканом из ТаблицаНом цикл
стрцен=    Ценыном.Товары.Добавить();
стрцен.Номенклатура=ТаблицаНом.Ссылка;
стрцен.Цена=1;

конеццикла;
  ЦеныНом.Записать();

Ничего не происходит. что надо поправить?
1 Umka2008
 
30.11.11
09:31
Там сначала надо таблицу типов цен заполнить ...
2 Buster007
 
30.11.11
09:32
ну как бы посмотреть как вообще работать с документом
3 Error pro
 
30.11.11
09:32
(0) аж противно код смотреть.
4 Простенький вопросик
 
30.11.11
09:34
Ну напишите, как надо, если умные такие
5 чувак
 
30.11.11
09:35
Отладчиком провер, может табличная часть заполнена, просто в форме не отображается
6 Buster007
 
30.11.11
09:36
(4) посмотреть код тебе религия не позволяет? там есть обработкаЗаполнения, в которой заполняется документ, например, на основании поступления товаров и услуг. Неужели нельзя посмотреть?
7 nazi
 
30.11.11
09:38
там как бы 2 ТЧ, без заполнения 1й - 2я не заполняется
8 Umka2008
 
30.11.11
09:39
7 а я ему про что в 1 ?
9 nazi
 
30.11.11
09:42
(8) сорри не увидел)
10 Простенький вопросик
 
30.11.11
09:47
Вот я так написал, что то отработало, документ появился.

   Запрос1 = Новый Запрос();
   Запрос1.Текст = "ВЫБРАТЬ
                   |    Номенклатура.Ссылка
                   |ИЗ
                   |    Справочник.Номенклатура КАК Номенклатура";
                 
       
                   
   ТаблицаНом = Запрос1.Выполнить().Выгрузить();
ЦеныНом=Документы.УстановкаЦенНоменклатуры.СоздатьДокумент();
типцен=Ценыном.ТипыЦен.Добавить();
типцен.ТипЦен=справочники.ТипыЦенНоменклатуры.НайтиПоНаименованию("закупочный");
Для каждого строканом из ТаблицаНом цикл
стрцен=    Ценыном.Товары.Добавить();
стрцен.Номенклатура=строканом.Ссылка;
стрцен.Цена=1;

конеццикла;
ценыном.Дата=текущаяДата();
  ЦеныНом.Записать();

Но при его открытии пишется ошибка {Документ.УстановкаЦенНоменклатуры.Форма.ФормаДокумента.Форма(597)}: Поле объекта не обнаружено (цена)
       НоваяСтрока["цена" + НомерСоответствияТекущейКолонки] = СтрокаТаблицыТоваров.Цена;

Что это может значить?
11 hhhh
 
30.11.11
09:51
(10) отладчиком посмотри. Чего прикалываешься? ДО пятницы еще далеко.
12 Простенький вопросик
 
30.11.11
09:57
Какие еще будут мнения?
13 nazi
 
30.11.11
09:57
(10) табличная часть товаров там хитро построенна, она изменяется от того сколько элементов в ТЧ "ТипыЦен", поэтому кури код документа
14 Поручик
 
30.11.11
09:59
(12) Учить матчасть. Установка цен номенклатуры довольно хитросделанный объект.
15 Простенький вопросик
 
30.11.11
10:00
Ну это понятно. но может кто-то хорошо щарит в этих хитростях и добавит пару строк кода?
16 hhhh
 
30.11.11
10:01
(15) ты тип цен там вообще не указал. Только магическая формула: цена = 1. Махни рюмашку уже, может мозг начнет потихоньку просыпаться.
17 nazi
 
30.11.11
10:01
(15) поиск по модулую сделай "НоваяСтрока["цена" + НомерСоответствияТекущейКолонки] = СтрокаТаблицыТоваров.Цена"
18 DrShad
 
30.11.11
10:02
(15) сколько?
19 Поручик
 
30.11.11
10:03
(15) Свой мозг включить не предлагать?
(18) Какие сколько, это студентота нищебродная.
20 DrShad
 
30.11.11
10:04
(19) но ведь родители у него есть?
21 FIXXXL
 
30.11.11
10:08
Если ЗначениеЗаполнено(КолонкаТипЦен1) Тогда
       Нстрока = ТЧТипов.Добавить();
       Нстрока.ТипЦен = КолонкаТипЦен1;
       ДобавитьТип1 = Истина;
       Тип1 = КолонкаТипЦен1;
   КонецЕсли;

Если ДобавитьТип1 и стрТип.ТипЦен=Тип1 Тогда
                   НоваяСтрока = ТЧТовар.Добавить();
                   НоваяСтрока.Номенклатура = стрТовар.НоменклатураВБазе;
                   НоваяСтрока.ЕдиницаИзмерения = стрТовар.НоменклатураВБазе.ЕдиницаХраненияОстатков;
                   НоваяСтрока.ТипЦен = КолонкаТипЦен1;
                   НоваяСтрока.Валюта = ВалютаДокумента;
                   НоваяСтрока.Цена = стрТовар.ЦеныПоТипу1;
                   НоваяСтрока.ИндексСтрокиТаблицыЦен = стрТовар.НомерСтроки - 1;
22 Простенький вопросик
 
30.11.11
10:23
данунах, создам лучше кнопку в самом документе и никакого гемора
23 DrShad
 
30.11.11
10:27
(22) ага, удачи
24 sergey yevsenya
 
30.11.11
10:33
И такие люди идут в программисты...
25 FIXXXL
 
30.11.11
10:43
(22) будет не проще
форма там хитрая
26 Простенький вопросик
 
30.11.11
11:02
Ваще засада. Ладно, разобрался другим путем. Унирепс 8.2 рулит.