Заказы на доработку 1С (сервис удаленной работы)

Хранилище

База знаний
Неназначенных незавершенных заказов: 2
Бесплатные отчеты, обработки, конфигурации, внешние компоненты для 1С Статьи, описание работы, методики по работе с 1С

Здравствуйте, гость ( Вход | Зарегистрироваться )



> Помогите пожалуйста начинающему программисту с кодом!!!          
Masspi Подменю пользователя
сообщение 10.11.11, 14:47
Сообщение #1

Молчаливый
*
Группа: Пользователи
Сообщений: 5
Спасибо сказали: 0 раз
Рейтинг: 0

Написал код обработки (конечно не без помощи интернета) и не могу понять где ошибка... Ребята помогите плиз...
Собственно сам код:
//Очистить предыдущие значения.
    ТаблицаДокумента.Очистить();
    ТаблицаДокумента.Колонки.Очистить();
    
    // Создать колонки табличного документа
    ТаблицаДокумента.Колонки.Добавить("Дата",ОписаниеТиповС,"Дата",5);
    ТаблицаДокумента.Колонки.Добавить("Номер",ОписаниеТиповЧ,"Номер",11);
    ТаблицаДокумента.Колонки.Добавить("Район",ОписаниеТиповС,"Район",25);
    ТаблицаДокумента.Колонки.Добавить("Маршрут",ОписаниеТиповС,"Маршрут",25);
    ТаблицаДокумента.Колонки.Добавить("Кол-во ТТ",ОписаниеТиповЧ,"КоличествоТТ",5);
    ТаблицаДокумента.Колонки.Добавить("Вес",ОписаниеТиповЧ,"Вес",6);
    // Последовательное чтение строк с выбранного листа
    Для Строка = 1 По ExcelПоследняяСтрока Цикл
                
        // Обработка нажатия Ctrl + Break
        ОбработкаПрерыванияПользователя();
        
        // Добавить данные в табличную часть экранной формы
        Стр=ТаблицаДокумента.Добавить();
        Стр.Номер                = Строка;
        Попытка
            Стр.Дата                = ExcelЛист.Cells(Строка, 1).Value;
            Стр.Номер                = ExcelЛист.Cells(Строка, 2).Value;
            Стр.Район                = ExcelЛист.Cells(Строка, 3).Value;
            Стр.Маршрут                = ExcelЛист.Cells(Строка, 4).Value;
            Стр.КоличествоТТ        = ExcelЛист.Cells(Строка, 5).Value;
            Стр.Вес                 = ExcelЛист.Cells(Строка, 6).Value;

Ошибку выдает при очистке предыдущего значения...

Сообщение отредактировал MATEVI - 10.11.11, 14:51
Причина редактирования: ПРАВИЛА п. 12 А ВООБЩЕ ПРОЧТИТЕ НАШИ ПРАВИЛА. ИЛИ В СЛЕДУЮЩИЙ РАЗ ПОЕДЕТ В КОРЗИНУ!

MATEVI Подменю пользователя
сообщение 10.11.11, 14:51
Сообщение #2

Отдыхающий
Иконка группы
Ветеран троянской войныМодератору Про1С (за заслуги в 2011 году)
Группа: Местный
Сообщений: 2203
Из: Одесса
Спасибо сказали: 968 раз
Рейтинг: 796.3

Какая ошибка? Текст приведите.

Masspi Подменю пользователя
сообщение 10.11.11, 14:55
Сообщение #3

Молчаливый
*
Группа: Пользователи
Сообщений: 5
Спасибо сказали: 0 раз
Рейтинг: 0

Значение не является значением объектного типа (Очистить)

Заранее спасибо Вам большое если поможите!!!

Vofka Подменю пользователя
сообщение 10.11.11, 14:56
Сообщение #4

У нас здесь своя атмосфера...
***********
Группа: Основатель
Сообщений: 14050
Из: Киев
Спасибо сказали: 4612 раз
Рейтинг: 3748.8

MATEVI, от жеж вы даётё. С вашей то квалификацие, и со статусом Команда (модераторы) не можете ошибку предугадать и поправить код? Мне за вас стыдно. faceoff.gif crazy.gif smile.gif

Masspi, уважаемый, вылезайте из танка и в студию ПОЛНЫЙ текст ошибки с указанием на строку. Причем номер строки указать в зависимости от того, какой вы кусок кода решили у нас опубликовать! Да, кстати, и полный текст процедуры не помешает.

Masspi Подменю пользователя
сообщение 10.11.11, 15:00
Сообщение #5

Молчаливый
*
Группа: Пользователи
Сообщений: 5
Спасибо сказали: 0 раз
Рейтинг: 0

Цитата
{Обработка.ЗагрузкаМаршрутногоЛиста.Форма.Форма(60)}: Значение не является значением объектного типа (Очистить)
ТаблицаДокумента.Очистить();
Причина редактирования: Не надо для цитаты использовать теги кода! Vofka.

Vofka Подменю пользователя
сообщение 10.11.11, 15:10
Сообщение #6

У нас здесь своя атмосфера...
***********
Группа: Основатель
Сообщений: 14050
Из: Киев
Спасибо сказали: 4612 раз
Рейтинг: 3748.8

