План пк (отчет) (Get_Data_For_Plan)

Select nvl(to_char(ps.hisdate, 'dd'), '___') День --1

,nvl(wordsv_.Month_Decline(extract(Month From ps.hisdate), 2, 1)

,'__________') Месяц --2

,to_char(nvl(ps.hisdate, Sysdate), 'yyyy') Год --3

,s.Name Программа --4

,el.hours Часы --5

,kt.Name Форма --6

,wordsv_.Month_Decline(extract(Month From rcp.d_start), 1, 1) ||

Decode(extract(Month From rcp.d_end), extract(Month From rcp.d_start), ''

, ' - ' || wordsv_.Month_Decline(extract(Month From rcp.d_end), 1, 1)) Срок --7

,wordsv_.Month_Decline(extract(Month From rcp.d_end), 1, 1) Окончание --8

,ts_.Get_DivisionName(sd.id_d, Sysdate, 1, 1) Подразделение --9

,rcp.id_paragraph --10

,ts_.Get_DivisionName(sd.id_d_institute, Sysdate, 1, 1) Организатор --11

,extract(Year From (Select Max(pod.d_start)

From (Select rcp2.d_start

From refresher_course_plan_ rcp2

Where rcp2.id_paragraph = %p1[i]%) pod)) Год --12

,replace(replace(ps.summary, 'План ', ''), 'ПЛАН ', '') -- 13

From refresher_course_plan_ rcp

,specialities_division_ sd

,speciality_ s

,kind_training_ kt

,paragraphs_status_ ps

,complex_specialities_ cs

,educational_load_umk_ el

Where rcp.id_paragraph = %p1[i]%

And sd.id_d_specialitie = rcp.id_d_specialitie

And sd.id_speciality = s.id_speciality

And kt.idk_training = sd.idk_training

And ps.id_paragraph = rcp.id_paragraph

And rcp.id_d_specialitie = cs.id_d_specialitie

And el.id_methodical_complex = cs.id_methodical_complex

Позиции плана пк (r_c_Plan)

Select s.Name

,ts_.Get_DivisionName(sd.id_d_institute, Sysdate, 1, 1)

,ts_.Get_DivisionName(sd.id_d, Sysdate, 1, 1)

,kt.Name

,rcp.d_start

,rcp.d_end

,sf.Name

,(Select npt.money

From norms_payment_training_ npt

Where npt.id_d_specialitie = rcp.id_d_specialitie

And npt.type_value = 1

And npt.d_start Between sd.d_start And rcp.d_start)

,ps.Status_Text

,rcp.id_refresher_course_plan

,rcp.id_d_specialitie

,sd.id_speciality

,sd.id_d_institute

,sd.id_d

,sd.idk_training

,rcp.id_paragraph

,ps.id_order

,ps.idk_order

,ps.Status_order

,sd.id_source

,ps.id_erp_user

From refresher_course_plan_ rcp

,specialities_division_ sd

,speciality_ s

,kind_training_ kt

,paragraphs_status_ ps

,source_financing_ sf

Where rcp.id_d_specialitie = sd.id_d_specialitie

And sd.id_speciality = s.id_speciality

And kt.idk_training = sd.idk_training

And sd.id_d_institute in

(

-- всё, если необычный пользователь

select dL.id_d from division_ dL where bs_.isUnusual > 0

union all

-- по ролям, если обычный пользователь

select dL.id_d from division_ dL

where bs_.isUnusual = 0 and dL.id_metaterm in (select r.id_metaterm from table(access_data_.Get_Roles('1403', 1)) r )

union all

-- по ролям, если обычный пользователь

select dL.id_d from division_ dL

where bs_.isUnusual = 0

and exists (select r.id_metaterm from table(access_data_.Get_Roles('1403', 1)) r where r.id_metaterm is null)

)

And ps.id_paragraph = rcp.id_paragraph

And sd.id_source = sf.id_source(+)

And (rcp.id_paragraph = %p1[i]% Or

((%p1[s]% Is Null) And

ps.id_erp_user =

(Select w.id_erp_user From who_is_who_ w Where w.login = User)))