пятница, 22 января 2021 г.

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

    Запрос.УстановитьПараметр("парамСотрудники"                , Сотрудники);
    
    //МассивФизЛица = Новый Массив;
    //
    //Для Каждого Элемент из Сотрудники Цикл
    //    МассивФизЛица.Добавить(Элемент.ФизЛицо);    
    //КонецЦикла;
    //
    //Запрос.УстановитьПараметр("МассивФизЛица"                , МассивФизЛица);

    //
    //
    //    ВТПроводки
    Если Истина Тогда
        //    Описание:
        //         РегистрРасчета.ВзносыВФонды + Проводки Кт
        //        
        ТекстЗапросаВТ = "ВЫБРАТЬ
                         |    ВзносыВФонды.Сотрудник.Физлицо КАК ФизЛицо,
                         |    ВзносыВФонды.Сотрудник,
                         |    ВзносыВФонды.Налог,
                         |    НАЧАЛОПЕРИОДА(ВзносыВФонды.БазовыйПериодНачало, МЕСЯЦ) КАК БазовыйПериодНачало,
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СчетДт, Проводки.СчетДт) КАК СчетДт,
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СубконтоДт1, Проводки.СубконтоДт1) КАК СубконтоДт1,
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СубконтоДт2, Проводки.СубконтоДт2) КАК СубконтоДт2,
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СубконтоДт3, Проводки.СубконтоДт3) КАК СубконтоДт3,
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СчетКт, Проводки.СчетКт) КАК СчетКт,
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СубконтоКт1, Проводки.СубконтоКт1) КАК СубконтоКт1,
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СубконтоКт2, Проводки.СубконтоКт2) КАК СубконтоКт2,
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СубконтоКт3, Проводки.СубконтоКт3) КАК СубконтоКт3,
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СчетДтНУ, Проводки.СчетДтНУ) КАК СчетДтНУ,
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СубконтоДтНУ1, Проводки.СубконтоДтНУ1) КАК СубконтоДтНУ1,
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СубконтоДтНУ2, Проводки.СубконтоДтНУ2) КАК СубконтоДтНУ2,
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СубконтоДтНУ3, Проводки.СубконтоДтНУ3) КАК СубконтоДтНУ3,
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СчетКтНУ, Проводки.СчетКтНУ) КАК СчетКтНУ,
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СубконтоКтНУ1, Проводки.СубконтоКтНУ1) КАК СубконтоКтНУ1,
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СубконтоКтНУ2, Проводки.СубконтоКтНУ2) КАК СубконтоКтНУ2,
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СубконтоКтНУ3, Проводки.СубконтоКтНУ3) КАК СубконтоКтНУ3,
                         |    СУММА(ВзносыВФонды.Результат) КАК Результат
                         |ПОМЕСТИТЬ ВТПроводки
                         |ИЗ
                         |    РегистрРасчета.ВзносыВФонды КАК ВзносыВФонды
                         |        ЛЕВОЕ СОЕДИНЕНИЕ Справочник.СпособыОтраженияЗарплатыВРеглУчете КАК Проводки
                         |        ПО ВзносыВФонды.ВидРасчета.СпособОтраженияВБухучете = Проводки.Ссылка
                         |        ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.РаботникиОрганизаций.СрезПоследних(&ПериодСрез, Сотрудник В (&ПарамСотрудники)) КАК РаботникиОрганизацийСрезПоследних
                         |        ПО ВзносыВФонды.Сотрудник = РаботникиОрганизацийСрезПоследних.Сотрудник
                         |ГДЕ
                         |    ВзносыВФонды.ПериодРегистрации = &парамПериодРегистрации
                         |    И ВзносыВФонды.Сотрудник В(&парамСотрудники)
                         |    И ВзносыВФонды.ВидРасчета.СпособРасчета = ЗНАЧЕНИЕ(Перечисление.СпособыРасчетаОплатыТруда.ВзносыФОТ)
                         |
                         |СГРУППИРОВАТЬ ПО
                         |    ВзносыВФонды.Сотрудник,
                         |    ВзносыВФонды.Налог,
                         |    НАЧАЛОПЕРИОДА(ВзносыВФонды.БазовыйПериодНачало, МЕСЯЦ),
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СчетДтНУ, Проводки.СчетДтНУ),
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СубконтоДтНУ1, Проводки.СубконтоДтНУ1),
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СубконтоДтНУ2, Проводки.СубконтоДтНУ2),
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СубконтоДтНУ3, Проводки.СубконтоДтНУ3),
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СчетКтНУ, Проводки.СчетКтНУ),
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СубконтоКтНУ1, Проводки.СубконтоКтНУ1),
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СубконтоКтНУ2, Проводки.СубконтоКтНУ2),
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СубконтоКтНУ3, Проводки.СубконтоКтНУ3),
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СубконтоДт1, Проводки.СубконтоДт1),
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СчетДт, Проводки.СчетДт),
                         |    ВзносыВФонды.Сотрудник.Физлицо,
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СубконтоДт2, Проводки.СубконтоДт2),
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СубконтоДт3, Проводки.СубконтоДт3),
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СчетКт, Проводки.СчетКт),
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СубконтоКт1, Проводки.СубконтоКт1),
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СубконтоКт2, Проводки.СубконтоКт2),
                         |    ЕСТЬNULL(РаботникиОрганизацийСрезПоследних.СпособОтраженияФОТ.СубконтоКт3, Проводки.СубконтоКт3)";
        
        
        
            ТекстЗапросаВТ = "ВЫБРАТЬ
                             |    ВзносыВФонды.Сотрудник.Физлицо КАК ФизЛицо,
                             |    ВзносыВФонды.Сотрудник,
                             |    ВзносыВФонды.Налог,
                             |    НАЧАЛОПЕРИОДА(ВзносыВФонды.БазовыйПериодНачало, МЕСЯЦ) КАК БазовыйПериодНачало,
                             |    ЕСТЬNULL(Проводки.СчетДт, Проводки.СчетДт) КАК СчетДт,
                             |    ЕСТЬNULL(Проводки.СубконтоДт1, Проводки.СубконтоДт1) КАК СубконтоДт1,
                             |    ЕСТЬNULL(Проводки.СубконтоДт2, Проводки.СубконтоДт2) КАК СубконтоДт2,
                             |    ЕСТЬNULL(Проводки.СубконтоДт3, Проводки.СубконтоДт3) КАК СубконтоДт3,
                             |    ЕСТЬNULL(Проводки.СчетКт, Проводки.СчетКт) КАК СчетКт,
                             |    ЕСТЬNULL(Проводки.СубконтоКт1, Проводки.СубконтоКт1) КАК СубконтоКт1,
                             |    ЕСТЬNULL(Проводки.СубконтоКт2, Проводки.СубконтоКт2) КАК СубконтоКт2,
                             |    ЕСТЬNULL(Проводки.СубконтоКт3, Проводки.СубконтоКт3) КАК СубконтоКт3,
                             |    ЕСТЬNULL(Проводки.СчетДтНУ, Проводки.СчетДтНУ) КАК СчетДтНУ,
                             |    ЕСТЬNULL(Проводки.СубконтоДтНУ1, Проводки.СубконтоДтНУ1) КАК СубконтоДтНУ1,
                             |    ЕСТЬNULL(Проводки.СубконтоДтНУ2, Проводки.СубконтоДтНУ2) КАК СубконтоДтНУ2,
                             |    ЕСТЬNULL(Проводки.СубконтоДтНУ3, Проводки.СубконтоДтНУ3) КАК СубконтоДтНУ3,
                             |    ЕСТЬNULL(Проводки.СчетКтНУ, Проводки.СчетКтНУ) КАК СчетКтНУ,
                             |    ЕСТЬNULL(Проводки.СубконтоКтНУ1, Проводки.СубконтоКтНУ1) КАК СубконтоКтНУ1,
                             |    ЕСТЬNULL(Проводки.СубконтоКтНУ2, Проводки.СубконтоКтНУ2) КАК СубконтоКтНУ2,
                             |    ЕСТЬNULL(Проводки.СубконтоКтНУ3, Проводки.СубконтоКтНУ3) КАК СубконтоКтНУ3,
                             |    СУММА(ВзносыВФонды.Результат) КАК Результат
                             |ПОМЕСТИТЬ ВТПроводки
                             |ИЗ
                             |    РегистрРасчета.ВзносыВФонды КАК ВзносыВФонды
                             |        ЛЕВОЕ СОЕДИНЕНИЕ Справочник.СпособыОтраженияЗарплатыВРеглУчете КАК Проводки
                             |        ПО ВзносыВФонды.ВидРасчета.СпособОтраженияВБухучете = Проводки.Ссылка
                             |        ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.РаботникиОрганизаций.СрезПоследних(&ПериодСрез, Сотрудник В (&ПарамСотрудники)) КАК РаботникиОрганизацийСрезПоследних
                             |        ПО ВзносыВФонды.Сотрудник = РаботникиОрганизацийСрезПоследних.Сотрудник
                             |ГДЕ
                             |    ВзносыВФонды.ПериодРегистрации = &парамПериодРегистрации
                             |    И ВзносыВФонды.Сотрудник В(&парамСотрудники)
                             |    И ВзносыВФонды.ВидРасчета.СпособРасчета = ЗНАЧЕНИЕ(Перечисление.СпособыРасчетаОплатыТруда.ВзносыФОТ)
                             |
                             |СГРУППИРОВАТЬ ПО
                             |    ВзносыВФонды.Сотрудник,
                             |    ВзносыВФонды.Налог,
                             |    НАЧАЛОПЕРИОДА(ВзносыВФонды.БазовыйПериодНачало, МЕСЯЦ),
                             |    ЕСТЬNULL(Проводки.СчетДтНУ, Проводки.СчетДтНУ),
                             |    ЕСТЬNULL(Проводки.СубконтоДтНУ1, Проводки.СубконтоДтНУ1),
                             |    ЕСТЬNULL(Проводки.СубконтоДтНУ2, Проводки.СубконтоДтНУ2),
                             |    ЕСТЬNULL(Проводки.СубконтоДтНУ3, Проводки.СубконтоДтНУ3),
                             |    ЕСТЬNULL(Проводки.СчетКтНУ, Проводки.СчетКтНУ),
                             |    ЕСТЬNULL(Проводки.СубконтоКтНУ1, Проводки.СубконтоКтНУ1),
                             |    ЕСТЬNULL(Проводки.СубконтоКтНУ2, Проводки.СубконтоКтНУ2),
                             |    ЕСТЬNULL(Проводки.СубконтоКтНУ3, Проводки.СубконтоКтНУ3),
                             |    ЕСТЬNULL(Проводки.СубконтоДт1, Проводки.СубконтоДт1),
                             |    ЕСТЬNULL(Проводки.СчетДт, Проводки.СчетДт),
                             |    ВзносыВФонды.Сотрудник.Физлицо,
                             |    ЕСТЬNULL(Проводки.СубконтоДт2, Проводки.СубконтоДт2),
                             |    ЕСТЬNULL(Проводки.СубконтоДт3, Проводки.СубконтоДт3),
                             |    ЕСТЬNULL(Проводки.СчетКт, Проводки.СчетКт),
                             |    ЕСТЬNULL(Проводки.СубконтоКт1, Проводки.СубконтоКт1),
                             |    ЕСТЬNULL(Проводки.СубконтоКт2, Проводки.СубконтоКт2),
                             |    ЕСТЬNULL(Проводки.СубконтоКт3, Проводки.СубконтоКт3),
                             |    Проводки.СчетКт";

        Запрос.Текст = ТекстЗапросаВТ;
        Запрос.Выполнить();
        ТекстЗапросаВТПроводки = "ВТПроводки";
    КонецЕсли;
        Запрос.Текст = "ВЫБРАТЬ * ИЗ ВТПроводки";
    
        
    ТекстЗапроса = "
    |ВЫБРАТЬ
    |    ВзносыВФонды.Сотрудник                    КАК Сотрудник,
    |    ВзносыВФонды.Налог                        КАК Налог,
    |    ВзносыВФонды.БазовыйПериодНачало        КАК БазовыйПериодНачало,
    |    ВзносыВФонды.СчетДт КАК СчетДт,
    |    ВзносыВФонды.СубконтоДт1,
    |    ВзносыВФонды.СубконтоДт2,
    |    ВзносыВФонды.СубконтоДт3,
    |    ВзносыВФонды.СчетКт,
    |    ВзносыВФонды.СубконтоКт1,
    |    ВзносыВФонды.СубконтоКт2,
    |    ВзносыВФонды.СубконтоКт3,
    |    ВзносыВФонды.СчетДтНУ КАК СчетДтНУ,
    |    ВзносыВФонды.СубконтоДтНУ1,
    |    ВзносыВФонды.СубконтоДтНУ2,
    |    ВзносыВФонды.СубконтоДтНУ3,
    //|    ВзносыВФонды.Сотрудник.ФизЛицо             КАК СубконтоДтНУ1,
    |    ВзносыВФонды.СчетКтНУ,
    |    ВзносыВФонды.СубконтоКтНУ1,
    |    ВзносыВФонды.СубконтоКтНУ2,
    |    ВзносыВФонды.СубконтоКтНУ3,
    |    ВзносыВФонды.Результат           КАК Результат
    |
    |ИЗ    ВТПроводки КАК ВзносыВФонды
    |
    |    
    |
    |УПОРЯДОЧИТЬ ПО    
    |    Сотрудник,
    |    ВЫБОР    КОГДА ВзносыВФонды.СчетДт = ЗНАЧЕНИЕ(ПланСчетов.Хозрасчетный.КредиторскаяЗадолженностьПередПерсоналомКраткосрочная)  ТОГДА 1
    |            ИНАЧЕ ВзносыВФонды.СчетДт КОНЕЦ
    |    
    |";
    
    Запрос.Текст = ТекстЗапроса;
    
    
    
    //Запрос.Выполнить().Выгрузить().ВыбратьСтроку();
    ZED =  Запрос.Выполнить().Выгрузить() ;
    
    ВзносыФОТПроводки.Загрузить(ZED);
    
    Записать();

    
