[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))
1982: PROCEDURE CREATE_AWD_PROJ_TEMPLATE_STRUC(X_award_project_id IN Number,
1983: X_return_status OUT NOCOPY VARCHAR2 ) IS
1984:
1985: l_struct_exists varchar2(1) := 'N';
1986: l_awd_proj_temp pa_projects_all%rowtype;
1987: l_msg_count NUMBER;
1988: l_msg_data VARCHAR2(2000);
1989: l_return_status VARCHAR2(1);
1990:
1989: l_return_status VARCHAR2(1);
1990:
1991:
1992: CURSOR c_awd_proj_temp is
1993: Select * from pa_projects_all
1994: where project_id = x_award_project_id;
1995:
1996: CURSOR c_struc_exists is
1997: Select 'Y' from pa_proj_elements
2293: -- Update projects for additional informations.
2294:
2295: --
2296:
2297: Update PA_PROJECTS_ALL
2298: set cost_ind_rate_sch_id = g_award_rec.IDC_Schedule_Id,
2299: cost_ind_sch_fixed_date = g_award_rec.cost_ind_sch_fixed_date,
2300: labor_invoice_format_id = g_award_rec.Labor_Invoice_Format_Id,
2301: non_labor_invoice_format_Id = g_award_rec.Non_Labor_Invoice_Format_Id,
5150: pt.sponsored_flag,
5151: p.template_flag,
5152: p.start_date,
5153: p.closed_date
5154: FROM pa_projects_all p,
5155: pa_project_types_all pt
5156: WHERE p.project_id = P_PROJECT_ID
5157: AND pt.project_type = p.project_type
5158: And p.org_id = pt.org_id /* For Bug 5414832*/