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

Хранилище

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

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




>  При входе в конфигурацию выдавал бы диалог?
cobra77777
Отправлено: 19.03.18, 18:01


Общительный
**

Группа: Пользователи
Сообщений: 25
Регистрация: 01.09.13
Пользователь №: 29566


logist @ Сегодня, 18:11 * ,
Спасибо большое logist
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #139792 · Ответов: 4 · Просмотров: 1578
 

>  При входе в конфигурацию выдавал бы диалог?
cobra77777
Отправлено: 18.03.18, 14:35


Общительный
**

Группа: Пользователи
Сообщений: 25
Регистрация: 01.09.13
Пользователь №: 29566


logist @ Сегодня, 3:22 * ,
А начало кода примерно можете ",набросать" ?
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #139742 · Ответов: 4 · Просмотров: 1578
 

>  При входе в конфигурацию выдавал бы диалог?
cobra77777
Отправлено: 17.03.18, 20:58


Общительный
**

Группа: Пользователи
Сообщений: 25
Регистрация: 01.09.13
Пользователь №: 29566


Всем привет!


Нужна ваша помощь. Прошу не пинать я только учусь.

Управл.форма. Платформа 8.3.11.3034.Есть самописная конфигурация.

Вопрос: как при входе пользователя в конфигурацию выдавал бы диалог:
"Вы зашли в программу 1 раз". В след.раз 2 раз. и т.д.

Спасибо.
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #139726 · Ответов: 4 · Просмотров: 1578
 

>  Как позиционировать текущую строку ...?
cobra77777
Отправлено: 23.09.15, 12:23


Общительный
**

Группа: Пользователи
Сообщений: 25
Регистрация: 01.09.13
Пользователь №: 29566


Цитата(Vofka @ 22.09.15, 20:34) *
Это вы документ напечатать хотите? Создайте параметризуемую команду с типом ссылка на ваш документ. В обработчике команды будет ссылка на него. Там же можно вставить серверную функцию, которая вернет Табличный документ (либо запросит его у какой-то другой процедуры). А саму команду в виде кнопки сможете вынести практически везде, куда надо.

Собственно хочу из табл.части распечатывать (по одной шт.) этикетки. Это я имею ввиду.
  Форум: Программирование управляемых форм 1С 8.2 · Просмотр сообщения: #103330 · Ответов: 7 · Просмотров: 4618
 

>  Как позиционировать текущую строку ...?
cobra77777
Отправлено: 22.09.15, 17:05


Общительный
**

Группа: Пользователи
Сообщений: 25
Регистрация: 01.09.13
Пользователь №: 29566


Цитата(Vofka @ 22.09.15, 17:43) *
Тогда нужно в процедуру печати передавать данные текущей строки, которые, как написали выше, можно получить только в модуле формы.

На форме создал Кнопку прописал две директивы &Клиент &На сервере, а далее... ?
  Форум: Программирование управляемых форм 1С 8.2 · Просмотр сообщения: #103297 · Ответов: 7 · Просмотров: 4618
 

>  Как позиционировать текущую строку ...?
cobra77777
Отправлено: 22.09.15, 16:28


Общительный
**

Группа: Пользователи
Сообщений: 25
Регистрация: 01.09.13
Пользователь №: 29566


Цитата(VikingKosmo @ 22.09.15, 17:17) *
Если этот код находится в модуле менеджера, то никак. Текущая строка доступна только в модуле формы. Что вообще требуется, сформировать некий ТабличныйДокумент в который попадут данные только из текущей строки табличной части, что ли?

Да собственно нужно из Табличной Части (далее ТЧ) по ОДНОЙ СТРОКЕ выводилась на Печать этикетка. Т.е. куда установил курсор в ТЧ то и распечатывалось.
  Форум: Программирование управляемых форм 1С 8.2 · Просмотр сообщения: #103294 · Ответов: 7 · Просмотров: 4618
 

>  Как позиционировать текущую строку ...?
cobra77777
Отправлено: 22.09.15, 16:14


Общительный
**

Группа: Пользователи
Сообщений: 25
Регистрация: 01.09.13
Пользователь №: 29566