КонецПроцедуры  // РассчитатьВзносы()

суббота, 16 января 2021 г.

Тофик Бухгалтерия Аз - расчет и проведение удержаний по безработице и обязательного мед страхования в документе больничного

 Тофик Бухгалтерия Аз - расчет и проведение  удержаний по безработице и обязательного мед страхования в документе больничного



Функция СформироватьЗапросПоОтражениюВУчете()
    
    Запрос = Новый Запрос();
    
    
    Если ОтражатьВНалоговомУчете Тогда
        ПоказателиДляНУ = "
    |    ОтражениеЗарплаты.СчетДтНУ                КАК СчетДтНУ,
    |    ОтражениеЗарплаты.СчетДтНУ.Наименование    КАК НаименованиеСчетДтНУ,
    |    ОтражениеЗарплаты.СубконтоДтНУ1            КАК СубконтоДтНУ1,
    |    ОтражениеЗарплаты.СубконтоДтНУ2            КАК СубконтоДтНУ2,
    |    ОтражениеЗарплаты.СубконтоДтНУ3            КАК СубконтоДтНУ3,
    |    ОтражениеЗарплаты.СчетКтНУ                КАК СчетКтНУ,
    |    ОтражениеЗарплаты.СубконтоКтНУ1            КАК СубконтоКтНУ1,
    |    ОтражениеЗарплаты.СубконтоКтНУ2            КАК СубконтоКтНУ2,
    |    ОтражениеЗарплаты.СубконтоКтНУ3            КАК СубконтоКтНУ3,";
    КонецЕсли;

