Как заполнить табличную часть формы программно? 8 Нужно по кнопке Заполнить - сформировать данные для заполнения табличных частей и заполнить их. Форма имеет вид: Рядом с кнопкой Записать и закрыть добавлена кнопка Заполнить документ , код ее команды: // Код заполнения ТЧ
НаСервере
П17 правил для составления оптимального ЗАПРОСа к данным базы 1С 52 Для формирования и выполнения запросов к таблицам базы данных в платформе 1С используется специальный объект языка программирования Запрос . Создается этот объект вызовом конструкции Новый Запрос . Запрос удобно использовать, когда требуется получ1С 8.x : Как убрать лидирующие нули в номере Документа (вариант2) 0 Скопировать строку с номером, с лидирующими нулями, в числовом поле (с форматом без групп, без группировки), и вернуть(скопировать) обратно в строковом поле с номером. Возвращает без нулей. COM-подключение к базе 7.7 из 8.2 1С 7 Если код выполняется на стороне клиента, то необходимо наличие базы 7.7 на локальной машине.
Пример (На форме объекта присутствует реквизит Таблица(ТаблицаЗначений)):
НаКлиенте
Процедура Загрузки()
ПутьКБазе=" D: ВашаБаза 1с77 " ;
Пользователь=Cклонения по падежам 6 НаКлиенте
Процедура Команда1(Команда)
ФИО = " Иванов Иван Иванович" ;
Падеж = 2;
Пол = 1;
Результат = СклонениеФИО(ФИО, Падеж, пол);
Сообщить(Результат);
КонецПроцедуры
НаСервере
Функция СклонениеФИО(ФИО, Падеж, пол)
Результат = " " ;
Посмотреть все результаты поиска похожих
Как узнать является ли строка числом? 12
// Если передено число - то 1, иначе 0
Функция ЭтоЧисло(Знач ТекСтр)
ТекСтр = СокрЛП(ТекСтр);
ТекСтр = СтрЗаменить(ТекСтр," 0" ," 9" );
Если (СтрДлина(Число(ТекСтр)) СтрДлина(ТекСтр))
или ((СтрДлина(ТекСтр) = 1) и (Найти(" 0123456789" ,ТеФункция получить строку на латинском, Транслит 9 Функция Транслит(Вход)
Коды = Новый Соответствие;
Коды.Вставить(" е" ," yo" );
Коды.Вставить(" Ё" ," Yo" );
Нач = КодСимвола(" А" );
Англ = " A" " B" " V" " G" " D" " E" " Zh" " Z" " I" " Y" " K" " L" " M" " N" " O" " P" " R" Функция разбора (разложения) строки в массив 6 Данные функции позволяют разложить строку в массив, используя заданный разделитель
Например есть строка: абв$dfd$232$-0oj$5
Выполнив код: НашМассив = РазложитьСтрокуВМассив(абв$dfd$232$-0oj$5, " $" ) ;
Получим: НашМассив = абв
dfd
232
-0ojФункция разбора (разложения) строки в массив, аналог СтрРазделить 5 Функция РазложитьСтрокуВМассивПодстрок(Знач Строка, Знач Разделитель = ",",
Знач ПропускатьПустыеСтроки = Неопределено)
Результат = Новый Массив;
// для обеспечения обратной совместимости
Если ПропускатьПустыеСтроки = Неопределено Тогда
ПКак убрать из строки лишние символы? 3 Функция УбратьЛишниеСимволы(Строка1) Экспорт
НовСтрока = " " ;
ПравильныеСимволы = " QWERTYUIOPASDFGHJKLZXCVBNMqwertyuiopasdfghjklzxcvbnmЙЦУКЕНГШЩЗХЪФЫВАПРОЛДЖЭЯЧСМИТЬБЮйцукенгшщзхъфывапролджэячсмитьбю" ;
Для Сч = 1 по СтрДлина(Строка1) Цикл
ТекПосмотреть все в категории Работа с Текстом (Строкой)
Работа с Текстом (Строкой)