Перейти из форума на сайт.

Новости • Файловые архивы
Поиск • Активные темы • Топ лист
Правила • Кто в on-line?
Вход • Забыли пароль? • Первый раз на этом сайте? • Регистрация
Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » 1C Программирование и поддержка

Модерирует : ShIvADeSt

ShIvADeSt (06-02-2008 02:31): продолжаем тут http://forum.ru-board.com/topic.cgi?forum=33&topic=9226  Версия для печати • Подписаться • Добавить в закладки
Страницы: 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 102 103 104

   

mrFiX



Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Подскажите.
Есть какя-то методика переноса информации из ИнфоБухгалтера в 1С ?
Всего записей: 1474 | Зарегистр. 22-02-2002 | Отправлено: 12:33 15-10-2006
Ri4y



Newbie		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
при подборе номенклатуры в Тис942 нада сделать невидимыми помеченые на удаление товары. Как сделать такой фильтр?
Всего записей: 17 | Зарегистр. 15-10-2006 | Отправлено: 14:02 15-10-2006
tswanea



Full Member		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
ALL
можно как нибудь с встроенным языком 1С архивировать (*.rar) базу данных?
 
нашел ответ!!!
сорри за оффтоп

----------
... И развернутся врата ада, и силы тьмы обрушатся на землю ...
Всего записей: 436 | Зарегистр. 03-08-2004 | Отправлено: 23:00 15-10-2006 | Исправлено: tswanea, 23:15 15-10-2006
BlackVetal



Advanced Member		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Ri4y
Посмотри функции которыми устанавливаются отборы ...
Всего записей: 1094 | Зарегистр. 13-11-2005 | Отправлено: 06:57 16-10-2006
fol



Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
mrFiX мы помнится цепляли базу ИнфоБухгалтера в Акцесе и на Вижуальном бейсике по ОЛЕ записывали в 1С
Всего записей: 805 | Зарегистр. 02-11-2002 | Отправлено: 10:40 16-10-2006
NeveR_Mind



Member		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Помогите сделать две вещи:
 
1) В типовой УТ определить оплачена ли конкретная отгрузка (реализация).
Сам принцип - как это сделать? (Взаиморасчеты - по заказам)
 
2) В запросе выбрать отгрузки по конкретному заказу, только пока будет хватать денег..т.е. добавлять в выборку последовательно проверяю хватает ли на отгрузку оплаченной суммы. (т.е. допустим пришло 1000 р по заказу, а отгрузок сделано 4 штуки - каждая по 500р . Как сделать, чтобы в выборку попали только первые две?)
Всего записей: 264 | Зарегистр. 27-11-2002 | Отправлено: 15:06 16-10-2006
AndreasS

Newbie		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Подскажите, плиз!
Мне нужно, в 1С вер.7.7 Зарплата и кадры переконвертировать ведомость на  
выплату зарплаты в DBF Формат. При сохранении в XML открываю с помощью  
Excel вместо русских букв получаю абракадабру. Как это можно исправить ?
Всего записей: 7 | Зарегистр. 10-07-2006 | Отправлено: 16:22 16-10-2006
mrFiX



Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
fol
Но там ведь структура данных сильно отличающаяся. В 1Ц гораздо больше связанных реквизитов.
Всего записей: 1474 | Зарегистр. 22-02-2002 | Отправлено: 17:26 16-10-2006
fol



Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
mrFiX переносили немного - остатки по счетам наиболее важным и справочники, которые долго забивать руками. Остатки переносили операциями. Клиент остался доволен.
 
Добавлено:
NeveR_Mind

Цитата:
В типовой УТ определить оплачена ли конкретная отгрузка (реализация).  
Сам принцип - как это сделать? (Взаиморасчеты - по заказам)  

В регистре ВзаиморасчетыСКонтрагентами есть измерение "Сделка", вот в разрезе сделок и смотри есть у тебя остаток или нет (положительный остаток - долг).

Цитата:
В запросе выбрать отгрузки по конкретному заказу, только пока будет хватать денег

