|
v7: Создание документа программно | ☑ | ||
---|---|---|---|---|
0
san4ez1008
28.03.17
✎
03:54
|
Ребят,помогите пожалуйста, не могу никак создать документ "Заявка покупателя" программно, вид "заявка на склад", не могу понять как с перечислениями работать((
|
|||
1
san4ez1008
28.03.17
✎
03:55
|
Конф комплексная 4.5
|
|||
2
tmp_loader
28.03.17
✎
04:50
|
(0) Учили в детстве документацию читать?
|
|||
3
san4ez1008
28.03.17
✎
05:20
|
(2) в детстве не учили,в универе только пришлось
Вообще пытался вникнуть,но ничего не понял. Начал создавать документ Документ = СоздатьОбъект("Документ.ЗаявкаПокупателя"); А дальше что? |
|||
4
tmp_loader
28.03.17
✎
05:22
|
(3) Что конкретно не понятно? Ничего не понял, значит не читал.
|
|||
5
vcv
28.03.17
✎
05:28
|
(3) В дальше
Документ.ВидОперации = Перечисление.ВидыОперацийЗаявок.НаСклад; |
|||
6
san4ez1008
28.03.17
✎
05:32
|
(5) вот ВидОперации я и не нашел в СП...
|
|||
7
tmp_loader
28.03.17
✎
05:33
|
(6) А то что это реквизит дока, это ничего не значит?
|
|||
8
san4ez1008
28.03.17
✎
05:34
|
(7) еще не все реквизиты разобрал, прошу прощения((
|
|||
9
vcv
28.03.17
✎
05:34
|
(6) Это реквизит шапки документа. И начни читать процедуру ВводНового() в модуле формы документа. Нам всё написано о том, как нужно создавать новые документы.
|
|||
10
tmp_loader
28.03.17
✎
05:39
|
(8) Зачем не разобравшись писать начал?
|
|||
11
Birmingem
28.03.17
✎
11:31
|
Документ = СоздатьОбъект("Документ.ЗаявкаПокупателя");
Документ.Новый(); Документ.ДатаДок= Документ.ВидОперации= ... ... Документ.Записать(); |
|||
12
DrZombi
гуру
28.03.17
✎
11:37
|
(11) ТС еще до ДатаДок не дочитал, вы спешите :)
|
|||
13
Злопчинский
28.03.17
✎
15:48
|
Примерно так:
. ДокЗаявкаОсновная = СоздатьОбъект("Документ.ЗаявкаПокупателя"); ДокЗаявкаОсновная.Новый(); глЗаполнитьШапку(ДокЗаявкаОсновная,); ДокЗаявкаОсновная.Контрагент = парКлиент; глПриИзмененииКонтрагента(ДокЗаявкаОсновная); ДокЗаявкаОсновная.ВидОперации = Перечисление.ВидыОперацийЗаявок.НаСклад; ДокЗаявкаОсновная.ВыбратьСтроки(); Пока ДокЗаявкаОсновная.ПолучитьСтроку() = 1 Цикл //заполнить строку: цена, единица, коэффициент, количество глПересчетТаблЧасти(ДокЗаявкаОсновная,"Цена"); КонецЦикла; ДокЗаявкаОсновная.СуммаВзаиморасчетов = глПересчет(ДокЗаявкаОсновная.Итог("Сумма")+ ?(ДокЗаявкаОсновная.СуммаВклНП =1,0,ДокЗаявкаОсновная.Итог("СуммаНП"))+?(ДокЗаявкаОсновная.СуммаВклНДС=1,0,ДокЗаявкаОсновная.Итог("СуммаНДС")), ДокЗаявкаОсновная.Валюта,ДокЗаявкаОсновная.Курс,ДокЗаявкаОсновная.Договор.ВалютаВзаиморасчетов,ДокЗаявкаОсновная.ДатаДок); ДокЗаявкаОсновная.Записать(); |
|||
14
san4ez1008
31.03.17
✎
11:22
|
(11) (13) спасибо за помощь,но есть еще вопрос, надо программно в столбце "единица" указать "шт", но не получается(
Единица = СоздатьОбъект("Справочник.Единицы"); Единица.НайтиПоНаименованию("шт"); Документ.Единица = Единица.ТекущийЭлемент(); |
|||
15
HawkEye
31.03.17
✎
11:23
|
(14) потому что ты еще не прочитал про подчиненные справочники )))
|
|||
16
АгентБезопасной Нацио
31.03.17
✎
11:25
|
(15) процесс долгий... сначала буквы изучить, потом слоги...
|
|||
17
Herby
31.03.17
✎
11:36
|
зачем новоиспеченному выпускнику ВУЗа изучать 1с 7.7?
бесполезная трата времени и сил. не, я 7.7 люблю, но новичкам изучать ее - бред. |
|||
18
АгентБезопасной Нацио
31.03.17
✎
11:41
|
(17) "изучать" - сильно сказано.
|
|||
19
Злопчинский
31.03.17
✎
13:01
|
В цикле где идёт перебор строк и их заполнение
|
|||
20
Злопчинский
31.03.17
✎
13:03
|
Докзаявкаоснрвная.единица = доза явка основная.номенклатура.базовая единица;
Докзаявкаосновная.коэффициент=1; |
|||
21
Базис
naïve
31.03.17
✎
13:07
|
Почитай пока подходящие куски кода. Подходящие - это те, которые найдёшь поиском по всем текстам того фрагмента, что тебе уже понятен. Поиск по всем текстам находится в меню "Конфигурация".
|
|||
22
Базис
naïve
31.03.17
✎
13:08
|
Или читай firststeps.ru/1c
|
|||
23
san4ez1008
04.04.17
✎
02:50
|
(20) а я как обычно гланды через (_*_) выдираю... спасибо большое
|
|||
24
VladZ
04.04.17
✎
05:54
|
(0) Самый хороший пример - это готовый код. Ищешь в конфе нужный тебе код и делаешь так же.
|
|||
25
АгентБезопасной Нацио
04.04.17
✎
06:51
|
(24) не факт, что код найдется, и будет правильный....
хотя для начала пойдет. почти все так учились... |
|||
26
VladZ
04.04.17
✎
07:05
|
(25) Для типовых задач вероятность, что подобный код уже есть - 80-90%.
|
|||
27
Злопчинский
04.04.17
✎
08:00
|
(26) и даже есть люди которые знают что он есть и даже в каком месте. Здесь вам не там!
|
|||
28
san4ez1008
07.04.17
✎
09:51
|
не могу найти пробел в строке(
Разд=Найти(ТЗ1.Код1," "); выдает 0 |
|||
29
Это_mike
07.04.17
✎
09:53
|
(28) тяжело искать черную кошку в темной комнате, особенно если ее там нет...
|
|||
30
san4ez1008
07.04.17
✎
09:56
|
(29) в экселе есть код/артикул 259 006/1 798 496
отсекаю все, что есть после /, запихал в ТЗ, пытаюсь убрать пробел в 259 006 строчкой выше-не помогает |
|||
31
san4ez1008
07.04.17
✎
09:57
|
пытаюсь преобразовать 259 006 в число-первые 3 цифры здрасьте, остальные-досвидос
|
|||
32
Это_mike
07.04.17
✎
09:58
|
(30) ну так получи символ из нужного места, и посмотри, убедись, что это не пробел...
|
|||
33
san4ez1008
07.04.17
✎
10:11
|
Разд=КодСимв(сред(ТЗ1.КодСамбери1,4,1));
Сообщить(Разд); однако 160 выдал |
|||
34
1dvd
07.04.17
✎
10:13
|
Символы.НПП
|
|||
35
Это_mike
07.04.17
✎
10:14
|
(34) в клюшках такого нет
|
|||
36
Это_mike
07.04.17
✎
10:15
|
(33) "ну вот видишь, фосфор уже начал действовать!"©
удаляй симв(160) |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |