SQL-Oracle: августа 2010

среда, 25 августа 2010 г.

Объединение группы регдействий

составляем таблицу в Exlel

Адрес Идентификатор-основа Рег.номер-основа Идентификатор-удалить Рег.номер-удалить

Объединение группы регдействий, первым этапом нужно очистить в налоговой

=ЕСЛИ(ДЛСТР(D3)>0;СЦЕПИТЬ("or nd.rt_id=";D3);"")

delete from NAL_EXPORTS_DET nd where nd.RT_ID=169834002

потом сливаем
=ЕСЛИ(ДЛСТР(D3)>0;СЦЕПИТЬ("Cg_Util.fusion_obj('RT',";B3;",";D3;",TRUE);");"")

BEGIN
Cg_Util.fusion_obj('RT',210238001,169834002,TRUE);
END;

Удаление отметки выгрузки в налоговую

посмотреть была ли выгрузка

select * from RT_RIGHTS r ,NAL_EXPORTS_DET nd where nd.RT_ID=r.ID and r.id = 169834002

удалить отметку выгрузки

delete from NAL_EXPORTS_DET nd where nd.RT_ID=169834002

воскресенье, 22 августа 2010 г.

Объекты бессрочного пользования

select 
O.NAME
,O.CAD_NUM||O.OBJ_NUM "КадУслНо"
,O.ADR_PRN_DESC "Адрес"
,R.REG_NO "РегНо"
,decode(r.TYPE_CODE,r.TYPE_CODE,(select RV.NAME from rt_rights_voc rv where rv.code=r.type_code)) "ТипПрава"
,R.S_DATE "ДатаРег"
,en.NAME "Субъект"
,EN.SHORT_NAME "ИмяСуб"
,EN.R_TYPE "ТипСубъекта"
,EN.CON_DESC "ОписСубъекта"
,RT.DOC_DESC(r.id) "Документы"
from
re_objects o
,rt_rights r
,rt_ent rtent
,ent_entities en
where
--Все объекты у которых есть бесрочка
o.id in (
    select
        r_sub.re_id
    from
        rt_rights r_sub
    where
        r_sub.TYPE_CODE = 105
        and r_sub.E_DATE is null

)
and o.id not in (
        select
        s2o.id
        from 
        re_objects s2o
        ,rt_rights s2r
        ,rt_ent s2rtent
        ,ent_entities s2en
        where
        s2o.id=s2r.re_id
        and s2r.ID=s2rtent.RT_ID
        and s2en.id=s2rtent.ent_id
        and S2R.E_DATE is null
        
        and (
                lower(s2en.name) Like '%учрежд%'
             or lower(s2en.name) Like '%овд%'
             or lower(s2en.name) Like '%правительство респ%'
             or lower(s2en.name) Like '%почт%'
             or lower(s2en.name) Like '%войск%'
             or lower(s2en.name) Like '%лесхоз%'
             or lower(s2en.name) Like '%судеб%'
             or lower(s2en.name) Like '%центральный банк%'
             or lower(s2en.name) Like '%фгу%'
             or lower(s2en.name) Like '%кварт%'
             or lower(s2en.name) Like '%испекц%'
             or lower(s2en.name) Like '%отдел внутр%'
             or lower(s2en.name) Like '%федеральной службы%'
             or lower(s2en.name) Like '%комитет%'
             or lower(s2en.name) Like '%админи%'
             or lower(s2en.name) Like '%воен%'
             or lower(s2en.name) Like '%верховн%'
             or lower(s2en.name) Like '%министер%'
             or lower(s2en.name) Like '%школа-интернат%'
             or lower(s2en.name) Like '%межрай%'
             or lower(s2en.name) Like '%казнач%'
             or lower(s2en.name) Like '%служб%'
             or lower(s2en.name) Like '%внутр%'
             or lower(s2en.name) Like '%прокур%'
             or lower(s2en.name) Like '%арбитраж%'
             or lower(s2en.name) Like '%инстит%'
             or lower(s2en.name) Like '%мдоу%'
        )
)
and en.R_TYPE in ('О','Ю')
and R.R_GROUP = 'П'
and O.ID=R.RE_ID
and R.E_DATE is null
and rtent.rt_id=r.ID
and rtent.ent_id=EN.ID
order by O.CAD_NUM||O.OBJ_NUM

Ежемесячная выгрузка

select
--&Укажите период подачи заявлений#
AP.NO "КУВД"
,AP.R_DATE "ДатаКУВД"
,APP.ent_desc(ap.ID, 'Н') "КУВДСубъекты"
,APP.get_claim(ap.ID) "ТекстПравопритязания"
,APP.decision_desc(ap.ID) "Решение"
,O.NAME "Объект"
,O.CAD_NUM||O.OBJ_NUM "КадУслНо"
,O.ADR_PRN_DESC "Адрес"
,R.REG_NO "РегНо"
,decode(r.TYPE_CODE,r.TYPE_CODE,(select RV.NAME from rt_rights_voc rv where rv.code=r.type_code)) "ТипПрава"
,R.S_DATE "ДатаРег"
,en.NAME "Субъект"
,EN.SHORT_NAME "ИмяСуб"
,EN.R_TYPE "ТипСубъекта"
,EN.CON_DESC "ОписСубъекта"
from
app_applications ap
,app_re apre
,re_objects o
,rt_rights r
,rt_ent rtent
,ent_entities en
where
ap.ID=apre.APP_ID
and o.ID=apre.RE_ID