ИМХО в запросе никак - только руками перебирать и закрывать по ФИФО.
Всего записей: 805 | Зарегистр. 02-11-2002 | Отправлено: 21:46 16-10-2006
Vxd2000



Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
В процедуре ПередЗаписью документа такой код:
 
Для Каждого Строка Из ТабличнаяЧасть Цикл
          Если Строка.Наименование.Пустая() Тогда
        Сообщить("Строка "+ Строка.НомерСтроки + " не содержит наименование и будет удалена !");
        ТабличнаяЧасть.Удалить(Строка.НомерСтроки-1);
        КонецЕсли;
    КонецЦикла;
 
Но ТабличнаяЧасть.Удалить(Строка.НомерСтроки-1); здесь не работает (ошибка и не удаляются не все. при этом, пустые строки) как удалить пустые строки ?
 
В табличной части документа уже есть строки.
Как программно вставить строку в табличную часть документа, чтобы она была первой.
И как ее сделать недоступной для редактирования, чтобы остальные были доступны ?
Всего записей: 1121 | Зарегистр. 14-11-2002 | Отправлено: 00:55 17-10-2006
RedPromo



Full Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Vxd2000
Когда ты делаеш выборку после удаления строки она у тебя нарушается поэтому нужно либо опять все сначала либо так.
Лучше делать так

Цитата:
 
    Кво = ТабличнаяЧасть1.Количество()-1;
    Пока Кво>-1 Цикл
        Если СтрДлина(ТабличнаяЧасть1[Кво].Строка1)=0 Тогда
             ТабличнаяЧасть1.Удалить(Кво);
        КонецЕсли;      
         Кво = Кво - 1;
    КонецЦикла;     
 

 

Цитата:
Как программно вставить строку в табличную часть документа, чтобы она была первой.


Цитата:
 
ТаблицаЗначений (ValueTable)
Вставить (Insert)
Синтаксис:
Вставить(<Индекс>)  
Параметры:
<Индекс> (обязательный)
Тип: Число. Индекс вставляемой строки.  
Возвращаемое значение:
Тип: СтрокаТаблицыЗначений. Вставленная строка.  
Описание:
Вставляет строку на позицию в таблице значений, соответствующую указанному индексу.  
 

-----------------------------------
Вот на последний вопрос я могу так сказать что просто так это не почится
только через обработку и анализ номера текущей строки и устанавливать возможность редактирования.
Всего записей: 558 | Зарегистр. 05-04-2006 | Отправлено: 02:16 17-10-2006
FOLD

Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Vxd2000
Еще один способ удаления строк с пустыми значениями(Габец рекомендует -типа быстрее)
 
  Пусто = Справочники.Номенклатура.ПустаяСсылка();
  Структура = Новый Структура("Наименование",Пусто);  
  Массив = Товары.НайтиСтроки(Структура);  
  Для каждого Строка Из Массив Цикл                      
   Товары.Удалить(Строка);  
  КонецЦикла;
Цитата:
В табличной части документа уже есть строки.  
Как программно вставить строку в табличную часть документа, чтобы она была первой.  
И как ее сделать недоступной для редактирования, чтобы остальные были доступны ?  

 стр=Товары.Вставить(0);
ЭлементыФормы.Товары.ИзменятьПорядокСтрок = Ложь;
// понятно для чего
По поводу недоступности строки поковыряй процедуру  
ПриВыводеСтроки(Элемент, ОформлениеСтроки, ДанныеСтроки)
например
 Если  ДанныеСтроки.Наименование =Туттвояссылкадобовляемая Тогда
 ОформлениеСтроки.Ячейки.Наименование.ТолькоПросмотр=Истина;
ОформлениеСтроки.Ячейки.Количество.ТолькоПросмотр=Истина;
   КонецЕсли;
 