Есть код (см.внизу).
Собственно хочу вывести отчёт Только текущую строку (одну) (а не всё сразу как в моём примере (цикле)) ?


Процедура ПечатьЭтикетки(ТабДок, Ссылка) Экспорт
    //{{_КОНСТРУКТОР_ПЕЧАТИ(Акт)
    Макет = Документы.АктОтправкиТехникиВРемонт.ПолучитьМакет("ПечатьЭтикетки");
    Запрос = Новый Запрос;
    Запрос.Текст =
    "ВЫБРАТЬ
    |        АктОтправкиТехникиВРемонт.ТабличнаяЧасть.(
    |       Принтер,
    |        ИнвентарныйНомер,
    |        ЗаводскойНомер,
    |       Причина  
    |    )
    |ИЗ
    |    Документ.АктОтправкиТехникиВРемонт КАК АктОтправкиТехникиВРемонт
    |ГДЕ
    |    АктОтправкиТехникиВРемонт.Ссылка В (&Ссылка)";
    Запрос.Параметры.Вставить("Ссылка", Ссылка);
    Выборка = Запрос.Выполнить().Выбрать();

    ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");
    Шапка = Макет.ПолучитьОбласть("Шапка");
    ОбластьТабличнаяЧастьШапка = Макет.ПолучитьОбласть("ТабличнаяЧастьШапка");
    ОбластьТабличнаяЧасть = Макет.ПолучитьОбласть("ТабличнаяЧасть");
    Подвал = Макет.ПолучитьОбласть("Подвал");

    ТабДок.Очистить();

    ВставлятьРазделительСтраниц = Ложь;
    Пока Выборка.Следующий() Цикл
        Если ВставлятьРазделительСтраниц Тогда
            ТабДок.ВывестиГоризонтальныйРазделительСтраниц();
        КонецЕсли;

        ТабДок.Вывести(ОбластьЗаголовок);
        
        Шапка.Параметры.Заполнить(Выборка);
        ТабДок.Вывести(Шапка, Выборка.Уровень());


        ТабДок.Вывести(ОбластьТабличнаяЧастьШапка);
        ВыборкаТабличнаяЧасть = Выборка.ТабличнаяЧасть.Выбрать();
        Пока ВыборкаТабличнаяЧасть.Следующий() Цикл
            ОбластьТабличнаяЧасть.Параметры.Заполнить(ВыборкаТабличнаяЧасть);
             ТабДок.Вывести(ОбластьТабличнаяЧасть, ВыборкаТабличнаяЧасть.Уровень());
        КонецЦикла;
        
        Подвал.Параметры.Заполнить(Выборка);
        ТабДок.Вывести(Подвал);
        ТабДок.АвтоМасштаб = Истина;
        ТабДок.ПолеСлева = 7;
        ТабДок.ПолеСправа=10;
        ТабДок.ПолеСверху=10;
        ТабДок.ПолеСнизу=10;
        ТабДок.ОриентацияСтраницы = ОриентацияСтраницы.Ландшафт;
           ВставлятьРазделительСтраниц = Истина;
        
         КонецЦикла;
    //}}
КонецПроцедуры



 ! 

Выделяйте код!
 
  Форум: Программирование управляемых форм 1С 8.2 · Просмотр сообщения: #103290 · Ответов: 7 · Просмотров: 4618
 

>  Как создать массив в 1С ?
cobra77777
Отправлено: 28.07.14, 17:06


Общительный
**

Группа: Пользователи
Сообщений: 25
Регистрация: 01.09.13
Пользователь №: 29566


Цитата(Petre @ 28.07.14, 17:57) *
Массив = Новый Массив;
ГСЧ = Новый ГенераторСлучайныхЧисел();
Для Сч = 1 По 100 Цикл
    Массив.Добавить(ГСЧ.СлучайноеЧисло(0, 1000));
КонецЦикла;


БОЛЬШОЕ СПАСИБО.
  Форум: Программирование управляемых форм 1С 8.2 · Просмотр сообщения: #89432 · Ответов: 3 · Просмотров: 3708
 

