Префикс

[Folomsha]

Подскажите, пожалуйста, как во внешней форме, в строке "основание" убрать префикс из номера счета?
Т.е. сейчас номер счета выглядит так: М000000223, а хотелось бы, чтобы было просто 223.

[ИгорьШпак]

А как этот номер заполняется?

[Folomsha]

Просто берется номер документа реализации. Номера документов у клиентов - с префиксом. Вот я и думаю, можно ли его как-нибудь "откусить"?

[ИгорьШпак]

Все можно)  Самое простое это тупо перебором и условиями отобрать нужное вам. Но это очень несерьезно. Вдруг у вас будет номер М1110981 к примеру .. или еще какие - нибудь исключительные ситуации

[ИгорьШпак]

Поэтому и спрашиваю как именно заполняется

[sadovod]

>> Вот я и думаю, можно ли его как-нибудь "откусить"?

Как вариант:

Код Выделить Развернуть

Функция ОткуситьНеЦифры(вхСтрока)
Длина = СтрДлина(вхСтрока);
Для i = 1 По Длина Цикл
ТекущийСимвол = КодСимвола(Сред(вхСтрока, i , 1));
Если ТекущийСимвол > 48 И  ТекущийСимвол < 58 Тогда
Возврат Прав(вхСтрока, Длина - i + 1);
КонецЕсли;
КонецЦикла;
КонецФункции

Можно её легко доработать, чтобы удаляла не только начальные 'нецифры', но вообще все во входной строке...

[ИгорьШпак]

Тут много лишнего на мой взгляд...я только начинающий программист 1С )))) Так что если у тебя формат такого рода М00000ХХХХ тогда я б сделал вот так:


   Строка1 = СокрЛП(ПолеВвода2);   
   КоличествоСимволов = СтрДлина(СокрЛП(ПолеВвода2));
   Сообщить(КоличествоСимволов);
   Для Первый = 1 По КоличествоСимволов Цикл
      Если Лев(СокрЛП(Строка1),1) = "0" Тогда        
         Строка1 = Число(Строка1);
         Прервать;
      Иначе
         Строка1 = Прав(Строка1,КоличествоСимволов-Первый);           
      КонецЕсли;          
   КонецЦикла;
   Сообщить(Строка1);


Но это только для такого вида ХХ 00000 YYYY, гдн ХХ - идет любое количество различных БУКВ , далее идут нули и после ХХ- любое количество цифр

[ИгорьШпак]

Но это бред!!!!

[ИгорьШпак]

ах да - поле ввода - это поле с вашим номером

[ИгорьШпак]

Хотя Ваш код помойму покорректнее)))