NeveR_Mind по первому вопросу,так как Взаиморасчеты - по заказам .Запрос к регистру ВзаиморасчетыСКонтрагентами даст тебе остаток долга
по документу заказ.Если нужна именно реализация, то наверно (так как 80 нет как в 77 выбратьподчиненные()), можно наверно использовать НайтиПоСсылкам, ну и  дальше примитивно посчитать долг по конкретной отгрузке
Всего записей: 1238 | Зарегистр. 26-01-2004 | Отправлено: 09:41 17-10-2006 | Исправлено: FOLD, 10:12 17-10-2006
FOLD

Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
NeveR_Mind
Продожу, отвлекают  на всякую фигню, так вот запрос типа  
 
ВЫБРАТЬ
 ВзаиморасчетыСКонтрагентами.Регистратор,
 ВзаиморасчетыСКонтрагентами.Сделка,
 ВзаиморасчетыСКонтрагентами.СуммаВзаиморасчетов
ИЗ
 РегистрНакопления.ВзаиморасчетыСКонтрагентами КАК ВзаиморасчетыСКонтрагентам
ГДЕ
ВзаиморасчетыСКонтрагентами.Сделка = &НужнаяСделка
 
Запрос.УстановитьПараметр("НужнаяСделка",НужнаяСделка);
 
Выборка = Запрос.Выполнить().Выбрать();
    
 СуммаЗаказа= НужнаяСделка.СуммаДокумента;
 ТипРеализации = "ДокументСсылка.РеализацияТоваровУслуг";  
 
СчСуммы =0;
Пока Выборка.Следующий() Цикл
    
 Если ТипЗнч(Выборка.Регистратор) = Тип(ТипРеализации) Тогда  
 
 СчСуммы = СчСуммы+ Выборка.Регистратор.СуммаДокумента;
  Сообщить(СчСуммы);
 КонецЕсли;  
 
Это ко второму вопросу. Из этого же запроса, немного модифицировав, можно сформировать массив для поиска ссылок документов оплаты введеных на основании Реализации
 
ТипРеализации = "ДокументСсылка.РеализацияТоваровУслуг";  
ТипПКО ="ДокументСсылка.ПриходныйКассовыйОрдер";
 
  Мас = Новый Массив;
    Пока Выборка.Следующий() Цикл
  Мас.Очистить();      
 Если ТипЗнч(Выборка.Регистратор) = Тип(ТипРеализации) Тогда  
   Мас.Добавить(Выборка.Регистратор);
  ТЗ = НайтиПоСсылкам(Мас);
  Для каждого стр из ТЗ Цикл            
  Если ТипЗнч(стр.Данные) = Тип(ТипПКО) Тогда
  Сообщить(стр.Данные.СуммаДокумента);
  КонецЕсли;
 КонецЦикла;
Посмотри еще КритерииОтбора, возможно быстрее будет, чем НайтиПоСсылкам
 
 
Всего записей: 1238 | Зарегистр. 26-01-2004 | Отправлено: 12:37 17-10-2006 | Исправлено: FOLD, 12:39 17-10-2006
Vxd2000



Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
RedPromo Вставить(Индекс) с указанием первого индекса не вставлял ее первой.
Всего записей: 1121 | Зарегистр. 14-11-2002 | Отправлено: 15:19 17-10-2006
Vxd2000



Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Цитата:
Пусто = Справочники.Номенклатура.ПустаяСсылка();  
  Структура = Новый Структура("Наименование",Пусто);  
  Массив = Товары.НайтиСтроки(Структура);  
  Для каждого Строка Из Массив Цикл                        
   Товары.Удалить(Строка);  
  КонецЦикла;  

 
Как отсюда еще получить номер строки табличной части, которая заносится в массив, чтобы сделать что - то вроде  
 
Сообщить("Строка "+ НомерСтроки + " будет удалена !");
 
Добавлено:

Цитата:
По поводу недоступности строки поковыряй процедуру  
ПриВыводеСтроки(Элемент, ОформлениеСтроки, ДанныеСтроки)  

 
Хотелось бы всек в одной процедуре,
 
