Документация программиста

Генератор пароля в форме

1. Генератор пароля в форме элемента справочника по нажатию кнопки.

Функция ГенерацияСлучайногоПароля(Длина) 
	ГСЧ = Новый ГенераторСлучайныхЧисел();    
	СлучайнаяСтрока = "";
	Для Счет = 1 по Длина Цикл        
		Набор = ГСЧ.СлучайноеЧисло(1,3);    
		Если Набор = 1 Тогда           
			СлучайныйСимвол = Символ(ГСЧ.СлучайноеЧисло(48,57));
		ИначеЕсли Набор = 2 Тогда
			СлучайныйСимвол = Символ(ГСЧ.СлучайноеЧисло(65,90));
		ИначеЕсли Набор = 3 Тогда
			СлучайныйСимвол = Символ(ГСЧ.СлучайноеЧисло(97,122));
		КонецЕсли;			
		СлучайнаяСтрока = СлучайнаяСтрока + СлучайныйСимвол;
	КонецЦикла;      
	Возврат(СлучайнаяСтрока);
КонецФункции

2. Обработка нажатия кнопки.

&НаКлиенте
Процедура ГенераторПароля(Команда)  
	Объект.Пароль = ГенерацияСлучайногоПароля(12);    
КонецПроцедуры

Объединение конфигураций

1. Откройте Конфигуратор.

Запустите 1С в режиме Конфигуратора. 

2. Используйте режим сравнения.

В меню "Конфигурация" выберите "Сравнить, объединить конфигурации с файлом".

3. Загрузите файл.

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

Если вы сравниваете с файлом, выберите нужный файл конфигурации .cf.

4. Настройте правила сравнения.

В открывшемся окне "Сравнение конфигураций" настройте правила объединения.

5. Проведите объединение.

После настройки правил, нажмите кнопку "Объединить". 

Пример интеграции 1С с API WireCRM

1. Получение актов.

Функция ПростоеЧтениеJSON(Данные)
    ЧтениеJSON = Новый ЧтениеJSON;
    ЧтениеJSON.УстановитьСтроку(Данные); 
    Возврат ПрочитатьJSON(ЧтениеJSON);
КонецФункции

&НаКлиенте
Процедура Запрос(Команда)

    // Так как для доступа к ней используется защищенный
    // протокол https - нам нужно заполнить последний
    // параметр при соединении с сервером.

    Заголовки = Новый Соответствие;
    Заголовки.Вставить("X-API-KEY", "Ключ");


    Соединение = Новый HTTPСоединение(
        "wirecrm.com", // сервер (хост)
        443, // порт, по умолчанию для http используется 80, для https 443
        , // пользователь для доступа к серверу (если он есть)
        , // пароль для доступа к серверу (если он есть)
        , // здесь указывается прокси, если он есть
        , // таймаут в секундах, 0 или пусто - не устанавливать
        Новый ЗащищенноеСоединениеOpenSSL()
    );

    // Получаем текст корневой страницы через GET-запрос.
    Запрос = Новый HTTPЗапрос("/api/v1/acts", Заголовки);
    // Если бы нужна была другая страница, мы бы указали,
    // например, "/about" или "/news".

    Результат = Соединение.Получить(Запрос);     

    Сообщить(Результат.КодСостояния);
    Сообщить(Результат.ПолучитьТелоКакСтроку());

    Запрос = Новый HTTPЗапрос("/api/v1/acts/positions?act=103028", Заголовки);     
    Результат = Соединение.Получить(Запрос);

    Сообщить(Результат.КодСостояния);
    Сообщить(Результат.ПолучитьТелоКакСтроку());

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

 

 

Уникальное поле в справочнике

1. Уникальное поле в справочнике

Процедура ОбработкаПроверкиЗаполнения(Отказ)
	Запрос = Новый Запрос("Выбрать Домен из Справочник.Контрагенты где Домен = &Домен и НЕ Ссылка = &Ссылка");
	Запрос.УстановитьПараметр("Домен", Домен);    
	Запрос.УстановитьПараметр("Ссылка", Ссылка);
	РезультатЗапроса = Запрос.Выполнить();
	Если НЕ РезультатЗапроса.Пустой() Тогда
		Отказ = Истина;
		Сообщить("Домен не уникален");
	КонецЕсли;
КонецПроцедуры