[Home] [Help]
224: -- End of fix 3056424.
225:
226: CURSOR c_awd_project is
227: Select project_id
228: from PA_PROJECTS_ALL
229: where project_type = 'AWARD_PROJECT'
230: and template_flag = 'Y'
231: and (segment1 = 'AWD_PROJ_-999'
232: or segment1 = 'AWD_PROJ_'||TO_CHAR(L_org_id))
1981: PROCEDURE CREATE_AWD_PROJ_TEMPLATE_STRUC(X_award_project_id IN Number,
1982: X_return_status OUT NOCOPY VARCHAR2 ) IS
1983:
1984: l_struct_exists varchar2(1) := 'N';
1985: l_awd_proj_temp pa_projects_all%rowtype;
1986: l_msg_count NUMBER;
1987: l_msg_data VARCHAR2(2000);
1988: l_return_status VARCHAR2(1);
1989:
1988: l_return_status VARCHAR2(1);
1989:
1990:
1991: CURSOR c_awd_proj_temp is
1992: Select * from pa_projects_all
1993: where project_id = x_award_project_id;
1994:
1995: CURSOR c_struc_exists is
1996: Select 'Y' from pa_proj_elements
2292: -- Update projects for additional informations.
2293:
2294: --
2295:
2296: Update PA_PROJECTS_ALL
2297: set cost_ind_rate_sch_id = g_award_rec.IDC_Schedule_Id,
2298: cost_ind_sch_fixed_date = g_award_rec.cost_ind_sch_fixed_date,
2299: labor_invoice_format_id = g_award_rec.Labor_Invoice_Format_Id,
2300: non_labor_invoice_format_Id = g_award_rec.Non_Labor_Invoice_Format_Id,
5148: pt.sponsored_flag,
5149: p.template_flag,
5150: p.start_date,
5151: p.closed_date
5152: FROM pa_projects_all p,
5153: pa_project_types_all pt
5154: WHERE p.project_id = P_PROJECT_ID
5155: AND pt.project_type = p.project_type
5156: And p.org_id = pt.org_id /* For Bug 5414832*/