Процедура ДействияФормыДействиеРассчитатьУдержания(Кнопка)
    
    Если Не РасчетДокументаРазрешен() Тогда
        Возврат
    КонецЕсли;
    
    Если НЕ РаботаСДиалогами.ЗаписатьДокументОтменивПроведениеПередВыполнениемДействия(ДокументОбъект, ЭтаФорма, НСтр("ru='рассчитать';uk='розрахувати'")) Тогда
        Возврат;
    КонецЕсли;
    
    КомментироватьРасчет = Ложь;
    мСотрудники = Новый СписокЗначений;
    
    // РассчитатьПоРаботнику
    Для каждого СтрокаСотрудник Из ЭлементыФормы.РаботникиОрганизации.ВыделенныеСтроки Цикл
        мСотрудники.Добавить(СтрокаСотрудник.Сотрудник) ;
    КонецЦикла;
    
    Если Кнопка.Имя = "РассчитатьПоРаботникуСКомментарием" Тогда
        КомментироватьРасчет = Истина;
    КонецЕсли;
     ОбработкаКомментариев2=обработки.СообщенияВыполняемыхДействий.Создать();
    
     //ЗаполнитьЗначение(ОбработкаКомментариев2,  глЗначениеПеременной("глОбработкаСообщений"));
    ОбработкаКомментариев2.УдалитьСообщения();
    РассчитатьВсеУдержания(мСотрудники, КомментироватьРасчет);
