Системные процедуры и функции
Один программист 1С другому:
- У тебя генератор случайных чисел есть?
- Четырнадцать.

 

 

Эти процедуры и функции часто применяются при программировании на 1С, поэтому знать их обязательно!

Процедура / Функция

Примечание

ОкончатЦена = Окр(Цена*0.5, 2);

Округление.

Рублей = Цел(Цена);

Получить целую часть числа.

ОблНал = Макс(ОблНал-Льготы,0);
МинЗнач = Мин(значение1,значение2,значение3);

Получить минимальное или максимальное из значений. Можно передавать несколько параметров (больше двух)

Длина = СтрДлина("Иванов Иван Иванович");

Получить длину строки.

ФИО = СокрЛ(ФИО); //убрать пробелы слева
ФИО = СокрП(ФИО); //убрать пробелы справа
ФИО = СокрЛП(ФИО); //убрать пробелы слева и справа

Отсечение пробелов.

АБ = Лев("АБВГДЕ",2);
ГДЕ = Прав("АБВГДЕ",3);
БВГ = Сред("АБВГДЕ",2,3);

Вырезание подстроки слева, справа и из середины.

НомерСимвола = Найти(ФИО, " "); //найти позицию первого пробела

Поиск вхождения подстроки в строку.

НоваяСтрока = СтрЗаменить(ПрежняяСтрока," ", "_");

Замена одной подстроки на другую.

ФИОЗаглавнымиБуквами = ВРЕГ(ФИО)
ФИОстрочнымиБуквами = нрег(ФИО)

Изменение регистра букв.
СегодняВ1С = РабочаяДата(); //дата в параметрах 1С
СегодняВСистеме = ТекущаяДата(); //дата в операционной системе
СейчасВСистеме = ТекущееВремя();
Получить текущую дату и время.
НачалоМесяца = НачМесяца(НекаяДата);
КонецМесяца = КонМесяца(НекаяДата);
НачалоГода = НачГода(НекаяДата);
КонецГода = КонГода(НекаяДата);
Получение начала/конца месяца/года по некой дате.
Год = ДатаГод(ДатаРождения);
Месяц = ДатаМесяц(ДатаРождения);
Число = ДатаЧисло(ДатаРождения);
Выделить из даты год, месяц и число.
ДатаЧерезДваМесяца = ДобавитьМесяц(НекаяДата,2); Прибавление к дате нескольких месяцев. Если число отрицательное, то отсчет ведется назад.
ПериодСтрокой = ПериодСтр(Дата1, Дата2); Строковое представление периода, например "Январь 2002".
НекаяДата = Дата("01.01.2002");
Сообщение = "Месяц " + Строка(НомерМесяца);
НекоеЧисло = Число("5");
Преобразование типов.
СуммаСКопейками = Формат(Сумма,"Ч10.2-"); Форматирование чисел, сумм и дат. Очень много вариантов форматирования!
СуммаПрописью = Пропись(Сумма); Сумма прописью. Часто применяется в денежных документах.
Если Вопрос("Вы уверены?","Да+Нет")="Да" Тогда Вопрос пользователю. Можно спросить "Да+Нет", "Повтор+Отмена" и т.д.
Предупреждение("Случилась ошибка!"); Сообщениию пользователю в виде окошка. Программа приостанавливается, пока пользователь не нажмет ОК.
Сообщить("Документ проведен!"); Сообщение пользователю в окно сообщений. Программа работает дальше.
Состояние("Выполнено на " + Строка(Проценты) + "%"); Сообщение пользователю в строку статуса.
глТекущийПользователь = ИмяПользователя(); Получить имя текущего пользователя.
Права = НазваниеНабораПрав(); Получить название набора прав текущего пользователя.
ТекКаталогБазы = КаталогИБ(); Получить каталог, где находится информационная база.

НачатьТранзакцию();

Если <условие ошибки> Тогда
............ОтменитьТранзакцию();
КонецЕсли;

ЗафиксироватьТранзакцию();

Обработка транзакций. Транзакция - это совокупность действий, которая выполняется или вся целиком, или не выполняется ни одно из действий. Т.е. это единый блок действий, который или выполнен целиком, или не выполнен совсем. Транзакции необходимы для сохранения целостности базы данных.

