самих » Поиск

Результаты по ключевому слову: самих

Работа с MySQL из 1С через ODBC

В статье описан процесс работы с MySQL базой из 1С через ODBC.

Первое что следует обязательно учесть это версия драйвера, для того чтобы всё корректно работало вам потребуется драйвер версии 3.51 (с драйвером 5-ой версии я пробился пол дня пытаясь хоть чего нибудь добиться, безрезультатно & поменял на предыдущую версию и всё заработало!

Для подключения используем вот такую строчку:

Код 1C v 8.х

 Соединение = "DRIVER=MySQL ODBC 3.51 Driver;Database=inventar_sm;DataSource=roman-book;UID=root;PWD=240580;STMT=set character_set_results=cp1251;"; 

//Это если задаём кодировку соединения (лучше задать);

Соединение = "DRIVER=MySQL ODBC 3.51 Driver;Database=inventar_sm;DataSource=roman-book;UID=root;PWD=240580;";

//Это без задания кодировки.

то касается кодировки то лучше её конечно задать, но на вставку записей в БД MySQL оно почемуто не влияет, и чтобы корректно всё отрабатывало и не выглядело кракозябриками после отработки скриптов, перед выполнением самих скриптов лучше выполнить вот такой вот скрипт «set names cp1251» в рамках соединения он правильно установит кодировку (так надёжнее).

Для работы с самой базой объявляем объект ADODB.Connection & это соединение с базой.

Для работы с данными можем объявить: ADODB.Recordset & для чтения данных, и ADODB.Command для изменения.

(ADODB.Command & не имеет метода ExecuteScalar, поэтому вместо него придётся обходиться Recordset-ом и с его помощью выбирать данные, хотя возможно я чегото не доглядел).

Итак пример. Выбираем данные из таблицы:

Код 1C v 8.х

 Попытка

Connection = Новый COMОбъект("ADODB.Connection"); 

Connection.Open("DRIVER=MySQL ODBC 3.51 Driver;Database=inventar_sm;DataSource=roman-book;UID=root;PWD=240580;STMT=set character_set_results=cp1251;");





RS = Новый COMОбъект("ADODB.Recordset"); 

RS.CursorType=3;

// Запрос к базе на языке SQL запросов.

RS.ActiveConnection=Connection;

RS.Open("select * from market_users");

//Перемещаем указатель на первую запись.

RS.MoveFirst(); 

Пока RS.EOF()=0 Цикл

    // Обрабатываем значения полей выборки.

    NAM = RS.Fields("NAME").Value;

    Сообщить(NAM);

    // Перемещаем указатель.

    RS.MoveNext();    

КонецЦикла;    

//Закрываем соединения.

RS.Close();

Connection.Close();

Теперь изменяем данные:

Код 1C v 8.х

 Connection = Новый COMОбъект("ADODB.Connection"); 

Connection.Open("DRIVER=MySQL ODBC 3.51 Driver;Database=inventar_sm;DataSource=roman-book;UID=root;PWD=240580;STMT=set character_set_results=cp1251;");





//Устанавливаем кодировку для нашего подключения (дополнительно)...

Command= new COMObject("ADODB.Command"); 

Command.CommandText = "set names cp1251";

Command.ActiveConnection = Connection;

Command.CommandType = 1;

Command.Execute();





//Теперь выполняем скрипт

Command= new COMObject("ADODB.Command"); 

Command.CommandText = "update market_cards set name='Хлебушек бородинский' where articul='123'";

Command.ActiveConnection = Connection;

Command.CommandType = 1;

Command.Execute();





//Закрываем соединение.

Connection.Close();

Все

Категория: COM-объекты, WMI, WSH

Настройка счетов учета расчетов с контрагентами в 1С Бух 2.0

Для настройки счетов учета расчетов с контрагентами необходимо зайти в меню:

Справочники/Бухгалтерский и налоговый учет/Счета учета расчетов с контрагентами

Счета учета расчетов с контрагентами настраиваются при первом запуске программы, вместе с настройками учетных политик и констант.

Настройки определяют, те счета бухгалтерского учета расчетов и авансов, которые будут подставляться в документах: расходных, приходных накладных, возвратах, таможенных декларациях, поступлениях дополнительных расходов, авансовых отчетах, платежках, кассовых ордерах и.т.д.

Нажмите кнопку «Изменить» на записи с видом расчета «Расчеты в валюте регламентированного учета (с резидентами)».

Организация определяет настройку счетов учета в разрезе каждой из организаций, введенных в нашу базу, для того чтобы настройки счетов учета распространялись на все организации, это поле можно не заполнять.

Настройка Контрагент и договор – также выполняет детализацию счетов расчетов по каждому из введенных контрагентов и договоров, если поля пустые, настройки распространяются на всех контрагентов, введенных в справочник контрагентов.

Вид расчетов – определяет, выполняется ли настройка для резидентов или для не резидентов

Детализация настроек по контрагентам и договорам имеет смысл в том случае, если с определенными контрагентами ожидаются специфические настройки счетов взаиморасчетов, например по счетам 6851, 3771.

Но даже в таком случае имеет смысл собрать всех таких контрагентов в одну папку и настроить счета учета в целом на папку.

На закладке Счета учета НДС настраиваются счета бухгалтерского учета по НДС кредиту и обязательствам, а также ставки НДС.

Чем более крупненно настроены настройки взаиморасчетов, тем лучше: на всю папку, на всех покупателей, на всю организацию и.т.д

FaceЧем более крупненно настроены настройки взаиморасчетов, тем лучше: на всю папку, на всех покупателей, на всю организацию и.т.д

Если вы не используете счета авансов НЕ ОСТАВЛЯЙТЕ поля: авансов выданных, авансов полученных пустыми, заполняйте их ТЕМИ ЖЕ СЧЕТАМИ как и для взаиморасчетов.

Это позволит избежать случаев не сворачивания вторых событий по документу аванса.

Резюмируя:

Настройки счетов учета желательно выполнить сразу же после установки программы.

Максимально укрупнить их по папкам или в целом по организации.

Обязательно обратить внимание на счета авансов они должны быть такими же, как и счета учета взаиморасчетов, если мы не используем счета авансов у себя в организации.

Счета учета взаиморасчетов, так же как и ставки НДС могут быть изменены в самих первичных документах при отражении хозяйственных операций.

Категория: 1С Бухгалтерия 2.0

Как работать с "1С Конвертация данных"

Инструкция создания одностороннего обмена данными между конфигурациями "Источник" и "Приемник" с нуля:

1 Скачиваем последнюю версию конфигурации "Конвертация данных". Сейчас на сайте ИТС перестали почему-то публиковать полные дистрибутивы, поэтому находим где-нибудь изначальный релиз и накатываем обновления с сайта.
2 В процессе установки обновлений у вас в папке с шаблонами конфигураций (смотрите её расположение в настройках окна запуска 1С) появится папка Conversion с вложенными папками версий конвертации данных. Заходите в последнюю версию на которую обновились и берите оттуда следующие файлы:
MD80Exp.epf, MD81Exp.epf, MD82Exp.epf, V8Exchan.epf, V8Exchan81.epf, V8Exchan82.epf.
3 Отдельно обращаю ваше внимание. Для успеха операции крайне важно использовать эти файлы из той версии конфигурации "Конвертация данных" в которой вы создаете правила обмена.
4 Следующий этап: выгрузка метаданных Источника и Приемника в xml файлы. Для этого предназначена обработка MD**Exp.epf. Галки выгружать регистры и прочее снимаете. Используйте нужную в зависимости от платформы. Опять же, повторюсь, - из одного и того же комплекта конвертации данных. Иначе ничего не получится.
5 Теперь открывайте базу "Конвертация данных".
6 Заходите в "Справочники"-"Конфигурации". Добавить новый элемент. В качестве файла загрузки указываете выгруженные метаданные. Выбираете "Загрузить в новую конфигурацию". Таким образом создаете две конфигурации с именами, например, Источник и Приемник.
7 Теперь заходите в "Справочники"->"Конвертации". Добавить новый элемент. Указываете в качестве конфигураций источника и приемника наши созданные конфигурации.
8 Конвертация данных предложит вам создать правила конвертации объектов и выгрузки автоматически. Соглашайтесь. Тут я подробностей писать не буду. Об этом в интернете много уже есть.
9 Теперь выгрузите созданный файл правил обмена на диск.
10 И, наконец, крайне важно для выгрузки и загрузки данных по созданным нами правилам обмена использовать не встроенный универсальный обмен в формате XML из самих конфигураций, а использовать наши V8Exchan**.epf, упомянутые выше.

Итак, главное правило: MD**Exp.epf и V8Exchan**.epf должны быть из одного комплекта, прилагающегося к версии Конвертация данных. Причем той же версии, в которой создавались правила обмена. И никаких встроенных обработок для универсального обмена в формате XML, только V8Exchan**.epf.

Категория: Конвертация данных, Обмен, Перенос

Особенности работы с хранилищем конфигурации Категория: Администрирование

Загрузка данных из CSV файла

Код 1C v 8.х

  // выберем CSV файл

ДиалогВыбора = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие);