ОбработкаКомментариев2.ПоказатьСообщения();

    

вторник, 22 октября 2019 г.

Как заставить человека уволится.. несколько способов

Действенные методы

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

  1. Работников, которые стояли у истока формирования фирмы, увольнять без причины просто неуважительно. В этом случае им необходимо дать понять, что они лишние. После того как работник поймет, что больше не нужен предприятию, он из чувства гордости уволится по самостоятельно.
  2. Сообщить коллеге о том, что над ним будут вести постоянный контроль, и проводить проверки — руководитель имеет полное право создать специальную комиссию и проводить аттестацию, когда посчитает нужным. Такое положение может напугать сотрудника в том случае, если он не уверен в своих силах и способностях. Кроме этого, постоянная слежка и придирки оказывают давление, которое будет мешать основной работе, а при невыполнении должностных обязанностей работника могут уволить.
  3. Нужно внести некоторые корректировки в работу человека: понизить в должности и повысить уровень выполняемых работ. От такой нагрузки работник может начать уставать и выражать возмущение. На что работодатель может предложить ему уволиться.
  4. Можно подставить своего подчиненного. Например, повесить недосдачу в магазине. В таком случае работник наверняка не захочет оставаться на прежней работе.
  5. При любой маленькой оплошности человеку нужно выносить выговор. Только делать это нужно официально, с составлением актов и протоколов. Это даже можно делать за малейшие проступки, например, за опоздание на одну минуту или за ненадлежащий внешний вид.
  6. Самую большую роль в эмоциональном состоянии работника играет коллектив. Если коллеги будут смеяться и шутить над сотрудником, ему будет неприятно находиться на рабочем месте. Такой способ помогает быстрее, чем все остальные, так как сотрудник находится со своими коллегами весь рабочий день.
  7. Кроме всего прочего, можно угрожать сотруднику увольнением по статье, даже в том случае, если нет такой возможности. Но, работник об этом не знает и боится того, что в трудовой книжке появиться запись о несоответствии занимаемой должности. В этом случае он пишет заявление по собственному желанию, чтобы сохранить репутацию.
  8. Невыполнение поручений. Если работодатель дал задание сотруднику, и он справился с ним не очень хорошо, руководитель может пригрозить ему увольнением. И это будет законно, даже если поручение не входило в обязанности подчиненного. Дело в том, что если задание дано в устной форме, то доказать этого невозможно.

