Имя: Пароль:
1C
1C 7.7
v7: программно создать документ реализация товара 1с 7.7 (Експорт из Excel)
0 Mepcuk
 
17.01.19
02:00
Доброго времени суток,

Алгоритм - из Ексела импортируем данные (номер транзакции, сумма, товар)
Не получаеться создать документ Реализация.


//-----++++++++++++++++++++++++++++++++++++++++++++
//------------------------------ Создание документа
   Invoice = СоздатьОбъект("Документ.Реализация");
   Invoice.Новый();
    
Invoice.НоваяСтрока();
    
    
     Invoice.ДатаДок      = ТекущаяДата();
   //ПН.Валюта=Спр.НайтиПоНаименованию("руб.");

  
       //Invoice.Комментарий  = "KBDLHJDKLDLLD";
       Invoice.Контрагент = "Ebay pirkumi";
        Invoice.МестоХранения  = "Склад";
       Invoice.Номенклатура = Product_code;     
       Invoice.Количество  = 1;
       Invoice.Сумма = 100;
       Invoice.Номенклатура.ТипНоменклатуры = "Ebay pirkumi";


П.с. В 1с новичек, стаж 2 дня
Как узнать правильные названия полей для заполнения ??
1 Mepcuk
 
17.01.19
02:08
Как узнать правильные названия полей для заполнения ??
2 catena
 
17.01.19
05:41
Что не получается, как выглядит "не получается"?
Записывать документ после заполнения пробовали?
"Как узнать правильные названия полей для заполнения" - посмотреть в конфигураторе.
3 trdm
 
17.01.19
06:03
4 AlS
 
17.01.19
09:33
(0) 1. Как минимум должно быть Invoice.Записать()
2. Строки добавляются в цикле (если конечно она не в единственном количестве).
3. Правильные названия полей смотрим в конфигураторе, возможно, они у Вас и правильные, но !
Invoice.Контрагент = "Ebay pirkumi"
Поле "контрагент" скорее всего имеет тип Справочник.Контрагенты и записывать туда нужно элемент этого справочника , а не строку "Ebay pirkumi", ну и т.д. - МестаХранения, Номенклатура
5 Mepcuk
 
17.01.19
16:32
(0) Итак решение как посмотреть поля -

1) Запускаем 1С
2) Выбираем режим конфигуратор
3) Верхнее меню Конфигурация - Открыть конфигурацию
4) Найти Документы - Реализация
5) Нужные поля в Реквизиты шапки и табличной части

П.с. Написал ответ для ищуших - так как поисковики не давали ответа
6 Масянька
 
17.01.19
16:35
Как-то не обычно...
До сих не объяснили кто, куда и зачем :)
7 Mepcuk
 
17.01.19
16:35
(5) Всем спасибо за помощь, полную реализацию выложу как напишу.
Авось кому надо, я не жадный
8 Масянька
 
17.01.19
16:37
(7) Кстати, на инфострате полно загрузок из Excel.
9 Mepcuk
 
17.01.19
16:38
Линком не поделитесь?

Заранее спасибо
10 zenon46
 
17.01.19
16:39
в 1с 2 дня, и начал с клюшек, это ты зря, клюшки затянут и потом не вылезешь, и будешь плеваться потом от богомерзкой 8ки )
11 Mepcuk
 
17.01.19
16:41
(10) Я не знаю что такое "клюшки".
Мне просто огромная лень вбивать по 150 товаров месяц с продаж в Ебае. Поэтому и рештл автоматизировать процесс
12 Mepcuk
 
17.01.19
16:41
(10) Кстати у меня 7.7 - чем богаты тем и рады
13 Ray Zexter
 
17.01.19
16:42
Клюшки это 7.7.
14 Джинн
 
17.01.19
16:43
(12) Бегите оттуда...
15 Mepcuk
 
17.01.19
16:44
Откуда бежать? от клюшек?
16 Джинн
 
17.01.19
16:44
(15) Ага. И от тех, кто их использует.
17 Ray Zexter
 
17.01.19
16:45
(14) почему сразу "бегите". Человек дорос до автоматизации, пока еще 7.7. Лень - двигатель прогресса.
18 VladZ
 
17.01.19
16:47
(0) Жуть какая.

