powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / [игнор отключен] [закрыт для гостей] / Добавить к коду число
6 сообщений из 6, страница 1 из 1
Добавить к коду число
    #36462864
LogvinovSerj
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
День добрый! Подскажите пож-та, как можно программным способом добавить к реквизиту код любого справочника чило? То есть в итоге получится новое число с незначащими нулями вначале.
...
Рейтинг: 0 / 0
Добавить к коду число
    #36462892
Хитроглазый
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
LogvinovSerj,
телепатирую, код - строка?
перевести в число, добавить число, перевести в строку, добавить нули/формат()
...
Рейтинг: 0 / 0
Добавить к коду число
    #36462903
leaf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
в каком смысле?

Код: plaintext
Прав("00000000"+(Число(Код)+ 1 ), 8 )
...
Рейтинг: 0 / 0
Добавить к коду число
    #36462968
LogvinovSerj
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В общем да! Сделал тупо:

Функция ДогбавитьККоду(СтрокаКод, Число);
ДлинаСтроки = СтрДлина(СтрокаКод);
Если ДлинаСтроки > 0 Тогда
ЧислоКод = Число(СтрокаКод) + Число;
СтрокаНовыйКод = СтрЗаменить(Строка(ЧислоКод), Символы.НПП, "");
Стр = "";
Для Номер = 1 По ДлинаСтроки - СтрДлина(СтрокаНовыйКод) Цикл
Стр = Стр + "0";
КонецЦикла;
СтрокаКод = Стр + СтрокаНовыйКод;
КонецЕсли;
Возврат СтрокаКод;
КонецФункции // ДогбавитьККоду()

Долго не мог понять почему СтрЗаменить(Строка(ЧислоКод), " ", "") не убирает посередине пробел, пока не выяснил, что нужно так СтрЗаменить(Строка(ЧислоКод), Символы.НПП, "");
...
Рейтинг: 0 / 0
Добавить к коду число
    #36463077
Шурыгин Иван Сергеевич
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
LogvinovSerjВ общем да! Сделал тупо:

Долго не мог понять почему СтрЗаменить(Строка(ЧислоКод), " ", "") не убирает посередине пробел, пока не выяснил, что нужно так СтрЗаменить(Строка(ЧислоКод), Символы.НПП, "");

Насчет строки
Код: plaintext
СтрЗаменить(Строка(ЧислоКод), Символы.НПП, "") 
Согласен! покурите функцию
Формат() в синтакс помощнике, и попробуйте использовать такую конструкцию
Код: plaintext
СтрокаРезультат = Формат(ЧислоКод, "ЧГ=");

будет и значительно красивей и будет заранее преобразовать точно к необходимому результату!
...
Рейтинг: 0 / 0
Добавить к коду число
    #36463149
leaf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
Формат(Число(Код)+ 1 , "ЧЦ="+СтрДлина(Код)+"; ЧВН");

это круто когда функции и циклы используешь ?
второй вариант
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / [игнор отключен] [закрыт для гостей] / Добавить к коду число
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]