Сообщений в теме: 73

[thcrym]

Всем доброй ночи....
но выбора нет делать надо...Подскажите в чем может быть дело...ругается с ошибкой "значение индекса выходит за пределы диапазона" на строку 12...перепробовал и так и сяк...

1 Для j = 1 по МаксРазделитель Цикл
2	шапка = "Поле"+j;
3	ЭлементыФормы.ТабПоле.Колонки.Добавить(j,шапка);
4 КонецЦикла;
5  j = 0;	
6  Для i = 1 по МассивСтрок.Количество() Цикл
7	  СтрДанных = МассивСтрок[i];
8	  НоваяСтрокаТП = ТабПоле.Добавить();
9	  Для j = 1 по МаксРазделитель Цикл
10		ПозицияРазделителя = Найти(СтрДанных,"|");
11		ЗначСтрДанных = Сред(СтрДанных, 0, ПозицияРазделителя-1);
12		НоваяСтрокаТП.Установить(j,ЗначСтрДанных);
13		ЗначСтрДанных = Сред(ЗначСтрДанных, ПозицияРазделителя+1);
14	  КонецЦикла;	
15	НоваяСтрокаТП.Установить(МаксРазделитель-1,ЗначСтрДанных);			
16 КонецЦикла;
17 ЭлементыФормы.ТабПоле.ОбновитьСтроки();

Заранее благодарен

Сообщение отредактировал thcrym: 26.07.2010, 02:12:26

[Черный запрос]

Всем доброй ночи....
но выбора нет делать надо...Подскажите в чем может быть дело...ругается с ошибкой "значение индекса выходит за пределы диапазона" на строку 12...перепробовал и так и сяк...

Проблема в том что индексация колонок начинается с нуля, а у вас с единички. Т.е. нужно сделать так:
Для j = 0 по МаксРазделитель Цикл
в двух местах, где создаются колонки и где устанавливаются значения.

[abap]

Тогда все равно появится ошибка, надо
Для j = 0 по МаксРазделитель-1 Цикл

[Черный запрос]

Тогда все равно появится ошибка, надо
Для j = 0 по МаксРазделитель-1 Цикл

Точна

[thcrym]

получилось....

	Для j = 0 по МаксРазделитель Цикл
		шапка = "Поле"+j;
		ТабПоле.Колонки.Вставить(j,шапка);
	КонецЦикла;
	ЭлементыФормы.ТабПоле.СоздатьКолонки();
	
	Для i = 1 по МассивСтрок.Количество()-1 Цикл
			СтрДанных = МассивСтрок[i];
			НоваяСтрокаТП = ТабПоле.Добавить();
			Для j = 0 по МаксРазделитель Цикл
				ПозицияРазделителя = Найти(СтрДанных,"|");
				ЗначСтрДанных = Сред(СтрДанных, 0, ПозицияРазделителя-1);
				НоваяСтрокаТП.Установить(j,ЗначСтрДанных);
				СтрДанных = Сред(СтрДанных, ПозицияРазделителя+1);
			КонецЦикла;	
			НоваяСтрокаТП.Установить(МаксРазделитель,СтрДанных);			
	КонецЦикла;
	ЭлементыФормы.ТабПоле.ОбновитьСтроки();

если брать НоваяСтрокаТП.Установить(МаксРазделитель-1,СтрДанных); не отображает данные последней колонки, а так норма.
Спс за ответы.

Сообщение отредактировал thcrym: 26.07.2010, 15:25:21

[Filin0711]

Конфигурация/ выгрузить файлы конфигурации
дальше считайте что и как хотите

Уважаемый, Вы здесь в доску свой, а я только "сегодня родился". Мне бы хотелось задать глупые вопросы по 1С, но очень боюсь насмешек. Можно рискнуть попробовать, ипросто развернуться и уйти?

[Семен Семеныч]

Конфигурация/ выгрузить файлы конфигурации
дальше считайте что и как хотите

Уважаемый, Вы здесь в доску свой, а я только "сегодня родился". Мне бы хотелось задать глупые вопросы по 1С, но очень боюсь насмешек. Можно рискнуть попробовать, ипросто развернуться и уйти?

А где Вы увидели насмешки?

[Asya]

В нашей 1С ке происходит странная вещь. (1С 7.7., SQL Server 2000).

Началось в прошлом году. Банковские выписки стали сами по себе помечаться на удаление. В журнале - тишина. Я грешила на юзеров, забрала у них права на пометку удаления, поиском нашла все возможные обработки, которые помечают на удаление, закрыла. Но выписки продолжали помечаться. тестирование и исправление - ноль, выгрузка загрузка - ноль.
Бухи друг на друга уже косо смотрят.
Потом я создала новую базу, перенесла. Вроде прекратилось. Потом год закрыли и слава богу.

с 2010 года начали новую базу. С начала года тишина, а вчера бух мне грит выписки снова помечаются О_о. Я воще в трансе, знакомые 1сники никто такого никогда не слышал.

Может вы сможете чем нибудь помочь? Заранее благодарю за любую подсказу.

[abap]

Может все таки где программно они помечаются. Те не только в обработках, а в других объектах. Есть еще обработка Групповая обработка документов, от туда тоже можно пометить на удаление.

[Кими]

Может вы сможете чем нибудь помочь? Заранее благодарю за любую подсказу.

смотри, что делается при начале работы системы

[makfromkz]

В нашей 1С ке происходит странная вещь. (1С 7.7., SQL Server 2000).

Началось в прошлом году. Банковские выписки стали сами по себе помечаться на удаление. ...........
с 2010 года начали новую базу. С начала года тишина, а вчера бух мне грит выписки снова помечаются О_о. Я воще в трансе, знакомые 1сники никто такого никогда не слышал.

Может вы сможете чем нибудь помочь? Заранее благодарю за любую подсказу.

Опять программная бомба с будильником.
Кими скорее всего прав.
Можно глобальным поиском поискать код: Удалить(0)
Посмотрите список юзверей, удалите давно уволенных, особое внимание на юзверей с правами админа, запретите юзверям запускать внешние обработки, акромя тех кому можно.

Выложьте md-шник, пошукаем

Сообщение отредактировал makfromkz: 30.07.2010, 11:30:15

[Черный запрос]

Кто-то из юзеров наверно химичит

[Asya]

Спасибо за отклики!
права админа только у меня. Список пользователей постоянно мониторим как увольняется кто то.

сегодня попробую всё что вы сказали сделать,
если это кто то "живой", то не понимаем зачем помечают...

Сообщение отредактировал Asya: 30.07.2010, 12:41:42

[DoubleT]

посмотри через журнал. че париться

[Asya]

посмотри через журнал. че париться

я в посте своем написала, что в журнале ничего нет, плюс прав на удаление нет ни у кого кроме меня

[abap]

Помоему есть предопределенная процедура ПриУдалении, там можно записать данные в лог. Время, пользователя и тд. Кажется срабатывает только при интерактивном удалении.

[Семен Семеныч]

Помоему есть предопределенная процедура ПриУдалении, там можно записать данные в лог. Время, пользователя и тд. Кажется срабатывает только при интерактивном удалении.

правильней использовать подписки на события

[abap]

Да, но это в версия 7.7.

[Кими]

если сделать удаление обработкой, то есть программно, ... 1С фиолетово на приудаление... да и не зафиксит удаление даже в журнале ... если это клюшки

[abap]

В этом случае уже становится ясно, что это не удаляют в ручную. А через обработки или особый глюк 1С или sql server.