1. Пиши код программы по-русски. Иначе специалист, который будет сопровождать твой код проклянет тебя.

2. Invoice.Контрагент = "Ebay pirkumi";
Контрагент - это, скорей всего, элемент справочника "Контрагенты" и его нельзя приравнять к строке.

Программировал когда-нибудь на Паскале? Там быстро научат соблюдать соответствие типов.

Сюда же Invoice.Номенклатура = Product_code;
и Invoice.МестоХранения  = "Склад";

3. Зачем тебе это? Найди спеца, он тебе за 30 мин все сделает.
19 Масянька
 
17.01.19
16:48
(15) Знакомься: это в (14) Джинн.
Он считает, что ларьки должны сдохнуть (будущее России зависит только от крупного бизнеса). А клюшки (т. е. 7.7) могут использовать только нищие ларьки. А сами ларьки (почему-то) никак не сдохнут. Поэтому из них надо бежать.
20 zenon46
 
17.01.19
16:49
(16) странная, логика, вон КБ вся на клюшках, плюс я видел много где еще их используют, у меня есть клиент на комплексной там тысячи строк кода, новые документы и т.п., работает и работают. Одно то как запускается ТиС, достойно уважения. Но в 2к19 начинать разработку в 7.7 уже как то не особо.
21 Ray Zexter
 
17.01.19
16:51
(19) Сама 7.7 почему то никак не сдохнет... А вот 8.Х почему то никак не взлетит до небес. тоже много где видел 7.7 а от 8.Х там шарахаются как черт от ладана.
22 Mepcuk
 
17.01.19
16:52
Печаль в том что у моего бывшего бухгалтера база была на клюшках и чтобы если что я мог спросить я поставил именно клюшки, добавил базу моей фирмы и Вуаляя.

Так что не я выбрал клюшки - а так сказать они меня
23 Масянька
 
17.01.19
16:53
(21) ИМХО, довольно неплохой продукт.
Простой, легкий, понятный...
24 Mepcuk
 
17.01.19
16:54
(18) Vlad так жить, не интересно. Первое самому тоже надо уметь, одно дело моя утилитка, я же не пытаюсь тут Microsoft Navision создать в клюшках
25 Ray Zexter
 
17.01.19
16:54
(23) Многих бесит полумультяшный интерфейс. Ну а про скорость работы мы тактично промолчим...
26 Джинн
 
17.01.19
16:55
(19) Спасибо что за меня придумали мое мнение. Жаль что оно не соответствует действительности, но то такое.

Мне можно за Вам придумать Ваше мнение?
27 Джинн
 
17.01.19
16:55
(21) Причина в тупости и жадности.
28 Джинн
 
17.01.19
16:55
(26) *Вас
29 Ray Zexter
 
17.01.19
16:58
(27) ну не знаю, не знаю. Юзверей, сидящих на 7.7, не так просто было пересадить на 8.Х.
30 Масянька
 
17.01.19
16:59
(29) Тут спорить бесполезно.
31 trdm
 
17.01.19
17:13
(21) > Сама 7.7 почему то никак не сдохнет...

Оптимиальный продукт по цена/производительность.
v8 уж простите, кушает больше чем дает.
32 trdm
 
17.01.19
17:24
С точки зрения наклепанных конфигураций, их актуальности, удобство для прога v8 конечно рулит.
33 Ray Zexter
 
17.01.19
17:26
(32) 1С в первую очередь для пользователей а не для прогов. А вот с этим проблемы, пользователи от нее плюются.
34 trdm
 
17.01.19
17:29
(33) Я и сам плююсь от такси и цветовых схем.
35 Масянька
 
17.01.19
17:32
(33) +100500
36 zenon46
 
17.01.19
18:09
(33) ага, особенно когда бух сидят с разрешением 1024х768 и в УФ видят две кнопки и постоянные скролы по вертикали и горизонтали.
(32) давно известно что разработка для 7.7 намного проще чем для 8х
37 Kigo_Kigo
 
17.01.19
18:17
Опять хокейный (клюшки, шайбы)срач развели?
Ну что автор наваял нетленку?
иль чиркани мне письмо, кину в тебя универсалку загрузок из екселя, там тока поля с колонками сопоставить
38 Mepcuk
 