>  Как создать массив в 1С ?
cobra77777
Отправлено: 28.07.14, 16:38


Общительный
**

Группа: Пользователи
Сообщений: 25
Регистрация: 01.09.13
Пользователь №: 29566


Здравствуйте!

Извините совсем за чайниковский вопрос.

Как создаётся массив из 100 случайных чисел в диапазоне от 0 до 1000 ?
  Форум: Программирование управляемых форм 1С 8.2 · Просмотр сообщения: #89427 · Ответов: 3 · Просмотров: 3708
 

>  Как выгрузить таблицу значений (далее ТЗ) в excel ?
cobra77777
Отправлено: 26.06.14, 13:24


Общительный
**

Группа: Пользователи
Сообщений: 25
Регистрация: 01.09.13
Пользователь №: 29566


На форме создал кнопку ВыгрузитьВXLS при проверки модуля выдаёт ошибку :

{Обработка.ТаблицаЗначений.Форма.Форма.Форма(68,36)}: Переменная не определена (ИмяФайла)
ТЗвТДивЕксель (ТаблицаЗначений, <<?>>ИмяФайла) (Проверка: Тонкий клиент)

Что неправильно ?

&НаКлиенте
Процедура ВыгрузитьВXLS(Команда)
    
     ТЗвТДивЕксель (ТаблицаЗначений, ИмяФайла)
    
КонецПроцедуры


  &НаСервере
Процедура ТЗвТДивЕксель (ТаблицаЗначений, ИмяФайла)
    
    
    
    ТД = Новый ТабличныйДокумент;

    КолонокВсего = ТаблицаЗначений.Количество();
    Для Колонка = 1 По КолонокВсего Цикл
        ТД.Область(1, Колонка).Текст = ТаблицаЗначений.Колонки[Колонка - 1].Заголовок;
    КонецЦикла;
    Строка = 1;
    Для Каждого ТаблицаСтрока Из ТаблицаЗначений Цикл
        Строка = Строка + 1;
        Для Колонка = 1 По КолонокВсего Цикл
            ТД.Область(Строка, Колонка).Текст = ТаблицаСтрока.Получить(Колонка - 1);
        КонецЦикла;
    КонецЦикла;
    ТД.Записать(ИмяФайла, ТипФайлаТабличногоДокумента.XLS);    
    
    
    
КонецПроцедуры



 ! 

Выделяйте код!
 
  Форум: Программирование управляемых форм 1С 8.2 · Просмотр сообщения: #88250 · Ответов: 10 · Просмотров: 17960
 

>  Как выгрузить таблицу значений (далее ТЗ) в excel ?
cobra77777
Отправлено: 25.06.14, 17:31


Общительный
**

Группа: Пользователи
Сообщений: 25
Регистрация: 01.09.13
Пользователь №: 29566


Цитата(Petre @ 25.06.14, 18:11) *


если не сложно можете привезти пример как это сделать ?
  Форум: Программирование управляемых форм 1С 8.2 · Просмотр сообщения: #88218 · Ответов: 10 · Просмотров: 17960
 

>  Как выгрузить таблицу значений (далее ТЗ) в excel ?
cobra77777
Отправлено: 25.06.14, 16:10


Общительный
**

Группа: Пользователи
Сообщений: 25
Регистрация: 01.09.13
Пользователь №: 29566


Я только учусь. Есть код. Один вопрос: Как можно выгрузить ТЗ в excel след. структуры:

Страховой номер Фамилия Имя Отчество

Спасибо.



&НаКлиенте
Процедура ТаблицаЗначений(Команда)
    ТЗ ()
КонецПроцедуры

&НаСервереБезКонтекста
Процедура ТЗ ()
    

                                                          
Чтение = Новый ЧтениеXML;


ТЗ = Новый ТаблицаЗначений;


ТЗ.Колонки.Добавить ("СтраховойНомер");
ТЗ.Колонки.Добавить ("Фамилия");
ТЗ.Колонки.Добавить ("Имя");
ТЗ.Колонки.Добавить ("Отчество");


ТЗ.Очистить();

