Полная версия: Помогите с длинами кодов.
1C-PRO - Форум по 1С > Форумы по платформе "1С:Предприятие 7.7" > (7.7) Отчеты и обработки для платформы "1С:Предприятие 7.7"
У меня в базе 8ми значные коды(например 00000888) и товара забито 900 штук, нужно укоротить до 4 знаков (напр. 0888). помогите пожалуйста.
Код
СпрТмц = СоздатьОбъект("Справочник.ТМЦ"); // или другой там
СпрТмц.ПорядокНаименований();
СпрТмц.ВыбратьЭлементы();
Пока СпрТмц.ПолучитьЭлемент() = 1 Цикл
Если (СпрТмц.ЭтоГруппа() = 1) Тогда
Продолжить;
КонецЕсли;
СпрТмц.Код = Прав(СпрТмц.Код,4);
СпрТмц.Записать();
КонецЦикла; // СпрТмц
Цитата(IgorKrishen @ 19.2.2008, 14:26) 
Код
СпрТмц = СоздатьОбъект(\\"Справочник.ТМЦ\\"); // или другой там
СпрТмц.ПорядокНаименований();
СпрТмц.ВыбратьЭлементы();
Пока СпрТмц.ПолучитьЭлемент() = 1 Цикл
Если (СпрТмц.ЭтоГруппа() = 1) Тогда
Продолжить;
КонецЕсли;
СпрТмц.Код = Прав(СпрТмц.Код,4);
СпрТмц.Записать();
КонецЦикла; // СпрТмц
Охренеть! :) А почему, интересно, группы пропускаются??? А причем здесь порядок наименований????
Если база еще нужна целая и здоровая, надо в конфигураторе у справочника "Номенклатура" изменить длину кода, но передэтим надо проверить какой-нибудь обработкой справочник "Номенклатура" на возможные дубли ( например 000008 и 00008 при этом сведутся к 0008)
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.