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

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

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

ShIvADeSt (03-04-2009 02:03): Продолжение тут
http://forum.ru-board.com/topic.cgi?forum=33&topic=10256#1 		 Версия для печати • Подписаться • Добавить в закладки
Страницы: 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

   

ShIvADeSt



Moderator		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Тема для программирования !!!
Это продолжение темы, предыдущие части доступны тут

ПРОГРАММЫ  1С:Предприятие 1C - 1C: Вопросы по конфигурациям
ВАРЕЗНИК   1C:Предприятие 7.7 - 1С:Предприятие v.8.x - 1C Диск ИТС - 1С: Совместимо 8.х
Топик 1C Ebooks
ЗДЕСЬ (обновлено 27.03.2009) - небольшая библиотечка (книги, документация, видео, утилиты) по 1С, финансам, бухучету и т.п.
Все рассортировано по версиям...

Для заблудившихся в трех соснах >>> FAQ по форуму RU.Board
Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 02:30 06-02-2008 | Исправлено: vkramnik, 21:26 27-03-2009
Odes

Newbie		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Большое спасибо An4eus Tduty80 inetcount
теперь в запросе появилось и подразделение и должность, но остались у меня две ошибки  
 
1) Полей в таблице не N (Равное колву сотрудников, а n+1 т.е в конце появляется пустая стока)
2)Никак не хочет загонять в таблицу XBase и должность и подрзделение, пишет нули. Несмотря на то что в запросе (смотрую через отладчик) - нормально выводится
 
Спасибо.
 

Цитата:
//*******************************************
Процедура Вывод_данных_из_1С()
    Перем ТаблицаСотрудников;    // возвращаемая таблица
    Перем ТекстЗапроса, Запрос, Таб;
    
    Спр_Сотрудники = СоздатьОбъект("Справочник.Сотрудники");
    
 
//*******************************************
 
ДБФ=СоздатьОбъект("XBase");
ДБФ.ДобавитьПоле("stf_id", "n",10,0); //поле кода
ДБФ.ДобавитьПоле("stf_name", "S", 150,0); //поле имени
ДБФ.ДобавитьПоле("stf_pstid", "n",4,0); //поле должность
ДБФ.ДобавитьПоле("stf_depid", "n",4,0); //поле департартамент  
//ДБФ.СоздатьФайл(ФС.ТекКаталог()+"\"+"Staff_data.dbf");
ДБФ.СоздатьФайл("C:\St.dbf");
Дата1=РабочаяДата();
    Запрос = СоздатьОбъект("Запрос");    
    ТекстЗапроса =
        "//{{ЗАПРОС(Сформировать)
        |Период С Дата1 По Дата1;
        |Сотрудник = Справочник.Сотрудники.ОсновнойЭлемент;
        |Код = Справочник.Сотрудники.Код;
        |Родитель = Справочник.Сотрудники.Родитель;
        |СостояниеФизлица = Справочник.Сотрудники.СостояниеФизлица;
        |Должность = Справочник.Сотрудники.Должность.Код;
        |Подразделение = Справочник.Сотрудники.Подразделение.Код;
//        |СотрОсновнойЭлемент = Справочник.Сотрудники.ОсновнойЭлемент;
//        |Группировка Должность Упорядочить по Должность.Наименование;
//        |Группировка Сотрудник Упорядочить по Сотрудник.Наименование без Групп;
        |Группировка Код Упорядочить по Сотрудник.Код  без Групп;
//        |Условие(Сотрудник.ПометкаУдаления()=0);
        |Функция Колво = Счётчик();
        |"//}}ЗАПРОС;
        ;
 
        Запрос.Выполнить(ТекстЗапроса);
        
Пока Запрос.Группировка()=1 Цикл
ДБФ.Добавить(); //добавляем новую строку
ДБФ.stf_id=Запрос.Сотрудник.Код;
ДБФ.stf_name=Запрос.Сотрудник.Наименование;
ДБФ.stf_pstid=Запрос.Сотрудник.Должность;
ДБФ.stf_depid=Запрос.Сотрудник.Подразделение;
ДБФ.Записать(); //фиксируем изменения
КонецЦикла;
ДБФ.ЗакрытьФайл();
 
 
 
