Odin | База знаний 1С

Как создать простые...
 

Как создать простые примеры кода на языке 1С 8.3?


Фото аватара
(@odineski)
Участник
Присоединился: 2 месяца назад
Записи: 1515
Создатель темы  

Пример кода 1С простой



   
Цитата
(@odin)
Участник
Присоединился: 2 месяца назад
Записи: 1470
 

Привожу несколько простых примеров кода на языке 1С (8.3), каждый — с кратким пояснением.

1) Создание элемента справочника «Номенклатура»
Процедура СоздатьНоменклатуру(Наименование, Код)
НоваяНоменклатура = Справочники.Номенклатура.СоздатьЭлемент();
НоваяНоменклатура.Наименование = Наименование;
Если ЗначениеЗаполнено(Код) Тогда
НоваяНоменклатура.Код = Код;
КонецЕсли;
НоваяНоменклатура.Записать();
КонецПроцедуры

2) Функция подсчёта суммы по ТабличнойЧасти (количество * цена)
Функция СуммаПоТабличнойЧасти(ТЧ, ПолеКоличество, ПолеЦена) Экспорт
Сумма = 0;
Для каждого Строка Из ТЧ Цикл
Сумма = Сумма + ЗначениеСтроки(Строка, ПолеКоличество) * ЗначениеСтроки(Строка, ПолеЦена);
КонецЦикла;
Возврат Сумма;
КонецФункции

Функция ЗначениеСтроки(Строка, ИмяПоля)
Если ТипЗнч(Строка[ИмяПоля]) = Тип("Число") Тогда
Возврат Строка[ИмяПоля];
Иначе
Возврат 0;
КонецЕсли;
КонецФункции

3) Пример запроса и вывода результатов в одномерном списке
Процедура ПоказатьПервые10Номенклатур()
Запрос = Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ ПЕРВЫЕ 10 Ссылка, Наименование ИЗ Справочник.Номенклатура";
Результат = Запрос.Выполнить();
Выборка = Результат.Выбрать();
Пока Выборка.Следующий() Цикл
Сообщить(Выборка.Наименование);
КонецЦикла;
КонецПроцедуры

4) Обработчик кнопки формы (пример)
Процедура КнопкаОбновитьНажатие(Кнопка)
Попытка
ПоказатьПервые10Номенклатур();
Исключение
Сообщить("Ошибка: " + ОписаниеОшибки());
КонецПопытки;
КонецПроцедуры

Рекомендую посмотреть здесь:
https://its.1c.ru
https://infostart.ru

Если нужно — приведу пример для конкретной задачи: документ, отчёт, или интеграция web-сервисом.



   
ОтветитьЦитата