СпрСотр = СоздатьОбъект("Справочник.Сотрудники"); Возвращает ссылку на объект.
Если ТипЗначенияСтр(Параметр)="Справочник" Тогда Определяет тип значения.

к оглавлению

Знаете ли Вы, как разрешается парадокс Ольберса?
(Фотометрический парадокс, парадокс Ольберса - это один из парадоксов космологии, заключающийся в том, что во Вселенной, равномерно заполненной звёздами, яркость неба (в том числе ночного) должна быть примерно равна яркости солнечного диска. Это должно иметь место потому, что по любому направлению неба луч зрения рано или поздно упрется в поверхность звезды.
Иными словами парадос Ольберса заключается в том, что если Вселенная бесконечна, то черного неба мы не увидим, так как излучение дальних звезд будет суммироваться с излучением ближних, и небо должно иметь среднюю температуру фотосфер звезд. При поглощении света межзвездным веществом, оно будет разогреваться до температуры звездных фотосфер и излучать также ярко, как звезды. Однако в дело вступает явление "усталости света", открытое Эдвином Хабблом, который показал, что чем дальше от нас расположена галактика, тем больше становится красным свет ее излучения, то есть фотоны как бы "устают", отдают свою энергию межзвездной среде. На очень больших расстояниях галактики видны только в радиодиапазоне, так как их свет вовсе потерял энергию идя через бескрайние просторы Вселенной. Подробнее читайте в FAQ по эфирной физике.

НОВОСТИ ФОРУМА

Форум Рыцари теории эфира


Рыцари теории эфира
 10.11.2021 - 12:37: ПЕРСОНАЛИИ - Personalias -> WHO IS WHO - КТО ЕСТЬ КТО - Карим_Хайдаров.
10.11.2021 - 12:36: СОВЕСТЬ - Conscience -> РАСЧЕЛОВЕЧИВАНИЕ ЧЕЛОВЕКА. КОМУ ЭТО НАДО? - Карим_Хайдаров.
10.11.2021 - 12:36: ВОСПИТАНИЕ, ПРОСВЕЩЕНИЕ, ОБРАЗОВАНИЕ - Upbringing, Inlightening, Education -> Просвещение от д.м.н. Александра Алексеевича Редько - Карим_Хайдаров.
10.11.2021 - 12:35: ЭКОЛОГИЯ - Ecology -> Биологическая безопасность населения - Карим_Хайдаров.
10.11.2021 - 12:34: ВОЙНА, ПОЛИТИКА И НАУКА - War, Politics and Science -> Проблема государственного терроризма - Карим_Хайдаров.
10.11.2021 - 12:34: ВОЙНА, ПОЛИТИКА И НАУКА - War, Politics and Science -> ПРАВОСУДИЯ.НЕТ - Карим_Хайдаров.
10.11.2021 - 12:34: ВОСПИТАНИЕ, ПРОСВЕЩЕНИЕ, ОБРАЗОВАНИЕ - Upbringing, Inlightening, Education -> Просвещение от Вадима Глогера, США - Карим_Хайдаров.
10.11.2021 - 09:18: НОВЫЕ ТЕХНОЛОГИИ - New Technologies -> Волновая генетика Петра Гаряева, 5G-контроль и управление - Карим_Хайдаров.
10.11.2021 - 09:18: ЭКОЛОГИЯ - Ecology -> ЭКОЛОГИЯ ДЛЯ ВСЕХ - Карим_Хайдаров.
10.11.2021 - 09:16: ЭКОЛОГИЯ - Ecology -> ПРОБЛЕМЫ МЕДИЦИНЫ - Карим_Хайдаров.
10.11.2021 - 09:15: ВОСПИТАНИЕ, ПРОСВЕЩЕНИЕ, ОБРАЗОВАНИЕ - Upbringing, Inlightening, Education -> Просвещение от Екатерины Коваленко - Карим_Хайдаров.
10.11.2021 - 09:13: ВОСПИТАНИЕ, ПРОСВЕЩЕНИЕ, ОБРАЗОВАНИЕ - Upbringing, Inlightening, Education -> Просвещение от Вильгельма Варкентина - Карим_Хайдаров.
Bourabai Research - Технологии XXI века Bourabai Research Institution