ShIvADeSt Moderator Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Тема для программирования 1С!!! Это продолжение темы, предыдущие части доступны тут ПРОГРАММЫ  1С:Предприятие 1C - 1C: Вопросы по конфигурациям ВАРЕЗНИК   1C:Предприятие 7.7 - 1С:Предприятие v.8.x - 1C Диск ИТС - 1С: Совместимо 8.х Топик 1C Ebooks ЗДЕСЬ  (обновлено 17.10.2009) - небольшая библиотечка (книги, документация, видео, утилиты) по 1С, финансам, бухучету и т.п. Все рассортировано по версиям... Для заблудившихся в трех соснах >>> FAQ по форуму RU.Board   Предыдущие темы были здесь часть 4 | часть 3 | часть 1   Как убить рекламу при обновлении отчетности | конфигурации (ИБ)? Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 02:02 03-04-2009 | Исправлено: vkramnik, 12:06 23-10-2009

egerLESHIK Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору dimaxmaster длина фиксированная длина 7 символов, а можно пример кода как добавить нули? Всего записей: 951 | Зарегистр. 24-03-2004 | Отправлено: 18:09 13-05-2009

An4eus Silver Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору St01en Цитата: У буха на машине только ярлык интернета и ключи и никакой локальной БД? ---------- Век живи - век учись! Всего записей: 3768 | Зарегистр. 23-07-2007 | Отправлено: 20:08 13-05-2009

An4eus Silver Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору egerLESHIK Цитата: все как бы делает красиво, за исключением одной вещи-обрезает впереди стоящие нули у Артикула тип значения колонки "Артикул" случаем не число? Должен быть текст + позаботиться о вмещаемости в него сиволов... ---------- Век живи - век учись! Всего записей: 3768 | Зарегистр. 23-07-2007 | Отправлено: 23:29 13-05-2009