and ap.R_DATE between TO_DATE ('&start#', 'dd.mm.yyyy') and TO_DATE ('&end#', 'dd.mm.yyyy')
and o.id in (
    select
        r_sub.re_id
    from
        rt_rights r_sub
    where
        r_sub.TYPE_CODE = 105
        and r_sub.E_DATE is null

)
and o.id not in (
        select
        s2o.id
        from
        re_objects s2o
        ,rt_rights s2r
        ,rt_ent s2rtent
        ,ent_entities s2en
        where
        s2o.id=s2r.re_id
        and s2r.ID=s2rtent.RT_ID
        and s2en.id=s2rtent.ent_id
        and S2R.E_DATE is null
       
        and (
                lower(s2en.name) Like '%учрежд%'
             or lower(s2en.name) Like '%овд%'
             or lower(s2en.name) Like '%правительство респ%'
             or lower(s2en.name) Like '%почт%'
             or lower(s2en.name) Like '%войск%'
             or lower(s2en.name) Like '%лесхоз%'
             or lower(s2en.name) Like '%судеб%'
             or lower(s2en.name) Like '%центральный банк%'
             or lower(s2en.name) Like '%фгу%'
             or lower(s2en.name) Like '%кварт%'
             or lower(s2en.name) Like '%испекц%'
             or lower(s2en.name) Like '%отдел внутр%'
             or lower(s2en.name) Like '%федеральной службы%'
             or lower(s2en.name) Like '%комитет%'
             or lower(s2en.name) Like '%админи%'
             or lower(s2en.name) Like '%воен%'
             or lower(s2en.name) Like '%верховн%'
             or lower(s2en.name) Like '%министер%'
             or lower(s2en.name) Like '%школа-интернат%'
             or lower(s2en.name) Like '%межрай%'
             or lower(s2en.name) Like '%казнач%'
             or lower(s2en.name) Like '%служб%'
             or lower(s2en.name) Like '%внутр%'
             or lower(s2en.name) Like '%прокур%'
             or lower(s2en.name) Like '%арбитраж%'
             or lower(s2en.name) Like '%инстит%'
             or lower(s2en.name) Like '%мдоу%'
        )
)

and en.R_TYPE in ('О','Ю')
and R.R_GROUP = 'П'
and R.TYPE_CODE = 105
and O.ID=R.RE_ID
and R.E_DATE is null
and rtent.rt_id=r.ID
and rtent.ent_id=EN.ID
order by O.CAD_NUM||O.OBJ_NUM

вторник, 17 августа 2010 г.

Список констрейнов

Данная запись предназначена для ускорения поиска и исправления ошибок

EXP_FL_JNL_EXP_EMP_FK
EXP_FL_JOURNAL.EXP_EMP_ID = RP_EMPS.ID

понедельник, 16 августа 2010 г.

Список старых не правленых обременений

группировка по Типу регдействия

select
decode(r.TYPE_CODE,r.TYPE_CODE,(select RV.NAME from rt_rights_voc rv where rv.code=r.type_code)) "Ограничение"
,count (R.REG_NO) "кол-во"
from 
rt_rights r
where
R.TYPE_CODE in (
 201 --Аренда
,202 --Ипотека
,203 --Сервитут
,204 --Участие в сделке
,205 --Арест
,206 --Запрещение
,230 --Доверительное управление
,235 --Концессия
,242 --Безв.ср.польз.ЗУ
,260 --Прочие ограничения
,262 --Рента
,270 --Безв.польз.лесом
,280 --Отказ от права соб-ти
)
and R.E_DATE is null

and R.UPDATED between TO_DATE ('&start#', 'dd.mm.yyyy') and TO_DATE ('&end#', 'dd.mm.yyyy')

group by R.TYPE_CODE

Список объектов с регдействиями не правленными в указаннй период (01.01.1990 - 01.10.2007)

select 
--&Список объектов с регдействиями не правленными в указаннй период (01.01.1990 - 01.10.2007)#
--&Укажите период#
O.CAD_NUM||O.OBJ_NUM "КадУслНо"
,O.ADR_DESC "Адрес"
,R.REG_NO
,decode(r.TYPE_CODE,r.TYPE_CODE,(select RV.NAME from rt_rights_voc rv where rv.code=r.type_code)) "Ограничение"
,O.ADR_PRN_DESC "АдресДоп"
from
re_objects o
,rt_rights r

where 

o.ID=R.RE_ID
and R.TYPE_CODE in (
         201 --Аренда
        ,202 --Ипотека
        ,203 --Сервитут
        --,204 --Участие в сделке
        ,205 --Арест
        ,206 --Запрещение
        ,230 --Доверительное управление
        ,235 --Концессия
        ,242 --Безв.ср.польз.ЗУ
        ,260 --Прочие ограничения
        ,262 --Рента
        ,270 --Безв.польз.лесом
        ,280 --Отказ от права соб-ти
    )
    and R.E_DATE is null
    and R.UPDATED between TO_DATE ('&start#', 'dd.mm.yyyy') and TO_DATE ('&end#', 'dd.mm.yyyy')

order by O.CAD_NUM||O.OBJ_NUM

Архив блога

среда, 25 августа 2010 г.