17.01.19
19:45
(37) В процессе

    Invoice.НоваяСтрока();

     Document_type =СоздатьОбъект("Справочник.Документы");
     Invoice.Документы      = Document_type.НайтиПоНаименованию("Pavadz®me");;
    
     invoice_date = ТекущаяДата();
     Invoice.ДатаДок      = invoice_date;
    
     Currency =СоздатьОбъект("Справочник.Валюты");
     Currency=СоздатьОбъект("Константа.Валютанакладной");
        Invoice.Валюта=Currency.НайтиПоНаименованию("GBP");
  
       //Invoice.Комментарий  = "KBDLHJDKLDLLD";
       Buyer =СоздатьОбъект("Справочник.Контрагенты");
       Invoice.Контрагенты = Buyer.НайтиПоНаименованию("Pirkumi EBAY");
                  
       Цена = 10;
       Invoice.Цена=Цена/Currency.Курс.Получить(ДатаДок);
     Invoice.Сч1=СчетПоКоду("21.30",ПланыСчетов.Основной);
                                                                       
//      Payment_type =СоздатьОбъект("Перечисление.ВидОплаты");
       Invoice.ВидОплаты = "Mazumtidzniec®ba";  
      
       Quantity_def =СоздатьОбъект("Справочник.ЕдИзм");
       Invoice.ЕдИзм = Quantity_def.НайтиПоНаименованию("Gab.");
       
       Store = СоздатьОбъект("Справочник.МестаХранения");
       Invoice.СчетК=СчетПоКоду("23.10");
     Invoice.Счет=СчетПоКоду("61.10");
      
       Invoice.Товар = "Test object";     
       Invoice.Количество  = 7;
       //Invoice.Цена  = 1;
       Invoice.ЕдИзм  = 1;
       Invoice.Сумма = 100;
       Invoice.PVN = 21;  
       Invoice.Итог = 121;
       //Invoice.Сч1 = 2130;
       Invoice.Склад = Store.Quantity_def.НайтиПоНаименованию("Grўmatved®ba");
       //Invoice.СчетСтр = "Ebay pirkumi";              
      
      
   //ПН.ВидОтгрузки  = 11;
   //ПН.НДСвключатьВСтоимость = 1;
   //ПН.Записать();
     Invoice.Записать();
    
     КонецЦикла;

     Рез = Вопрос("Загрузка завершена", 1,3);
39 Масянька
 
18.01.19
08:44
(37) Это не хоккейный срач... Это извечный (уже фиг знает сколько лет) спор: что круче - яйца или курица? :)))))
40 Смотрящий
 
18.01.19
08:50
(38) Дай доступ аэроадмином. покажу как
41 Mikeware
 
18.01.19
09:01
"Беда, коль пироги начнет печи сапожник, а сапоги тачать пирожник"© - написано 205 лет назад...
42 AlS
 
18.01.19
09:05
(41) нууу, как сказать...
"только не надо перебивать,
только не надо переживать!
может быть выйдет, а может нет
новая песня, вместо штиблет!"
43 VladZ
 
18.01.19
09:34
(38)

Currency =СоздатьОбъект("Справочник.Валюты");      Currency=СоздатьОбъект("Константа.Валютанакладной");

- что за бред ты несешь...
44 ADirks
 
18.01.19
09:40
(32) не знаю, не знаю...
что-то от восьмёрки меня по прежнему мутит
и от конфигуратора, и от рантайма
45 Mikeware
 
18.01.19
09:46
(42) "Сделать хотел грозу, а получил козу
Розовую козу с желтою полосой
Вместо хвоста нога, а на ноге рога
Я не хотел бы вновь встретиться с той козой..."©
Не, я понимаю, что плох тот чайник, который не мечтает стать самоваром - но все-таки...
46 Mikeware
 
18.01.19
09:46
(44) с туррбоконфом конфигуратор уже гораздо приятнее...
47 Масянька
 
18.01.19
09:49
(46) О, да... Вот это меня мутит...
48 Mikeware
 
18.01.19
09:54
(47) ???
49 ДенисЧ
 
18.01.19
09:55
(47) Сходи в аптеку, возьми тест... Может, ты уже младший сержант?
50 Масянька
 
18.01.19
09:56
(48) После клюшек.
Здесь можно обсудить любую тему при этом оставаясь на форуме для 1Сников, который нужен для работы. Ymryn