egerLESHIK Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору An4eus Это все понятно. Колонке признак текст я ставил с помощью Excel.Application, когда пробовал выгружать из 1С в Ексцель. А тут обратный ход, сторонняя программа формирует файл csv, но в том то и дело, что нет возможности придать колонке признак текст, не делает она такого. Посему и в 1С импортируется без 0. =(     Добавлено: А пробовал импортировать как из текстового файла, загоняет всю строку в 1 колонку. То есть все данные, которые должны быть разнесены в разные колонки загоняет в одну. Всего записей: 951 | Зарегистр. 24-03-2004 | Отправлено: 00:17 14-05-2009

An4eus Silver Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору egerLESHIK Цитата: Это все понятно. Колонке признак текст я ставил с помощью Excel.Application тип колонки ставится 1С-кой... т.е. ТЗИмпЧ.НоваяКлонка("Артикул", "Текст"); ---------- Век живи - век учись! Всего записей: 3768 | Зарегистр. 23-07-2007 | Отправлено: 10:12 14-05-2009

egerLESHIK Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору An4eus Это понятно. Цитата: ТЗИмпЧ.НоваяКлонка("Артикул", "Текст");   это изначально давно прописано, при экспорте в дбф все нули экспортирует, при импорте из дбф также все нули импортирует, а вот с ексцелем такая вот заминка. Всего записей: 951 | Зарегистр. 24-03-2004 | Отправлено: 11:11 14-05-2009

An4eus Silver Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору egerLESHIK 1. описание гКнига_Открыть(Файл,Каталог,Область,Высота,Ширина); 2. убрать СокрЛП() ---------- Век живи - век учись! Всего записей: 3768 | Зарегистр. 23-07-2007 | Отправлено: 11:20 14-05-2009

An4eus Silver Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору dimaxmaster да их дописать - раз плюнуть. Здесь другое - непонятно, почему их отбрасывает... ---------- Век живи - век учись! Всего записей: 3768 | Зарегистр. 23-07-2007 | Отправлено: 12:01 14-05-2009

egerLESHIK Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Цитата: // Стр - строка   Нл="0";   Стр=СокрЛП(Стр);   КолНулей=7-СтрДлина(Стр);   Для Ном=1  КолНулей Цикл       Стр=Нл+Стр;   КонецЦикла;   Хм, что-то не получается.     An4eus   Цитата: почему их отбрасывает Сам не пойму почему. Да же когда просто Ексцелем открываешь - нет нулей. Открыл блокнотом - есть нули. Всего записей: 951 | Зарегистр. 24-03-2004 | Отправлено: 12:12 14-05-2009

An4eus Silver Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору egerLESHIK http://forum.ru-board.com/topic.cgi?forum=33&topic=10256&start=300#9 ---------- Век живи - век учись! Всего записей: 3768 | Зарегистр. 23-07-2007 | Отправлено: 12:15 14-05-2009

egerLESHIK Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Цитата: http://forum.ru-board.com/topic.cgi?forum=33&topic=10256&start=300#9 Цитата: Убрать СокрЛп() Неа, тож не помогло. А описание вот: Цитата: Функция гКнига_Открыть(Файл,Каталог,Область,Высота,Ширина) Экспорт      Оле=СоздатьОбъект("Excel.Application");      //поиск в открытом приложении      Для i=1 По Оле.Workbooks.Count Цикл           ТекКнига=Оле.Workbooks(i);           Если ТекКнига.Name=Файл Тогда                Книга=ТекКнига;                Прервать;           КонецЕсли;      КонецЦикла;      //открытие файла      Если ПустоеЗначение(Книга)=1 Тогда           Книга=Оле.Workbooks.Open(+КаталогИБ()+"ekkaimp.csv");      КонецЕсли;      Оле.Visible=1;      //выбор листа      Если Книга.Worksheets.Count=1 Тогда           НомерЛиста=1;      Иначе           Список=СоздатьОбъект("СписокЗначений");           Для i=1 По Книга.Worksheets.Count Цикл                Список.ДобавитьЗначение(i,Книга.Worksheets(i).Name);           КонецЦикла;           Если Список.ВыбратьЗначение(НомерЛиста,"Выбор листа - "+Книга.Name)=0 Тогда                Возврат(0);           КонецЕсли;      КонецЕсли;      //лист      Лист=Книга.Worksheets(НомерЛиста);      Лист.Activate();      //данные      Область=Книга.Worksheets(НомерЛиста).Cells.CurrentRegion;      Высота=Область.Rows.Count;      Ширина=Область.Columns.Count;      //      Возврат(1); КонецФункции Всего записей: 951 | Зарегистр. 24-03-2004 | Отправлено: 12:21 14-05-2009 | Исправлено: egerLESHIK, 12:26 14-05-2009

An4eus Silver Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору egerLESHIK давай через 6-7 часик в асе обсудим - есть идея одна ---------- Век живи - век учись! Всего записей: 3768 | Зарегистр. 23-07-2007 | Отправлено: 12:29 14-05-2009

egerLESHIK Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Цитата: давай через 6-7 часик ок. Всего записей: 951 | Зарегистр. 24-03-2004 | Отправлено: 12:34 14-05-2009

dimaxmaster Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору AmunRa   Цитата: народ, хочу начать програмировать, нашел в нете такой курс Интерактивный обучающий курс: Введение в конфигурирование и администрирование в "1С:Предприятие 8" Где можно скачать? НЕ хочется 1600 платить Посмотри тут, там все http://forum.ru-board.com/topic.cgi?forum=93&topic=0259   а вообще конфигурирование и администрирование 1С - это совсем не программирование в 1с Всего записей: 333 | Зарегистр. 05-06-2008 | Отправлено: 14:49 14-05-2009

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » 1C Программирование и поддержка

ShIvADeSt (30-10-2009 09:51): http://forum.ru-board.com/topic.cgi?forum=33&topic=10715

Переход по форумам  Закладки   » Компьютеры Цифровое изображение Программы Microsoft Windows UNIX Другие OS Hardware В помощь сисадмину Прикладное программирование Игры Форумные игры   » Интернет Web-программирование В помощь вебмастеру Графика Хостинг Зацените-ка!   » Тематические Ikonboard v.2 Ikonboard v.3 Invision Board Другие форумы PHP-Nuke и другие порталы Мобила   » Общие Спорт Флейм Темы по региональным встречам Музыка и Кино Юмор Литература и Живопись   » Ru.Board Новости Помощь по форуму   » Андеграунд eBookz Варезник Раздачи и акции Мобильный варезник Андеграунд Игры и фильмы   » Специальные Тестирование