DBA Data[Home] [Help]

APPS.PA_PLANNING_RESOURCE_UTILS dependencies on DBMS_SQL

Line 6479: l_cursor := dbms_sql.open_cursor;

6475: END;
6476: /********************************
6477: * Open Cursor
6478: ********************************/
6479: l_cursor := dbms_sql.open_cursor;
6480: /**************************************************************
6481: * Constructing the Select Statement based on the values passed
6482: * as parameters to this procedure.
6483: ***********************************************************/

Line 6623: dbms_sql.parse(l_cursor,l_stmt,dbms_sql.native);

6619: -- dbms_output.put_line('p_project_id is :' || p_project_id);
6620: /*************************************
6621: * Parse the Select Stmt
6622: ************************************/
6623: dbms_sql.parse(l_cursor,l_stmt,dbms_sql.native);
6624:
6625: /************************************
6626: * Bind the Variables
6627: ********************************/

Line 6634: dbms_sql.bind_variable(l_cursor,'resource_list_id', l_resource_list_id);

6630: * Desc - Added code to Binnd the variables
6631: * resource_list_id, res_format_id
6632: *********************************************/
6633: --Binding the resource_list_id column
6634: dbms_sql.bind_variable(l_cursor,'resource_list_id', l_resource_list_id);
6635: --Binding the res_format_id column
6636: dbms_sql.bind_variable(l_cursor,'res_format_id', p_res_format_id);
6637:
6638: --Binding the person_id column when p_person_id is not null

Line 6636: dbms_sql.bind_variable(l_cursor,'res_format_id', p_res_format_id);

6632: *********************************************/
6633: --Binding the resource_list_id column
6634: dbms_sql.bind_variable(l_cursor,'resource_list_id', l_resource_list_id);
6635: --Binding the res_format_id column
6636: dbms_sql.bind_variable(l_cursor,'res_format_id', p_res_format_id);
6637:
6638: --Binding the person_id column when p_person_id is not null
6639: IF -- p_person_id IS NOT NULL AND
6640: l_fmt_details.Res_Type_Enabled_Flag = 'Y' AND

Line 6643: dbms_sql.bind_variable(l_cursor,'person_id', p_person_id);

6639: IF -- p_person_id IS NOT NULL AND
6640: l_fmt_details.Res_Type_Enabled_Flag = 'Y' AND
6641: l_fmt_details.Res_Type_Code = 'NAMED_PERSON'
6642: THEN
6643: dbms_sql.bind_variable(l_cursor,'person_id', p_person_id);
6644: END IF;
6645: --Binding the job_id column when p_job_id is not null
6646: IF -- p_job_id IS NOT NULL AND
6647: l_fmt_details.Res_Type_Enabled_Flag = 'Y' AND

Line 6651: dbms_sql.bind_variable(l_cursor,'job_id', p_job_id);

6647: l_fmt_details.Res_Type_Enabled_Flag = 'Y' AND
6648: l_fmt_details.Res_Type_Code = 'JOB'
6649: THEN
6650: -- dbms_output.put_line('p_job_id is :' || p_job_id);
6651: dbms_sql.bind_variable(l_cursor,'job_id', p_job_id);
6652: END IF;
6653: --Binding the organization_id column when p_organization_id is not null
6654: IF -- p_organization_id IS NOT NULL AND
6655: l_fmt_details.Orgn_Enabled_Flag = 'Y'

Line 6658: dbms_sql.bind_variable(l_cursor,'organization_id', p_organization_id);

6654: IF -- p_organization_id IS NOT NULL AND
6655: l_fmt_details.Orgn_Enabled_Flag = 'Y'
6656: THEN
6657: -- dbms_output.put_line('p_organization_id is :' || p_organization_id);
6658: dbms_sql.bind_variable(l_cursor,'organization_id', p_organization_id);
6659: END IF;
6660: --Binding the expenditure_type column when p_expenditure_type is not null
6661: IF p_expenditure_type IS NOT NULL AND
6662: l_fmt_details.Fin_Cat_Enabled_Flag = 'Y'

Line 6664: dbms_sql.bind_variable(l_cursor,'expenditure_type', p_expenditure_type);

6660: --Binding the expenditure_type column when p_expenditure_type is not null
6661: IF p_expenditure_type IS NOT NULL AND
6662: l_fmt_details.Fin_Cat_Enabled_Flag = 'Y'
6663: THEN
6664: dbms_sql.bind_variable(l_cursor,'expenditure_type', p_expenditure_type);
6665: END IF;
6666: --Binding the expenditure_category column when
6667: --p_expenditure_category is not null
6668: IF p_expenditure_category IS NOT NULL AND p_expenditure_type IS NULL AND

Line 6671: dbms_sql.bind_variable(l_cursor,'expenditure_category',p_expenditure_category);

6667: --p_expenditure_category is not null
6668: IF p_expenditure_category IS NOT NULL AND p_expenditure_type IS NULL AND
6669: l_fmt_details.Fin_Cat_Enabled_Flag = 'Y'
6670: THEN
6671: dbms_sql.bind_variable(l_cursor,'expenditure_category',p_expenditure_category);
6672: END IF;
6673:
6674: IF p_expenditure_category IS NULL AND p_expenditure_type IS NULL AND
6675: l_fmt_details.Fin_Cat_Enabled_Flag = 'Y'

Line 6677: dbms_sql.bind_variable(l_cursor,'expenditure_category',l_fin_category_name);

6673:
6674: IF p_expenditure_category IS NULL AND p_expenditure_type IS NULL AND
6675: l_fmt_details.Fin_Cat_Enabled_Flag = 'Y'
6676: THEN
6677: dbms_sql.bind_variable(l_cursor,'expenditure_category',l_fin_category_name);
6678: END IF;
6679: --Binding the project_role_id column when p_project_role_id is not null
6680: --Binding the named_role column when p_named_role is not null
6681: IF p_project_role_id IS NOT NULL AND p_named_role IS NOT NULL AND

Line 6684: dbms_sql.bind_variable(l_cursor,'project_role_id', p_project_role_id);

6680: --Binding the named_role column when p_named_role is not null
6681: IF p_project_role_id IS NOT NULL AND p_named_role IS NOT NULL AND
6682: l_fmt_details.Role_Enabled_Flag = 'Y'
6683: THEN
6684: dbms_sql.bind_variable(l_cursor,'project_role_id', p_project_role_id);
6685: dbms_sql.bind_variable(l_cursor,'named_role', p_named_role);
6686: END IF;
6687: --Binding the person_type_code column when p_person_type_code is not null
6688: IF -- p_person_type_code IS NOT NULL AND

Line 6685: dbms_sql.bind_variable(l_cursor,'named_role', p_named_role);

6681: IF p_project_role_id IS NOT NULL AND p_named_role IS NOT NULL AND
6682: l_fmt_details.Role_Enabled_Flag = 'Y'
6683: THEN
6684: dbms_sql.bind_variable(l_cursor,'project_role_id', p_project_role_id);
6685: dbms_sql.bind_variable(l_cursor,'named_role', p_named_role);
6686: END IF;
6687: --Binding the person_type_code column when p_person_type_code is not null
6688: IF -- p_person_type_code IS NOT NULL AND
6689: l_fmt_details.Res_Type_Enabled_Flag = 'Y' AND

Line 6692: dbms_sql.bind_variable(l_cursor,'person_type_code', p_person_type_code);

6688: IF -- p_person_type_code IS NOT NULL AND
6689: l_fmt_details.Res_Type_Enabled_Flag = 'Y' AND
6690: l_fmt_details.Res_Type_Code = 'PERSON_TYPE'
6691: THEN
6692: dbms_sql.bind_variable(l_cursor,'person_type_code', p_person_type_code);
6693: END IF;
6694: --Binding the object_type1 column when l_central_control equals Y
6695: IF l_central_control = 'Y' THEN
6696: dbms_sql.bind_variable(l_cursor,'object_type1', 'RESOURCE_LIST');

Line 6696: dbms_sql.bind_variable(l_cursor,'object_type1', 'RESOURCE_LIST');

6692: dbms_sql.bind_variable(l_cursor,'person_type_code', p_person_type_code);
6693: END IF;
6694: --Binding the object_type1 column when l_central_control equals Y
6695: IF l_central_control = 'Y' THEN
6696: dbms_sql.bind_variable(l_cursor,'object_type1', 'RESOURCE_LIST');
6697: END IF;
6698: --Binding the object_type2 and project_id
6699: -- column when l_central_control does not equal Y
6700: IF l_central_control <> 'Y' THEN

Line 6701: dbms_sql.bind_variable(l_cursor,'object_type2', 'PROJECT');

6697: END IF;
6698: --Binding the object_type2 and project_id
6699: -- column when l_central_control does not equal Y
6700: IF l_central_control <> 'Y' THEN
6701: dbms_sql.bind_variable(l_cursor,'object_type2', 'PROJECT');
6702: dbms_sql.bind_variable(l_cursor,'project_id', p_project_id);
6703: END IF;
6704:
6705: --Define Output Variables

Line 6702: dbms_sql.bind_variable(l_cursor,'project_id', p_project_id);

6698: --Binding the object_type2 and project_id
6699: -- column when l_central_control does not equal Y
6700: IF l_central_control <> 'Y' THEN
6701: dbms_sql.bind_variable(l_cursor,'object_type2', 'PROJECT');
6702: dbms_sql.bind_variable(l_cursor,'project_id', p_project_id);
6703: END IF;
6704:
6705: --Define Output Variables
6706: --dbms_sql.define_column(l_cursor,1,l_resource_list_member_id,30);

Line 6706: --dbms_sql.define_column(l_cursor,1,l_resource_list_member_id,30);

6702: dbms_sql.bind_variable(l_cursor,'project_id', p_project_id);
6703: END IF;
6704:
6705: --Define Output Variables
6706: --dbms_sql.define_column(l_cursor,1,l_resource_list_member_id,30);
6707: dbms_sql.define_column(l_cursor,1,l_resource_list_member_id);
6708:
6709: l_rows := dbms_sql.execute(l_cursor);
6710:

Line 6707: dbms_sql.define_column(l_cursor,1,l_resource_list_member_id);

6703: END IF;
6704:
6705: --Define Output Variables
6706: --dbms_sql.define_column(l_cursor,1,l_resource_list_member_id,30);
6707: dbms_sql.define_column(l_cursor,1,l_resource_list_member_id);
6708:
6709: l_rows := dbms_sql.execute(l_cursor);
6710:
6711: /****************************

Line 6709: l_rows := dbms_sql.execute(l_cursor);

6705: --Define Output Variables
6706: --dbms_sql.define_column(l_cursor,1,l_resource_list_member_id,30);
6707: dbms_sql.define_column(l_cursor,1,l_resource_list_member_id);
6708:
6709: l_rows := dbms_sql.execute(l_cursor);
6710:
6711: /****************************
6712: * Loop Through the Records
6713: ****************************/

Line 6719: IF dbms_sql.fetch_rows(l_cursor) = 0 THEN

6715: * If No Values are Found we are setting the l_exists
6716: * flag to be N. If the Value is N we need to do some
6717: * logic based on the centrally controlled flag.
6718: **********************************************/
6719: IF dbms_sql.fetch_rows(l_cursor) = 0 THEN
6720: l_exists := 'N';
6721: ELSE
6722: l_exists := 'Y';
6723: END IF;

Line 6730: dbms_sql.column_value(l_cursor,1,l_resource_list_member_id);

6726: * l_resource_list_member_id.
6727: * ********************************************************/
6728: IF l_exists = 'Y' THEN
6729: -- dbms_output.put_line('l_exists is Y');
6730: dbms_sql.column_value(l_cursor,1,l_resource_list_member_id);
6731: dbms_sql.close_cursor(l_cursor);
6732: -- dbms_output.put_line('l_resource_list_member_id is :' || l_resource_list_member_id);
6733: --Return the l_resource_list_member_id
6734: --To the calling API

Line 6731: dbms_sql.close_cursor(l_cursor);

6727: * ********************************************************/
6728: IF l_exists = 'Y' THEN
6729: -- dbms_output.put_line('l_exists is Y');
6730: dbms_sql.column_value(l_cursor,1,l_resource_list_member_id);
6731: dbms_sql.close_cursor(l_cursor);
6732: -- dbms_output.put_line('l_resource_list_member_id is :' || l_resource_list_member_id);
6733: --Return the l_resource_list_member_id
6734: --To the calling API
6735: RETURN l_resource_list_member_id;