КонецПроцедуры

Всего записей: 6 | Зарегистр. 20-03-2006 | Отправлено: 16:58 08-02-2009
neen

Junior Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Очень нужно.  
 
Уже больше года работаем в базе УТ 10. Сейчас нужно перенести остатки на начало года в базу БУ 1.6. Как переносить последующие документы я уже разобрался, а вот с остатками сложность... Нужно то всего только по контрагентам и по товарам, все остальное (РС, Касса, подотчет....) ручками забить совершенно не проблема.  
Помогите пожалуйса, кто уже решал такую задачу или знает чем и как.
Всего записей: 97 | Зарегистр. 10-01-2007 | Отправлено: 01:24 09-02-2009
metmil

Junior Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
St01en
Не помогло, не видит ничего.
Всего записей: 68 | Зарегистр. 08-10-2008 | Отправлено: 06:49 09-02-2009
kalinakrasnay



Member		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Здравствуйте. Обращаюсь к программирующим в 1С, в частности 8.0.
такая ситуация.  
имеется 2 документа: заказ-наряд и расходная накладная.  
Существует ли у формы документа такое событие: что-то по типу При Создании нового.
Мне нужно, чтобы при создании нового заказ-наряда, автоматически создавался документ расходная накладная.
Такого события я что-то не нашла. Или может кто сталкивался и знает  другой способ?
Спасибо за внимание и понимание.
 
п.с. И еще при использовании:
    Отбор=Новый Структура ("работа",текраб.работа);
    нужное=РегистрыСведений.Спецификация.Выбрать(Отбор);
В справочниках написано, что ключей у Новый Структура может быть несколько и их нужно записать через запятую...но про то, каким образом надо оформить значения ключей ничего не сказано. Я делаю так:
Отбор=Новый Структура ("работа,модель",текраб.работа, ЭлементыФормы.модель);
выдается ошибка в параметре 1 (когда ключ единственный все работает корректно)... никак не пойму как исправить, видно туплю где-то...
Помогите советом
Спс.
Всего записей: 351 | Зарегистр. 04-01-2007 | Отправлено: 08:56 09-02-2009 | Исправлено: kalinakrasnay, 08:58 09-02-2009
DARKDEAD

Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
kalinakrasnay
По п.1, создавать расходную накладную есть смысл только при записи ЗН, т.к. Заказ-наряд могут создать и сохранить пустой, и как следствие РН-ая тоже будет пустая.
ЗЫ А правильнее всего, будет вводить РН-ю на основании ЗН-а.
ЗЫЫ А зачем ЗН-ду вообще РН-ая? РН-ая нужна при розничной продаже, а ЗН-д подразумевает наличии либо работ, либо как на пример, специфичного обслуживания (гарантийный, доп оборудование и т.д.)
Всего записей: 249 | Зарегистр. 04-02-2008 | Отправлено: 09:14 09-02-2009
Akam1



Комса		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
kalinakrasnay
Цитата:
знает  другой способ?
В событие ПриЗаписи нового Заказ-наряда вставьте проверку Если ЭтоНовый() Тогда создаем расходную накладную.
Цитата:
п.с. И еще при использовании:  
    Отбор=Новый Структура ("работа",текраб.работа);  
    нужное=РегистрыСведений.Спецификация.Выбрать(Отбор);  
В справочниках написано, что ключей у Новый Структура может быть несколько и их нужно записать через запятую...но про то, каким образом надо оформить значения ключей ничего не сказано.

Код:
    Отбор = Новый Структура;
    Отбор.Вставить("работа", текраб.работа);
    Отбор.Вставить("модель", ЭлементыФормы.модель);


----------
В правильно поставленном вопросе всегда содержится 50% ответа
Все будет так, как должно быть. Даже если будет иначе.
Всего записей: 26400 | Зарегистр. 20-04-2006 | Отправлено: 09:54 09-02-2009
se111



Advanced Member		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Подскажите можно ли отключить кнопку "копировать" внизу на панели  
1с 7.7 в справочнике номенклатуре?  
 

