create table ksp_110123 as
with prot as
(Select
    purchasenumber,
    max(cnt_all)cnt_all,
    max(cnt_adm)cnt_adm
From(
    Select
        purchasenumber,
        protocolnumber,
        Count(*) cnt_all,
        sum(case when admitted is not null then 1 else 0 end) cnt_adm
    From dwh_protocol_demand_nrpz_acgz
    Group By purchasenumber, protocolnumber
    )s
Group By purchasenumber),
fin as (
Select
  lot_id,
  min(case when fin.type=1 then fin.year else null end) first_year   -- первый год планового фин
 ,max(case when fin.type=1 then fin.year else null end)  last_year-- последний год планового финас
 ,sum(case when fin.type=1 then fin.finsum else null end) finsum_plan  -- 44 плановое финансирования по контракту
 ,sum(case when fin.type=2 then fin.finsum else null end) finsum_fact -- 45 фактическое финансирования по контракту
 --,LISTAGG(case when fin.type=1 then fin.finsource else null end , '; ') WITHIN GROUP (ORDER BY lot_id) finsource
 -- ,LISTAGG(case when fin.type=1 then fin.description else null end , '; ') WITHIN GROUP (ORDER BY lot_id) description
 ,max(case when fin.targetexpenseitemcode in (select targetexpenseitemcode from dwh_targetexpenseitemcode_aip) then 1 else 0 end) aip_flag -- 50 признак АИП (проверить)
from dwh_contract_fin_kgntv fin
Group by lot_id
),
descrip as
(select
    lotuuid,
    lISTAGG(fundkind , '; ') WITHIN GROUP (ORDER BY lotuuid) description
from
(select  distinct lotuuid,fundkind  from dwh_lot_fin_kgntv)
group by lotuuid
)
Select
    row_number ( ) over ( partition by 1 order by 1 ) rn,
   -- row_number ( ) over (order by c.contractrnk) rn_rnk,
    c.contractrnk,-- 1 рнк
    p.f_year year, -- 2 год бюджета, к которому относятся ассигнования (вместо года размещения процедуры (requestyear) берем год финансирования контракта.
    fin.first_year first_fin_cont_year,-- 3 год первого финансирования по контракту
    fin.last_year, -- год последнего финансирования контракта
    c.requestyear f_year -- 5 год плана размещения
    ,c.finsource --6 источники финансирования
    ,descrip.description
    ,case
        when o_u.id in (503,1407,2710,2229,2703,1409,2709,508,1898,2702,988,2711,504,509,500,1897,1411,1408,1412,1728) then o_u.full_name
        else null
    end uo_org -- 8 уполномоченный орган
    ,cons.orgtitle c_org -- 10 наименование организации разместившей извещение
    ,c.customerinn -- 11 заказчик инн организации
    ,c.customername-- 12 заказчик наименование
    ,c.grbsname-- 13 ГРБС название
    ,gr.FSHORTTITLE-- 14 ГРБС сокращенное
    ,c.contractnoticenumber -- 15 номер извещения
    ,p.date_notice_published -- 16 дата размещения извещения о закупке
    ,case
        when  p.fordertypename = 'Закупка у единственного поставщика' and p.oneexec = 'Часть 1 пункт 25 статьи 93 -  Закупка вследствие признания несостоявшимся запроса котировок в соответствии частями 1 и 3 статьи 79 Федерального закона решения об осуществлении закупки у единственного поставщика (подрядчика, исполнителя)'
                                then 'Запрос котировок в электронной форме'
        when p.fordertypename = 'Закупка у единственного поставщика' and p.oneexec = 'Часть 1 пункт 25 статьи 93 -  Закупка вследствие признания несостоявшимся двухэтапного конкурса в соответствии с частями 1 и 7 статьи 55 Федерального закона решения об осуществлении закупки у единственного поставщика (подрядчика, исполнителя)'
                then 'Двухэтапный конкурс в электронной форме'
        when p.fordertypename = 'Закупка у единственного поставщика' and p.oneexec = 'Часть 1 пункт 25 статьи 93 -  Закупка вследствие признания несостоявшимися открытого конкурса в соответствии с частями 1 и 7 статьи 55 Федерального закона решения об осуществлении закупки у единственного поставщика (подрядчика, исполнителя)'
                then 'Открытый конкурс в электронной форме'
        when p.fordertypename = 'Закупка у единственного поставщика' and p.oneexec = 'Часть 1 пункт 25 статьи 93 -  Закупка вследствие признания несостоявшимся электронного аукциона в соответствии частями 1 – 3.1 статьи 71 Федерального закона решения об осуществлении закупки у единственного поставщика (подрядчика, исполнителя)'
                then 'Аукцион в электронной форме'
        when p.fordertypename = 'Закупка у единственного поставщика' and p.oneexec = 'Часть 1 пункт 25 статьи 93 -  Закупка вследствие признания несостоявшимися конкурса с ограниченным участием в соответствии с частями 1 и 7 статьи 55 Федерального закона решения об осуществлении закупки у единственного поставщика (подрядчика, исполнителя)'
                then 'Конкурс с ограниченным участием в электронной форме'
        when p.fordertypename = 'Закупка у единственного поставщика' and p.oneexec = 'Часть 1 пункт 25 статьи 93 -  Закупка вследствие признания несостоявшимся запроса предложений в соответствии с частью 18 статьи 83 Федерального закона решения об осуществлении закупки у единственного поставщика (подрядчика, исполнителя)'
                then 'Запрос предложений в электронной форме'
        else p.fordertypename end   fordertypename -- 17 способо закупки на этапе размещения извещения
    ,prot.cnt_all -- 18 количество поданных заявок
    ,prot.cnt_adm -- 19 количество учавствующих заявок
    ,c.contractsigndate -- 20 дата заключения контракта
    ,c.contractsubject -- 21 наименование объекта закупки
    ,c.contractrejectdate -- 22 дата расторжения контракта
    ,case when c.contractoneexecreason  like 'Часть 1 пункт 25 статьи 93%' then 'Закупка у единственного поставщика' else c.ordertypename end ordertypename -- 23 соп
    ,p.f_productprice -- 24 нмцк
    ,c.contractsigningprice -- 25 первоначальная цена
    ,c.contractfullprice -- 26 текущая цена
    ,c.contractplaneexecdate -- 27 планируемая дата окончания исполнения контракта
    ,c.contractactualexecdate -- 28 фактическая дата исполнения контракта
    ,c.supplierinn -- 29 поставщик инн
    ,c.suppliername -- 30 поставщик наименование
    ,case when c.contractoneexecreason is not null then 1 else 0 end oneexec_flag -- 31 признак заключения контракта с ед поставщиком
    ,c.contractoneexecreason -- 32 причина заключения контракта с ед поставщиком
    ,case when (c.contractrejectreason is not null or c.contractrejectdate is not null) then 1 else 0 end reject_flag -- 33 признак расторжения контракта
    ,c.contractrejectreason -- 34 основания расторжения контракта
    ,case when p.placement ='Централизованная закупка' then 1 else 0 end central -- признак централизованной закупки
    ,p.joflag -- 36 признак совместных торгов
    ,c.suppliercriminal -- 37 учреждение и предприятие уголовно-исполнительной системы
    ,c.supplierinvalid -- 38 организация инвалидов
    ,c.suppliersmp -- 39 смп
    ,c.suppliersmpsonco -- 40 сонко
    ,case when penalty.contractid is not null then 1 else 0 end penalty_flag -- 41 признак применения штрафных санкций
    ,penalty.sum_ -- 42 сумма начисленных санкций
    ,penalty.pen_pay_sum_ -- 43 сумма оплаченных санкций
    ,fin.finsum_plan -- 44 плановое финансирования по контракту
    ,fin.finsum_fact -- 45 фактическое финансирования по контракту
    ,c.is_concluded_in_e_shop -- 46 признак заключения контркта в ЭМ
    ,case
        when pp.REJECTION_ESHOP_ID=1 then 'Не могу или не хочу разбираться в работе подсистемы Электронный магазин'
        when pp.REJECTION_ESHOP_ID=2 then 'Не подходит типовой контракт на поставку товара'
        when pp.REJECTION_ESHOP_ID=3 then 'Уже заключен контракт на бумаге'
        when pp.REJECTION_ESHOP_ID=4 then 'Свой вариант'
        else null
    end cause -- 47 причин6а отказа от перехода в ЭМ
    ,c.contractmodification -- 48 причина изменений условий контракта/договора
    ,nvl(to_char(pea.plnm_name2),to_char(pea.plnm_name)) nmck_type -- метод определения и обоснования НМЦК
    ,fin.aip_flag -- 50 признак АИП (проверить)
    ,case when c.perc_size is not null or c.perc_rub_size is not null then 1 else 0 end subpodr_flag -- 51 признак наличия субподрпяда
    ,c.perc_size -- 52 объем привлеченных к исполнению субподр %
    ,c.perc_rub_size -- 53 объем привлеченных к исполнению субподр руб
    ,p.ADVANCE_PAY_AMOUNT -- 54 размер аванса %
    ,p.advance_hand_amount -- 55 размер аванса руб
     From dwh_contract_kgntv c
Inner join dwh_procedures_kgntv p   on p.lotuuid = c.lotid and extract(year from c.contractsigndate)=2022
Inner join dwh_organization_kgntv o on o.id = c.customerid
Inner join fin on c.lotid=fin.lot_id
Inner join descrip on descrip.lotuuid=c.lotid
Left Join dwh_procedures_cons_kgntv cons on cons.lotuuid = p.Joint_procedure_id
Left join ksp_grbs_shotname gr  on gr.KGNTVID = c.grbsid
left join DWH_PROCEDURES_DETAILED_KGNTV pp on pp.lotuuid=c.lotid
left join dwh_organization_kgntv o_u    on o_u.id = p.uo_orgid
Left Join prot on prot.purchasenumber = c.contractnoticenumber
left join cuba.dwh_lot_kgntv_ext_attr_1 pea on pea.lot_id = p.lotuuid
left join(select
            contractid,
            listagg(list_, '; ') within group (order by contractid) pen,
            sum(nvl(amount,0))sum_
            ,sum(nvl(penalty_pay_sum,0)) pen_pay_sum_
          from (select
                    distinct id contractid,
                    case
                        when reason_id in (1,3) then 'Исполнитель'  when reason_id in (2,4) then 'Заказчик'
                        else null
                    end  list_
                    ,amount
                    ,penalty_pay_sum
                from dwh_contract_penalty_kgntv
                )group by contractid
        )penalty on penalty.contractid = c.contractid
;