1с бухгалтерія

Відповісти
Georg
Зацікавлений
Повідомлень: 88
З нами з: 04 квітня 2013, 20:35

1с бухгалтерія

Повідомлення Georg » 10 січня 2015, 18:48

привіт,можливо хтось знає щось з цієї сфери_)
не розумію який треба написати код для того щоб разом із назвою товару затягувало і його ціну)

Аватар користувача
Tweak
Постійний користувач
Повідомлень: 1181
З нами з: 25 листопада 2012, 15:04
Звідки: Черновцы
Дякував (ла): 60 разів
Подякували: 75 разів
Контактна інформація:

Re: 1с бухгалтерія

Повідомлення Tweak » 10 січня 2015, 19:01

Можно так:

Код: Виділити все

Спр = СоздатьОбъект("Справочник.Номенклатура");

   Спр.ВыбратьЭлементы();

   Пока Спр.ПолучитьЭлемент() > 0 Цикл

     Если Строка(Спр.Наименование)=Строка(Матеріал) Тогда

       Ціна=Спр.Ціна;

     КонецЕсли;

 КонецЦикла;
Соответственно поменяйте названия на свои

Аватар користувача
KVadik
Доцент
Повідомлень: 9863
З нами з: 03 травня 2013, 10:35
Дякував (ла): 1067 разів
Подякували: 1466 разів
Контактна інформація:

Re: 1с бухгалтерія

Повідомлення KVadik » 10 січня 2015, 19:02

Georg писав:привіт,можливо хтось знає щось з цієї сфери_)
не розумію який треба написати код для того щоб разом із назвою товару затягувало і його ціну)
*facepalm
˙иʞuɐv ʁнǝw ʎ ɐ
‘˙˙˙ʁɔvʎнdǝвǝdǝu dиw – ɐwʎ ɔ vǝmоɔ dиw

Аватар користувача
KVadik
Доцент
Повідомлень: 9863
З нами з: 03 травня 2013, 10:35
Дякував (ла): 1067 разів
Подякували: 1466 разів
Контактна інформація:

Re: 1с бухгалтерія

Повідомлення KVadik » 10 січня 2015, 19:04

Tweak писав:Можно так:

Код: Виділити все

Спр = СоздатьОбъект("Справочник.Номенклатура");

   Спр.ВыбратьЭлементы();

   Пока Спр.ПолучитьЭлемент() > 0 Цикл

     Если Строка(Спр.Наименование)=Строка(Матеріал) Тогда

       Ціна=Спр.Ціна;

     КонецЕсли;

 КонецЦикла;
Соответственно поменяйте названия на свои
*facepalm *facepalm *facepalm

Цена может быть периодическим реквизитом (7.7), может быть в другом справочнике, зависеть от единицы измерения, находится в регистре сведений (8.0) и т.д. Мы же не знаем что там за конфигурация или даже не знаем что за версия 1С.
˙иʞuɐv ʁнǝw ʎ ɐ
‘˙˙˙ʁɔvʎнdǝвǝdǝu dиw – ɐwʎ ɔ vǝmоɔ dиw

Georg
Зацікавлений
Повідомлень: 88
З нами з: 04 квітня 2013, 20:35

Re: 1с бухгалтерія

Повідомлення Georg » 10 січня 2015, 19:19

Tweak писав:Можно так:

Код: Виділити все

Спр = СоздатьОбъект("Справочник.Номенклатура");

   Спр.ВыбратьЭлементы();

   Пока Спр.ПолучитьЭлемент() > 0 Цикл

     Если Строка(Спр.Наименование)=Строка(Матеріал) Тогда

       Ціна=Спр.Ціна;

     КонецЕсли;

 КонецЦикла;
Соответственно поменяйте названия на свои
дякую,але там є деякі нюанси))
це має відображатись у документі...
Форма документа ->Номенклатура->події->ПриИзменени
вот тут треба писати код,і напевно ваш варіант не підійде
(це таблична частина, є такі колонки: ціна і номенклатура
витягнути треба із довідника товарів)

Аватар користувача
Tweak
Постійний користувач
Повідомлень: 1181
З нами з: 25 листопада 2012, 15:04
Звідки: Черновцы
Дякував (ла): 60 разів
Подякували: 75 разів
Контактна інформація:

Re: 1с бухгалтерія

Повідомлення Tweak » 10 січня 2015, 19:36

KVadik, умеете только рукалицо? А помочь человеку слабо?

Аватар користувача
kreativ
Легенда Форуму
Повідомлень: 19303
З нами з: 25 серпня 2013, 22:42
Дякував (ла): 636 разів
Подякували: 1767 разів
Контактна інформація:

Re: 1с бухгалтерія

Повідомлення kreativ » 10 січня 2015, 20:02

Tweak писав:KVadik, умеете только рукалицо? А помочь человеку слабо?
указать на некорректность вопроса - тоже помощь;)
если я правильно понял, ведь в 1с - не шарю совсем же

Аватар користувача
KVadik
Доцент
Повідомлень: 9863
З нами з: 03 травня 2013, 10:35
Дякував (ла): 1067 разів
Подякували: 1466 разів
Контактна інформація:

Re: 1с бухгалтерія

Повідомлення KVadik » 10 січня 2015, 20:32

Tweak писав:KVadik, умеете только рукалицо? А помочь человеку слабо?
Ответить на такой вопрос я не в состоянии, пары по телепатии прогуливал *hi*
Если человек конкретизирует, что там у него, я отвечу в пределах своих знаний.
˙иʞuɐv ʁнǝw ʎ ɐ
‘˙˙˙ʁɔvʎнdǝвǝdǝu dиw – ɐwʎ ɔ vǝmоɔ dиw

Відповісти

Повернутись до “Програмне забезпечення”