ЭлементыФормы.Товары.Колонки.Наименование.Доступность = Ложь;
работает, но на всю колонку, мне надо на всю строку.
Не могли 1 эс - эс - совцы сделать что - то вроде Строка(индекс) , чтобы здесь работало.
 
Добавлено:

Цитата:
ПриВыводеСтроки(Элемент, ОформлениеСтроки, ДанныеСтроки)  
например  

Кстати при таком методе, она удаляется из панели инструментов, надо чтобы не удалялась.
Можно конечно сделать реакцию на событие приудалениистроки, но наверное это как - то проще делается.
Всего записей: 1121 | Зарегистр. 14-11-2002 | Отправлено: 22:10 17-10-2006 | Исправлено: Vxd2000, 22:11 17-10-2006
FOLD

Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Vxd2000

Цитата:
ЭлементыФормы.Товары.Колонки.Наименование.Доступность = Ложь;  
работает, но на всю колонку, мне надо на всю строку

Цитата:
Кстати при таком методе, она удаляется из панели инструментов
Гм..кхе-кхе..
При каком "таком".. Ты ваще читал ниже "например"..Если не читал ,тогда прочитай ..Если читал прочитай еще раз.

Цитата:
Хотелось бы всек в одной процедуре

Цитата:
Не могли 1 эс - эс - совцы сделать что - то вроде Строка(индекс) , чтобы здесь работало.
Ну чтож....,забубень все в одной процедуре,неважно что работать не будет,зато компактно..Вообще 1эсовцы лохи, нерубят в программировании ничего.. Наделали процедур,а ты разбирайся тут..
Напиши им пару советов и объясни ,как  правильно  надо
Всего записей: 1238 | Зарегистр. 26-01-2004 | Отправлено: 11:14 18-10-2006 | Исправлено: FOLD, 11:16 18-10-2006
tswanea



Full Member		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
ALL
подключал ли ктото к 1С Весы Datecs DS-15 или DT-15?


----------
... И развернутся врата ада, и силы тьмы обрушатся на землю ...
Всего записей: 436 | Зарегистр. 03-08-2004 | Отправлено: 15:51 18-10-2006 | Исправлено: tswanea, 15:55 18-10-2006
Vxd2000



Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
FOLD сарказм твой не уместен, иногда они такие ляпы делают ...
 
Кроме этого, может ты согласишься, может нет, что когда все в одном месте (не про "то" место веду речь) , в одной процедуре, как писал выше, когда все компактно, как - то лучше, чем разборсано по разным.
 
И ничего в этом пожелании такого и этакого нет.
 
Писать им наверное бесполезно (если конечно не их партнер) , у меня куча ошибок и пожеланий "скопилась" в txt файле.
 
Только толку - то от этого.
 
Про то, что работает, на колонку они сделали, что так работает, а для строки обязательно надо в процедуре привыводе строки.
 
Блин, нельзя было добавить строку.
Всего записей: 1121 | Зарегистр. 14-11-2002 | Отправлено: 16:34 18-10-2006
Vxd2000



Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Платформа 8.
При запуске конфигурации (не типовой) возникает постоянно ошибка  
Тип не определен 349e488-958f-4d7d-801f-ef2ee276026
причем в процедуре ПриНачалеРаботыСистемы ничего нет,
и если ставить точку останова в ПередНачаломРаботыСистемы, все равно отладка не работает, и появляется эта же ошибка.
 
Чего за тип скрывается под этим набором цифр и букв ?
Всего записей: 1121 | Зарегистр. 14-11-2002 | Отправлено: 23:08 19-10-2006
IUnknown777



Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Добрый день!
Скажите, можно ли как-то установить картинку кнопке из модуля формы?
Всего записей: 212 | Зарегистр. 20-04-2006 | Отправлено: 14:29 20-10-2006
   

Страницы: 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 102 103 104

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » 1C Программирование и поддержка
ShIvADeSt (06-02-2008 02:31): продолжаем тут http://forum.ru-board.com/topic.cgi?forum=33&topic=9226


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru