Вход | Регистрация

1С:Предприятие ::

Метки:

Нужно увеличить на единицу второй символ справочника, а каким образом :(

Я
   ValleySilence
 
05.12.03 - 09:11
Граждане, проблемка, помогите, пожалуйста.
У меня есть справочник "Группа". В поле "Наименование" вбиваются наименования учебных групп, типа (А1-1,М1-1,Т2-1,А3-1). Тип реквизита
"Наименование" - строка, длина -4.
Хочу сделать обработку, которая увеличивала бы второй символ справочника на единицу, например А1-1 стал А2-1
 
  AdBlock убивает бесплатный контент
   gr13
 
1 - 05.12.03 - 09:16
Попробуй через функцию "Лев".
Стр. 60 Описание встроенного языка. Я думаю с помощью ее можно сделать, помучиться конечно прийдется, но можно.
Удачи, напиши потом получилось или нет
   Львенок
 
5 - 05.12.03 - 10:39
На самом деле вот так (проверено, работает):

Процедура Выполнить()
    Спр=СоздатьОбъект("Справочник.Группа"); 
    Спр.ПорядокКодов();//Иначе может не работать!

    Спр.ВыбратьЭлементы();
    Пока Спр.ПолучитьЭлемент()=1 Цикл             
        Гр=Спр.Наименование;
        Спр.Наименование=Лев(Гр,1)+Строка(Число(Сред(Гр,2,1))+1)+Сред(Гр,3);
        Спр.Записать();
        Сообщить ("Группа изменена с "+Гр+" на "+Спр.Наименование);
    КонецЦикла;
КонецПроцедуры
___
Искренне Ваш, Львенок.


Список тем форума
AdBlock убивает бесплатный контент   AdBlock убивает бесплатный контент
ВНИМАНИЕ! Если вы потеряли окно ввода сообщения, нажмите Ctrl-F5 или Ctrl-R или кнопку "Обновить" в браузере.
Ветка сдана в архив. Добавление сообщений невозможно.
Но вы можете создать новую ветку и вам обязательно ответят!
Каждый час на Волшебном форуме бывает более 2000 человек.
AdBlock убивает бесплатный контент