Файл = Новый ЧтениеXML;
Файл.ОткрытьФайл("c:\1.xml");
ИмяУзла = "";

Пока Файл.Прочитать() Цикл

Если Файл.ТипУзла = ТипУзлаXML.НачалоЭлемента Тогда
ИмяУзла = Файл.Имя;
КонецЕсли;

Если Файл.ТипУзла = ТипУзлаXML.Текст и ИмяУзла = "СтраховойНомер" Тогда
НовСтр = ТЗ.Добавить();
НовСтр.СтраховойНомер = Файл.Значение;
КонецЕсли;

Если Файл.ТипУзла = ТипУзлаXML.Текст и ИмяУзла = "Фамилия" Тогда
НовСтр = ТЗ.Добавить();
НовСтр.Фамилия = Файл.Значение;
КонецЕсли;
                                                        
Если Файл.ТипУзла = ТипУзлаXML.Текст и ИмяУзла = "Имя" Тогда
НовСтр = ТЗ.Добавить();
НовСтр.Имя = Файл.Значение;
КонецЕсли;

Если Файл.ТипУзла = ТипУзлаXML.Текст и ИмяУзла = "Отчество" Тогда
НовСтр = ТЗ.Добавить();
НовСтр.Отчество = Файл.Значение;
КонецЕсли;

КонецЦикла;

Файл.Закрыть();

  
КонецПроцедуры



 ! 

Выделяйте код!
 
  Форум: Программирование управляемых форм 1С 8.2 · Просмотр сообщения: #88214 · Ответов: 10 · Просмотров: 17960
 

>  Добавить данные в табличную часть экранной формы
cobra77777
Отправлено: 12.06.14, 6:03


Общительный
**

Группа: Пользователи
Сообщений: 25
Регистрация: 01.09.13
Пользователь №: 29566


Цитата(Vofka @ 11.06.14, 18:31) *
cobra77777, в 1С нет такого понятия как табица документа. Я догадываюсь о чем речь, но хотелось бы, что бы вы объяснили внятно что конкретно вы сделали и в чем конкретно трудность.

Я бы хотел видеть такое

 ! 

Правила, п.11. Следующие сообщения не по правилам будут полностью удаляться.
 
  Форум: Программирование управляемых форм 1С 8.2 · Просмотр сообщения: #87673 · Ответов: 6 · Просмотров: 2575
 

>  Добавить данные в табличную часть экранной формы
cobra77777
Отправлено: 11.06.14, 16:49


Общительный
**

Группа: Пользователи
Сообщений: 25
Регистрация: 01.09.13
Пользователь №: 29566


а можете показать на моём примере:


 ! 

Ознакомиться с пунктом 12 правил форума так и не случилось...
 


Здесь ВОПРОС ??? Как добавить строку в Таблицу Документа ?
  Форум: Программирование управляемых форм 1С 8.2 · Просмотр сообщения: #87649 · Ответов: 6 · Просмотров: 2575
 

>  Добавить данные в табличную часть экранной формы
cobra77777
Отправлено: 11.06.14, 15:21


Общительный
**

Группа: Пользователи
Сообщений: 25
Регистрация: 01.09.13
Пользователь №: 29566


ну т.е. чтобы визуально было видно что считал с файла ? XML файл я "выдёргиваю" 4-е значения. Страх.№, Фамилия, Имя, Отчество , и мне необходимо видеть что я считал с файла XML.
  Форум: Программирование управляемых форм 1С 8.2 · Просмотр сообщения: #87644 · Ответов: 6 · Просмотров: 2575
 

>  Добавить данные в табличную часть экранной формы
cobra77777
Отправлено: 11.06.14, 14:50


Общительный
**

Группа: Пользователи
Сообщений: 25
Регистрация: 01.09.13
Пользователь №: 29566


Скажите пожалуйста как при чтении xml файла чтобы данные добавлялись в табличную часть экранной формы ? Пример желательно.
  Форум: Программирование управляемых форм 1С 8.2 · Просмотр сообщения: #87641 · Ответов: 6 · Просмотров: 2575
 

>  Как выгрузить в XML такое вот объявление?
cobra77777
Отправлено: 13.12.13, 16:53