----------
создание сайтов
Всего записей: 782 | Зарегистр. 21-04-2005 | Отправлено: 12:25 09-02-2009
An4eus



Silver Member		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
se111
да...
Заходим в конфигуратор, правой кнопкой на кнопку Копировать -> Свойства...
см. идентификатор (если нету, то назови его, например, кнКопировать) и иди в модуль форму.
Например:
Код:
Процедура ПриОткрытии()
//...
//при определенных условиях, сделаем невидимой!
Форма.кнКопировать.Видимость(0);
//или [как больше нравится!]
//при определенных условиях, сделаем недоступной!
Форма.кнКопировать.Доступность(0);
//...
КонецПроцедуры


----------
Век живи - век учись!
Всего записей: 3768 | Зарегистр. 23-07-2007 | Отправлено: 13:37 09-02-2009
vkramnik



Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
09.02.2009
В 1С-Ebooks-библиотечке очередные обновления и дополнения, в том числе :
Раздел 1С-Programming - ПРАВИЛЬНАЯ версия диска к книге Михайлова "1С-Программирование как 2х2"
Раздел 1С-Видео - Видеокурс 1С Бухгалтерия 7.7 (ISO, 733 Мб - кусками по 15 Мб)
Ссылки - ЗДЕСЬ, пасс - стандартный
Всего записей: 1856 | Зарегистр. 14-12-2005 | Отправлено: 16:00 09-02-2009
kalinakrasnay



Member		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
DARKDEAD, расскажу побольше о ПО: это делается для СТО. У ЗН есть шапка и 2 табличные части (производимые работы и требующиеся на них материалы). Заполняется шапка ЗН, затем те работы которые будут выполняться, как только выбирается работа, в табличную часть с материалами автоматически вносится  требующийся для выполнения данной работы материал (в регистре сведений хранится какие материалы на какие работы требуются, и собственно из регистра сведений и берутся записываемые материалы).

Цитата:
По п.1, создавать расходную накладную есть смысл только при записи ЗН, т.к. Заказ-наряд могут создать и сохранить пустой, и как следствие РН-ая тоже будет пустая.

да это ничего, в рамках учебного процесса думаю пойдет. + предметная область СТО - не думаю, что там создаются пустые ЗН

Цитата:
ЗЫ А правильнее всего, будет вводить РН-ю на основании ЗН-а.

Сначала я сделала именно такой вариант....а потом все думала, думала над этим...и потом все-таки решила, сделать, что расходка создается при создании ЗН.

Цитата:
ЗЫЫ А зачем ЗН-ду вообще РН-ая? РН-ая нужна при розничной продаже, а ЗН-д подразумевает наличии либо работ, либо как на пример, специфичного обслуживания (гарантийный, доп оборудование и т.д.)

у СТО такая вот организация документации, что в ЗН еще и копия расходки вставляется.
 
Akam1, вау! Спасибо, буду знать как добавлять ключи...но к сожалению, во встроенном хелпе нашла такую вещь насчет "Выбрать" именно для регистра сведений: "Важно! Структура может содержать только один элемент." т.е. один ключ? я верно поняла? И выбор по 2-м критериям с помощью этой функции не выйдет (я пыталась сделать выбор на основе выбранного, ну т.е. тупо сначала по модели, потом по работе...ха...ничегошеньки не вышло).

Цитата:
В событие ПриЗаписи нового Заказ-наряда вставьте проверку Если ЭтоНовый() Тогда создаем расходную накладную.

