При переборе элементов справочника, перебирает только 999 элементов? ((((

Форум 1С: Одинэс.Ру

Найти!

При переборе элементов справочника, перебирает только 999 элементов? ((((

гр534
25.02.2009 - 19:49
Подскажите плиз, код:
 
Процедура КнопкаВыполнитьНажатие(Кнопка)
 
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| ВыбранныйСправочник.Ссылка
|ИЗ
| Справочник.";
 
Запрос.Текст = Запрос.Текст + Справочник.Метаданные().Имя;
 
Запрос.Текст = Запрос.Текст + " КАК ВыбранныйСправочник
|
|УПОРЯДОЧИТЬ ПО
| ВыбранныйСправочник.Код";
 
Строка = "";
счетчик1 = 1;
 
Пока счетчик1 <= Справочник.Метаданные().ДлинаКода-1 цикл
строка = строка + "0";
счетчик1 = счетчик1 + 1;
КонецЦикла;
 
Выборка = Запрос.Выполнить().Выбрать();
 
ЭлементыФормы.Индикатор.МаксимальноеЗначение = Выборка.Количество();
ЭлементыФормы.Индикатор.Значение = 0;
 
П = 0;
Пока Выборка.Следующий() Цикл
ЭлементСправочника = Выборка.Ссылка.ПолучитьОбъект();
П  = П + 1;
КолСтр = СтрДлина(Строка(П));
КолНулей = 4 - КолСтр;
                Если КолНулей = 3 Тогда
Нули = "000";
ИначеЕсли КолНулей = 2 Тогда
Нули = "00";
ИначеЕсли КолНулей = 1 Тогда
Нули = "0";
Иначе
Прервать;
Сообщить("Больше нулей нет!");
КонецЕсли;
 
ЭлементСправочника.Код = "Ю"+Нули+Строка(П);
ЭлементСправочника.Записать();
Сообщить("Обработали: "+Строка(П));
     КонецЦикла;
КонецПроцедуры
 
Так вот перебирает 999 элементов справчоника и цикл завершается. Почему?
Спасибо.
 
PS я только начал изучать 8.1. Спасибо.
К списку тем 1 > К списку форумов

Интересные темы

odines.ru
28.04.2024 - 08:11
Смотри также:
Создание элемента подчиненного справочника через COM-соединение
Обмен данными через XML с другой программой
v8: Новый счет-фактура

Re: При переборе элементов справочника, перебирает только 999 элементов? ((((

гр534
5 - 25.02.2009 - 20:29
3) Я плохо ориентируюсь )) Выскакивает окно с ошибкой: Преобразование значения к типу Число не может быть выполнено. В чем ошибка?
П = 0;
Пока Выборка.Следующий() Цикл
ЭлементСправочника = Выборка.Ссылка.ПолучитьОбъект();
П  = П + 1;
ЭлементСправочника.Код = "Ж" + Формат(К,"ЧЦ=" + Справочник.Метаданные().ДлинаКода-1 + "; ЧВН=; ЧГ=0");
ЭлементСправочника.Записать();
Сообщить("Обработали: "+Строка(П));
КонецЦикла;

Re: При переборе элементов справочника, перебирает только 999 элементов? ((((

Пудель
6 - 25.02.2009 - 20:38
Чудовищно.

Re: При переборе элементов справочника, перебирает только 999 элементов? ((((

гр534
7 - 25.02.2009 - 20:46
прошу помочь.

Re: При переборе элементов справочника, перебирает только 999 элементов? ((((

Пудель
8 - 25.02.2009 - 20:48
Неявное преобразование типов помните как происходит?

Re: При переборе элементов справочника, перебирает только 999 элементов? ((((

Исчо
9 - 25.02.2009 - 21:05
(2)СтрокаБезпробела = СтрЗаменить(СтрокаСПробелом, Символ(160), "");

Интересные темы

odines.ru
28.04.2024 - 08:11
Смотри также:
Очень простенький вопрос!
Есть ли такая возможность на 8.1.13.41?
Вид документам в запросе

Re: При переборе элементов справочника, перебирает только 999 элементов? ((((

гр534
10 - 25.02.2009 - 21:06
все равно не могу разобраться. ( в чем ошибка?

Re: При переборе элементов справочника, перебирает только 999 элементов? ((((

КонецЦикла
11 - 25.02.2009 - 21:17
Ну где же Петя с фразой про порог вхождения в снеговика?

Re: При переборе элементов справочника, перебирает только 999 элементов? ((((

гр534
12 - 25.02.2009 - 21:29
Исчо) Огромное спасибо за помощь.

Re: При переборе элементов справочника, перебирает только 999 элементов? ((((

lalex23
13 - 26.02.2009 - 02:57
млин, скобочки забыл :(

Re: При переборе элементов справочника, перебирает только 999 элементов? ((((

lalex23
14 - 26.02.2009 - 02:58
млин, лажанулсо :(
ЭлементСправочника.Код = "Ю" + Формат(П,"ЧЦ=" + Строка(Справочник.Метаданные().ДлинаКода-1) + "; ЧВН=; ЧГ=0")
К списку тем 1 > К списку форумов

Добавить новое сообщение

Ваше имя:
Тема сообщения:
Сообщение:
« Организация восстановления последовательности в УТ НДФЛ расчитывает - сплошные корректировки »
© 2009 Форум 1С: Одинэс.Ру