Общительный
**

Группа: Пользователи
Сообщений: 25
Регистрация: 01.09.13
Пользователь №: 29566


Цитата(logist @ 13.12.13, 16:46) *
Эта строчка и есть сам файл, вероятно.

twilight_dream, запишите как текстовый файл с расширением xml ...


Автор в студию. Поподробнее если можно Как ? Что ?
  Форум: Программирование обычных форм 1С 8.2 и не интер... · Просмотр сообщения: #79207 · Ответов: 8 · Просмотров: 4739
 

>  Как выгрузить в XML такое вот объявление?
cobra77777
Отправлено: 13.12.13, 16:39


Общительный
**

Группа: Пользователи
Сообщений: 25
Регистрация: 01.09.13
Пользователь №: 29566


А это строчка где то в середине файла или в начале ?
  Форум: Программирование обычных форм 1С 8.2 и не интер... · Просмотр сообщения: #79205 · Ответов: 8 · Просмотров: 4739
 

>  Вывести на печать только определенные документы
cobra77777
Отправлено: 24.09.13, 12:03


Общительный
**

Группа: Пользователи
Сообщений: 25
Регистрация: 01.09.13
Пользователь №: 29566


Здравствуйте!
Форма Управляемая.
Как можно "пометить" (или еще как то) вывести на печать только определенные документы?
Есть определенная форма (макет) по которой необх-мо придерживаться.
Нужно распечатать только те детали которые не были распечатаны в предыдущем списке.

 ! 

Правила, п.3
 
  Форум: Программирование управляемых форм 1С 8.2 · Просмотр сообщения: #75197 · Ответов: 2 · Просмотров: 2098
 

>  А можно ли поставить пароль "замочки" на конфигуратор
cobra77777
Отправлено: 23.09.13, 14:08


Общительный
**

Группа: Пользователи
Сообщений: 25
Регистрация: 01.09.13
Пользователь №: 29566


Здравствуйте!

Имеется 1С Предприятие 8.2.15.301.
Собственно вопрос можно ли поставить пароль "замочки" на конфигуратор, чтобы юзер не имел возможности редактировать ?


 ! 

Праивла, п.3
 
  Форум: Администрирование и настройка 1С · Просмотр сообщения: #75141 · Ответов: 4 · Просмотров: 3056
 

>  Загрузка в XML
cobra77777
Отправлено: 20.09.13, 10:38


Общительный
**

Группа: Пользователи
Сообщений: 25
Регистрация: 01.09.13
Пользователь №: 29566


Цитата(alex040269 @ 18.09.13, 15:26) *
Тогда приведите строку Чтение.Значение к виду ГГГГММДД и будет счастье!

Как разобраться с ОПИСАНИЕМ. ОПИСАНИЕ берется с ПЕРЕЧИСЛЕНИЯ там два статуса: СТАТУС и СТАТУС2.
Код написал не работает.

Если Чтение.Имя="Описание" Тогда
Объект.Описание = Чтение.Значение;
Сообщить (Чтение.Значение);



 ! 

Правила, 12!
 
  Форум: Программирование обычных форм 1С 8.2 и не интер... · Просмотр сообщения: #74960 · Ответов: 9 · Просмотров: 2729
 

>  Загрузка в XML
cobra77777
Отправлено: 18.09.13, 13:08


Общительный
**

Группа: Пользователи
Сообщений: 25
Регистрация: 01.09.13
Пользователь №: 29566


если так тогда выдается след.ошибку:

Преобразование значение к типу Дата не может быть выполнено.
  Форум: Программирование обычных форм 1С 8.2 и не интер... · Просмотр сообщения: #74833 · Ответов: 9 · Просмотров: 2729
 

>  Загрузка в XML
cobra77777
Отправлено: 18.09.13, 12:56


Общительный
**

Группа: Пользователи
Сообщений: 25
Регистрация: 01.09.13
Пользователь №: 29566


Цитата(Vofka @ 18.09.13, 11:25) *
cobra77777, я так полагаю в сообщении выше какой-то код был? Какой?