среда, 10 июля 2019 г.


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

суббота, 15 июня 2019 г.

Юсубов, Фаррух Орудж оглы





Юсубов Фаррух Орудж оглы – видный Советский и азербайджанский государственный и научный деятель, участник Великой Отечественной Войны, родился 17 апреля 1916 года в селе Киш Шекинского уезда Российской Империи.
После окончания в 1936 году Азербайджанского Педагогического Института работал в школах Шекинского района Азербайджанской ССР учителем, завучем, директором.
В 1940 году был призван в ряды Советской Армии и проучившись в Курской Военной Академии ушел на войну. Фаррух Юсубов был активным участником Великой Отечественной Войны. Рота под его командованием сиграла решающую роль в боях за Сталинград. Ф.Юсубов в качестве командира роты и в звании майора прошел всю войну, принимал участие в освобождении Варшавы, Софии, Будапешта и других городов, активное участие в взятии Берлина. За проявленные мужество и героизм Ф.Юсубов был дважды награжден орденом «Отчественной Войны первой степени», орденом «Красная Звезды», медалями за освобождение Сталинграда, Варшавы, Будапешта, Софии, Праги, взятие Берлина и другими орденами и медалями. За военные заслуги Ф.Юсубов был так же награжден боевым пистолетом за личной подписью Иосифа Сталина.
После окончания Войны Ф.Юсубов вернулся в Азербайджан. В 1946 году создал семью. В 1947 году родилась его первая дочь Эльмира. После этого Центральным Комитетом Компартии Ф.Юсубов был направлен на учебу в Академию Общественных Наук при ЦК КПСС в городе Москва вместе с видными в последствии Советскими государственными деятелями, в том числе с дочерью Сталина Светланой Аллилуевой. После окончания Академии Ф.Юсубов был назначен инструктором ЦК КП Азербайджана. С 1952 года работал секретарем Закатальского райокома КП, после этого первым секретарем Шекинского райкома КП Азербайджана. За годы работы главой Шекинского района им было проделано множество важных дел. Были проложены новые дороги, построено здание Шекинского театра, Шекинского центрально кинотеатра, больниц и школ, которые по сей день служат благодарным ему за это шекинцам.
В 1960 году Ф.Юсубов был переведен на работу в Баку и был назначен Начальником Управления Среднего и Высшего Специального Образования Азербайданской ССР на правах нынешнего министерства. После этого работал заместителем Министра Культуры Азербайджанской ССР. За годы работы в области культуры и образования им было также проделано немало работ во благо Азербайджана. Ф.Юсубов был руководителем мероприятий приуроченных к визиту в Азербайджан кинемтографистов и актеров из Индии во главе с Раджем Капуром.
Фаррух Юсубов неоднократно избираясь народом в Верховный Совет Азербайджанской ССР, был депутатом Верховного Совета Азербайджана ряда созывов. Кроме этого был избран делегатом ХХII и XXIII съездов КП Азербайджана и съезда Компартии Советского Союза.
В 1969 году Ф.Юсубов вернулся к научной деятельности. Им были защищена Кандидатская диссертация, после этого он стал Доктором наук и получил почетное звание Профессора. Ф.Юсубовым был создан ряд научных трудов и написаны книги. Некоторые из них зачислены в Золотой Фонд Центральной Библиотеки Азербайджана имени М.Ф.Ахундова.
С 1969 до 1976 года, то есть до конца жизни Ф.Юсубов работал в Институте Иностранных Языков Азербайджанской ССР в должности заведующего кафедрой.
Ф.Юсубов был хорошим семьянином и чутким отцом пятерых детей.

суббота, 9 июня 2018 г.

Использование функций ORACLE для работы с сетью


1. Создаем ACL
2. Добавляем привилегии.
3. Сопостовляем ACL.

Полезные запросы:

SELECT * FROM  dba_network_acls;
SELECT * FROM dba_network_acl_privileges


1. BEGIN
dbms_network_acl_admin.create_acl (
acl => 'http_permissions.xml', -- or any other name
description => 'HTTP Access',
principal => 'SCOTT', -- the user name trying to access the network resource
is_grant => TRUE,
privilege => 'connect',
start_date => null,
end_date => null
);
END;

2. begin
DBMS_NETWORK_ACL_ADMIN.ADD_PRIVILEGE(acl => 'http_permissions.xml',
principal => 'SCOTT',
is_grant => true,
privilege => 'connect');
end;

3.BEGIN
dbms_network_acl_admin.assign_acl (
acl => 'http_permissions.xml',
host => 'NETWORK ADDRESS', /*can be computer name or IP , wildcards are accepted as well for example - '*.us.oracle.com'*/
lower_port => 80,
upper_port => 80
);
END;


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

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