Вход | Регистрация
 
1С:Предприятие :: 1С:Предприятие 7.7 и ранее

v7: программно создать документ реализация товара 1с 7.7 (Експорт из Excel)

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

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

Заранее спасибо
   zenon46
 
10 - 17.01.19 - 16:39
в 1с 2 дня, и начал с клюшек, это ты зря, клюшки затянут и потом не вылезешь, и будешь плеваться потом от богомерзкой 8ки )
 
 Рекламное место пустует
   Mepcuk
 
11 - 17.01.19 - 16:41
(10) Я не знаю что такое "клюшки".
Мне просто огромная лень вбивать по 150 товаров месяц с продаж в Ебае. Поэтому и рештл автоматизировать процесс
   Mepcuk
 
12 - 17.01.19 - 16:41
(10) Кстати у меня 7.7 - чем богаты тем и рады
   Ray Zexter
 
13 - 17.01.19 - 16:42
Клюшки это 7.7.
   Джинн
 
14 - 17.01.19 - 16:43
(12) Бегите оттуда...
   Mepcuk
 
15 - 17.01.19 - 16:44
Откуда бежать? от клюшек?
   Джинн
 
16 - 17.01.19 - 16:44
(15) Ага. И от тех, кто их использует.
   Ray Zexter
 
17 - 17.01.19 - 16:45
(14) почему сразу "бегите". Человек дорос до автоматизации, пока еще 7.7. Лень - двигатель прогресса.
   VladZ
 
18 - 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) могут использовать только нищие ларьки. А сами ларьки (почему-то) никак не сдохнут. Поэтому из них надо бежать.
   zenon46
 
20 - 17.01.19 - 16:49
(16) странная, логика, вон КБ вся на клюшках, плюс я видел много где еще их используют, у меня есть клиент на комплексной там тысячи строк кода, новые документы и т.п., работает и работают. Одно то как запускается ТиС, достойно уважения. Но в 2к19 начинать разработку в 7.7 уже как то не особо.
   Ray Zexter
 
21 - 17.01.19 - 16:51
(19) Сама 7.7 почему то никак не сдохнет... А вот 8.Х почему то никак не взлетит до небес. тоже много где видел 7.7 а от 8.Х там шарахаются как черт от ладана.
   Mepcuk
 
22 - 17.01.19 - 16:52
Печаль в том что у моего бывшего бухгалтера база была на клюшках и чтобы если что я мог спросить я поставил именно клюшки, добавил базу моей фирмы и Вуаляя.

Так что не я выбрал клюшки - а так сказать они меня
   Масянька
 
23 - 17.01.19 - 16:53
(21) ИМХО, довольно неплохой продукт.
Простой, легкий, понятный...
   Mepcuk
 
24 - 17.01.19 - 16:54
(18) Vlad так жить, не интересно. Первое самому тоже надо уметь, одно дело моя утилитка, я же не пытаюсь тут Microsoft Navision создать в клюшках
   Ray Zexter
 
25 - 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) *Вас
   Ray Zexter
 
29 - 17.01.19 - 16:58
(27) ну не знаю, не знаю. Юзверей, сидящих на 7.7, не так просто было пересадить на 8.Х.
   Масянька
 
30 - 17.01.19 - 16:59
(29) Тут спорить бесполезно.
   trdm
 
31 - 17.01.19 - 17:13
(21) > Сама 7.7 почему то никак не сдохнет...

Оптимиальный продукт по цена/производительность.
v8 уж простите, кушает больше чем дает.
   trdm
 
32 - 17.01.19 - 17:24
С точки зрения наклепанных конфигураций, их актуальности, удобство для прога v8 конечно рулит.
   Ray Zexter
 
33 - 17.01.19 - 17:26
(32) 1С в первую очередь для пользователей а не для прогов. А вот с этим проблемы, пользователи от нее плюются.
 
 
   trdm
 
34 - 17.01.19 - 17:29
(33) Я и сам плююсь от такси и цветовых схем.
   Масянька
 
35 - 17.01.19 - 17:32
(33) +100500
   zenon46
 
36 - 17.01.19 - 18:09
(33) ага, особенно когда бух сидят с разрешением 1024х768 и в УФ видят две кнопки и постоянные скролы по вертикали и горизонтали.
(32) давно известно что разработка для 7.7 намного проще чем для 8х
   Kigo_Kigo
 
37 - 17.01.19 - 18:17
Опять хокейный (клюшки, шайбы)срач развели?
Ну что автор наваял нетленку?
иль чиркани мне письмо, кину в тебя универсалку загрузок из екселя, там тока поля с колонками сопоставить
   Mepcuk
 
38 - 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) Дай доступ аэроадмином. покажу как
   Mikeware
 
41 - 18.01.19 - 09:01
"Беда, коль пироги начнет печи сапожник, а сапоги тачать пирожник"© - написано 205 лет назад...
   AlS
 
42 - 18.01.19 - 09:05
(41) нууу, как сказать...
"только не надо перебивать,
только не надо переживать!
может быть выйдет, а может нет
новая песня, вместо штиблет!"
   VladZ
 
43 - 18.01.19 - 09:34
(38)

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

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


Список тем форума
Рекламное место пустует  Рекламное место пустует
ВНИМАНИЕ! Если вы потеряли окно ввода сообщения, нажмите Ctrl-F5 или Ctrl-R или кнопку "Обновить" в браузере.
Рекламное место пустует