Архивы 1C - Страница 39 из 49

Программное создание и открытие документа 1С в управляемой форме

06.04.2017 Павел Грибов 1C

В управляемых формах сделать это стало чуточку посложнее. Чтобы не получить ошибку «Использование модальный окон в данном режиме запрещено», нужно организовать открытие окон в два этапа: на клиенте и сервере. Например так:

&НаСервере
Функция РеализацияТовараНаСервере(ДанныеФормы)
//	сообщить(ПользователиИнформационнойБазы.ТекущийПользователь());
	ДанныеФормы.Дата=ТекущаяДата();
	ДанныеФормы.Номер="1";
	Возврат ДанныеФормы;
КонецФункции

&НаКлиенте
Процедура РеализацияТовара(Команда)
	Форма=ПолучитьФорму("Документ.РеализацияТоваров.ФормаОбъекта");	
	ДанныеФормы=Форма.Объект;
	ДанныеФормы=РеализацияТовараНаСервере(ДанныеФормы);
	КопироватьДанныеФормы(ДанныеФормы,Форма.Объект);
	Форма.Открыть();	
КонецПроцедуры

&НаСервере

Функция РеализацияТовараНаСервере(ДанныеФормы)

// сообщить(ПользователиИнформационнойБазы.ТекущийПользователь());

ДанныеФормы.Дата=ТекущаяДата();

ДанныеФормы.Номер="1";

Возврат ДанныеФормы;

КонецФункции

&НаКлиенте

Процедура РеализацияТовара(Команда)

Форма=ПолучитьФорму("Документ.РеализацияТоваров.ФормаОбъекта");

ДанныеФормы=Форма.Объект;

ДанныеФормы=РеализацияТовараНаСервере(ДанныеФормы);

КопироватьДанныеФормы(ДанныеФормы,Форма.Объект);

Форма.Открыть();

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

Оставить комментарий 1с, программное отрытие документа, создание документа

Загрузка в документ 1С из файла CSV

07.10.2016 Павел Грибов 1C

Задача: загрузить в документ «Поступление товаров и услуг», данные из csv файла. Конфигурация «Бухгалтерия 3.0».

Решение: создадим обработку, которая парсит файл, создает если необходимо номенклатуру и загружает её в ранее созданный и выбранный для загрузки документ оприходования.

Скачать обработку можно здесь.

Из интересного:

Функция разложения строки в массив по разделителю (;) » Читать далее

Оставить комментарий 1с, загрузка из csv

Подключения сканера штрихкодов к ТИС

28.09.2016 Павел Грибов 1C

Задача: старая-старая ТИС, не обновляемая лет 10 уже. Прикрутить сканер штрихкодов. ОС Windows 10

Решение: используем последнюю «бесплатную» версию драйверов АТОЛ для подключения.

Скачаем эти драйвера. Установим по учетной записью администратора. Если ругнется на то что «не подходят драйвера» — не обращаем внимание
Заходим в папку куда установилась утилита, копируем всё содержимое папки bin в windows/system32
Можно запустить утилиту scaner_t.exe и потестировать, что-то посканировав. Если сканирует — ок, идем в 1С
В 1С запускаем меню «подключение внешнего оборудования», создаем новый тип устройства, dll обработки указываем scaner1C.dll из папки АТОЛ.
В меню Сервис-Настройки должна появится настройка сканера.

Оставить комментарий атол, бесплатный драйвер, подключение сканера

Удаление рисунка, и скрытие строк в макете 1С

20.04.2016 Павел Грибов 1C

Задача: при определенных условиях, скрыть в печатной форме несколько строк, и рисунок на макете.

Решение:

Макет.Рисунки.Удалить(Макет.Рисунки.D1); 
 Макет.Область("R23").Видимость=Ложь;
 Макет.Область("R24").Видимость=Ложь;
 Макет.Область("R25").Видимость=Ложь;

Макет.Рисунки.Удалить(Макет.Рисунки.D1);

Макет.Область("R23").Видимость=Ложь;

Макет.Область("R24").Видимость=Ложь;

Макет.Область("R25").Видимость=Ложь;

Оставить комментарий

1С. Разбить строку на массив по разделителю

05.02.2016 Павел Грибов 1C

Функция СпарситьЛицевой(лс) 
 МногострочнаяСтрока = СтрЗаменить(лс, ";",Символы.ПС);
 Для кСчЦ = 1 по СтрЧислоСтрок(МногострочнаяСтрока) Цикл
   Сообщить(СтрПолучитьСтроку(МногострочнаяСтрока,СчЦ));	
КонецФункции

Функция СпарситьЛицевой(лс)

МногострочнаяСтрока = СтрЗаменить(лс, ";",Символы.ПС);

Для кСчЦ = 1 по СтрЧислоСтрок(МногострочнаяСтрока) Цикл

Сообщить(СтрПолучитьСтроку(МногострочнаяСтрока,СчЦ));

КонецФункции

Оставить комментарий ;, 1с, массив, разделитель, разделить

« 1 … 37 38 39 40 41 … 49 »

Пн	Вт	Ср	Чт	Пт	Сб	Вс
					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