В самом начале попробуйте написать:

ТаблицаДокумента = Новый ТаблицаЗначений;


И я предвкушаю уже следующий вопрос smile.gif

Спасибо сказали: Masspi,

Masspi Подменю пользователя
сообщение 10.11.11, 15:24
Сообщение #7

Молчаливый
*
Группа: Пользователи
Сообщений: 5
Спасибо сказали: 0 раз
Рейтинг: 0

Да следующий ))) {Обработка.ЗагрузкаМаршрутногоЛиста.Форма.Форма(101)}: Значение не является значением объектного типа (ТаблицаДокумента)
ЭлементыФормы.ТаблицаДокумента.Значение = ТаблицаДокумента;

Ой забыл сам код:
Попытка
            Стр.Дата                = ExcelЛист.Cells(Строка, 1).Value;
            Стр.Номер                = ExcelЛист.Cells(Строка, 2).Value;
            Стр.Район                = ExcelЛист.Cells(Строка, 3).Value;
            Стр.Маршрут                = ExcelЛист.Cells(Строка, 4).Value;
            Стр.КоличествоТТ        = ExcelЛист.Cells(Строка, 5).Value;
            Стр.Вес                 = ExcelЛист.Cells(Строка, 6).Value;
                    Исключение
            // Не редко происходит ошибка конвертации отдельной ячейки документа
            Сообщить("Ошибка чтения строки файла Microsoft Excel." + Строка + Символы.ПС + ОписаниеОшибки(), СтатусСообщения.Внимание);
        КонецПопытки;
        // Отобразить информацию о ходе выполнения обработки
        Состояние("Обработка файла Microsoft Excel : "
         + "строка " + Строка + " из " + ExcelПоследняяСтрока);
        
     КонецЦикла;
    
     // Закрыть COM соединение для экономии памяти
     ExcelПриложение.Quit();
    
     // Отобразить результаты загрузки в форме элемента
     ЭлементыФормы.ТаблицаДокумента.Значение = ТаблицаДокумента;
     ЭлементыФормы.ТаблицаДокумента.СоздатьКолонки();


Сообщение отредактировал MATEVI - 10.11.11, 15:25

MATEVI Подменю пользователя
сообщение 10.11.11, 15:31
Сообщение #8

Отдыхающий
Иконка группы
Ветеран троянской войныМодератору Про1С (за заслуги в 2011 году)
Группа: Местный
Сообщений: 2203
Из: Одесса
Спасибо сказали: 968 раз
Рейтинг: 796.3

Цитата(Vofka @ 10.11.11, 14:56) *
MATEVI, от жеж вы даётё. С вашей то квалификацие, и со статусом Команда (модераторы) не можете ошибку предугадать и поправить код? Мне за вас стыдно. faceoff.gif crazy.gif smile.gif


ОФФ...
1. Это Вы так шутите? Квалификация тут ни причем. Но Вы то должны знать, smile.gif что если просят помочь то дают максимально точную информацию, и оформляют по правилам. Для угадывания есть пользователи с "глазиком" smile.gif

Vofka Подменю пользователя
сообщение 10.11.11, 15:34
Сообщение #9

У нас здесь своя атмосфера...
***********
Группа: Основатель
Сообщений: 14050
Из: Киев
Спасибо сказали: 4612 раз
Рейтинг: 3748.8

Цитата
Это Вы так шутите?

Конечно же шучу smile.gif

Ardi Подменю пользователя
сообщение 10.11.11, 15:35
Сообщение #10

Живет на форуме
***********
Гений телепатии и социального моделирования
Группа: Пользователи
Сообщений: 4121
Из: Киев
Спасибо сказали: 957 раз
Рейтинг: 0

Пользователи с глазиком отвечают - "ЧИТАТЬ 2 УЧЕБНИКА. А потом уже вопросы."
Ибо это бессмысленно.


Signature
Услуги 1С программиста 8.2, 7.7 (Плохо, дорого, очередь). Киев.

Спасибо сказали: Masspi, MATEVI,

Masspi Подменю пользователя
сообщение 10.11.11, 15:54
Сообщение #11

Молчаливый
*
Группа: Пользователи
Сообщений: 5
Спасибо сказали: 0 раз
Рейтинг: 0

Ребята ну может хоть кто - нибудь скажет..........

Vofka Подменю пользователя
сообщение 10.11.11, 16:02
Сообщение #12

У нас здесь своя атмосфера...
***********
Группа: Основатель
Сообщений: 14050
Из: Киев
Спасибо сказали: 4612 раз
Рейтинг: 3748.8

Цитата
Ребята ну может хоть кто - нибудь скажет..........

Вряд ли. С вами говорить бесполезно. Знаний у вас 0. Поэтому угадывать и исправлять ваши очередные ошибки - желания у людей нету. Здесь не форум экстрасенсов. Вам правильно ответили в 10 посте: читайте книги.

Спасибо сказали: Masspi,

Не нашли ответа на свой вопрос?
Зарегистрируйтесь и задайте новый вопрос.


Ответить Новая тема
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

RSS Текстовая версия Сейчас: 16.06.25, 0:01
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!