ДиалогВыбора.Заголовок = “Выберите файл”;



Если ДиалогВыбора.Выбрать() Тогда

ИмяФайла = ДиалогВыбора.ПолноеИмяФайла;

КонецЕсли;



//Обработка данных из CSV

// очищаем информацию в таблице и находим файл на диске, а потом считываем его:



//очищаем таблицу и удаляем колонки

Таблица.Очистить();

Таблица.Колонки.Очистить();

ЭлементыФормы.Таблица.Колонки.Очистить();



// чтение файла

ЗагружаемыйФайл = Новый ТекстовыйДокумент;

ЗагружаемыйФайл.Прочитать(ИмяФайла);



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

// и формируем колонки на форме с наименованиями из файла



//шапка по умолчанию 1 строка, из первой строки делаем колонки таблицы

Шапка = ЗагружаемыйФайл.ПолучитьСтроку(1);



//раскладываем строку в массив

МассивКолонок = РазложитьСтрокуВМассивПодстрок(Шапка,Разделитель); // процедура из типовой конфигурации, разбивает строку в массив по разделителям



//генерируем колонки

Для Каждого ИмяКолонки Из МассивКолонок Цикл



ИмяБезПробелов = СтрЗаменить(ИмяКолонки,” “,”"); // убираем из имени колонок пробелы

Таблица.Колонки.Добавить(ИмяБезПробелов,,ИмяКолонки);

НоваяКолонка = ЭлементыФормы.Таблица.Колонки.Добавить(ИмяБезПробелов, ИмяКолонки);

НоваяКолонка.Данные = ИмяБезПробелов;



КонецЦикла;



// После того, как шапка сформирована можно приступать к обработке самих данных

Для НомерСтроки=2 по ЗагружаемыйФайл.КоличествоСтрок() Цикл



Состояние(“Обрабатывается “+Строка(Формат(?(ЗагружаемыйФайл.КоличествоСтрок()=0,0,((100*НомерСтроки)/                                                                                                ЗагружаемыйФайл.КоличествоСтрок())),”ЧЦ=3; ЧДЦ=0&#8243;))+” %”);

ОбработкаПрерыванияПользователя(); //указав данный оператор, цикл можно прервать в любой момент нажатие ctrl+break



// получить строку файла с указанным номером и преобразуем её в массив

Строка = ЗагружаемыйФайл.ПолучитьСтроку(НомерСтроки);

МассивКолонок = РазложитьСтрокуВМассивПодстрок(Строка,Разделитель);// процедура из типовой конфигурации, разбивает строку в массив по разделителям

НоваяСтрока = Таблица.Добавить();



Если МассивКолонок.Количество() <> Таблица.Колонки.Количество() Тогда

Сообщить(“Ошибка со строкой ” + Строка);

Продолжить; // скорее всего в тексте содержит разделитель

КонецЕсли;



Для НомерКолонки = 1 по МассивКолонок.Количество() Цикл

//заполняем строку значениями

ТекущееЗначение = МассивКолонок[НомерКолонки-1];

ИмяКолонки = Таблица.Колонки[НомерКолонки-1].Имя;

НоваяСтрока[ИмяКолонки] = ТекущееЗначение;

КонецЦикла;



КонецЦикла;

Категория: XML, DBF, TXT, CSV