Не хочу читать ваши и выполнять ваши правила...

Он выдал след.ошибку:

Значение поле "Дата" не может быть пустой датой.
  Форум: Программирование обычных форм 1С 8.2 и не интер... · Просмотр сообщения: #74829 · Ответов: 9 · Просмотров: 2729
 

>  Загрузка в XML
cobra77777
Отправлено: 18.09.13, 11:07


Общительный
**

Группа: Пользователи
Сообщений: 25
Регистрация: 01.09.13
Пользователь №: 29566


Цитата(Vofka @ 18.09.13, 10:49) *
Эта строка не на какие мысли не наводит:
?

А дааа. А как правильно эти строки считать 'Номер' и 'Дата' ???


 ! 

Правила, п.12
 
  Форум: Программирование обычных форм 1С 8.2 и не интер... · Просмотр сообщения: #74824 · Ответов: 9 · Просмотров: 2729
 

>  Загрузка в XML
cobra77777
Отправлено: 18.09.13, 10:44


Общительный
**

Группа: Пользователи
Сообщений: 25
Регистрация: 01.09.13
Пользователь №: 29566


Здравствуйте!

Есть файл выгруженный:
Цитата
<?xml version="1.0" encoding="UTF-8"?>
<Выгрузка>
<Выгрузка Номер="000000001" Дата="05.02.2013 12:51:14" СотрудникаГруппы="Ахметов Л.И." СотрудникОтдела="Никулин К.В." Принтер="OKI B431d (MB491)" Склад="Основной" Описание="ввввв"/>
<Выгрузка Номер="000000002" Дата="25.02.2013 19:17:03" СотрудникаГруппы="Ахметов Л.И." СотрудникОтдела="Мусаев С.А." Принтер="Canon MF4410 (МФУ)" Склад="Основной" Описание="авввв"/>
<Выгрузка Номер="000000003" Дата="26.02.2013 15:49:38" СотрудникаГруппы="Ахметов Л.И." СотрудникОтдела="Васильев Ю.В." Принтер="Samsung 3050 (ML-D3050B)" Склад="Основной" Описание="пппп"/>
</Выгрузка>


Есть код: КОТОРЫЙ ВЫДАЕТ ОШИБКУ: Преобразование значения к типу Дата не может быть выполнено.
  Чтение = Новый ЧтениеXML;
Чтение.ОткрытьФайл("C:\downloads\itog.xml");
Док="";
// чтение осуществляется по одному тегу
Пока Чтение.Прочитать() Цикл
    // анализируем тип элемента и его имя
    Если Чтение.ТипУзла = ТипУзлаXML.НачалоЭлемента Тогда
        Если Чтение.Имя="Выгрузка" Тогда
         // создаем новый элемент документа
            Док = Документы.АктПриемаКартриджа.СоздатьДокумент();
// читаем атрибуты
            Пока Чтение.ПрочитатьАтрибут() Цикл
                Если Чтение.Имя="Номер" Тогда
                    
                    Док.Дата = Дата(Чтение.Значение); //ошибка
                                       
                  КонецЕсли;

            КонецЦикла;
        КонецЕсли;
    ИначеЕсли Чтение.ТипУзла = ТипУзлаXML.Текст Тогда
        // заполняем наименование созданного ранее элемента
        Док.Номер = Чтение.Значение;
    ИначеЕсли Чтение.ТипУзла = ТипУзлаXML.КонецЭлемента Тогда
        // требуется записать информацию про клиента
        Док.Записать();
    КонецЕсли;



 i 

Выделяйте код
 
  Форум: Программирование обычных форм 1С 8.2 и не интер... · Просмотр сообщения: #74819 · Ответов: 9 · Просмотров: 2729
 


Новые сообщения  Открытая тема (есть новые ответы)
Опрос  Опрос (есть новые голоса)
Нет новых сообщений  Открытая тема (нет новых ответов)
Нет новых голосов  Опрос (нет новых голосов)
Популярная тема  Горячая тема (есть новые ответы)
Закрыта  Закрытая тема
Нет новых  Горячая тема (нет новых ответов) Перемещена  Тема перемещена
 

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