Биг Сенкс за это!!!
ой... только чет туплю... это условие у меня не работает(( Я пишу просто: если ЭтоНовый() наверно не так надо...
 
 
+возможно ли записывать в форму, когда она закрыта?
 

Код:
Выбранный=Необходимый_материал.Выгрузить();
текРН=Документы.Расходная_накладная.НайтиПоНомеру(Номер);
текРН.Строка_расходной_накладной.Загрузить(Выбранный);

 
пишет ошибку что недоступно для записи (хотя если записывать наоборот, из закрытой формы в открытую, то прекрасно работает... но нужно именно при закрытой РН записать в нее данные из ЗН)
Всего записей: 351 | Зарегистр. 04-01-2007 | Отправлено: 22:32 09-02-2009 | Исправлено: kalinakrasnay, 23:45 09-02-2009
Vit1501

Junior Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Добрый день! Возник такой вопрос. Может ли веб расширение 1с создавать сама веб приложение, или для этого придется ставить каку-либо среду разработки(например visual studio). Я просто не силен в веб технологиях, но хотелось бы все таки понять последовательность действий чтобы получать доступ к базе из браузера.
Всего записей: 38 | Зарегистр. 15-07-2008 | Отправлено: 10:33 10-02-2009
Koolyan



Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Здравствуйте! уважаемые спецы ! есь вопрос в котором не можем понять как себя вести... а именно: в переоценки внеотработанных активов пытаемся  сделать переоценку, создаем документ добавляемы объекты , пытаемся расчитать и провести дак вот при проводки программа выдаеть следующие  
 
Ошибка при выполнении обработчика - '{ОбщийМодуль.УправлениеВнеоборотнымиАктивами(132)}: Преобразование значения к типу Дата не может быть выполнено'
по причине:
{ОбщийМодуль.УправлениеВнеоборотнымиАктивами(132)}: Преобразование значения к типу Дата не может быть выполнено
 
что можно сделать? как можно от этого избавитьсяили хоть обойти?  
Всего записей: 264 | Зарегистр. 04-08-2006 | Отправлено: 11:39 10-02-2009
Akam1



Комса		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
kalinakrasnay
Цитата:
т.е. один ключ? я верно поняла? И выбор по 2-м критериям с помощью этой функции не выйдет
Да.
Код:
    Отбор = Новый Структура("работа", текраб.работа);  
    ВыборкаНужного=РегистрыСведений.Спецификация.Выбрать(Отбор);
    Пока ВыборкаНужного.Следующий() Цикл
           //здесь ищем нужное по модели
    КонецЦикла;
В качестве полей для отбора используются измерения или реквизиты регистра, для которых установлен признак Индексировать или Ведущее.
Или попробуйте так:
Код:
    Отбор = Новый Структура;  
    Отбор.Вставить("работа", текраб.работа);  
    Отбор.Вставить("модель", ЭлементыФормы.модель);
    нужное=РегистрыСведений.Спецификация.Получить(Отбор);
Здесь необходимо передать в структуре все значения измерений, а получим структуру, в которой для каждого элемента ключ - название ресурса, а значением - значение ресурса из найденной записи.
Если честно - не видна общая картина того, что Вы имеете и хотите сделать. Например, периодический ли регистр и т.д. Передача "ЭлементыФормы.модель" - странновато. И вообще лучше воспользоваться запросами.
Цитата:
Я пишу просто: если ЭтоНовый() наверно не так надо...
Не вижу как и где Вы пишете.
Код:
    Если ЭтоНовый() Тогда
    //здесь начинаем создавать документ РН
    КонецЕсли;

Цитата:
+возможно ли записывать в форму, когда она закрыта?
Возможно.
Я так понял Вы думаете критериями 7.х.
Код:
текРН.Строка_расходной_накладной.Загрузить(Выбранный);
Вы куда загружаете? Табличных частей в РН нет? Может
Код:
текРН[ИмяТЧ].Загрузить(Выбранный);
И потом
Код:
    Если текРН.Проведен=Истина Тогда
        текРН.Записать(РежимЗаписиДокумента.Проведение, РежимПроведенияДокумента.Неоперативный);
    Иначе
        текРН.Записать();
    КонецЕсли;
Ну вот как-то так.

----------
В правильно поставленном вопросе всегда содержится 50% ответа
Все будет так, как должно быть. Даже если будет иначе.
Всего записей: 26400 | Зарегистр. 20-04-2006 | Отправлено: 11:59 10-02-2009
kalinakrasnay



Member		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Akam1, спасибо, насчет выбора по модели и работе наконец разобралась! Теперь то, что нужно. Сделала таким вариантом:Далее
 
п.с. newjon, лучше б дельное что-нибудь кому-нибудь посоветовали по теме! А тегами я умею пользоваться ...
теперь все устраивает?!

----------
Есть только 2 мнения: мое и неправильное
Всего записей: 351 | Зарегистр. 04-01-2007 | Отправлено: 13:04 10-02-2009 | Исправлено: kalinakrasnay, 08:50 11-02-2009
newjon



Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
kalinakrasnay
привет а вы знаете как пользоваться тегом more
Всего записей: 395 | Зарегистр. 03-06-2005 | Отправлено: 05:32 11-02-2009
Akam1



Комса		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
kalinakrasnay
Цитата:
+Преподаватель сказал воспользоваться "выбрать".
Ну да. Все зависит от контекста вопроса. Иногда достаточно "Выбрать", а иногда лучше воспользоваться запросами.
Цитата:
вот всегда выполняется "иначе", даже если я создаю новый Заказ-наряд.
А ПриЗаписи() в модуле объекта или в модуле формы документа?
Цитата:
По прежнему выдается ошибка, что объект недоступен для изменения (на строке текРН.Строка_расходной_накладной.Загрузить(Выбранный)).
Вы пробовали как я написал "текРН[Строка_расходной_накладной]Загрузить(Выбранный);" (если "Строка_расходной_накладной" - это наименование этой ТЧ, куда надо загрузить)?

----------
В правильно поставленном вопросе всегда содержится 50% ответа
Все будет так, как должно быть. Даже если будет иначе.
Всего записей: 26400 | Зарегистр. 20-04-2006 | Отправлено: 09:54 11-02-2009
vkramnik



Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
11.02.2009
В 1С-Ebooks-библиотечке очередные обновления и дополнения, в том числе :
Раздел 1C v7.7 - Files & Docs
NEW -  1C v77 - Методика настройки и конфигурирования - Бухгалтерский учет, Оперативный учет (Чистов, Горшенин)
Раздел 1С-Видео
Обновлена раскладка видеокурсов
Ссылки - ЗДЕСЬ, пасс - стандартный
Всего записей: 1856 | Зарегистр. 14-12-2005 | Отправлено: 10:58 11-02-2009
DARKDEAD

Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Головоломка.
Исходные данные: документ (Расходная накладная), при проведении использует определенную партию для списания.
Задача: написать код для внешнего документа, который изменяет партию для конкретной РН.
Получилось нечто такое:
текст модуля
Но при просмотре РН (движ. док), все равно остается старая партия, хотя движения документа коррекции правильные.
Всего записей: 249 | Зарегистр. 04-02-2008 | Отправлено: 14:54 11-02-2009
MAD_est



Junior Member		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
доброго времени суток, кто нить знает как можно через драйвер 1с-а, для работы со сканером штрих-кодов произвести считывание, не нажимая кнопок и не считывая реальный штрих код? 1с 8ой версии
Всего записей: 33 | Зарегистр. 17-04-2007 | Отправлено: 15:13 11-02-2009
kalinakrasnay



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

Цитата:
А ПриЗаписи() в модуле объекта или в модуле формы документа?

Вообще я делала в модуле формы (в конечном варианте так и оставила), попробывала в модуле объекта... не работает. Потом покопалась в книгах, натолкнуло на мысль: проверять новый ли ЗН при открытии, а при записи уже смотрю, новый или нет...ну и действую далее. смотреть кодТак все работает. Большое спасибо, что побудили мозги работать!!!
 

Цитата:
Вы пробовали как я написал "текРН[Строка_расходной_накладной]Загрузить(Выбранный);" (если "Строка_расходной_накладной" - это наименование этой ТЧ, куда надо загрузить)?

вот именно так и написала (смотрите в коде), но выдается ошибка -  
Переменная не определена (Строка_расходной_накладной)
        текРН[<<?>>Строка_расходной_накладной].Загрузить(Выбранный)
Всего записей: 351 | Зарегистр. 04-01-2007 | Отправлено: 16:00 11-02-2009 | Исправлено: kalinakrasnay, 16:02 11-02-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

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


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

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

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru