[Home] [Help]
223:
224: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
225: l_debug_mode := NVL(l_debug_mode, 'N');
226: x_msg_count := 0;
227: x_return_status := FND_API.G_RET_STS_SUCCESS;
228: IF l_debug_mode = 'Y' THEN
229: PA_DEBUG.Set_Curr_Function( p_function => 'plan_txn_pub.drv_prms_for_calc',
230: p_debug_mode => l_debug_mode );
231: END IF;
341: l_rate_based_flag_tbl.extend(p_resource_assignment_id_tbl.COUNT);
342: l_non_labor_resource_tbl.extend(p_resource_assignment_id_tbl.COUNT);
343: l_task_id_tbl.extend(p_resource_assignment_id_tbl.COUNT);
344:
345: --Added the check for FND_API.G_MISS_XXX in the below decodes as the UI can pass input parameters
346: --as FND_API.G_MISS_XXX even if the existing value of the attribute is NULL. NOTE: The input parameter
347: --to update_planning_transactions should be NULL if the corresponding column in pa_resource_assignments
348: --should not be changed and the input parameter should be FND_API.G_MISS_XXX if thhe corresponding column
349: --in pa_resource_assignments should be nulled out.
342: l_non_labor_resource_tbl.extend(p_resource_assignment_id_tbl.COUNT);
343: l_task_id_tbl.extend(p_resource_assignment_id_tbl.COUNT);
344:
345: --Added the check for FND_API.G_MISS_XXX in the below decodes as the UI can pass input parameters
346: --as FND_API.G_MISS_XXX even if the existing value of the attribute is NULL. NOTE: The input parameter
347: --to update_planning_transactions should be NULL if the corresponding column in pa_resource_assignments
348: --should not be changed and the input parameter should be FND_API.G_MISS_XXX if thhe corresponding column
349: --in pa_resource_assignments should be nulled out.
350: FOR i IN p_resource_assignment_id_tbl.FIRST .. p_resource_assignment_id_tbl.LAST LOOP
344:
345: --Added the check for FND_API.G_MISS_XXX in the below decodes as the UI can pass input parameters
346: --as FND_API.G_MISS_XXX even if the existing value of the attribute is NULL. NOTE: The input parameter
347: --to update_planning_transactions should be NULL if the corresponding column in pa_resource_assignments
348: --should not be changed and the input parameter should be FND_API.G_MISS_XXX if thhe corresponding column
349: --in pa_resource_assignments should be nulled out.
350: FOR i IN p_resource_assignment_id_tbl.FIRST .. p_resource_assignment_id_tbl.LAST LOOP
351:
352: --dbms_output.put_line('6.2 '||p_resource_assignment_id_tbl(i) );
412: ELSE
413:
414: SELECT
415: DECODE(DECODE(NVL(p_project_role_id_tbl(i),project_role_id),
416: FND_API.G_MISS_NUM, decode(project_role_id,null,0,1),
417: project_role_id,0,
418: 1)+
419: DECODE(NVL(p_resource_list_member_id_tbl(i),resource_list_member_id),
420: FND_API.G_MISS_NUM, decode(resource_list_member_id,null,0,1),
416: FND_API.G_MISS_NUM, decode(project_role_id,null,0,1),
417: project_role_id,0,
418: 1)+
419: DECODE(NVL(p_resource_list_member_id_tbl(i),resource_list_member_id),
420: FND_API.G_MISS_NUM, decode(resource_list_member_id,null,0,1),
421: resource_list_member_id, 0,
422: 1),
423: 0, 'N',
424: 'Y'),--Indicates whether the rbs mapping api should be called or not
428: NVL(p_spread_curve_id_tbl(i),spread_curve_id),
429: sp_fixed_date,
430: DECODE(nvl(p_spread_curve_id_tbl(i),spread_curve_id),
431: p_fixed_date_sp_id,DECODE(DECODE(p_sp_fixed_date_tbl(i),
432: FND_API.G_MISS_DATE,to_date(null),
433: nvl(p_sp_fixed_date_tbl(i),sp_fixed_date))
434: ,to_date(null),DECODE (p_planning_start_date_tbl(i),
435: FND_API.G_MISS_DATE,to_date(null),
436: nvl(p_planning_start_date_tbl(i),planning_start_date))
431: p_fixed_date_sp_id,DECODE(DECODE(p_sp_fixed_date_tbl(i),
432: FND_API.G_MISS_DATE,to_date(null),
433: nvl(p_sp_fixed_date_tbl(i),sp_fixed_date))
434: ,to_date(null),DECODE (p_planning_start_date_tbl(i),
435: FND_API.G_MISS_DATE,to_date(null),
436: nvl(p_planning_start_date_tbl(i),planning_start_date))
437: ,nvl(p_sp_fixed_date_tbl(i),sp_fixed_date))
438: ,to_date(null)),
439: planning_start_date,
439: planning_start_date,
440: NVL(p_planning_start_date_tbl(i),planning_start_date),
441: planning_end_date,
442: NVL(p_planning_end_date_tbl(i),planning_end_date),
443: DECODE (p_txn_currency_code_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_txn_currency_code_tbl(i),pbl.txn_currency_code)),
444: DECODE (p_inventory_item_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_inventory_item_id_tbl(i),inventory_item_id)) ,
445: DECODE (p_expenditure_type_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_expenditure_type_tbl(i),expenditure_type)),
446: DECODE (p_person_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_person_id_tbl(i),person_id)) ,
447: DECODE (p_job_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_job_id_tbl(i),job_id)) ,
440: NVL(p_planning_start_date_tbl(i),planning_start_date),
441: planning_end_date,
442: NVL(p_planning_end_date_tbl(i),planning_end_date),
443: DECODE (p_txn_currency_code_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_txn_currency_code_tbl(i),pbl.txn_currency_code)),
444: DECODE (p_inventory_item_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_inventory_item_id_tbl(i),inventory_item_id)) ,
445: DECODE (p_expenditure_type_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_expenditure_type_tbl(i),expenditure_type)),
446: DECODE (p_person_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_person_id_tbl(i),person_id)) ,
447: DECODE (p_job_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_job_id_tbl(i),job_id)) ,
448: DECODE (p_organization_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_organization_id_tbl(i),organization_id)) ,
441: planning_end_date,
442: NVL(p_planning_end_date_tbl(i),planning_end_date),
443: DECODE (p_txn_currency_code_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_txn_currency_code_tbl(i),pbl.txn_currency_code)),
444: DECODE (p_inventory_item_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_inventory_item_id_tbl(i),inventory_item_id)) ,
445: DECODE (p_expenditure_type_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_expenditure_type_tbl(i),expenditure_type)),
446: DECODE (p_person_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_person_id_tbl(i),person_id)) ,
447: DECODE (p_job_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_job_id_tbl(i),job_id)) ,
448: DECODE (p_organization_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_organization_id_tbl(i),organization_id)) ,
449: DECODE (p_event_type_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_event_type_tbl(i),event_type)) ,
442: NVL(p_planning_end_date_tbl(i),planning_end_date),
443: DECODE (p_txn_currency_code_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_txn_currency_code_tbl(i),pbl.txn_currency_code)),
444: DECODE (p_inventory_item_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_inventory_item_id_tbl(i),inventory_item_id)) ,
445: DECODE (p_expenditure_type_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_expenditure_type_tbl(i),expenditure_type)),
446: DECODE (p_person_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_person_id_tbl(i),person_id)) ,
447: DECODE (p_job_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_job_id_tbl(i),job_id)) ,
448: DECODE (p_organization_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_organization_id_tbl(i),organization_id)) ,
449: DECODE (p_event_type_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_event_type_tbl(i),event_type)) ,
450: DECODE (p_expenditure_category_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_expenditure_category_tbl(i),expenditure_category)) ,
443: DECODE (p_txn_currency_code_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_txn_currency_code_tbl(i),pbl.txn_currency_code)),
444: DECODE (p_inventory_item_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_inventory_item_id_tbl(i),inventory_item_id)) ,
445: DECODE (p_expenditure_type_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_expenditure_type_tbl(i),expenditure_type)),
446: DECODE (p_person_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_person_id_tbl(i),person_id)) ,
447: DECODE (p_job_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_job_id_tbl(i),job_id)) ,
448: DECODE (p_organization_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_organization_id_tbl(i),organization_id)) ,
449: DECODE (p_event_type_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_event_type_tbl(i),event_type)) ,
450: DECODE (p_expenditure_category_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_expenditure_category_tbl(i),expenditure_category)) ,
451: DECODE (p_revenue_category_code_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_revenue_category_code_tbl(i),revenue_category_code)) ,
444: DECODE (p_inventory_item_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_inventory_item_id_tbl(i),inventory_item_id)) ,
445: DECODE (p_expenditure_type_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_expenditure_type_tbl(i),expenditure_type)),
446: DECODE (p_person_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_person_id_tbl(i),person_id)) ,
447: DECODE (p_job_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_job_id_tbl(i),job_id)) ,
448: DECODE (p_organization_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_organization_id_tbl(i),organization_id)) ,
449: DECODE (p_event_type_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_event_type_tbl(i),event_type)) ,
450: DECODE (p_expenditure_category_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_expenditure_category_tbl(i),expenditure_category)) ,
451: DECODE (p_revenue_category_code_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_revenue_category_code_tbl(i),revenue_category_code)) ,
452: DECODE (p_item_category_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_item_category_id_tbl(i),item_category_id)) ,
445: DECODE (p_expenditure_type_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_expenditure_type_tbl(i),expenditure_type)),
446: DECODE (p_person_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_person_id_tbl(i),person_id)) ,
447: DECODE (p_job_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_job_id_tbl(i),job_id)) ,
448: DECODE (p_organization_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_organization_id_tbl(i),organization_id)) ,
449: DECODE (p_event_type_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_event_type_tbl(i),event_type)) ,
450: DECODE (p_expenditure_category_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_expenditure_category_tbl(i),expenditure_category)) ,
451: DECODE (p_revenue_category_code_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_revenue_category_code_tbl(i),revenue_category_code)) ,
452: DECODE (p_item_category_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_item_category_id_tbl(i),item_category_id)) ,
453: DECODE (p_bom_resource_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_bom_resource_id_tbl(i),bom_resource_id)) ,
446: DECODE (p_person_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_person_id_tbl(i),person_id)) ,
447: DECODE (p_job_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_job_id_tbl(i),job_id)) ,
448: DECODE (p_organization_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_organization_id_tbl(i),organization_id)) ,
449: DECODE (p_event_type_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_event_type_tbl(i),event_type)) ,
450: DECODE (p_expenditure_category_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_expenditure_category_tbl(i),expenditure_category)) ,
451: DECODE (p_revenue_category_code_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_revenue_category_code_tbl(i),revenue_category_code)) ,
452: DECODE (p_item_category_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_item_category_id_tbl(i),item_category_id)) ,
453: DECODE (p_bom_resource_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_bom_resource_id_tbl(i),bom_resource_id)) ,
454: DECODE (p_project_role_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_project_role_id_tbl(i),project_role_id)) ,
447: DECODE (p_job_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_job_id_tbl(i),job_id)) ,
448: DECODE (p_organization_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_organization_id_tbl(i),organization_id)) ,
449: DECODE (p_event_type_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_event_type_tbl(i),event_type)) ,
450: DECODE (p_expenditure_category_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_expenditure_category_tbl(i),expenditure_category)) ,
451: DECODE (p_revenue_category_code_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_revenue_category_code_tbl(i),revenue_category_code)) ,
452: DECODE (p_item_category_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_item_category_id_tbl(i),item_category_id)) ,
453: DECODE (p_bom_resource_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_bom_resource_id_tbl(i),bom_resource_id)) ,
454: DECODE (p_project_role_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_project_role_id_tbl(i),project_role_id)) ,
455: DECODE (p_person_type_code_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_person_type_code_tbl(i),person_type_code)) ,
448: DECODE (p_organization_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_organization_id_tbl(i),organization_id)) ,
449: DECODE (p_event_type_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_event_type_tbl(i),event_type)) ,
450: DECODE (p_expenditure_category_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_expenditure_category_tbl(i),expenditure_category)) ,
451: DECODE (p_revenue_category_code_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_revenue_category_code_tbl(i),revenue_category_code)) ,
452: DECODE (p_item_category_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_item_category_id_tbl(i),item_category_id)) ,
453: DECODE (p_bom_resource_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_bom_resource_id_tbl(i),bom_resource_id)) ,
454: DECODE (p_project_role_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_project_role_id_tbl(i),project_role_id)) ,
455: DECODE (p_person_type_code_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_person_type_code_tbl(i),person_type_code)) ,
456: DECODE (p_supplier_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_supplier_id_tbl(i),supplier_id)),
449: DECODE (p_event_type_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_event_type_tbl(i),event_type)) ,
450: DECODE (p_expenditure_category_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_expenditure_category_tbl(i),expenditure_category)) ,
451: DECODE (p_revenue_category_code_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_revenue_category_code_tbl(i),revenue_category_code)) ,
452: DECODE (p_item_category_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_item_category_id_tbl(i),item_category_id)) ,
453: DECODE (p_bom_resource_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_bom_resource_id_tbl(i),bom_resource_id)) ,
454: DECODE (p_project_role_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_project_role_id_tbl(i),project_role_id)) ,
455: DECODE (p_person_type_code_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_person_type_code_tbl(i),person_type_code)) ,
456: DECODE (p_supplier_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_supplier_id_tbl(i),supplier_id)),
457: DECODE (p_named_role_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_named_role_tbl(i),named_role )),
450: DECODE (p_expenditure_category_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_expenditure_category_tbl(i),expenditure_category)) ,
451: DECODE (p_revenue_category_code_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_revenue_category_code_tbl(i),revenue_category_code)) ,
452: DECODE (p_item_category_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_item_category_id_tbl(i),item_category_id)) ,
453: DECODE (p_bom_resource_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_bom_resource_id_tbl(i),bom_resource_id)) ,
454: DECODE (p_project_role_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_project_role_id_tbl(i),project_role_id)) ,
455: DECODE (p_person_type_code_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_person_type_code_tbl(i),person_type_code)) ,
456: DECODE (p_supplier_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_supplier_id_tbl(i),supplier_id)),
457: DECODE (p_named_role_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_named_role_tbl(i),named_role )),
458: resource_class_code,
451: DECODE (p_revenue_category_code_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_revenue_category_code_tbl(i),revenue_category_code)) ,
452: DECODE (p_item_category_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_item_category_id_tbl(i),item_category_id)) ,
453: DECODE (p_bom_resource_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_bom_resource_id_tbl(i),bom_resource_id)) ,
454: DECODE (p_project_role_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_project_role_id_tbl(i),project_role_id)) ,
455: DECODE (p_person_type_code_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_person_type_code_tbl(i),person_type_code)) ,
456: DECODE (p_supplier_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_supplier_id_tbl(i),supplier_id)),
457: DECODE (p_named_role_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_named_role_tbl(i),named_role )),
458: resource_class_code,
459: rate_based_flag,
452: DECODE (p_item_category_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_item_category_id_tbl(i),item_category_id)) ,
453: DECODE (p_bom_resource_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_bom_resource_id_tbl(i),bom_resource_id)) ,
454: DECODE (p_project_role_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_project_role_id_tbl(i),project_role_id)) ,
455: DECODE (p_person_type_code_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_person_type_code_tbl(i),person_type_code)) ,
456: DECODE (p_supplier_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_supplier_id_tbl(i),supplier_id)),
457: DECODE (p_named_role_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_named_role_tbl(i),named_role )),
458: resource_class_code,
459: rate_based_flag,
460: rbs_element_id,
453: DECODE (p_bom_resource_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_bom_resource_id_tbl(i),bom_resource_id)) ,
454: DECODE (p_project_role_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_project_role_id_tbl(i),project_role_id)) ,
455: DECODE (p_person_type_code_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_person_type_code_tbl(i),person_type_code)) ,
456: DECODE (p_supplier_id_tbl(i), FND_API.G_MISS_NUM,null,nvl(p_supplier_id_tbl(i),supplier_id)),
457: DECODE (p_named_role_tbl(i), FND_API.G_MISS_CHAR,null,nvl(p_named_role_tbl(i),named_role )),
458: resource_class_code,
459: rate_based_flag,
460: rbs_element_id,
461: non_labor_resource,
532:
533: END IF;--IF l_debug_mode = 'Y' THEN
534:
535: --Added Validation for planning_start_date and planning end date
536: IF ((x_plan_start_date_new_tbl(i)=FND_API.G_MISS_DATE) OR
537: (x_plan_end_date_new_tbl(i) =FND_API.G_MISS_DATE) OR
538: (NVL(x_plan_start_date_new_tbl(i),trunc(sysdate))>NVL(x_plan_end_date_new_tbl(i),trunc(sysdate)))) THEN
539:
540: IF l_debug_mode = 'Y' THEN
533: END IF;--IF l_debug_mode = 'Y' THEN
534:
535: --Added Validation for planning_start_date and planning end date
536: IF ((x_plan_start_date_new_tbl(i)=FND_API.G_MISS_DATE) OR
537: (x_plan_end_date_new_tbl(i) =FND_API.G_MISS_DATE) OR
538: (NVL(x_plan_start_date_new_tbl(i),trunc(sysdate))>NVL(x_plan_end_date_new_tbl(i),trunc(sysdate)))) THEN
539:
540: IF l_debug_mode = 'Y' THEN
541:
576: /* end of bug fix: 5752337 */
577:
578:
579: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
580: END IF;--IF ((x_plan_start_date_new_tbl(i)=FND_API.G_MISS_DATE) OR
581:
582: --Bug 4083605. This block of code makes sure that the planning start date is not changed to a date
583: --which falls after the date where actuals exist. Similar validations are done for planning end date too
584:
655: --Modified Logic below for Bug 3762278 -- l_spread_curve_id_tbl is the final value of
656: --spread curve id that will be existing in db
657: IF (x_spread_curve_id_new_tbl(i) = p_fixed_date_sp_id) THEN
658:
659: IF p_sp_fixed_date_tbl(i) = FND_API.G_MISS_DATE THEN
660:
661: IF l_debug_mode = 'Y' THEN
662: pa_debug.g_err_stage:='Error - cannot nullify sp_fixed_date for Fixed Date Spread curve';
663: print_msg(pa_debug.g_err_stage,l_module_name);
726: p_token5 => 'L_LINE_END_DATE',
727: p_value5 => x_plan_start_date_old_tbl(i));
728: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
729:
730: END IF;--IF x_sp_fixed_date_new_tbl(i) = FND_API.G_MISS_DATE THEN
731:
732: ELSE
733: -- if the Final Value of spread curve id is either null or not equal to fixed date
734: -- spread curve then the sp fixed date should be nulled out if it is not already null.
740: END IF;
741:
742: IF x_sp_fixed_date_old_tbl(i) IS NOT NULL THEN
743:
744: x_sp_fixed_date_new_tbl(i) := FND_API.G_MISS_DATE;
745:
746: ELSE
747:
748: x_sp_fixed_date_new_tbl(i) := NULL;
848: pa_debug.g_err_stage:='Deriving Amts/Qty for rbs element id change';
849: print_msg(pa_debug.g_err_stage,l_module_name);
850: END IF;
851:
852: IF px_total_qty_tbl(i) IS NOT NULL AND px_total_qty_tbl(i) <> FND_API.G_MISS_NUM THEN
853:
854: IF l_debug_mode = 'Y' THEN
855: pa_debug.g_err_stage:='RBS Input Quantity Exists Set Amts to NULL';
856: print_msg(pa_debug.g_err_stage,l_module_name);
867: * the new rate overrides entered by user, if not changed then set it to null
868: * so that, rate api derives the new rates for new planning resource
869: */
870: IF px_raw_cost_override_rate_tbl(i) is NOT NULL AND
871: px_raw_cost_override_rate_tbl(i) <> FND_API.G_MISS_NUM Then
872: IF px_raw_cost_override_rate_tbl(i) = nvl(l_rtx_rateOvrds_rec.txn_raw_cost_rate_override,0) Then
873: px_raw_cost_override_rate_tbl(i) := NULL;
874: END IF;
875: End IF;
874: END IF;
875: End IF;
876:
877: IF px_b_cost_rate_override_tbl(i) is NOT NULL AND
878: px_b_cost_rate_override_tbl(i) <> FND_API.G_MISS_NUM Then
879: IF px_b_cost_rate_override_tbl(i) = nvl(l_rtx_rateOvrds_rec.txn_burden_cost_rate_override,0) Then
880: px_b_cost_rate_override_tbl(i) := NULL;
881: END IF;
882: END IF;
880: px_b_cost_rate_override_tbl(i) := NULL;
881: END IF;
882: END IF;
883:
884: ELSIF px_total_qty_tbl(i) = FND_API.G_MISS_NUM THEN
885:
886: IF l_debug_mode = 'Y' THEN
887: pa_debug.g_err_stage:='RBS Input Quantity IS G_MISS_NUM Set Amts to G_MISS_NUM';
888: print_msg(pa_debug.g_err_stage,l_module_name);
887: pa_debug.g_err_stage:='RBS Input Quantity IS G_MISS_NUM Set Amts to G_MISS_NUM';
888: print_msg(pa_debug.g_err_stage,l_module_name);
889: END IF;
890:
891: px_total_raw_cost_tbl(i) := FND_API.G_MISS_NUM;
892: px_total_burdened_cost_tbl(i) := FND_API.G_MISS_NUM;
893: px_total_revenue_tbl(i) := FND_API.G_MISS_NUM;
894: px_raw_cost_rate_tbl(i) := FND_API.G_MISS_NUM;
895: px_b_cost_rate_tbl(i) := FND_API.G_MISS_NUM;
888: print_msg(pa_debug.g_err_stage,l_module_name);
889: END IF;
890:
891: px_total_raw_cost_tbl(i) := FND_API.G_MISS_NUM;
892: px_total_burdened_cost_tbl(i) := FND_API.G_MISS_NUM;
893: px_total_revenue_tbl(i) := FND_API.G_MISS_NUM;
894: px_raw_cost_rate_tbl(i) := FND_API.G_MISS_NUM;
895: px_b_cost_rate_tbl(i) := FND_API.G_MISS_NUM;
896: px_bill_rate_tbl(i) := FND_API.G_MISS_NUM;
889: END IF;
890:
891: px_total_raw_cost_tbl(i) := FND_API.G_MISS_NUM;
892: px_total_burdened_cost_tbl(i) := FND_API.G_MISS_NUM;
893: px_total_revenue_tbl(i) := FND_API.G_MISS_NUM;
894: px_raw_cost_rate_tbl(i) := FND_API.G_MISS_NUM;
895: px_b_cost_rate_tbl(i) := FND_API.G_MISS_NUM;
896: px_bill_rate_tbl(i) := FND_API.G_MISS_NUM;
897:
890:
891: px_total_raw_cost_tbl(i) := FND_API.G_MISS_NUM;
892: px_total_burdened_cost_tbl(i) := FND_API.G_MISS_NUM;
893: px_total_revenue_tbl(i) := FND_API.G_MISS_NUM;
894: px_raw_cost_rate_tbl(i) := FND_API.G_MISS_NUM;
895: px_b_cost_rate_tbl(i) := FND_API.G_MISS_NUM;
896: px_bill_rate_tbl(i) := FND_API.G_MISS_NUM;
897:
898: /* Bug fix: 5759413 */
891: px_total_raw_cost_tbl(i) := FND_API.G_MISS_NUM;
892: px_total_burdened_cost_tbl(i) := FND_API.G_MISS_NUM;
893: px_total_revenue_tbl(i) := FND_API.G_MISS_NUM;
894: px_raw_cost_rate_tbl(i) := FND_API.G_MISS_NUM;
895: px_b_cost_rate_tbl(i) := FND_API.G_MISS_NUM;
896: px_bill_rate_tbl(i) := FND_API.G_MISS_NUM;
897:
898: /* Bug fix: 5759413 */
899: IF px_raw_cost_override_rate_tbl(i) is NOT NULL AND
892: px_total_burdened_cost_tbl(i) := FND_API.G_MISS_NUM;
893: px_total_revenue_tbl(i) := FND_API.G_MISS_NUM;
894: px_raw_cost_rate_tbl(i) := FND_API.G_MISS_NUM;
895: px_b_cost_rate_tbl(i) := FND_API.G_MISS_NUM;
896: px_bill_rate_tbl(i) := FND_API.G_MISS_NUM;
897:
898: /* Bug fix: 5759413 */
899: IF px_raw_cost_override_rate_tbl(i) is NOT NULL AND
900: px_raw_cost_override_rate_tbl(i) <> FND_API.G_MISS_NUM Then
896: px_bill_rate_tbl(i) := FND_API.G_MISS_NUM;
897:
898: /* Bug fix: 5759413 */
899: IF px_raw_cost_override_rate_tbl(i) is NOT NULL AND
900: px_raw_cost_override_rate_tbl(i) <> FND_API.G_MISS_NUM Then
901: IF px_raw_cost_override_rate_tbl(i) = nvl(l_rtx_rateOvrds_rec.txn_raw_cost_rate_override,0) Then
902: px_raw_cost_override_rate_tbl(i) := NULL;
903: END IF;
904: End IF;
903: END IF;
904: End IF;
905:
906: IF px_b_cost_rate_override_tbl(i) is NOT NULL AND
907: px_b_cost_rate_override_tbl(i) <> FND_API.G_MISS_NUM Then
908: IF px_b_cost_rate_override_tbl(i) = nvl(l_rtx_rateOvrds_rec.txn_burden_cost_rate_override,0) Then px_b_cost_rate_override_tbl(i) := NULL;
909: END IF;
910: END IF;
911:
936: px_b_cost_rate_tbl(i) := NULL;
937: px_bill_rate_tbl(i) := NULL;
938: /* Bug fix: 5759413 */
939: IF px_raw_cost_override_rate_tbl(i) is NOT NULL AND
940: px_raw_cost_override_rate_tbl(i) <> FND_API.G_MISS_NUM Then
941: IF px_raw_cost_override_rate_tbl(i) = nvl(l_rtx_rateOvrds_rec.txn_raw_cost_rate_override,0) Then
942: px_raw_cost_override_rate_tbl(i) := NULL;
943: END IF;
944: End IF;
943: END IF;
944: End IF;
945:
946: IF px_b_cost_rate_override_tbl(i) is NOT NULL AND
947: px_b_cost_rate_override_tbl(i) <> FND_API.G_MISS_NUM Then
948: IF px_b_cost_rate_override_tbl(i) = nvl(l_rtx_rateOvrds_rec.txn_burden_cost_rate_override,0) Then px_b_cost_rate_override_tbl(i) := NULL;
949: END IF;
950: END IF;
951:
965: px_bill_rate_tbl(i) := NULL;
966:
967: /* Bug fix: 5759413 */
968: IF px_raw_cost_override_rate_tbl(i) is NOT NULL AND
969: px_raw_cost_override_rate_tbl(i) <> FND_API.G_MISS_NUM Then
970: IF px_raw_cost_override_rate_tbl(i) = nvl(l_rtx_rateOvrds_rec.txn_raw_cost_rate_override,0) Then
971: px_raw_cost_override_rate_tbl(i) := NULL;
972: END IF;
973: End IF;
972: END IF;
973: End IF;
974:
975: IF px_b_cost_rate_override_tbl(i) is NOT NULL AND
976: px_b_cost_rate_override_tbl(i) <> FND_API.G_MISS_NUM Then
977: IF px_b_cost_rate_override_tbl(i) = nvl(l_rtx_rateOvrds_rec.txn_burden_cost_rate_override,0) Then px_b_cost_rate_override_tbl(i) := NULL;
978: END IF;
979: END IF;
980:
982:
983: CLOSE c_data_in_db_csr;
984: --dbms_output.put_line('7.4');
985:
986: END IF;--IF px_total_qty_tbl(i) IS NOT NULL AND px_total_qty_tbl(i) <> FND_API.G_MISS_NUM THEN
987:
988: END IF;--IF x_rlm_id_change_flag_tbl(i)='Y' THEN
989:
990: END IF;--IF p_project_role_id_tbl(i) IS NULL AND
1029: ,x_msg_count => x_msg_count
1030: ,x_msg_data => x_msg_data
1031: );
1032:
1033: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1034:
1035: IF l_debug_mode = 'Y' THEN
1036: pa_debug.g_err_stage:='Called API delete_planning_transactions returned error';
1037: pa_debug.write(l_module_name,pa_debug.g_err_stage, 5);
1095: ,x_return_status => x_return_status
1096: ,x_msg_count => x_msg_count
1097: ,x_msg_data => x_msg_data);
1098:
1099: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1100:
1101: IF l_debug_mode = 'Y' THEN
1102: pa_debug.g_err_stage:='Called API PA_RLMI_RBS_MAP_PUB.Map_Rlmi_Rbs returned error';
1103: pa_debug.write(l_module_name,pa_debug.g_err_stage, 5);
1153: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
1154: l_msg_count := FND_MSG_PUB.count_msg;
1155: IF l_msg_count = 1 THEN
1156: PA_INTERFACE_UTILS_PUB.get_messages
1157: (p_encoded => FND_API.G_TRUE
1158: ,p_msg_index => 1
1159: ,p_msg_count => l_msg_count
1160: ,p_msg_data => l_msg_data
1161: ,p_data => l_data
1164: x_msg_count := l_msg_count;
1165: ELSE
1166: x_msg_count := l_msg_count;
1167: END IF;
1168: x_return_status := FND_API.G_RET_STS_ERROR;
1169: IF l_debug_mode = 'Y' THEN
1170: pa_debug.reset_curr_function;
1171: END IF;
1172: WHEN OTHERS THEN
1169: IF l_debug_mode = 'Y' THEN
1170: pa_debug.reset_curr_function;
1171: END IF;
1172: WHEN OTHERS THEN
1173: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1174: x_msg_count := 1;
1175: x_msg_data := SQLERRM;
1176: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FP_PLANNING_TRANSACTION_PUB'
1177: ,p_procedure_name => 'Process_res_chg_Derv_calc_prms');
1546:
1547:
1548:
1549: x_msg_count := 0;
1550: x_return_status := FND_API.G_RET_STS_SUCCESS;
1551: IF l_debug_mode = 'Y' THEN
1552: PA_DEBUG.Set_Curr_Function( p_function => 'PA_FP_PLAN_TXN_PUB.add_planning_transactions',
1553: p_debug_mode => l_debug_mode );
1554: END IF;
2100: l_trace_stage := 100;
2101: -- hr_utility.trace('PA_FP_PLAN_TXN_PUB.add_planning_transactions: '||to_char(l_trace_stage));
2102:
2103: -- 4504452.Added this if codition to get the return status.
2104: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2105: IF l_debug_mode = 'Y' THEN
2106: pa_debug.g_err_stage:='Called API pa_fp_planning_transaction_pub.add_wp_plan_type api returned error';
2107: pa_debug.write('PA_FP_PLANNING_TRANSACTION_PUB.add_planning_transactions: ' || g_module_name,pa_debug.g_err_stage,3);
2108: END IF;
2181:
2182: l_trace_stage := 130;
2183: -- hr_utility.trace('PA_FP_PLAN_TXN_PUB.add_planning_transactions: '||to_char(l_trace_stage));
2184:
2185: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2186: IF l_debug_mode = 'Y' THEN
2187: pa_debug.g_err_stage:='Called API pa_fin_plan_pub.create_version api returned error';
2188: pa_debug.write('PA_FP_PLANNING_TRANSACTION_PUB.add_planning_transactions: ' || g_module_name,pa_debug.g_err_stage,3);
2189: END IF;
2324: x_msg_count => l_msg_count,
2325: x_msg_data => l_msg_data);
2326: l_trace_stage := 230;
2327: -- hr_utility.trace('PA_FP_PLAN_TXN_PUB.add_planning_transactions: '||to_char(l_trace_stage));
2328: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2329: IF l_debug_mode = 'Y' THEN
2330: pa_debug.g_err_stage:='Called API pa_planning_transaction_utils.Get_Res_Class_Rlm_Ids api returned error';
2331: pa_debug.write('PA_FP_PLANNING_TRANSACTION_PUB.add_planning_transactions: ' || g_module_name,pa_debug.g_err_stage,3);
2332: END IF;
2358: FOR i IN l_eligible_rlm_ids_tbl.FIRST .. l_eligible_rlm_ids_tbl.LAST LOOP
2359: If (NOT p_pm_product_code.EXISTS(i))
2360: then
2361: l_pm_product_code_tbl(i) := null;
2362: elsif ( p_pm_product_code(i) = fnd_api.g_miss_char)
2363: Then
2364: l_pm_product_code_tbl(i) := null;
2365: Else
2366: l_pm_product_code_tbl(i) := p_pm_product_code(i);
2368:
2369: If (NOT p_pm_res_asgmt_ref.EXISTS(i))
2370: then
2371: l_pm_res_asgmt_ref_tbl(i) := null;
2372: elsif (p_pm_res_asgmt_ref(i) = fnd_api.g_miss_char)
2373: Then
2374: l_pm_res_asgmt_ref_tbl(i) := null;
2375: Else
2376: l_pm_res_asgmt_ref_tbl(i) := p_pm_res_asgmt_ref(i);
2439: x_return_status => l_return_status);
2440: l_trace_stage := 310;
2441: -- hr_utility.trace('PA_FP_PLAN_TXN_PUB.add_planning_transactions: '||to_char(l_trace_stage));
2442:
2443: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2444:
2445: IF l_debug_mode = 'Y' THEN
2446: pa_debug.g_err_stage:='Called APIPA_PLANNING_RESOURCE_UTILS.get_resource_defaults api returned error';
2447: pa_debug.write('PA_FP_PLANNING_TRANSACTION_PUB.add_planning_transactions: ' || g_module_name,pa_debug.g_err_stage,3);
2582: ,x_return_status => x_return_status
2583: ,x_msg_count => x_msg_count
2584: ,x_msg_data => x_msg_data);
2585:
2586: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2587:
2588: IF l_debug_mode = 'Y' THEN
2589: pa_debug.g_err_stage:='Called API PA_RLMI_RBS_MAP_PUB.Map_Rlmi_Rbs returned error';
2590: pa_debug.write('PA_FP_PLANNING_TRANSACTION_PUB.add_planning_transactions: ' || g_module_name,pa_debug.g_err_stage,3);
2980: x_return_status => l_return_status);
2981: --dbms_output.put_line('qty aft is '||l_resource_rec_tbl(1).planning_start_date);
2982: --dbms_output.put_line('qty aft is '||l_resource_rec_tbl(1).planning_end_date);
2983:
2984: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2985: IF l_debug_mode = 'Y' THEN
2986: pa_debug.g_err_stage:='Called API pa_task_assignment_utils.Validate_Create_Assignment returned error';
2987: pa_debug.write('PA_FP_PLANNING_TRANSACTION_PUB.add_planning_transactions: ' || g_module_name,pa_debug.g_err_stage,3);
2988: END IF;
3034: -- hr_utility.trace('PA_FP_PLAN_TXN_PUB.add_planning_transactions: '||to_char(l_trace_stage));
3035:
3036: IF l_resource_rec_tbl.EXISTS(i) THEN
3037:
3038: IF l_resource_rec_tbl(i).resource_list_member_id = FND_API.G_MISS_NUM THEN
3039: l_eligible_rlm_ids_tbl(i) := NULL;
3040: ELSE
3041: l_eligible_rlm_ids_tbl(i) := l_resource_rec_tbl(i).resource_list_member_id;
3042: END IF;
3040: ELSE
3041: l_eligible_rlm_ids_tbl(i) := l_resource_rec_tbl(i).resource_list_member_id;
3042: END IF;
3043:
3044: IF l_resource_rec_tbl(i).resource_class_flag = FND_API.G_MISS_CHAR THEN
3045: l_resource_class_flag_tbl(i) := NULL;
3046: ELSE
3047: l_resource_class_flag_tbl(i) := l_resource_rec_tbl(i).resource_class_flag;
3048: END IF;
3046: ELSE
3047: l_resource_class_flag_tbl(i) := l_resource_rec_tbl(i).resource_class_flag;
3048: END IF;
3049:
3050: IF l_resource_rec_tbl(i).resource_class_code = FND_API.G_MISS_CHAR THEN
3051: l_resource_class_code_tbl(i) := NULL;
3052: ELSE
3053: l_resource_class_code_tbl(i) := l_resource_rec_tbl(i).resource_class_code;
3054: END IF;
3052: ELSE
3053: l_resource_class_code_tbl(i) := l_resource_rec_tbl(i).resource_class_code;
3054: END IF;
3055:
3056: IF l_resource_rec_tbl(i).resource_class_id = FND_API.G_MISS_NUM THEN
3057: l_resource_class_id_tbl(i) := NULL;
3058: ELSE
3059: l_resource_class_id_tbl(i) := l_resource_rec_tbl(i).resource_class_id;
3060: END IF;
3058: ELSE
3059: l_resource_class_id_tbl(i) := l_resource_rec_tbl(i).resource_class_id;
3060: END IF;
3061:
3062: IF l_resource_rec_tbl(i).res_type_code = FND_API.G_MISS_CHAR THEN
3063: l_res_type_code_tbl(i) := NULL;
3064: ELSE
3065: l_res_type_code_tbl(i) := l_resource_rec_tbl(i).res_type_code;
3066: END IF;
3064: ELSE
3065: l_res_type_code_tbl(i) := l_resource_rec_tbl(i).res_type_code;
3066: END IF;
3067:
3068: IF l_resource_rec_tbl(i).person_id = FND_API.G_MISS_NUM THEN
3069: l_person_id_tbl(i) := NULL;
3070: ELSE
3071: l_person_id_tbl(i) := l_resource_rec_tbl(i).person_id;
3072: END IF;
3070: ELSE
3071: l_person_id_tbl(i) := l_resource_rec_tbl(i).person_id;
3072: END IF;
3073:
3074: IF l_resource_rec_tbl(i).job_id = FND_API.G_MISS_NUM THEN
3075: l_job_id_tbl(i) := NULL;
3076: ELSE
3077: l_job_id_tbl(i) := l_resource_rec_tbl(i).job_id;
3078: END IF;
3076: ELSE
3077: l_job_id_tbl(i) := l_resource_rec_tbl(i).job_id;
3078: END IF;
3079:
3080: IF l_resource_rec_tbl(i).person_type_code = FND_API.G_MISS_CHAR THEN
3081: l_person_type_code_tbl(i) := NULL;
3082: ELSE
3083: l_person_type_code_tbl(i) := l_resource_rec_tbl(i).person_type_code;
3084: END IF;
3082: ELSE
3083: l_person_type_code_tbl(i) := l_resource_rec_tbl(i).person_type_code;
3084: END IF;
3085:
3086: IF l_resource_rec_tbl(i).bom_resource_id = FND_API.G_MISS_NUM THEN
3087: l_bom_resource_id_tbl(i) := NULL;
3088: ELSE
3089: l_bom_resource_id_tbl(i) := l_resource_rec_tbl(i).bom_resource_id;
3090: END IF;
3088: ELSE
3089: l_bom_resource_id_tbl(i) := l_resource_rec_tbl(i).bom_resource_id;
3090: END IF;
3091:
3092: IF l_resource_rec_tbl(i).inventory_item_id = FND_API.G_MISS_NUM THEN
3093: l_inventory_item_id_tbl(i) := NULL;
3094: ELSE
3095: l_inventory_item_id_tbl(i) := l_resource_rec_tbl(i).inventory_item_id;
3096: END IF;
3094: ELSE
3095: l_inventory_item_id_tbl(i) := l_resource_rec_tbl(i).inventory_item_id;
3096: END IF;
3097:
3098: IF l_resource_rec_tbl(i).item_category_id = FND_API.G_MISS_NUM THEN
3099: l_item_category_id_tbl(i) := NULL;
3100: ELSE
3101: l_item_category_id_tbl(i) := l_resource_rec_tbl(i).item_category_id;
3102: END IF;
3100: ELSE
3101: l_item_category_id_tbl(i) := l_resource_rec_tbl(i).item_category_id;
3102: END IF;
3103:
3104: IF l_resource_rec_tbl(i).project_role_id = FND_API.G_MISS_NUM THEN
3105: l_project_role_id_tbl(i) := NULL;
3106: ELSE
3107: l_project_role_id_tbl(i) := l_resource_rec_tbl(i).project_role_id;
3108: END IF;
3106: ELSE
3107: l_project_role_id_tbl(i) := l_resource_rec_tbl(i).project_role_id;
3108: END IF;
3109:
3110: IF l_resource_rec_tbl(i).organization_id = FND_API.G_MISS_NUM THEN
3111: l_organization_id_tbl(i) := NULL;
3112: ELSE
3113: l_organization_id_tbl(i) := l_resource_rec_tbl(i).organization_id;
3114: END IF;
3112: ELSE
3113: l_organization_id_tbl(i) := l_resource_rec_tbl(i).organization_id;
3114: END IF;
3115:
3116: IF l_resource_rec_tbl(i).fc_res_type_code = FND_API.G_MISS_CHAR THEN
3117: l_fc_res_type_code_tbl(i) := NULL;
3118: ELSE
3119: l_fc_res_type_code_tbl(i) := l_resource_rec_tbl(i).fc_res_type_code;
3120: END IF;
3118: ELSE
3119: l_fc_res_type_code_tbl(i) := l_resource_rec_tbl(i).fc_res_type_code;
3120: END IF;
3121:
3122: IF l_resource_rec_tbl(i).expenditure_type = FND_API.G_MISS_CHAR THEN
3123: l_expenditure_type_tbl(i) := NULL;
3124: ELSE
3125: l_expenditure_type_tbl(i) := l_resource_rec_tbl(i).expenditure_type;
3126: END IF;
3124: ELSE
3125: l_expenditure_type_tbl(i) := l_resource_rec_tbl(i).expenditure_type;
3126: END IF;
3127:
3128: IF l_resource_rec_tbl(i).expenditure_category = FND_API.G_MISS_CHAR THEN
3129: l_expenditure_category_tbl(i) := NULL;
3130: ELSE
3131: l_expenditure_category_tbl(i) := l_resource_rec_tbl(i).expenditure_category;
3132: END IF;
3130: ELSE
3131: l_expenditure_category_tbl(i) := l_resource_rec_tbl(i).expenditure_category;
3132: END IF;
3133:
3134: IF l_resource_rec_tbl(i).event_type = FND_API.G_MISS_CHAR THEN
3135: l_event_type_tbl(i) := NULL;
3136: ELSE
3137: l_event_type_tbl(i) := l_resource_rec_tbl(i).event_type;
3138: END IF;
3136: ELSE
3137: l_event_type_tbl(i) := l_resource_rec_tbl(i).event_type;
3138: END IF;
3139:
3140: IF l_resource_rec_tbl(i).revenue_category_code = FND_API.G_MISS_CHAR THEN
3141: l_revenue_category_code_tbl(i) := NULL;
3142: ELSE
3143: l_revenue_category_code_tbl(i) := l_resource_rec_tbl(i).revenue_category_code;
3144: END IF;
3142: ELSE
3143: l_revenue_category_code_tbl(i) := l_resource_rec_tbl(i).revenue_category_code;
3144: END IF;
3145:
3146: IF l_resource_rec_tbl(i).supplier_id = FND_API.G_MISS_NUM THEN
3147: l_supplier_id_tbl(i) := NULL;
3148: ELSE
3149: l_supplier_id_tbl(i) := l_resource_rec_tbl(i).supplier_id;
3150: END IF;
3148: ELSE
3149: l_supplier_id_tbl(i) := l_resource_rec_tbl(i).supplier_id;
3150: END IF;
3151:
3152: IF l_resource_rec_tbl(i).unit_of_measure = FND_API.G_MISS_CHAR THEN
3153: l_unit_of_measure_tbl(i) := NULL;
3154: ELSE
3155: l_unit_of_measure_tbl(i) := l_resource_rec_tbl(i).unit_of_measure;
3156: END IF;
3154: ELSE
3155: l_unit_of_measure_tbl(i) := l_resource_rec_tbl(i).unit_of_measure;
3156: END IF;
3157:
3158: IF l_resource_rec_tbl(i).spread_curve_id = FND_API.G_MISS_NUM THEN
3159: l_spread_curve_id_tbl(i) := NULL;
3160: ELSE
3161: l_spread_curve_id_tbl(i) := l_resource_rec_tbl(i).spread_curve_id;
3162: END IF;
3160: ELSE
3161: l_spread_curve_id_tbl(i) := l_resource_rec_tbl(i).spread_curve_id;
3162: END IF;
3163:
3164: IF l_resource_rec_tbl(i).etc_method_code = FND_API.G_MISS_CHAR THEN
3165: l_etc_method_code_tbl(i) := NULL;
3166: ELSE
3167: l_etc_method_code_tbl(i) := l_resource_rec_tbl(i).etc_method_code;
3168: END IF;
3166: ELSE
3167: l_etc_method_code_tbl(i) := l_resource_rec_tbl(i).etc_method_code;
3168: END IF;
3169:
3170: IF l_resource_rec_tbl(i).mfc_cost_type_id = FND_API.G_MISS_NUM THEN
3171: l_mfc_cost_type_id_tbl(i) := NULL;
3172: ELSE
3173: l_mfc_cost_type_id_tbl(i) := l_resource_rec_tbl(i).mfc_cost_type_id;
3174: END IF;
3172: ELSE
3173: l_mfc_cost_type_id_tbl(i) := l_resource_rec_tbl(i).mfc_cost_type_id;
3174: END IF;
3175:
3176: IF l_resource_rec_tbl(i).procure_resource_flag = FND_API.G_MISS_CHAR THEN
3177: l_procure_resource_flag_tbl(i) := NULL;
3178: ELSE
3179: l_procure_resource_flag_tbl(i) := l_resource_rec_tbl(i).procure_resource_flag;
3180: END IF;
3178: ELSE
3179: l_procure_resource_flag_tbl(i) := l_resource_rec_tbl(i).procure_resource_flag;
3180: END IF;
3181:
3182: IF l_resource_rec_tbl(i).incurred_by_res_flag = FND_API.G_MISS_CHAR THEN
3183: l_incurred_by_res_flag_tbl(i) := NULL;
3184: ELSE
3185: l_incurred_by_res_flag_tbl(i) := l_resource_rec_tbl(i).incurred_by_res_flag;
3186: END IF;
3184: ELSE
3185: l_incurred_by_res_flag_tbl(i) := l_resource_rec_tbl(i).incurred_by_res_flag;
3186: END IF;
3187:
3188: IF l_resource_rec_tbl(i).Incur_by_res_class_code = FND_API.G_MISS_CHAR THEN
3189: l_Incur_by_res_class_code_tbl(i) := NULL;
3190: ELSE
3191: l_Incur_by_res_class_code_tbl(i) := l_resource_rec_tbl(i).Incur_by_res_class_code;
3192: END IF;
3190: ELSE
3191: l_Incur_by_res_class_code_tbl(i) := l_resource_rec_tbl(i).Incur_by_res_class_code;
3192: END IF;
3193:
3194: IF l_resource_rec_tbl(i).Incur_by_role_id = FND_API.G_MISS_NUM THEN
3195: l_Incur_by_role_id_tbl(i) := NULL;
3196: ELSE
3197: l_Incur_by_role_id_tbl(i) := l_resource_rec_tbl(i).Incur_by_role_id;
3198: END IF;
3196: ELSE
3197: l_Incur_by_role_id_tbl(i) := l_resource_rec_tbl(i).Incur_by_role_id;
3198: END IF;
3199:
3200: IF l_resource_rec_tbl(i).named_role = FND_API.G_MISS_CHAR THEN
3201: l_named_role_tbl(i) := NULL;
3202: ELSE
3203: l_named_role_tbl(i) := l_resource_rec_tbl(i).named_role;
3204: END IF;
3202: ELSE
3203: l_named_role_tbl(i) := l_resource_rec_tbl(i).named_role;
3204: END IF;
3205:
3206: IF l_resource_rec_tbl(i).non_labor_resource = FND_API.G_MISS_CHAR THEN
3207: l_non_labor_resource_tbl(i) := NULL;
3208: ELSE
3209: l_non_labor_resource_tbl(i) := l_resource_rec_tbl(i).non_labor_resource;
3210: END IF;
3208: ELSE
3209: l_non_labor_resource_tbl(i) := l_resource_rec_tbl(i).non_labor_resource;
3210: END IF;
3211:
3212: IF l_resource_rec_tbl(i).resource_assignment_id = FND_API.G_MISS_NUM THEN
3213: l_resource_assignment_id_tbl(i) := NULL;
3214: ELSE
3215: l_resource_assignment_id_tbl(i) := l_resource_rec_tbl(i).resource_assignment_id;
3216: END IF;
3214: ELSE
3215: l_resource_assignment_id_tbl(i) := l_resource_rec_tbl(i).resource_assignment_id;
3216: END IF;
3217:
3218: IF l_resource_rec_tbl(i).assignment_description = FND_API.G_MISS_CHAR THEN
3219: l_assignment_description_tbl(i) := NULL;
3220: ELSE
3221: l_assignment_description_tbl(i) := l_resource_rec_tbl(i).assignment_description;
3222: END IF;
3220: ELSE
3221: l_assignment_description_tbl(i) := l_resource_rec_tbl(i).assignment_description;
3222: END IF;
3223:
3224: IF l_resource_rec_tbl(i).planning_resource_alias = FND_API.G_MISS_CHAR THEN
3225: l_planning_resource_alias_tbl(i) := NULL;
3226: ELSE
3227: l_planning_resource_alias_tbl(i) := l_resource_rec_tbl(i).planning_resource_alias;
3228: END IF;
3226: ELSE
3227: l_planning_resource_alias_tbl(i) := l_resource_rec_tbl(i).planning_resource_alias;
3228: END IF;
3229:
3230: IF l_resource_rec_tbl(i).resource_name = FND_API.G_MISS_CHAR THEN
3231: l_resource_name_tbl(i) := NULL;
3232: ELSE
3233: l_resource_name_tbl(i) := l_resource_rec_tbl(i).resource_name;
3234: END IF;
3232: ELSE
3233: l_resource_name_tbl(i) := l_resource_rec_tbl(i).resource_name;
3234: END IF;
3235:
3236: IF l_resource_rec_tbl(i).project_role_name = FND_API.G_MISS_CHAR THEN
3237: l_project_role_name_tbl(i) := NULL;
3238: ELSE
3239: l_project_role_name_tbl(i) := l_resource_rec_tbl(i).project_role_name;
3240: END IF;
3238: ELSE
3239: l_project_role_name_tbl(i) := l_resource_rec_tbl(i).project_role_name;
3240: END IF;
3241:
3242: IF l_resource_rec_tbl(i).organization_name = FND_API.G_MISS_CHAR THEN
3243: l_organization_name_tbl(i) := NULL;
3244: ELSE
3245: l_organization_name_tbl(i) := l_resource_rec_tbl(i).organization_name;
3246: END IF;
3244: ELSE
3245: l_organization_name_tbl(i) := l_resource_rec_tbl(i).organization_name;
3246: END IF;
3247:
3248: IF l_resource_rec_tbl(i).financial_category_code = FND_API.G_MISS_CHAR THEN
3249: l_financial_category_code_tbl(i) := NULL;
3250: ELSE
3251: l_financial_category_code_tbl(i) := l_resource_rec_tbl(i).financial_category_code;
3252: END IF;
3250: ELSE
3251: l_financial_category_code_tbl(i) := l_resource_rec_tbl(i).financial_category_code;
3252: END IF;
3253:
3254: IF l_resource_rec_tbl(i).project_assignment_id = FND_API.G_MISS_NUM THEN
3255: l_project_assignment_id_tbl(i) := NULL;
3256: ELSE
3257: l_project_assignment_id_tbl(i) := l_resource_rec_tbl(i).project_assignment_id;
3258: END IF;
3256: ELSE
3257: l_project_assignment_id_tbl(i) := l_resource_rec_tbl(i).project_assignment_id;
3258: END IF;
3259:
3260: IF l_resource_rec_tbl(i).use_task_schedule_flag = FND_API.G_MISS_CHAR THEN
3261: l_use_task_schedule_flag_tbl(i) := NULL;
3262: ELSE
3263: l_use_task_schedule_flag_tbl(i) := l_resource_rec_tbl(i).use_task_schedule_flag;
3264: END IF;
3262: ELSE
3263: l_use_task_schedule_flag_tbl(i) := l_resource_rec_tbl(i).use_task_schedule_flag;
3264: END IF;
3265:
3266: IF l_resource_rec_tbl(i).planning_start_date = FND_API.G_MISS_DATE THEN
3267: l_planning_start_date_tbl(i) := NULL;
3268: ELSE
3269: l_planning_start_date_tbl(i) := l_resource_rec_tbl(i).planning_start_date;
3270: END IF;
3268: ELSE
3269: l_planning_start_date_tbl(i) := l_resource_rec_tbl(i).planning_start_date;
3270: END IF;
3271:
3272: IF l_resource_rec_tbl(i).planning_end_date = FND_API.G_MISS_DATE THEN
3273: l_planning_end_date_tbl(i) := NULL;
3274: ELSE
3275: l_planning_end_date_tbl(i) := l_resource_rec_tbl(i).planning_end_date;
3276: END IF;
3274: ELSE
3275: l_planning_end_date_tbl(i) := l_resource_rec_tbl(i).planning_end_date;
3276: END IF;
3277:
3278: IF l_resource_rec_tbl(i).schedule_start_date = FND_API.G_MISS_DATE THEN
3279: l_schedule_start_date_tbl(i) := NULL;
3280: ELSE
3281: l_schedule_start_date_tbl(i) := l_resource_rec_tbl(i).schedule_start_date;
3282: END IF;
3280: ELSE
3281: l_schedule_start_date_tbl(i) := l_resource_rec_tbl(i).schedule_start_date;
3282: END IF;
3283:
3284: IF l_resource_rec_tbl(i).schedule_end_date = FND_API.G_MISS_DATE THEN
3285: l_schedule_end_date_tbl(i) := NULL;
3286: ELSE
3287: l_schedule_end_date_tbl(i) := l_resource_rec_tbl(i).schedule_end_date;
3288: END IF;
3286: ELSE
3287: l_schedule_end_date_tbl(i) := l_resource_rec_tbl(i).schedule_end_date;
3288: END IF;
3289:
3290: IF l_resource_rec_tbl(i).supplier_name = FND_API.G_MISS_CHAR THEN
3291: l_supplier_name_tbl(i) := NULL;
3292: ELSE
3293: l_supplier_name_tbl(i) := l_resource_rec_tbl(i).supplier_name;
3294: END IF;
3292: ELSE
3293: l_supplier_name_tbl(i) := l_resource_rec_tbl(i).supplier_name;
3294: END IF;
3295:
3296: IF l_resource_rec_tbl(i).financial_category_name = FND_API.G_MISS_CHAR THEN
3297: l_financial_category_name_tbl(i) := NULL;
3298: ELSE
3299: l_financial_category_name_tbl(i) := l_resource_rec_tbl(i).financial_category_name;
3300: END IF;
3298: ELSE
3299: l_financial_category_name_tbl(i) := l_resource_rec_tbl(i).financial_category_name;
3300: END IF;
3301:
3302: IF l_resource_rec_tbl(i).sp_fixed_date = FND_API.G_MISS_DATE THEN
3303: l_sp_fixed_date_tbl(i) := NULL;
3304: ELSE
3305: l_sp_fixed_date_tbl(i) := l_resource_rec_tbl(i).sp_fixed_date;
3306: -- Added validation rule for sp_fixed_date to lie between planning start date and planning end date for
3334: END IF;
3335: -- Bug 3607061 Ends
3336: END IF;
3337:
3338: IF l_resource_rec_tbl(i).burdened_rate_override = FND_API.G_MISS_NUM THEN
3339: l_burdened_rate_override_tbl(i) := NULL;
3340: ELSE
3341: l_burdened_rate_override_tbl(i) := l_resource_rec_tbl(i).burdened_rate_override;
3342: END IF;
3340: ELSE
3341: l_burdened_rate_override_tbl(i) := l_resource_rec_tbl(i).burdened_rate_override;
3342: END IF;
3343:
3344: IF l_resource_rec_tbl(i).cost_rate_override = FND_API.G_MISS_NUM THEN
3345: l_cost_rate_override_tbl(i) := NULL;
3346: ELSE
3347: l_cost_rate_override_tbl(i) := l_resource_rec_tbl(i).cost_rate_override;
3348: END IF;
3346: ELSE
3347: l_cost_rate_override_tbl(i) := l_resource_rec_tbl(i).cost_rate_override;
3348: END IF;
3349:
3350: IF l_resource_rec_tbl(i).billable_percent = FND_API.G_MISS_NUM THEN
3351: l_billable_percent_tbl(i) := NULL;
3352: ELSE
3353: l_billable_percent_tbl(i) := l_resource_rec_tbl(i).billable_percent;
3354: END IF;
3352: ELSE
3353: l_billable_percent_tbl(i) := l_resource_rec_tbl(i).billable_percent;
3354: END IF;
3355:
3356: IF l_resource_rec_tbl(i).override_currency_code = FND_API.G_MISS_CHAR THEN
3357: l_override_currency_code_tbl(i) := NULL;
3358: ELSE
3359: l_override_currency_code_tbl(i) := l_resource_rec_tbl(i).override_currency_code;
3360: END IF;
3358: ELSE
3359: l_override_currency_code_tbl(i) := l_resource_rec_tbl(i).override_currency_code;
3360: END IF;
3361:
3362: IF l_resource_rec_tbl(i).total_quantity = FND_API.G_MISS_NUM THEN
3363: l_total_quantity_tbl(i) := NULL;
3364: ELSE
3365: l_total_quantity_tbl(i) := l_resource_rec_tbl(i).total_quantity;
3366: END IF;
3364: ELSE
3365: l_total_quantity_tbl(i) := l_resource_rec_tbl(i).total_quantity;
3366: END IF;
3367:
3368: IF l_resource_rec_tbl(i).ATTRIBUTE_CATEGORY = FND_API.G_MISS_CHAR THEN
3369: l_ATTRIBUTE_CATEGORY_tbl(i) := NULL;
3370: ELSE
3371: l_ATTRIBUTE_CATEGORY_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE_CATEGORY;
3372: END IF;
3370: ELSE
3371: l_ATTRIBUTE_CATEGORY_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE_CATEGORY;
3372: END IF;
3373:
3374: IF l_resource_rec_tbl(i).ATTRIBUTE1 = FND_API.G_MISS_CHAR THEN
3375: l_ATTRIBUTE1_tbl(i) := NULL;
3376: ELSE
3377: l_ATTRIBUTE1_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE1;
3378: END IF;
3376: ELSE
3377: l_ATTRIBUTE1_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE1;
3378: END IF;
3379:
3380: IF l_resource_rec_tbl(i).ATTRIBUTE2 = FND_API.G_MISS_CHAR THEN
3381: l_ATTRIBUTE2_tbl(i) := NULL;
3382: ELSE
3383: l_ATTRIBUTE2_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE2;
3384: END IF;
3382: ELSE
3383: l_ATTRIBUTE2_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE2;
3384: END IF;
3385:
3386: IF l_resource_rec_tbl(i).ATTRIBUTE3 = FND_API.G_MISS_CHAR THEN
3387: l_ATTRIBUTE3_tbl(i) := NULL;
3388: ELSE
3389: l_ATTRIBUTE3_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE3;
3390: END IF;
3388: ELSE
3389: l_ATTRIBUTE3_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE3;
3390: END IF;
3391:
3392: IF l_resource_rec_tbl(i).ATTRIBUTE4 = FND_API.G_MISS_CHAR THEN
3393: l_ATTRIBUTE4_tbl(i) := NULL;
3394: ELSE
3395: l_ATTRIBUTE4_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE4;
3396: END IF;
3394: ELSE
3395: l_ATTRIBUTE4_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE4;
3396: END IF;
3397:
3398: IF l_resource_rec_tbl(i).ATTRIBUTE5 = FND_API.G_MISS_CHAR THEN
3399: l_ATTRIBUTE5_tbl(i) := NULL;
3400: ELSE
3401: l_ATTRIBUTE5_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE5;
3402: END IF;
3400: ELSE
3401: l_ATTRIBUTE5_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE5;
3402: END IF;
3403:
3404: IF l_resource_rec_tbl(i).ATTRIBUTE6 = FND_API.G_MISS_CHAR THEN
3405: l_ATTRIBUTE6_tbl(i) := NULL;
3406: ELSE
3407: l_ATTRIBUTE6_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE6;
3408: END IF;
3406: ELSE
3407: l_ATTRIBUTE6_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE6;
3408: END IF;
3409:
3410: IF l_resource_rec_tbl(i).ATTRIBUTE7 = FND_API.G_MISS_CHAR THEN
3411: l_ATTRIBUTE7_tbl(i) := NULL;
3412: ELSE
3413: l_ATTRIBUTE7_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE7;
3414: END IF;
3412: ELSE
3413: l_ATTRIBUTE7_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE7;
3414: END IF;
3415:
3416: IF l_resource_rec_tbl(i).ATTRIBUTE8 = FND_API.G_MISS_CHAR THEN
3417: l_ATTRIBUTE8_tbl(i) := NULL;
3418: ELSE
3419: l_ATTRIBUTE8_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE8;
3420: END IF;
3418: ELSE
3419: l_ATTRIBUTE8_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE8;
3420: END IF;
3421:
3422: IF l_resource_rec_tbl(i).ATTRIBUTE9 = FND_API.G_MISS_CHAR THEN
3423: l_ATTRIBUTE9_tbl(i) := NULL;
3424: ELSE
3425: l_ATTRIBUTE9_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE9;
3426: END IF;
3424: ELSE
3425: l_ATTRIBUTE9_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE9;
3426: END IF;
3427:
3428: IF l_resource_rec_tbl(i).ATTRIBUTE10 = FND_API.G_MISS_CHAR THEN
3429: l_ATTRIBUTE10_tbl(i) := NULL;
3430: ELSE
3431: l_ATTRIBUTE10_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE10;
3432: END IF;
3430: ELSE
3431: l_ATTRIBUTE10_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE10;
3432: END IF;
3433:
3434: IF l_resource_rec_tbl(i).ATTRIBUTE11 = FND_API.G_MISS_CHAR THEN
3435: l_ATTRIBUTE11_tbl(i) := NULL;
3436: ELSE
3437: l_ATTRIBUTE11_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE11;
3438: END IF;
3436: ELSE
3437: l_ATTRIBUTE11_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE11;
3438: END IF;
3439:
3440: IF l_resource_rec_tbl(i).ATTRIBUTE12 = FND_API.G_MISS_CHAR THEN
3441: l_ATTRIBUTE12_tbl(i) := NULL;
3442: ELSE
3443: l_ATTRIBUTE12_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE12;
3444: END IF;
3442: ELSE
3443: l_ATTRIBUTE12_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE12;
3444: END IF;
3445:
3446: IF l_resource_rec_tbl(i).ATTRIBUTE13 = FND_API.G_MISS_CHAR THEN
3447: l_ATTRIBUTE13_tbl(i) := NULL;
3448: ELSE
3449: l_ATTRIBUTE13_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE13;
3450: END IF;
3448: ELSE
3449: l_ATTRIBUTE13_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE13;
3450: END IF;
3451:
3452: IF l_resource_rec_tbl(i).ATTRIBUTE14 = FND_API.G_MISS_CHAR THEN
3453: l_ATTRIBUTE14_tbl(i) := NULL;
3454: ELSE
3455: l_ATTRIBUTE14_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE14;
3456: END IF;
3454: ELSE
3455: l_ATTRIBUTE14_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE14;
3456: END IF;
3457:
3458: IF l_resource_rec_tbl(i).ATTRIBUTE15 = FND_API.G_MISS_CHAR THEN
3459: l_ATTRIBUTE15_tbl(i) := NULL;
3460: ELSE
3461: l_ATTRIBUTE15_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE15;
3462: END IF;
3460: ELSE
3461: l_ATTRIBUTE15_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE15;
3462: END IF;
3463:
3464: IF l_resource_rec_tbl(i).ATTRIBUTE16 = FND_API.G_MISS_CHAR THEN
3465: l_ATTRIBUTE16_tbl(i) := NULL;
3466: ELSE
3467: l_ATTRIBUTE16_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE16;
3468: END IF;
3466: ELSE
3467: l_ATTRIBUTE16_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE16;
3468: END IF;
3469:
3470: IF l_resource_rec_tbl(i).ATTRIBUTE17 = FND_API.G_MISS_CHAR THEN
3471: l_ATTRIBUTE17_tbl(i) := NULL;
3472: ELSE
3473: l_ATTRIBUTE17_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE17;
3474: END IF;
3472: ELSE
3473: l_ATTRIBUTE17_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE17;
3474: END IF;
3475:
3476: IF l_resource_rec_tbl(i).ATTRIBUTE18 = FND_API.G_MISS_CHAR THEN
3477: l_ATTRIBUTE18_tbl(i) := NULL;
3478: ELSE
3479: l_ATTRIBUTE18_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE18;
3480: END IF;
3478: ELSE
3479: l_ATTRIBUTE18_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE18;
3480: END IF;
3481:
3482: IF l_resource_rec_tbl(i).ATTRIBUTE19 = FND_API.G_MISS_CHAR THEN
3483: l_ATTRIBUTE19_tbl(i) := NULL;
3484: ELSE
3485: l_ATTRIBUTE19_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE19;
3486: END IF;
3484: ELSE
3485: l_ATTRIBUTE19_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE19;
3486: END IF;
3487:
3488: IF l_resource_rec_tbl(i).ATTRIBUTE20 = FND_API.G_MISS_CHAR THEN
3489: l_ATTRIBUTE20_tbl(i) := NULL;
3490: ELSE
3491: l_ATTRIBUTE20_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE20;
3492: END IF;
3489: l_ATTRIBUTE20_tbl(i) := NULL;
3490: ELSE
3491: l_ATTRIBUTE20_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE20;
3492: END IF;
3493: IF l_resource_rec_tbl(i).ATTRIBUTE21 = FND_API.G_MISS_CHAR THEN
3494: l_ATTRIBUTE21_tbl(i) := NULL;
3495: ELSE
3496: l_ATTRIBUTE21_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE21;
3497: END IF;
3495: ELSE
3496: l_ATTRIBUTE21_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE21;
3497: END IF;
3498:
3499: IF l_resource_rec_tbl(i).ATTRIBUTE22 = FND_API.G_MISS_CHAR THEN
3500: l_ATTRIBUTE22_tbl(i) := NULL;
3501: ELSE
3502: l_ATTRIBUTE22_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE22;
3503: END IF;
3501: ELSE
3502: l_ATTRIBUTE22_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE22;
3503: END IF;
3504:
3505: IF l_resource_rec_tbl(i).ATTRIBUTE23 = FND_API.G_MISS_CHAR THEN
3506: l_ATTRIBUTE23_tbl(i) := NULL;
3507: ELSE
3508: l_ATTRIBUTE23_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE23;
3509: END IF;
3507: ELSE
3508: l_ATTRIBUTE23_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE23;
3509: END IF;
3510:
3511: IF l_resource_rec_tbl(i).ATTRIBUTE24 = FND_API.G_MISS_CHAR THEN
3512: l_ATTRIBUTE24_tbl(i) := NULL;
3513: ELSE
3514: l_ATTRIBUTE24_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE24;
3515: END IF;
3513: ELSE
3514: l_ATTRIBUTE24_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE24;
3515: END IF;
3516:
3517: IF l_resource_rec_tbl(i).ATTRIBUTE25 = FND_API.G_MISS_CHAR THEN
3518: l_ATTRIBUTE25_tbl(i) := NULL;
3519: ELSE
3520: l_ATTRIBUTE25_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE25;
3521: END IF;
3519: ELSE
3520: l_ATTRIBUTE25_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE25;
3521: END IF;
3522:
3523: IF l_resource_rec_tbl(i).ATTRIBUTE26 = FND_API.G_MISS_CHAR THEN
3524: l_ATTRIBUTE26_tbl(i) := NULL;
3525: ELSE
3526: l_ATTRIBUTE26_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE26;
3527: END IF;
3525: ELSE
3526: l_ATTRIBUTE26_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE26;
3527: END IF;
3528:
3529: IF l_resource_rec_tbl(i).ATTRIBUTE27 = FND_API.G_MISS_CHAR THEN
3530: l_ATTRIBUTE27_tbl(i) := NULL;
3531: ELSE
3532: l_ATTRIBUTE27_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE27;
3533: END IF;
3531: ELSE
3532: l_ATTRIBUTE27_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE27;
3533: END IF;
3534:
3535: IF l_resource_rec_tbl(i).ATTRIBUTE28 = FND_API.G_MISS_CHAR THEN
3536: l_ATTRIBUTE28_tbl(i) := NULL;
3537: ELSE
3538: l_ATTRIBUTE28_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE28;
3539: END IF;
3537: ELSE
3538: l_ATTRIBUTE28_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE28;
3539: END IF;
3540:
3541: IF l_resource_rec_tbl(i).ATTRIBUTE29 = FND_API.G_MISS_CHAR THEN
3542: l_ATTRIBUTE29_tbl(i) := NULL;
3543: ELSE
3544: l_ATTRIBUTE29_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE29;
3545: END IF;
3543: ELSE
3544: l_ATTRIBUTE29_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE29;
3545: END IF;
3546:
3547: IF l_resource_rec_tbl(i).ATTRIBUTE30 = FND_API.G_MISS_CHAR THEN
3548: l_ATTRIBUTE30_tbl(i) := NULL;
3549: ELSE
3550: l_ATTRIBUTE30_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE30;
3551: END IF;
3549: ELSE
3550: l_ATTRIBUTE30_tbl(i) := l_resource_rec_tbl(i).ATTRIBUTE30;
3551: END IF;
3552:
3553: IF l_resource_rec_tbl(i).UNPLANNED_FLAG = FND_API.G_MISS_CHAR THEN
3554: l_UNPLANNED_FLAG_TBL(i) := NULL;
3555: ELSE
3556: l_UNPLANNED_FLAG_TBL(i) := l_resource_rec_tbl(i).UNPLANNED_FLAG;
3557: END IF;
3555: ELSE
3556: l_UNPLANNED_FLAG_TBL(i) := l_resource_rec_tbl(i).UNPLANNED_FLAG;
3557: END IF;
3558:
3559: IF l_resource_rec_tbl(i).scheduled_delay = FND_API.G_MISS_NUM THEN
3560: l_scheduled_delay(i) := NULL;
3561: ELSE
3562: l_scheduled_delay(i) := l_resource_rec_tbl(i).scheduled_delay;
3563: END IF;
3681: ,x_msg_data => x_msg_data
3682: ,x_msg_count => x_msg_count
3683: ,x_return_status => x_return_status );
3684:
3685: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3686:
3687: IF l_debug_mode = 'Y' THEN
3688: pa_debug.g_err_stage:='Called API pafpptub.get_default_planning_dates returned error';
3689: pa_debug.write('PA_FP_PLANNING_TRANSACTION_PUB.add_planning_transactions: ',pa_debug.g_err_stage, 3);
3916: END IF;
3917:
3918: FOR i IN p_task_elem_version_id_tbl.FIRST .. p_task_elem_version_id_tbl.LAST LOOP
3919: IF ((p_planned_people_effort_tbl.EXISTS(i)) AND
3920: (nvl(p_planned_people_effort_tbl(i),FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM) AND
3921: /* bug fix:5726773 (p_planned_people_effort_tbl(i) > 0)) THEN*/
3922: (p_planned_people_effort_tbl(i) is NOT NULL)) THEN
3923: l_ins_proj_element_id_tbl(l_ins_index) := l_proj_element_id_tbl(i);
3924: l_ins_task_elem_version_id_tbl(l_ins_index) := p_task_elem_version_id_tbl(i);
4155: l_spread_amount_flags_tbl(l_index) := 'Y';
4156: l_currency_code_tbl(l_index) := l_proj_curr_code;
4157: -- END IF;
4158: IF l_ins_cal_raw_cost_tbl.EXISTS(k) AND
4159: NVL(l_ins_cal_raw_cost_tbl(k),FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM AND
4160: /* bug fix:Bug fix:5726773 l_ins_cal_raw_cost_tbl(k) <> 0 THEN */
4161: l_ins_cal_raw_cost_tbl(k) is NOT NULL THEN
4162: l_raw_cost_tbl(l_index) := l_ins_cal_raw_cost_tbl(k);
4163: END IF;
4161: l_ins_cal_raw_cost_tbl(k) is NOT NULL THEN
4162: l_raw_cost_tbl(l_index) := l_ins_cal_raw_cost_tbl(k);
4163: END IF;
4164: IF l_ins_cal_burdened_cost_tbl.EXISTS(k) AND
4165: NVL(l_ins_cal_burdened_cost_tbl(k),FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM AND
4166: /* bug fix:Bug fix:5726773 l_ins_cal_burdened_cost_tbl(k) <> 0 THEN */
4167: l_ins_cal_burdened_cost_tbl(k) is NOT NULL THEN
4168: l_burdened_cost_tbl(l_index) := l_ins_cal_burdened_cost_tbl(k);
4169: END IF;
4378: FOR i IN l_orig_count+1 .. l_orig_count+l_res_assignment_id_temp_tbl.COUNT LOOP -- bug 5003827 issue 22
4379: l_ra_id_temp_tbl(i) := l_res_assignment_id_temp_tbl(i-l_orig_count); -- bug 5003827 issue 22
4380: -- Bug 5003827 issue 1
4381: IF p_currency_code_tbl.EXISTS(i-l_orig_count) AND
4382: NVL(p_currency_code_tbl(i-l_orig_count),FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR THEN
4383: l_curr_code_temp_tbl(i) := p_currency_code_tbl(i-l_orig_count);
4384: ELSE
4385: l_curr_code_temp_tbl(i) := l_proj_curr_code;
4386: END IF;
4414:
4415: l_res_assignment_id_tbl(l_index) := l_res_assignment_id_temp_tbl(k);
4416:
4417: IF (((l_total_quantity_tbl.EXISTS(k)) AND (l_total_quantity_tbl.COUNT > 0))
4418: AND ((nvl(l_total_quantity_tbl(k),FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM)
4419: /* bug fix:Bug fix:5726773 AND (l_total_quantity_tbl(k) <> 0))) OR */
4420: AND (l_total_quantity_tbl(k) is NOT NULL ))) OR
4421: (((p_raw_cost_tbl.EXISTS(k)) AND (p_raw_cost_tbl.COUNT > 0))
4422: AND ((nvl(p_raw_cost_tbl(k),FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM)
4418: AND ((nvl(l_total_quantity_tbl(k),FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM)
4419: /* bug fix:Bug fix:5726773 AND (l_total_quantity_tbl(k) <> 0))) OR */
4420: AND (l_total_quantity_tbl(k) is NOT NULL ))) OR
4421: (((p_raw_cost_tbl.EXISTS(k)) AND (p_raw_cost_tbl.COUNT > 0))
4422: AND ((nvl(p_raw_cost_tbl(k),FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM)
4423: /* bug fix:Bug fix:5726773 AND (p_raw_cost_tbl(k) <> 0))) OR */
4424: AND (p_raw_cost_tbl(k) is NOT NULL))) OR
4425: (((p_burdened_cost_tbl.EXISTS(k)) AND (p_burdened_cost_tbl.COUNT > 0))
4426: AND ((nvl(p_burdened_cost_tbl(k),FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM)
4422: AND ((nvl(p_raw_cost_tbl(k),FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM)
4423: /* bug fix:Bug fix:5726773 AND (p_raw_cost_tbl(k) <> 0))) OR */
4424: AND (p_raw_cost_tbl(k) is NOT NULL))) OR
4425: (((p_burdened_cost_tbl.EXISTS(k)) AND (p_burdened_cost_tbl.COUNT > 0))
4426: AND ((nvl(p_burdened_cost_tbl(k),FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM)
4427: /* bug fix:Bug fix:5726773 AND (p_burdened_cost_tbl(k) <> 0))) THEN */
4428: AND (p_burdened_cost_tbl(k) is NOT NULL))) THEN
4429:
4430: IF l_debug_mode = 'Y' THEN
4435: l_call_calc_api := 'Y';
4436:
4437: -- Bug 3861653
4438: IF p_currency_code_tbl.EXISTS(k) AND
4439: NVL(p_currency_code_tbl(k),FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR THEN
4440:
4441: l_currency_code_tbl(l_index) := p_currency_code_tbl(k);
4442: ELSE
4443: l_currency_code_tbl(l_index) := l_proj_curr_code;
4443: l_currency_code_tbl(l_index) := l_proj_curr_code;
4444: END IF;
4445:
4446: IF l_total_quantity_tbl.EXISTS(k) AND
4447: NVL(l_total_quantity_tbl(k),FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM AND
4448: /* bug fix:Bug fix:5726773 l_total_quantity_tbl(k) <> 0 THEN */
4449: l_total_quantity_tbl(k) is NOT NULL THEN
4450:
4451: l_quantity_tbl(l_index) := l_total_quantity_tbl(k);
4454: l_cost_rate_tbl(l_index) := l_cost_rate_override_tbl(k);
4455: l_burden_multiplier_tbl(l_index) := l_burdened_rate_override_tbl(k);
4456:
4457: IF p_raw_cost_tbl.EXISTS(k) AND
4458: NVL(p_raw_cost_tbl(k),FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM AND
4459: /* bug fix:Bug fix:5726773 p_raw_cost_tbl(k) <> 0 THEN */
4460: p_raw_cost_tbl(k) is NOT NULL THEN
4461:
4462: l_raw_cost_tbl(l_index) := p_raw_cost_tbl(k);
4462: l_raw_cost_tbl(l_index) := p_raw_cost_tbl(k);
4463: END IF;
4464:
4465: IF p_burdened_cost_tbl.EXISTS(k) AND
4466: NVL(p_burdened_cost_tbl(k),FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM AND
4467: /* bug fix:Bug fix:5726773 P_burdened_cost_tbl(k) <> 0 THEN */
4468: P_burdened_cost_tbl(k) is NOT NULL THEN
4469:
4470: l_burdened_cost_tbl(l_index) := p_burdened_cost_tbl(k);
4921: l_res_assignment_id_tbl(l_index) := l_bf_ra_id_tbl(k);
4922: l_amount_exists :='N';
4923:
4924: IF l_bf_quantity_tbl.EXISTS(k) AND
4925: NVL(l_bf_quantity_tbl(k),FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM AND
4926: /* bug fix:Bug fix:5726773 l_bf_quantity_tbl(k) <> 0 THEN */
4927: l_bf_quantity_tbl(k) is NOT NULL THEN
4928: l_quantity_tbl(l_index) := l_bf_quantity_tbl(k);
4929: l_amount_exists := 'Y';
4929: l_amount_exists := 'Y';
4930: END IF;
4931:
4932: IF l_bf_raw_cost_tbl.EXISTS(k) AND
4933: NVL(l_bf_raw_cost_tbl(k),FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM AND
4934: /* bug fix:Bug fix:5726773 l_bf_raw_cost_tbl(k) <> 0 THEN */
4935: l_bf_raw_cost_tbl(k) is NOT NULL THEN
4936: l_raw_cost_tbl(l_index) := l_bf_raw_cost_tbl(k);
4937: l_amount_exists := 'Y';
4937: l_amount_exists := 'Y';
4938: END IF;
4939:
4940: IF l_bf_burdened_cost_tbl.EXISTS(k) AND
4941: NVL(l_bf_burdened_cost_tbl(k),FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM AND
4942: /* bug fix:Bug fix:5726773 l_bf_burdened_cost_tbl(k) <> 0 THEN */
4943: l_bf_burdened_cost_tbl(k) is NOT NULL THEN
4944: l_burdened_cost_tbl(l_index) := l_bf_burdened_cost_tbl(k);
4945: l_amount_exists := 'Y';
4945: l_amount_exists := 'Y';
4946: END IF;
4947:
4948: IF l_bf_revenue_tbl.EXISTS(k) AND
4949: NVL(l_bf_revenue_tbl(k),FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM AND
4950: /* bug fix:Bug fix:5726773 l_bf_revenue_tbl(k) <> 0 THEN */
4951: l_bf_revenue_tbl(k) is NOT NULL THEN
4952: l_revenue_tbl(l_index) := l_bf_revenue_tbl(k);
4953: l_amount_exists := 'Y';
4959: pa_debug.write('PA_FP_PLANNING_TRANSACTION_PUB.add_planning_transactions: ' || g_module_name,pa_debug.g_err_stage,3);
4960: END IF;
4961:
4962: IF l_bf_currency_code_tbl.EXISTS(k) AND
4963: NVL(l_bf_currency_code_tbl(k),FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR THEN
4964: l_currency_code_tbl(l_index) := l_bf_currency_code_tbl(k);
4965: ELSE
4966:
4967: IF l_debug_mode = 'Y' THEN
5086: ,x_return_status => l_return_status
5087: ,x_msg_count => l_msg_count
5088: ,x_msg_data => l_msg_data);
5089:
5090: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5091: IF l_debug_mode = 'Y' THEN
5092: pa_debug.g_err_stage:='Called API PA_FP_CALC_PLAN_PKG.calculate api returned error';
5093: pa_debug.write('PA_FP_PLANNING_TRANSACTION_PUB.add_planning_transactions: ' || g_module_name,pa_debug.g_err_stage,3);
5094: END IF;
5115:
5116:
5117: END IF;
5118:
5119: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5120: IF l_debug_mode = 'Y' THEN
5121: pa_debug.g_err_stage:='Called API PA_PROJ_TASK_STRUC_PUB.process_wbs_updates_wrp';
5122: pa_debug.write('PA_FP_PLANNING_TRANSACTION_PUB.add_planning_transactions: ' || g_module_name,pa_debug.g_err_stage,3);
5123: END IF;
5139: x_msg_count => x_msg_count,
5140: x_msg_data => x_msg_data
5141: );
5142:
5143: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5144: IF l_debug_mode = 'Y' THEN
5145: pa_debug.g_err_stage:='Called API PA_FIN_PLAN_PUB.create_default_plan_txn_rec returned error';
5146: pa_debug.write('PA_FP_PLANNING_TRANSACTION_PUB.add_planning_transactions: ' || g_module_name,pa_debug.g_err_stage, 3);
5147: END IF;
5164: -- hr_utility.trace('x_return_status IS : ' || x_return_status);
5165: -- hr_utility.trace('x_msg_count IS : ' || x_msg_count);
5166: -- hr_utility.trace('x_msg_data IS : ' || x_msg_data);
5167:
5168: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5169:
5170: IF l_debug_mode = 'Y' THEN
5171: pa_debug.g_err_stage:='Called API pa_fp_gen_amount_utils.get_plan_version_dtls returned error';
5172: pa_debug.write('PA_FP_PLANNING_TRANSACTION_PUB.add_planning_transactions: ' || g_module_name,pa_debug.g_err_stage, 3);
5229: x_msg_count => x_msg_count,
5230: x_msg_data => x_msg_data
5231: );
5232:
5233: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5234:
5235: IF l_debug_mode = 'Y' THEN
5236: pa_debug.g_err_stage:='Called API pa_res_asg_currency_pub.maintain_data returned error';
5237: pa_debug.write('PA_FP_PLANNING_TRANSACTION_PUB.add_planning_transactions: ' || g_module_name,pa_debug.g_err_stage, 3);
5250: ROLLBACK TO SAVEPOINT ADD_PLANNING_TRANS_SP;
5251: l_msg_count := FND_MSG_PUB.count_msg;
5252: IF l_msg_count = 1 THEN
5253: PA_INTERFACE_UTILS_PUB.get_messages
5254: (p_encoded => FND_API.G_TRUE
5255: ,p_msg_index => 1
5256: ,p_msg_count => l_msg_count
5257: ,p_msg_data => l_msg_data
5258: ,p_data => l_data
5263: ELSE
5264:
5265: x_msg_count := l_msg_count;
5266: END IF;
5267: x_return_status := FND_API.G_RET_STS_ERROR;
5268: IF l_debug_mode = 'Y' THEN
5269: pa_debug.reset_curr_function;
5270: END IF;
5271: WHEN OTHERS THEN
5270: END IF;
5271: WHEN OTHERS THEN
5272:
5273: ROLLBACK TO SAVEPOINT ADD_PLANNING_TRANS_SP;
5274: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5275: x_msg_count := 1;
5276: x_msg_data := SQLERRM;
5277: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FP_PLANNING_TRANSACTION_PUB'
5278: ,p_procedure_name => 'add_planning_transactions');
5584: l_plan_end_date_new_tbl SYSTEM.PA_DATE_TBL_TYPE := SYSTEM.PA_DATE_TBL_TYPE();
5585: l_rlm_id_change_flag_tbl SYSTEM.PA_VARCHAR2_1_TBL_TYPE := SYSTEM.PA_VARCHAR2_1_TBL_TYPE();
5586:
5587: --Added for Bug 4200168
5588: l_g_miss_char CONSTANT VARCHAR(1) := FND_API.G_MISS_CHAR;
5589: l_g_miss_num CONSTANT NUMBER := FND_API.G_MISS_NUM;
5590: l_g_miss_date CONSTANT DATE := FND_API.G_MISS_DATE;
5591:
5592: l_fp_cols_rec pa_fp_gen_amount_utils.fp_cols; -- IPM
5585: l_rlm_id_change_flag_tbl SYSTEM.PA_VARCHAR2_1_TBL_TYPE := SYSTEM.PA_VARCHAR2_1_TBL_TYPE();
5586:
5587: --Added for Bug 4200168
5588: l_g_miss_char CONSTANT VARCHAR(1) := FND_API.G_MISS_CHAR;
5589: l_g_miss_num CONSTANT NUMBER := FND_API.G_MISS_NUM;
5590: l_g_miss_date CONSTANT DATE := FND_API.G_MISS_DATE;
5591:
5592: l_fp_cols_rec pa_fp_gen_amount_utils.fp_cols; -- IPM
5593:
5586:
5587: --Added for Bug 4200168
5588: l_g_miss_char CONSTANT VARCHAR(1) := FND_API.G_MISS_CHAR;
5589: l_g_miss_num CONSTANT NUMBER := FND_API.G_MISS_NUM;
5590: l_g_miss_date CONSTANT DATE := FND_API.G_MISS_DATE;
5591:
5592: l_fp_cols_rec pa_fp_gen_amount_utils.fp_cols; -- IPM
5593:
5594: BEGIN
5597: --hr_utility.trace('PA_FP_PLAN_TXN_PUB.update_planning_transactions: '||to_char(l_trace_stage));
5598:
5599:
5600: x_msg_count := 0;
5601: x_return_status := FND_API.G_RET_STS_SUCCESS;
5602: l_debug_mode := 'Y'; --NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
5603:
5604: --Added for Bug 4200168
5605: IF p_pji_rollup_required = 'Y' THEN
5717: ,p_struct_elem_version_id => p_struct_elem_version_id
5718: ,x_return_status => l_return_status
5719: ,x_msg_data => l_msg_data
5720: ,x_msg_count => l_msg_count);
5721: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5722: IF l_debug_mode = 'Y' THEN
5723: pa_debug.g_err_stage:='Called API pa_fp_planning_transaction_pub.add_planning_transaction api returned error';
5724: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
5725: END IF;
5768: RAISE;
5769: END;
5770:
5771: /* Bug 3817356 - We to cannot pass negative date from Java to PLSql hence we are not
5772: able to pass FND_API.G_MISS_DATE ('01-Jan--4712') to this API when called from Java.
5773: Instead when this API is called from Java instead of G_MISS_DATE '01-Jan-4712' is passed.
5774: Added code below to Replace '01-Jan-4712' by FND_API.G_MISS_DATE
5775: */
5776: IF l_debug_mode = 'Y' THEN
5770:
5771: /* Bug 3817356 - We to cannot pass negative date from Java to PLSql hence we are not
5772: able to pass FND_API.G_MISS_DATE ('01-Jan--4712') to this API when called from Java.
5773: Instead when this API is called from Java instead of G_MISS_DATE '01-Jan-4712' is passed.
5774: Added code below to Replace '01-Jan-4712' by FND_API.G_MISS_DATE
5775: */
5776: IF l_debug_mode = 'Y' THEN
5777: pa_debug.g_err_stage:='Processing IN Date Tables for G_MISS_DATE';
5778: pa_debug.write('PA_FP_PLANNING_TXN_PUB.update_planning_transactions:'||l_module_name,pa_debug.g_err_stage,3);
5790: IF p_task_elem_version_id_tbl.COUNT > 0 THEN
5791: FOR i IN p_task_elem_version_id_tbl.FIRST .. p_task_elem_version_id_tbl.LAST LOOP
5792: IF p_start_date_tbl.EXISTS(i)
5793: AND p_start_date_tbl(i) = l_temp_gmiss_date THEN
5794: l_in_start_date_tbl(i) := FND_API.G_MISS_DATE;
5795: END IF;
5796: IF p_end_date_tbl.EXISTS(i)
5797: AND p_end_date_tbl(i) = l_temp_gmiss_date THEN
5798: l_in_end_date_tbl(i) := FND_API.G_MISS_DATE;
5794: l_in_start_date_tbl(i) := FND_API.G_MISS_DATE;
5795: END IF;
5796: IF p_end_date_tbl.EXISTS(i)
5797: AND p_end_date_tbl(i) = l_temp_gmiss_date THEN
5798: l_in_end_date_tbl(i) := FND_API.G_MISS_DATE;
5799: END IF;
5800: IF p_planning_start_date_tbl.EXISTS(i)
5801: AND p_planning_start_date_tbl(i) = l_temp_gmiss_date THEN
5802: l_in_planning_start_date_tbl(i) := FND_API.G_MISS_DATE;
5798: l_in_end_date_tbl(i) := FND_API.G_MISS_DATE;
5799: END IF;
5800: IF p_planning_start_date_tbl.EXISTS(i)
5801: AND p_planning_start_date_tbl(i) = l_temp_gmiss_date THEN
5802: l_in_planning_start_date_tbl(i) := FND_API.G_MISS_DATE;
5803: END IF;
5804: IF p_planning_end_date_tbl.EXISTS(i)
5805: AND p_planning_end_date_tbl(i) = l_temp_gmiss_date THEN
5806: l_in_planning_end_date_tbl(i) := FND_API.G_MISS_DATE;
5802: l_in_planning_start_date_tbl(i) := FND_API.G_MISS_DATE;
5803: END IF;
5804: IF p_planning_end_date_tbl.EXISTS(i)
5805: AND p_planning_end_date_tbl(i) = l_temp_gmiss_date THEN
5806: l_in_planning_end_date_tbl(i) := FND_API.G_MISS_DATE;
5807: END IF;
5808: IF p_schedule_start_date_tbl.EXISTS(i)
5809: AND p_schedule_start_date_tbl(i) = l_temp_gmiss_date THEN
5810: l_in_schedule_start_date_tbl(i) := FND_API.G_MISS_DATE;
5806: l_in_planning_end_date_tbl(i) := FND_API.G_MISS_DATE;
5807: END IF;
5808: IF p_schedule_start_date_tbl.EXISTS(i)
5809: AND p_schedule_start_date_tbl(i) = l_temp_gmiss_date THEN
5810: l_in_schedule_start_date_tbl(i) := FND_API.G_MISS_DATE;
5811: END IF;
5812: IF p_schedule_end_date_tbl.EXISTS(i)
5813: AND p_schedule_end_date_tbl(i) = l_temp_gmiss_date THEN
5814: l_in_schedule_end_date_tbl(i) := FND_API.G_MISS_DATE;
5810: l_in_schedule_start_date_tbl(i) := FND_API.G_MISS_DATE;
5811: END IF;
5812: IF p_schedule_end_date_tbl.EXISTS(i)
5813: AND p_schedule_end_date_tbl(i) = l_temp_gmiss_date THEN
5814: l_in_schedule_end_date_tbl(i) := FND_API.G_MISS_DATE;
5815: END IF;
5816: IF p_sp_fixed_date_tbl.EXISTS(i)
5817: AND p_sp_fixed_date_tbl(i) = l_temp_gmiss_date THEN
5818: l_in_sp_fixed_date_tbl(i) := FND_API.G_MISS_DATE;
5814: l_in_schedule_end_date_tbl(i) := FND_API.G_MISS_DATE;
5815: END IF;
5816: IF p_sp_fixed_date_tbl.EXISTS(i)
5817: AND p_sp_fixed_date_tbl(i) = l_temp_gmiss_date THEN
5818: l_in_sp_fixed_date_tbl(i) := FND_API.G_MISS_DATE;
5819: END IF;
5820: END LOOP;
5821: END IF;
5822: ELSE
5823: IF p_resource_assignment_id_tbl.COUNT > 0 THEN
5824: FOR i IN p_resource_assignment_id_tbl.FIRST .. p_resource_assignment_id_tbl.LAST LOOP
5825: IF p_start_date_tbl.EXISTS(i)
5826: AND p_start_date_tbl(i) = l_temp_gmiss_date THEN
5827: l_in_start_date_tbl(i) := FND_API.G_MISS_DATE;
5828: END IF;
5829: IF p_end_date_tbl.EXISTS(i)
5830: AND p_end_date_tbl(i) = l_temp_gmiss_date THEN
5831: l_in_end_date_tbl(i) := FND_API.G_MISS_DATE;
5827: l_in_start_date_tbl(i) := FND_API.G_MISS_DATE;
5828: END IF;
5829: IF p_end_date_tbl.EXISTS(i)
5830: AND p_end_date_tbl(i) = l_temp_gmiss_date THEN
5831: l_in_end_date_tbl(i) := FND_API.G_MISS_DATE;
5832: END IF;
5833: IF p_planning_start_date_tbl.EXISTS(i)
5834: AND p_planning_start_date_tbl(i) = l_temp_gmiss_date THEN
5835: l_in_planning_start_date_tbl(i) := FND_API.G_MISS_DATE;
5831: l_in_end_date_tbl(i) := FND_API.G_MISS_DATE;
5832: END IF;
5833: IF p_planning_start_date_tbl.EXISTS(i)
5834: AND p_planning_start_date_tbl(i) = l_temp_gmiss_date THEN
5835: l_in_planning_start_date_tbl(i) := FND_API.G_MISS_DATE;
5836: END IF;
5837: IF p_planning_end_date_tbl.EXISTS(i)
5838: AND p_planning_end_date_tbl(i) = l_temp_gmiss_date THEN
5839: l_in_planning_end_date_tbl(i) := FND_API.G_MISS_DATE;
5835: l_in_planning_start_date_tbl(i) := FND_API.G_MISS_DATE;
5836: END IF;
5837: IF p_planning_end_date_tbl.EXISTS(i)
5838: AND p_planning_end_date_tbl(i) = l_temp_gmiss_date THEN
5839: l_in_planning_end_date_tbl(i) := FND_API.G_MISS_DATE;
5840: END IF;
5841: IF p_schedule_start_date_tbl.EXISTS(i)
5842: AND p_schedule_start_date_tbl(i) = l_temp_gmiss_date THEN
5843: l_in_schedule_start_date_tbl(i) := FND_API.G_MISS_DATE;
5839: l_in_planning_end_date_tbl(i) := FND_API.G_MISS_DATE;
5840: END IF;
5841: IF p_schedule_start_date_tbl.EXISTS(i)
5842: AND p_schedule_start_date_tbl(i) = l_temp_gmiss_date THEN
5843: l_in_schedule_start_date_tbl(i) := FND_API.G_MISS_DATE;
5844: END IF;
5845: IF p_schedule_end_date_tbl.EXISTS(i)
5846: AND p_schedule_end_date_tbl(i) = l_temp_gmiss_date THEN
5847: l_in_schedule_end_date_tbl(i) := FND_API.G_MISS_DATE;
5843: l_in_schedule_start_date_tbl(i) := FND_API.G_MISS_DATE;
5844: END IF;
5845: IF p_schedule_end_date_tbl.EXISTS(i)
5846: AND p_schedule_end_date_tbl(i) = l_temp_gmiss_date THEN
5847: l_in_schedule_end_date_tbl(i) := FND_API.G_MISS_DATE;
5848: END IF;
5849: IF p_sp_fixed_date_tbl.EXISTS(i)
5850: AND p_sp_fixed_date_tbl(i) = l_temp_gmiss_date THEN
5851: l_in_sp_fixed_date_tbl(i) := FND_API.G_MISS_DATE;
5847: l_in_schedule_end_date_tbl(i) := FND_API.G_MISS_DATE;
5848: END IF;
5849: IF p_sp_fixed_date_tbl.EXISTS(i)
5850: AND p_sp_fixed_date_tbl(i) = l_temp_gmiss_date THEN
5851: l_in_sp_fixed_date_tbl(i) := FND_API.G_MISS_DATE;
5852: END IF;
5853: END LOOP;
5854: END IF;
5855: END IF;
5880: ,x_return_status => l_return_status
5881: ,x_msg_data => l_msg_data
5882: ,x_msg_count => l_msg_count);
5883:
5884: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5885: IF l_debug_mode = 'Y' THEN
5886: pa_debug.g_err_stage:='Called API pa_planning_transaction_pub.check_and_create_task_rec_info api returned error';
5887: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
5888: END IF;
6143:
6144:
6145: -- Assiging all the passed tbls to record type . This is done because
6146: -- 1. TA validation API expects a pl/sql table of records
6147: -- 2. BULK update will possible since the values that are not passed will be defaulted to FND_API.G_MISS_XXX
6148:
6149:
6150: IF l_debug_mode = 'Y' THEN
6151: pa_debug.g_err_stage:='About to loop thru for assigning to rec types';
6488: --dbms_output.put_line(' l_resource_rec_tbl(i).cost_rate_override is '|| l_resource_rec_tbl(1).cost_rate_override);
6489:
6490: --hr_utility.trace('PA_FP_PLAN_TXN_PUB.update_planning_transactions: after calling validate_update_assignment');
6491:
6492: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6493: IF l_debug_mode = 'Y' THEN
6494: pa_debug.g_err_stage:='Called API PA_TASK_ASSIGNMENT_UTILS.Validate_Update_Assignment returned error';
6495: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
6496: END IF;
6513:
6514:
6515: /*------------------------------------------------------------------------
6516: -- Repopulating all the resource data tables from the table l_resource_rec_tbl
6517: -- Now all the parameters not passed will be initialized to FND_API.G_MISS_XXX
6518: ------------------------------------------------------------------------ */
6519: FOR i IN l_resource_rec_tbl.FIRST .. l_resource_rec_tbl.LAST LOOP
6520:
6521: IF l_resource_rec_tbl.EXISTS(i) THEN
6647: IF l_debug_mode = 'Y' THEN
6648: pa_debug.g_err_stage:='Spread Curve Id is of FIXED_DATE';
6649: print_msg(pa_debug.g_err_stage,l_module_name);
6650: END IF;
6651: IF l_sp_fixed_date_tbl(i) = FND_API.G_MISS_DATE THEN
6652: IF l_debug_mode = 'Y' THEN
6653: pa_debug.g_err_stage:='Error - cannot nullify sp_fixed_date for Fixed Date Spread curve';
6654: print_msg(pa_debug.g_err_stage,l_module_name);
6655: END IF;
6675: , x_msg_count => x_msg_count
6676: , x_msg_data => x_msg_data
6677: , x_return_status => x_return_status);
6678: --dbms_output.put_line('4');
6679: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6680: IF l_debug_mode = 'Y' THEN
6681: pa_debug.g_err_stage:='Cpa_budget_utils.Get_Project_Currency_Info returned error';
6682: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
6683: END IF;
6856: ,x_return_status => x_return_status
6857: ,x_msg_data => x_msg_data
6858: ,x_msg_count => x_msg_count );
6859:
6860: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6861: IF l_debug_mode = 'Y' THEN
6862: pa_debug.g_err_stage:='Derive_Parameters_For_Calc_Api returned error';
6863: print_msg(pa_debug.g_err_stage,l_module_name);
6864: END IF;
7204: --dbms_output.put_line( pa_debug.g_err_stage);
7205: pa_debug.g_err_stage:='l_sp_fixed_date_old_tbl('||i||') is '||l_sp_fixed_date_old_tbl(i);
7206: print_msg(pa_debug.g_err_stage,l_module_name);
7207: --dbms_output.put_line( pa_debug.g_err_stage);
7208: if l_sp_fixed_date_new_tbl(i) = fnd_api.g_miss_date then
7209: pa_debug.g_err_stage:='l_sp_fixed_date_new_tbl('||i||') is g miss date';
7210: else
7211: pa_debug.g_err_stage:='l_sp_fixed_date_new_tbl('||i||') is '||l_sp_fixed_date_new_tbl(i);
7212: end if;
7214: --dbms_output.put_line( pa_debug.g_err_stage);
7215: pa_debug.g_err_stage:='l_plan_start_date_old_tbl('||i||') is '||l_plan_start_date_old_tbl(i);
7216: print_msg(pa_debug.g_err_stage,l_module_name);
7217: --dbms_output.put_line( pa_debug.g_err_stage);
7218: if l_plan_start_date_new_tbl(i) = fnd_api.g_miss_date then
7219: pa_debug.g_err_stage:='l_plan_start_date_new_tbl('||i||') is g miss date';
7220: else
7221: pa_debug.g_err_stage:='l_plan_start_date_new_tbl('||i||') is '||l_plan_start_date_new_tbl(i);
7222: end if;
7224: --dbms_output.put_line( pa_debug.g_err_stage);
7225: pa_debug.g_err_stage:='l_plan_end_date_old_tbl('||i||') is '||l_plan_end_date_old_tbl(i);
7226: print_msg(pa_debug.g_err_stage,l_module_name);
7227: --dbms_output.put_line( pa_debug.g_err_stage);
7228: if l_plan_end_date_new_tbl(i) = fnd_api.g_miss_date then
7229: pa_debug.g_err_stage:='l_plan_end_date_new_tbl('||i||') is g miss date';
7230: else
7231: pa_debug.g_err_stage:='l_plan_end_date_new_tbl('||i||') is '||l_plan_end_date_new_tbl(i);
7232: end if;
7296: ,x_return_status => x_return_status
7297: ,x_msg_count => x_msg_count
7298: ,x_msg_data => x_msg_data);
7299:
7300: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7301:
7302: IF l_debug_mode = 'Y' THEN
7303: pa_debug.g_err_stage:='Called API PA_FP_CALC_PLAN_PKG.calculate returned error';
7304: pa_debug.write(l_module_name,pa_debug.g_err_stage, l_debug_level3);
7317: x_return_status => x_return_status,
7318: x_msg_count => x_msg_count,
7319: x_msg_data => x_msg_data);
7320:
7321: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7322:
7323: IF l_debug_mode = 'Y' THEN
7324: pa_debug.g_err_stage:='Called API pa_fp_gen_amount_utils.get_plan_version_dtls returned error';
7325: pa_debug.write(l_module_name,pa_debug.g_err_stage, l_debug_level3);
7359: x_msg_count => x_msg_count,
7360: x_msg_data => x_msg_data
7361: );
7362:
7363: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7364:
7365: IF l_debug_mode = 'Y' THEN
7366: pa_debug.g_err_stage:='Called API pa_res_asg_currency_pub.maintain_data returned error';
7367: pa_debug.write(l_module_name,pa_debug.g_err_stage, l_debug_level3);
7389: pa_task_assignment_utils.g_require_progress_rollup := 'N';
7390: END IF;
7391:
7392:
7393: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7394: IF l_debug_mode = 'Y' THEN
7395: pa_debug.g_err_stage:='Called API PA_PROJ_TASK_STRUC_PUB.process_wbs_updates_wrp';
7396: pa_debug.write('PA_FP_PLANNING_TRANSACTION_PUB.update_planning_transactions: ' || g_module_name,pa_debug.g_err_stage,3);
7397: END IF;
7419: pa_debug.write(l_module_name,pa_debug.g_err_stage, l_debug_level3);
7420: END IF;
7421:
7422: PA_INTERFACE_UTILS_PUB.get_messages
7423: ( p_encoded => FND_API.G_TRUE
7424: ,p_msg_index => 1
7425: ,p_msg_count => l_msg_count
7426: ,p_msg_data => l_msg_data
7427: ,p_data => l_data
7437: x_msg_count := l_msg_count;
7438:
7439: END IF;
7440: ROLLBACK TO Update_Planning_Transactions;
7441: x_return_status := FND_API.G_RET_STS_ERROR;
7442: IF l_debug_mode = 'Y' THEN
7443: pa_debug.g_err_stage:='In invalid args exception 3';
7444: pa_debug.write(l_module_name,pa_debug.g_err_stage, l_debug_level3);
7445: pa_debug.reset_curr_function;
7450: END IF;
7451:
7452:
7453: WHEN OTHERS THEN
7454: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7455: x_msg_count := 1;
7456: x_msg_data := SQLERRM;
7457: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FP_PLANNING_TRANSACTION_PUB'
7458: ,p_procedure_name => 'Update_Planning_Transactions');
7588: pa_debug.write( l_module_name,pa_debug.g_err_stage,l_debug_level3);
7589: END IF;
7590: --dbms_output.put_line('in copy plan txn1');
7591: x_msg_count := 0;
7592: x_return_status := FND_API.G_RET_STS_SUCCESS;
7593:
7594: SAVEPOINT copy_plan_txn;
7595:
7596: --Added this if for the bug 4200168
7753: pa_debug.write( l_module_name,pa_debug.g_err_stage,l_debug_level5);
7754:
7755: END IF;
7756:
7757: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7758:
7759: IF l_debug_mode = 'Y' THEN
7760:
7761: pa_debug.g_err_stage:='validate_copy_assignment returned error';
7827: ,x_msg_data => x_msg_data);
7828:
7829:
7830:
7831: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7832:
7833: IF l_debug_mode = 'Y' THEN
7834:
7835: pa_debug.g_err_stage:='create_res_task_maps returned error';
7858: ,x_return_status => x_return_status
7859: ,x_msg_count => x_msg_count
7860: ,x_msg_data => x_msg_data);
7861:
7862: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7863:
7864: IF l_debug_mode = 'Y' THEN
7865:
7866: pa_debug.g_err_stage:='Copy_Resource_Assignments returned error';
7882: x_return_status => x_return_status,
7883: x_msg_count => x_msg_count,
7884: x_msg_data => x_msg_data);
7885:
7886: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7887:
7888: IF l_debug_mode = 'Y' THEN
7889: pa_debug.g_err_stage:='Called API pa_fp_gen_amount_utils.get_plan_version_dtls returned error';
7890: print_msg(pa_debug.g_err_stage,l_module_name);
7935: x_msg_count => x_msg_count,
7936: x_msg_data => x_msg_data
7937: );
7938:
7939: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7940:
7941: IF l_debug_mode = 'Y' THEN
7942: pa_debug.g_err_stage:='Called API pa_res_asg_currency_pub.maintain_data returned error';
7943: print_msg(pa_debug.g_err_stage,l_module_name);
8026: , x_msg_count => x_msg_count
8027: , x_msg_data => x_msg_data
8028: , x_return_status => x_return_status);
8029:
8030: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8031: IF l_debug_mode = 'Y' THEN
8032: pa_debug.g_err_stage:='Cpa_budget_utils.Get_Project_Currency_Info returned error';
8033: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
8034: END IF;
8118: ,x_return_status => x_return_status
8119: ,x_msg_count => x_msg_count
8120: ,x_msg_data => x_msg_data);
8121:
8122: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8123:
8124: IF l_debug_mode = 'Y' THEN
8125:
8126: pa_debug.g_err_stage:='PA_FP_CALC_PLAN_PKG.calculate returned error';
8149: ,x_msg_data => x_msg_data);
8150:
8151:
8152:
8153: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8154:
8155: IF l_debug_mode = 'Y' THEN
8156:
8157: pa_debug.g_err_stage:='Copy_Budget_Lines returned error';
8275: ,x_return_status => x_return_status
8276: ,x_msg_count => x_msg_count
8277: ,x_msg_data => x_msg_data );
8278:
8279: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8280:
8281: IF l_debug_mode = 'Y' THEN
8282:
8283: pa_debug.g_err_stage:='convert_txn_currency returned error';
8302: ,x_return_status => x_return_status
8303: ,x_msg_data => x_msg_data
8304: ,x_msg_count => x_msg_count);
8305:
8306: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8307:
8308: IF l_debug_mode = 'Y' THEN
8309: pa_debug.g_err_stage:='PA_PLANNING_TRANSACTION_UTILS.call_update_rep_lines_api returned error';
8310: pa_debug.write( l_module_name,pa_debug.g_err_stage,5);
8332: pa_task_assignment_utils.g_require_progress_rollup := 'N';
8333:
8334: END IF;
8335:
8336: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8337: IF l_debug_mode = 'Y' THEN
8338: pa_debug.g_err_stage:='Called API PA_PROJ_TASK_STRUC_PUB.process_wbs_updates_wrp';
8339: pa_debug.write('PA_FP_PLANNING_TRANSACTION_PUB.copy_planning_transactions: ' || g_module_name,pa_debug.g_err_stage,3);
8340: END IF;
8387: x_msg_count => x_msg_count,
8388: x_msg_data => x_msg_data
8389: );
8390:
8391: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8392:
8393: IF l_debug_mode = 'Y' THEN
8394: pa_debug.g_err_stage:='Called API pa_res_asg_currency_pub.maintain_data returned error';
8395: print_msg(pa_debug.g_err_stage,l_module_name);
8408: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
8409: l_msg_count := FND_MSG_PUB.count_msg;
8410: IF l_msg_count = 1 THEN
8411: PA_INTERFACE_UTILS_PUB.get_messages
8412: (p_encoded => FND_API.G_TRUE
8413: ,p_msg_index => 1
8414: ,p_msg_count => l_msg_count
8415: ,p_msg_data => l_msg_data
8416: ,p_data => l_data
8421: ELSE
8422: x_msg_count := l_msg_count;
8423: END IF;
8424:
8425: x_return_status := FND_API.G_RET_STS_ERROR;
8426: ROLLBACK TO copy_plan_txn;
8427:
8428: IF l_debug_mode = 'Y' THEN
8429: pa_debug.g_err_stage:='Invalid Arguments Passed Or called api raised an error';
8433: END IF;
8434: RETURN;
8435: WHEN Others THEN
8436: ROLLBACK TO copy_plan_txn;
8437: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8438: x_msg_count := 1;
8439: x_msg_data := SQLERRM;
8440:
8441: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fp_planning_transaction_pub'
8593: BEGIN
8594:
8595: delete pa_resource_asgn_curr_tmp;
8596: x_msg_count := 0;
8597: x_return_status := FND_API.G_RET_STS_SUCCESS;
8598:
8599: pa_task_assignment_utils.g_require_progress_rollup := 'N';
8600:
8601: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
8792: pa_debug.g_err_stage:= pa_debug.g_err_stage||'RetSts['||x_return_status||']';
8793: print_msg(pa_debug.g_err_stage,l_module_name);
8794: End If;
8795:
8796: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8797: IF l_debug_mode = 'Y' THEN
8798: pa_debug.g_err_stage:='The calling context is task assignment. Calling the validation API';
8799: print_msg(pa_debug.g_err_stage,l_module_name);
8800: END IF;
8813:
8814: If p_task_or_res = 'TASKS' --- bug 6076066: added the checking of p_task_res to the existing IF loop
8815: and p_element_version_id_tbl.count > 0
8816: and NVL(p_element_version_id_tbl(1),0) <> 0
8817: and p_element_version_id_tbl(1) <> fnd_api.g_miss_num then
8818:
8819: /* Bug fix: LOOP is required to get the budget version id. when multiple tasks are deleted
8820: * some of the task may not have assignments, but some may have assignments
8821: * without loop, the process skips all the records
8891:
8892: IF l_budget_version_id is NULL -- Bug 5408333
8893: and p_resource_assignment_tbl.COUNT > 0
8894: and NVL(p_resource_assignment_tbl(1),0) <> 0
8895: and p_resource_assignment_tbl(1) <> fnd_api.g_miss_num Then
8896:
8897: BEGIN
8898:
8899: IF l_debug_mode = 'Y' THEN
9647: x_return_status => x_return_status,
9648: x_msg_count => x_msg_count,
9649: x_msg_data => x_msg_data);
9650:
9651: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9652:
9653: IF l_debug_mode = 'Y' THEN
9654: pa_debug.g_err_stage:='Called API pa_fp_gen_amount_utils.get_plan_version_dtls returned error';
9655: print_msg(pa_debug.g_err_stage,l_module_name);
9674: x_msg_count => x_msg_count,
9675: x_msg_data => x_msg_data
9676: );
9677:
9678: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9679:
9680: IF l_debug_mode = 'Y' THEN
9681: pa_debug.g_err_stage:='Called API pa_res_asg_currency_pub.maintain_data returned error';
9682: print_msg(pa_debug.g_err_stage,l_module_name);
9712: ,x_return_status => x_return_status
9713: ,x_msg_count => l_msg_count
9714: ,x_msg_data => l_msg_data);
9715:
9716: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9717: IF l_debug_mode = 'Y' THEN
9718: pa_debug.g_err_stage:='The API PA_FP_ROLLUP_PKG.ROLLUP_BUDGET_VERSION returned error';
9719: print_msg(pa_debug.g_err_stage,l_module_name);
9720: END IF;
9836: pa_debug.g_err_stage:='Error in preparing pl/sql tables for rbs element id and task id ';
9837: print_msg(pa_debug.g_err_stage,l_module_name);
9838: END IF;
9839:
9840: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9841:
9842: END IF;
9843:
9844: IF l_debug_mode = 'Y' THEN
9877: ,x_return_status => x_return_status
9878: ,x_msg_data => x_msg_data
9879: ,x_msg_count => x_msg_count );
9880:
9881: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9882: IF l_debug_mode = 'Y' THEN
9883: pa_debug.g_err_stage:='The API pa_planning_transaction_utils.call_update_rep_lines_api returned error';
9884: print_msg(pa_debug.g_err_stage,l_module_name);
9885: END IF;
9918:
9919: pa_task_assignment_utils.g_require_progress_rollup := 'N';
9920:
9921: END IF;
9922: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9923: IF l_debug_mode = 'Y' THEN
9924: pa_debug.g_err_stage:='After Called process_wbs_updates_wrp:retSts['||x_return_status||']';
9925: print_msg(pa_debug.g_err_stage,l_module_name);
9926: END IF;
9940: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
9941: l_msg_count := FND_MSG_PUB.count_msg;
9942: IF l_msg_count = 1 THEN
9943: PA_INTERFACE_UTILS_PUB.get_messages
9944: (p_encoded => FND_API.G_TRUE
9945: ,p_msg_index => 1
9946: ,p_msg_count => l_msg_count
9947: ,p_msg_data => l_msg_data
9948: ,p_data => l_data
9953: ELSE
9954: x_msg_count := l_msg_count;
9955: END IF;
9956:
9957: x_return_status := FND_API.G_RET_STS_ERROR;
9958:
9959: IF l_debug_mode = 'Y' THEN
9960: pa_debug.g_err_stage:='Invalid Arguments Passed Or called api raised an error';
9961: print_msg(pa_debug.g_err_stage,l_module_name);
9963: pa_debug.reset_curr_function;
9964: END IF;
9965: RETURN;
9966: WHEN OTHERS THEN
9967: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9968: x_msg_count := 1;
9969: x_msg_data := SQLERRM;
9970:
9971: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fp_planning_transaction_pub'
10025:
10026: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
10027: l_debug_mode := NVL(l_debug_mode, 'N');
10028: x_msg_count := 0;
10029: x_return_status := FND_API.G_RET_STS_SUCCESS;
10030: IF l_debug_mode = 'Y' THEN
10031: PA_DEBUG.Set_Curr_Function( p_function => 'PA_FP_PLANNING_TRANSACTION_PUB.Add_wp_plan_type',
10032: p_debug_mode => l_debug_mode );
10033: END IF;
10166: ,x_return_status => l_return_status
10167: ,x_msg_count => l_msg_count
10168: ,x_msg_data => l_msg_data);
10169:
10170: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10171: IF l_debug_mode = 'Y' THEN
10172: pa_debug.g_err_stage:='Called API pa_proj_fp_options_pub.Create_FP_Option returned error';
10173: pa_debug.write('PA_FP_PLANNING_TRANSACTION_PUB.Add_wp_plan_type: ' || g_module_name,pa_debug.g_err_stage,5);
10174: END IF;
10193: ,x_return_status => l_return_status
10194: ,x_msg_count => l_msg_count
10195: ,x_msg_data => l_msg_data );
10196:
10197: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10198: IF l_debug_mode = 'Y' THEN
10199: pa_debug.g_err_stage:='Called API PA_FP_TXN_CURRENCIES_PUB.COPY_FP_TXN_CURRENCIES returned error';
10200: pa_debug.write('PA_FP_PLANNING_TRANSACTION_PUB.Add_wp_plan_type: ' || g_module_name,pa_debug.g_err_stage,5);
10201: END IF;
10212: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
10213: l_msg_count := FND_MSG_PUB.count_msg;
10214: IF l_msg_count = 1 THEN
10215: PA_INTERFACE_UTILS_PUB.get_messages
10216: (p_encoded => FND_API.G_TRUE
10217: ,p_msg_index => 1
10218: ,p_msg_count => l_msg_count
10219: ,p_msg_data => l_msg_data
10220: ,p_data => l_data
10223: x_msg_count := l_msg_count;
10224: ELSE
10225: x_msg_count := l_msg_count;
10226: END IF;
10227: x_return_status := FND_API.G_RET_STS_ERROR;
10228: IF l_debug_mode = 'Y' THEN
10229: pa_debug.reset_curr_function;
10230: END IF;
10231: WHEN OTHERS THEN
10228: IF l_debug_mode = 'Y' THEN
10229: pa_debug.reset_curr_function;
10230: END IF;
10231: WHEN OTHERS THEN
10232: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10233: x_msg_count := 1;
10234: x_msg_data := SQLERRM;
10235: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FP_PLANNING_TRANSACTION_PUB'
10236: ,p_procedure_name => 'PA_FP_PLANNING_TRANSACTION_PUB.Add_wp_plan_type');
10330:
10331: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
10332: l_debug_mode := NVL(l_debug_mode, 'N');
10333: x_msg_count := 0;
10334: x_return_status := FND_API.G_RET_STS_SUCCESS;
10335: IF l_debug_mode = 'Y' THEN
10336: PA_DEBUG.Set_Curr_Function( p_function => 'fp_planning_txn_pub.chk_and_create_task',
10337: p_debug_mode => l_debug_mode );
10338: END IF;
10429:
10430: IF p_planning_end_date_tbl.EXISTS(i) THEN
10431: x_planning_end_date_tbl(l_out_tbl_index) := p_planning_end_date_tbl(i);
10432: END IF;
10433: /* In Update Flow for Workplan Context FND_API.G_MISS_XXXX will be considered
10434: as a valid value for effort/Quantity -- Bug 3640498*/
10435: IF (p_raw_cost_tbl.EXISTS(i)) THEN --AND
10436: -- NVL(p_raw_cost_tbl(i),FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM AND
10437: -- p_raw_cost_tbl(i) <> 0) THEN
10432: END IF;
10433: /* In Update Flow for Workplan Context FND_API.G_MISS_XXXX will be considered
10434: as a valid value for effort/Quantity -- Bug 3640498*/
10435: IF (p_raw_cost_tbl.EXISTS(i)) THEN --AND
10436: -- NVL(p_raw_cost_tbl(i),FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM AND
10437: -- p_raw_cost_tbl(i) <> 0) THEN
10438: x_raw_cost_tbl(l_out_tbl_index) := p_raw_cost_tbl(i);
10439: END IF;
10440:
10438: x_raw_cost_tbl(l_out_tbl_index) := p_raw_cost_tbl(i);
10439: END IF;
10440:
10441: IF (p_burdened_cost_tbl.EXISTS(i)) THEN -- AND
10442: -- NVL(p_burdened_cost_tbl(i),FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM AND
10443: -- p_burdened_cost_tbl(i) <> 0) THEN
10444: x_burdened_cost_tbl(l_out_tbl_index) := p_burdened_cost_tbl(i);
10445: END IF;
10446:
10446:
10447: x_element_version_id_tbl(l_out_tbl_index) := p_element_version_id_tbl(i);
10448: IF l_res_class_code_tbl(j) = PA_FP_CONSTANTS_PKG.G_RESOURCE_CLASS_CODE_PPL THEN
10449: IF (p_planned_people_effort_tbl.EXISTS(i)) THEN --AND
10450: -- (nvl(p_planned_people_effort_tbl(i),FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM) AND
10451: -- (p_planned_people_effort_tbl(i) > 0)) THEN
10452: x_planned_effort_tbl(l_out_tbl_index) := p_planned_people_effort_tbl(i);
10453: END IF;
10454: END IF;
10462: IF l_rec_exsists = 'N' THEN
10463:
10464: --Add the record only if either people or equipment effort exists
10465: IF ((p_planned_people_effort_tbl.EXISTS(i)) AND
10466: (nvl(p_planned_people_effort_tbl(i),FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM) AND
10467: /*Bug fix:5726773 (p_planned_people_effort_tbl(i) > 0))*/
10468: (p_planned_people_effort_tbl(i) is NOT NULL))
10469: OR
10470: (p_raw_cost_tbl.EXISTS(i) AND
10467: /*Bug fix:5726773 (p_planned_people_effort_tbl(i) > 0))*/
10468: (p_planned_people_effort_tbl(i) is NOT NULL))
10469: OR
10470: (p_raw_cost_tbl.EXISTS(i) AND
10471: NVL(p_raw_cost_tbl(i),FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM AND
10472: /* bug fix:Bug fix:5726773 p_raw_cost_tbl(i) <> 0) */
10473: p_raw_cost_tbl(i) is NOT NULL )
10474: OR
10475: (p_burdened_cost_tbl.EXISTS(i) AND
10472: /* bug fix:Bug fix:5726773 p_raw_cost_tbl(i) <> 0) */
10473: p_raw_cost_tbl(i) is NOT NULL )
10474: OR
10475: (p_burdened_cost_tbl.EXISTS(i) AND
10476: NVL(p_burdened_cost_tbl(i),FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM AND
10477: /* bug fix:Bug fix:5726773 P_burdened_cost_tbl(i) <> 0) THEN */
10478: P_burdened_cost_tbl(i) is NOT NULL) THEN
10479:
10480: l_element_version_id_tbl(l_add_tbl_index) := p_element_version_id_tbl(i);
10486: l_planning_end_date_tbl(l_add_tbl_index) := p_planning_end_date_tbl(i);
10487: END IF;
10488:
10489: IF ((p_planned_people_effort_tbl.EXISTS(i)) AND
10490: (nvl(p_planned_people_effort_tbl(i),FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM) AND
10491: /* bug fix:5726773 (p_planned_people_effort_tbl(i) > 0)) THEN */
10492: (p_planned_people_effort_tbl(i) is NOT NULL )) THEN
10493: l_planned_people_effort_tbl(l_add_tbl_index) := p_planned_people_effort_tbl(i);
10494: END IF;
10493: l_planned_people_effort_tbl(l_add_tbl_index) := p_planned_people_effort_tbl(i);
10494: END IF;
10495:
10496: IF (p_raw_cost_tbl.EXISTS(i) AND
10497: NVL(p_raw_cost_tbl(i),FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM AND
10498: /* bug fix:Bug fix:5726773 p_raw_cost_tbl(i) <> 0) THEN */
10499: p_raw_cost_tbl(i) is NOT NULL ) THEN
10500: l_raw_cost_tbl(l_add_tbl_index) := p_raw_cost_tbl(i);
10501: END IF;
10500: l_raw_cost_tbl(l_add_tbl_index) := p_raw_cost_tbl(i);
10501: END IF;
10502:
10503: IF (p_burdened_cost_tbl.EXISTS(i) AND
10504: NVL(p_burdened_cost_tbl(i),FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM AND
10505: /* bug fix:Bug fix:572677312/29/2006 P_burdened_cost_tbl(i) <> 0) THEN */
10506: P_burdened_cost_tbl(i) is NOT NULL) THEN
10507: l_burdened_cost_tbl(l_add_tbl_index) := p_burdened_cost_tbl(i);
10508: END IF;
10623: ,x_msg_count => l_msg_count
10624: ,x_msg_data => l_msg_data
10625: );
10626:
10627: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10628: IF l_debug_mode = 'Y' THEN
10629: pa_debug.g_err_stage:='Called API PA_FP_PLANNING_TRANSACTION_PUB.add_planning_transactions ,api returned error';
10630: pa_debug.write( l_module_name,pa_debug.g_err_stage,5);
10631: END IF;
10641: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
10642: l_msg_count := FND_MSG_PUB.count_msg;
10643: IF l_msg_count = 1 THEN
10644: PA_INTERFACE_UTILS_PUB.get_messages
10645: (p_encoded => FND_API.G_TRUE
10646: ,p_msg_index => 1
10647: ,p_msg_count => l_msg_count
10648: ,p_msg_data => l_msg_data
10649: ,p_data => l_data
10652: x_msg_count := l_msg_count;
10653: ELSE
10654: x_msg_count := l_msg_count;
10655: END IF;
10656: x_return_status := FND_API.G_RET_STS_ERROR;
10657: IF l_debug_mode = 'Y' THEN
10658: pa_debug.reset_curr_function;
10659: END IF;
10660: WHEN OTHERS THEN
10657: IF l_debug_mode = 'Y' THEN
10658: pa_debug.reset_curr_function;
10659: END IF;
10660: WHEN OTHERS THEN
10661: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10662: x_msg_count := 1;
10663: x_msg_data := SQLERRM;
10664: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FP_PLANNING_TRANSACTION_PUB'
10665: ,p_procedure_name => 'check_and_create_task_rec_info');
10764:
10765: BEGIN
10766:
10767: x_msg_count := 0;
10768: x_return_status := FND_API.G_RET_STS_SUCCESS;
10769:
10770: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
10771: l_debug_mode := NVL(l_debug_mode, 'Y');
10772:
10848: x_return_status => x_return_status,
10849: x_msg_count => x_msg_count,
10850: x_msg_data => x_msg_data);
10851:
10852: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10853:
10854: IF l_debug_mode = 'Y' THEN
10855: pa_debug.g_err_stage:='Called API pa_fp_gen_amount_utils.get_plan_version_dtls returned error';
10856: pa_debug.WRITE('pa_fp_planning_transaction_pub.Refresh_Plan_Txns',pa_debug.g_err_stage, 3);
10883: x_msg_count => x_msg_count,
10884: x_msg_data => x_msg_data
10885: );
10886:
10887: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10888:
10889: IF l_debug_mode = 'Y' THEN
10890: pa_debug.g_err_stage:='Called API pa_res_asg_currency_pub.maintain_data returned error';
10891: pa_debug.WRITE('pa_fp_planning_transaction_pub.Refresh_Plan_Txns',pa_debug.g_err_stage, 3);
10934: x_return_status => x_return_status,
10935: x_msg_count => x_msg_count,
10936: x_msg_data => x_msg_data);
10937:
10938: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10939:
10940: IF l_debug_mode = 'Y' THEN
10941: pa_debug.g_err_stage:='Called API pa_fp_gen_amount_utils.get_plan_version_dtls returned error';
10942: pa_debug.WRITE('pa_fp_planning_transaction_pub.Refresh_Plan_Txns',pa_debug.g_err_stage, 3);
10958: x_msg_count => x_msg_count,
10959: x_msg_data => x_msg_data
10960: );
10961:
10962: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10963:
10964: IF l_debug_mode = 'Y' THEN
10965: pa_debug.g_err_stage:='Called API pa_res_asg_currency_pub.maintain_data returned error';
10966: pa_debug.WRITE('pa_fp_planning_transaction_pub.Refresh_Plan_Txns',pa_debug.g_err_stage, 3);
11014: ,x_return_status => x_return_status
11015: ,x_msg_count => x_msg_count
11016: ,x_msg_data => x_msg_data );
11017:
11018: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11019: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
11020: END IF;
11021:
11022: END IF; -- end bug 4724017
11062: ,x_return_status => l_return_status
11063: ,x_msg_count => l_msg_count
11064: ,x_msg_data => l_msg_data);
11065:
11066: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11067: IF l_debug_mode = 'Y' THEN
11068: pa_debug.g_err_stage:='Called API PA_PLANNING_TRANSACTION_UTILS.Get_Res_Class_Rlm_Ids api returned error';
11069: pa_debug.write('Refresh_Plan_Txns: ' || g_module_name,pa_debug.g_err_stage,5);
11070: END IF;
11094: x_return_status => x_return_status,
11095: x_msg_count => x_msg_count,
11096: x_msg_data => x_msg_data);
11097:
11098: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11099:
11100: IF l_debug_mode = 'Y' THEN
11101: pa_debug.g_err_stage:='Called API pa_fp_gen_amount_utils.get_plan_version_dtls returned error';
11102: pa_debug.WRITE('pa_fp_planning_transaction_pub.Refresh_Plan_Txns',pa_debug.g_err_stage, 3);
11118: x_msg_count => x_msg_count,
11119: x_msg_data => x_msg_data
11120: );
11121:
11122: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11123:
11124: IF l_debug_mode = 'Y' THEN
11125: pa_debug.g_err_stage:='Called API pa_res_asg_currency_pub.maintain_data returned error';
11126: pa_debug.WRITE('pa_fp_planning_transaction_pub.Refresh_Plan_Txns',pa_debug.g_err_stage, 3);
11139: ,x_return_status => l_return_status
11140: ,x_msg_count => l_msg_count
11141: ,x_msg_data => l_msg_data);
11142:
11143: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11144: IF l_debug_mode = 'Y' THEN
11145: pa_debug.g_err_stage:='Called API PA_FP_ROLLUP_PKG.rollup_budget_version returned error';
11146: pa_debug.write('Refresh_Plan_Txns: ' || g_module_name,pa_debug.g_err_stage,5);
11147: END IF;
11164: ,x_return_status => l_return_status
11165: ,x_msg_count => l_msg_count
11166: ,x_msg_data => l_msg_data);
11167:
11168: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11169: IF l_debug_mode = 'Y' THEN
11170: pa_debug.g_err_stage:='Called API Refresh_rbs_for_versions returned error';
11171: pa_debug.write('Refresh_Plan_Txns: ' || g_module_name,pa_debug.g_err_stage,5);
11172: END IF;
11196: p_fp_version_ids => l_budget_version_id_tbl,
11197: x_return_status => l_return_status,
11198: x_msg_code => l_error_msg_code);
11199:
11200: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11201: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
11202: p_msg_name => l_error_msg_code);
11203: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
11204: END IF;
11218: p_fp_version_ids => l_budget_version_id_tbl,
11219: x_return_status => l_return_status,
11220: x_msg_code => l_error_msg_code);
11221:
11222: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11223: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
11224: p_msg_name => l_error_msg_code);
11225: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
11226: END IF;
11244: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
11245: l_msg_count := FND_MSG_PUB.count_msg;
11246: IF l_msg_count = 1 THEN
11247: PA_INTERFACE_UTILS_PUB.get_messages
11248: (p_encoded => FND_API.G_TRUE
11249: ,p_msg_index => 1
11250: ,p_msg_count => l_msg_count
11251: ,p_msg_data => l_msg_data
11252: ,p_data => l_data
11257: ELSE
11258: x_msg_count := l_msg_count;
11259: END IF;
11260:
11261: x_return_status := FND_API.G_RET_STS_ERROR;
11262:
11263: IF l_debug_mode = 'Y' THEN
11264: pa_debug.g_err_stage:='Invalid Arguments Passed Or called api raised an error';
11265: pa_debug.write('Refresh_Plan_Txns: ' || g_module_name,pa_debug.g_err_stage,5);
11268: END IF;
11269:
11270: RETURN;
11271: WHEN Others THEN
11272: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11273: x_msg_count := 1;
11274: x_msg_data := SQLERRM;
11275:
11276: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FP_PLANNING_TRANSACTION_PUB'
11398: pa_debug.set_curr_function( p_function => 'Create_Default_Task_Plan_Txns',
11399: p_debug_mode => l_debug_mode );
11400: END IF;
11401: x_msg_count := 0;
11402: x_return_status := FND_API.G_RET_STS_SUCCESS;
11403:
11404:
11405: -- Check for business rules violations
11406:
11477: x_msg_count => l_msg_count,
11478: x_msg_data => l_msg_data);
11479: --hr_utility.trace('G_BUDGET_ENTRY_LEVEL_LOWEST -> rlmids'|| l_people_res_class_rlm_id || 'x' || l_equip_res_class_rlm_id || 'x' || l_fin_res_class_rlm_id || 'x' || l_mat_res_class_rlm_id);
11480:
11481: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11482: IF l_debug_mode = 'Y' THEN
11483: pa_debug.g_err_stage:='Called API PA_PLANNING_TRANSACTION_UTILS.Get_Res_Class_Rlm_Ids api returned error';
11484: pa_debug.write('PA_FP_PLANNING_TRANSACTION_PUB.Create_Default_Task_Plan_Txns: ' || l_module_name,pa_debug.g_err_stage,5);
11485: END IF;
11547: ,x_return_status => l_return_status
11548: ,x_msg_count => l_msg_count
11549: ,x_msg_data => l_msg_data );
11550:
11551: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11552: IF l_debug_mode = 'Y' THEN
11553: pa_debug.g_err_stage:='Called API PA_PLANNING_TRANSACTION_UTILS.Get_Res_Class_Rlm_Ids api returned error';
11554: pa_debug.write('PA_FP_PLANNING_TRANSACTION_PUB.Create_Default_Task_Plan_Txns: ' || l_module_name,pa_debug.g_err_stage,5);
11555: END IF;
11586: ,x_msg_count => l_msg_count
11587: ,x_msg_data => l_msg_data );
11588: END IF;
11589:
11590: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11591: IF l_debug_mode = 'Y' THEN
11592: pa_debug.g_err_stage:='Called API PA_PLANNING_TRANSACTION_UTILS.Get_Res_Class_Rlm_Ids api returned error';
11593: pa_debug.write('PA_FP_PLANNING_TRANSACTION_PUB.Create_Default_Task_Plan_Txns: ' || l_module_name,pa_debug.g_err_stage,5);
11594: END IF;
11632: ,x_return_status => l_return_status
11633: ,x_msg_count => l_msg_count
11634: ,x_msg_data => l_msg_data );
11635:
11636: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11637: IF l_debug_mode = 'Y' THEN
11638: pa_debug.g_err_stage:='Called API PA_PLANNING_TRANSACTION_UTILS.Get_Res_Class_Rlm_Ids api returned error';
11639: pa_debug.write('PA_FP_PLANNING_TRANSACTION_PUB.Create_Default_Task_Plan_Txns: ' || l_module_name,pa_debug.g_err_stage,5);
11640: END IF;
11659: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
11660: l_msg_count := FND_MSG_PUB.count_msg;
11661: IF l_msg_count = 1 THEN
11662: PA_INTERFACE_UTILS_PUB.get_messages
11663: (p_encoded => FND_API.G_TRUE
11664: ,p_msg_index => 1
11665: ,p_msg_count => l_msg_count
11666: ,p_msg_data => l_msg_data
11667: ,p_data => l_data
11670: x_msg_count := l_msg_count;
11671: ELSE
11672: x_msg_count := l_msg_count;
11673: END IF;
11674: x_return_status := FND_API.G_RET_STS_ERROR;
11675: -- pa_debug.g_err_stage:='Invalid Arguments Passed';
11676: -- pa_debug.write(l_module_name,pa_debug.g_err_stage,5);
11677: IF l_debug_mode = 'Y' THEN
11678: pa_debug.reset_curr_function;
11679: END IF;
11680: RETURN;
11681:
11682: WHEN Others THEN
11683: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11684: x_msg_count := 1;
11685: x_msg_data := SQLERRM;
11686: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FP_PLANNING_TRANSACTION_PUB'
11687: ,p_procedure_name => 'CREATE_DEFAULT_TASK_PLAN_TXNS');
11877:
11878: BEGIN
11879:
11880: x_msg_count := 0;
11881: x_return_status := FND_API.G_RET_STS_SUCCESS;
11882:
11883: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
11884: l_debug_mode := NVL(l_debug_mode, 'Y');
11885:
11970: ,x_return_status => x_return_status
11971: ,x_msg_data => x_msg_data
11972: ,x_msg_count => x_msg_count);
11973:
11974: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11975:
11976: IF l_debug_mode = 'Y' THEN
11977: pa_debug.g_err_stage:='PA_PLANNING_TRANSACTION_UTILS.call_update_rep_lines_api returned error';
11978: pa_debug.write( g_module_name,pa_debug.g_err_stage,5);
12009: ,x_return_status => x_return_status
12010: ,x_msg_count => x_msg_count
12011: ,x_msg_data => x_msg_data);
12012:
12013: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12014: IF l_debug_mode = 'Y' THEN
12015: pa_debug.g_err_stage:='Called API PA_PLANNING_TRANSACTION_UTILS.Get_Res_Class_Rlm_Ids api returned error';
12016: pa_debug.write('REFRESH_WP_SETTINGS: ' || g_module_name,pa_debug.g_err_stage,5);
12017: END IF;
12141: ,x_return_status => x_return_status
12142: ,x_msg_count => x_msg_count
12143: ,x_msg_data => x_msg_data);
12144:
12145: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12146: IF l_debug_mode = 'Y' THEN
12147: pa_debug.g_err_stage:='Called API PA_PLANNING_TRANSACTION_UTILS.Get_Res_Class_Rlm_Ids api returned error';
12148: pa_debug.write('REFRESH_WP_SETTINGS: ' || g_module_name,pa_debug.g_err_stage,5);
12149: END IF;
12165: ,x_return_status => x_return_status
12166: ,x_msg_count => x_msg_count
12167: ,x_msg_data => x_msg_data );
12168:
12169: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12170: IF l_debug_mode = 'Y' THEN
12171: pa_debug.g_err_stage:='Called API PA_FP_TXN_CURRENCIES_PUB.copy_fp_txn_currencies api returned error';
12172: pa_debug.write('REFRESH_WP_SETTINGS: ' || g_module_name,pa_debug.g_err_stage,5);
12173: END IF;
12206: ,x_return_status => x_return_status
12207: ,x_msg_count => x_msg_count
12208: ,x_msg_data => x_msg_data );
12209:
12210: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12211: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
12212: END IF;
12213: END IF;
12214:
12273: ,x_return_status => x_return_status
12274: ,x_msg_count => x_msg_count
12275: ,x_msg_data => x_msg_data);
12276:
12277: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12278: IF l_debug_mode = 'Y' THEN
12279: pa_debug.g_err_stage:='Called API PA_FP_CALC_PLAN_PKG.calculate api returned error';
12280: pa_debug.write('REFRESH_WP_SETTINGS: ' || g_module_name,pa_debug.g_err_stage,5);
12281: END IF;
12294: ,x_return_status => x_return_status
12295: ,x_msg_count => x_msg_count
12296: ,x_msg_data => x_msg_data);
12297:
12298: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12299: IF l_debug_mode = 'Y' THEN
12300: pa_debug.g_err_stage:='Called API PA_FP_ROLLUP_PKG.rollup_budget_version api returned error';
12301: pa_debug.write('REFRESH_WP_SETTINGS: ' || g_module_name,pa_debug.g_err_stage,5);
12302: END IF;
12376: ,x_msg_count => x_msg_count
12377: ,x_msg_data => x_msg_data);
12378:
12379: -- Check return status
12380: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12381: IF l_debug_mode = 'Y' THEN
12382: pa_debug.g_err_stage:='Called API PA_PLANNING_TRANSACTION_UTILS.Map_Rlmi_Rbs api returned error';
12383: pa_debug.write('REFRESH_WP_SETTINGS: ' || g_module_name,pa_debug.g_err_stage,5);
12384: END IF;
12471: ,x_return_status => x_return_status
12472: ,x_msg_data => x_msg_data
12473: ,x_msg_count => x_msg_count);
12474:
12475: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12476: IF l_debug_mode = 'Y' THEN
12477: pa_debug.g_err_stage:='PA_PLANNING_TRANSACTION_UTILS.call_update_rep_lines_api returned error';
12478: pa_debug.write( g_module_name,pa_debug.g_err_stage,5);
12479: END IF; RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
12490: PJI_FM_XBS_ACCUM_MAINT.PLAN_UPDATE (
12491: x_return_status => x_return_status,
12492: x_msg_code => l_error_msg_code);
12493:
12494: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12495: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
12496: p_msg_name => l_error_msg_code);
12497: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
12498: END IF;
12512: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
12513: l_msg_count := FND_MSG_PUB.count_msg;
12514: IF l_msg_count = 1 THEN
12515: PA_INTERFACE_UTILS_PUB.get_messages
12516: (p_encoded => FND_API.G_TRUE
12517: ,p_msg_index => 1
12518: ,p_msg_count => l_msg_count
12519: ,p_msg_data => l_msg_data
12520: ,p_data => l_data
12525: ELSE
12526: x_msg_count := l_msg_count;
12527: END IF;
12528:
12529: x_return_status := FND_API.G_RET_STS_ERROR;
12530:
12531: IF l_debug_mode = 'Y' THEN
12532: pa_debug.g_err_stage:='Invalid Arguments Passed Or called api raised an error';
12533: pa_debug.write('REFRESH_WP_SETTINGS: ' || g_module_name,pa_debug.g_err_stage,5);
12536: END IF;
12537:
12538: RETURN;
12539: WHEN Others THEN
12540: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12541: x_msg_count := 1;
12542: x_msg_data := SQLERRM;
12543:
12544: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FP_PLANNING_TRANSACTION_PUB'
12635:
12636: BEGIN
12637:
12638: x_msg_count := 0;
12639: x_return_status := FND_API.G_RET_STS_SUCCESS;
12640:
12641: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
12642: l_debug_mode := NVL(l_debug_mode, 'Y');
12643:
12772: ,x_msg_count => x_msg_count
12773: ,x_msg_data => x_msg_data);
12774:
12775: -- Check return status
12776: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12777: IF l_debug_mode = 'Y' THEN
12778: pa_debug.g_err_stage:='Called API PA_PLANNING_TRANSACTION_UTILS.Map_Rlmi_Rbs api returned error';
12779: pa_debug.write('REFRESH_WP_SETTINGS: ' || g_module_name,pa_debug.g_err_stage,5);
12780: END IF;
12835: p_fp_version_ids => l_budget_version_id_tbl,
12836: x_return_status => x_return_status,
12837: x_msg_code => l_error_msg_code);
12838:
12839: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12840: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
12841: p_msg_name => l_error_msg_code);
12842: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
12843: END IF;
12847: p_fp_version_ids => l_budget_version_id_tbl,
12848: x_return_status => x_return_status,
12849: x_msg_code => l_error_msg_code);
12850:
12851: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12852: PA_UTILS.ADD_MESSAGE(p_app_short_name => 'PA',
12853: p_msg_name => l_error_msg_code);
12854: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
12855: END IF;
12866: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
12867: l_msg_count := FND_MSG_PUB.count_msg;
12868: IF l_msg_count = 1 THEN
12869: PA_INTERFACE_UTILS_PUB.get_messages
12870: (p_encoded => FND_API.G_TRUE
12871: ,p_msg_index => 1
12872: ,p_msg_count => l_msg_count
12873: ,p_msg_data => l_msg_data
12874: ,p_data => l_data
12879: ELSE
12880: x_msg_count := l_msg_count;
12881: END IF;
12882:
12883: x_return_status := FND_API.G_RET_STS_ERROR;
12884:
12885: IF l_debug_mode = 'Y' THEN
12886: pa_debug.g_err_stage:='Invalid Arguments Passed Or called api raised an error';
12887: pa_debug.write('Refresh_rbs_for_versions: ' || g_module_name,pa_debug.g_err_stage,5);
12889: pa_debug.reset_curr_function();
12890: END IF;
12891: RETURN;
12892: WHEN Others THEN
12893: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12894: x_msg_count := 1;
12895: x_msg_data := SQLERRM;
12896:
12897: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'pa_fp_planning_transaction_pub'