DBA Data[Home] [Help]

APPS.ENG_CHANGE_LIFECYCLE_UTIL dependencies on ENG_ENGINEERING_CHANGES

Line 311: FROM ENG_ENGINEERING_CHANGES eec,

307: SELECT eec.change_id,
308: eec.change_mgmt_type_code ,
309: changecategory.base_change_mgmt_type_code,
310: type_appl.application_id
311: FROM ENG_ENGINEERING_CHANGES eec,
312: ENG_CHANGE_ORDER_TYPES ChangeCategory,
313: ENG_CHANGE_TYPE_APPLICATIONS type_appl
314: WHERE type_appl.change_type_id = ChangeCategory.change_order_type_id
315: and type_appl.application_id = p_appl_id

Line 350: l_cm_type_code eng_engineering_changes.CHANGE_MGMT_TYPE_CODE%TYPE;

346:
347: l_fnd_user_id NUMBER := TO_NUMBER(FND_PROFILE.VALUE('USER_ID'));
348: l_fnd_login_id NUMBER := TO_NUMBER(FND_PROFILE.VALUE('LOGIN_ID'));
349:
350: l_cm_type_code eng_engineering_changes.CHANGE_MGMT_TYPE_CODE%TYPE;
351: l_base_cm_type_code eng_change_order_types.BASE_CHANGE_MGMT_TYPE_CODE%TYPE;
352:
353: l_next_status_code NUMBER;
354:

Line 398: FROM eng_engineering_changes eec,

394: SELECT eec.change_mgmt_type_code, eec.promote_status_code, --eec.status_code
395: ecot.base_change_mgmt_type_code
396: INTO l_cm_type_code, l_next_status_code, --l_curr_status_code
397: l_base_cm_type_code
398: FROM eng_engineering_changes eec,
399: eng_change_order_types ecot
400: WHERE eec.change_id = p_change_id
401: AND ecot.change_order_type_id = eec.change_order_type_id;
402:

Line 463: l_cm_type_code eng_engineering_changes.CHANGE_MGMT_TYPE_CODE%TYPE;

459: ,x_last_status_type OUT NOCOPY NUMBER
460: ,x_last_status_code OUT NOCOPY NUMBER
461: )
462: IS
463: l_cm_type_code eng_engineering_changes.CHANGE_MGMT_TYPE_CODE%TYPE;
464: l_base_cm_type_code eng_change_order_types.BASE_CHANGE_MGMT_TYPE_CODE%TYPE;
465: l_max_phase_sn eng_lifecycle_statuses.sequence_number%TYPE;
466: l_start_date eng_lifecycle_statuses.start_date%TYPE;
467: BEGIN

Line 490: FROM eng_engineering_changes eec,

486:
487: -- Get the change header's cm type, and promote_status_code
488: SELECT eec.change_mgmt_type_code, ecot.base_change_mgmt_type_code
489: INTO l_cm_type_code, l_base_cm_type_code
490: FROM eng_engineering_changes eec,
491: eng_change_order_types ecot
492: WHERE eec.change_id = p_change_id
493: AND ecot.change_order_type_id = eec.change_order_type_id;
494:

Line 610: l_status_type eng_engineering_changes.status_type%TYPE;

606:
607: l_phase_sn eng_lifecycle_statuses.sequence_number%TYPE;
608: l_max_appr_phase_sn eng_lifecycle_statuses.sequence_number%TYPE;
609:
610: l_status_type eng_engineering_changes.status_type%TYPE;
611:
612: l_wf_item_key wf_item_activity_statuses.item_key%TYPE := NULL;
613:
614: l_cm_type_code eng_engineering_changes.change_mgmt_type_code%TYPE;

Line 614: l_cm_type_code eng_engineering_changes.change_mgmt_type_code%TYPE;

610: l_status_type eng_engineering_changes.status_type%TYPE;
611:
612: l_wf_item_key wf_item_activity_statuses.item_key%TYPE := NULL;
613:
614: l_cm_type_code eng_engineering_changes.change_mgmt_type_code%TYPE;
615: l_base_cm_type_code eng_change_order_types.BASE_CHANGE_MGMT_TYPE_CODE%TYPE;
616:
617: l_param_list WF_PARAMETER_LIST_T := WF_PARAMETER_LIST_T();
618:

Line 685: FROM eng_engineering_changes eec,

681:
682: -- Select cm type and base type code for upcoming API calls
683: SELECT eec.change_mgmt_type_code, ecot.base_change_mgmt_type_code
684: INTO l_cm_type_code, l_base_cm_type_code
685: FROM eng_engineering_changes eec,
686: eng_change_order_types ecot
687: WHERE eec.change_id = p_change_id
688: AND ecot.change_order_type_id = eec.change_order_type_id;
689:

Line 703: UPDATE eng_engineering_changes

699: END IF;
700:
701: -- update header approval status
702: IF (p_appr_status = G_ENG_APPR_REQUESTED ) THEN
703: UPDATE eng_engineering_changes
704: SET approval_status_type = p_appr_status,
705: approval_request_date = sysdate,
706: approval_date = null,
707: last_update_date = sysdate,

Line 713: Write_Debug('After updating eng_engineering_changes.approval_* columns.');

709: last_update_login = l_fnd_login_id
710: WHERE change_id = p_change_id;
711: l_updated := TRUE;
712: IF g_debug_flag THEN
713: Write_Debug('After updating eng_engineering_changes.approval_* columns.');
714: Write_Debug(' Row count = ' || SQL%ROWCOUNT);
715: END IF;
716: IF g_debug_flag THEN
717: Write_Debug('After: updating header approval columns FOR APPROVAL REQUESTED');

Line 753: UPDATE eng_engineering_changes

749: IF g_debug_flag THEN
750: Write_Debug('Current phase is the last of such type');
751: END IF;
752:
753: UPDATE eng_engineering_changes
754: SET approval_status_type = p_appr_status,
755: approval_date = sysdate,
756: last_update_date = sysdate,
757: last_updated_by = l_fnd_user_id,

Line 762: Write_Debug('After updating eng_engineering_changes.approval_* columns.');

758: last_update_login = l_fnd_login_id
759: WHERE change_id = p_change_id;
760: l_updated := TRUE;
761: IF g_debug_flag THEN
762: Write_Debug('After updating eng_engineering_changes.approval_* columns.');
763: Write_Debug(' Row count = ' || SQL%ROWCOUNT);
764: END IF;
765: IF g_debug_flag THEN
766: Write_Debug('After: updating header approval columns FOR APPROVED');

Line 774: UPDATE eng_engineering_changes

770: ELSIF ( p_appr_status = G_ENG_APPR_REJECTED
771: OR p_appr_status = G_ENG_APPR_PROC_ERR
772: OR p_appr_status = G_ENG_APPR_TIME_OUT)
773: THEN
774: UPDATE eng_engineering_changes
775: SET approval_status_type = p_appr_status,
776: approval_date = null,
777: last_update_date = sysdate,
778: last_updated_by = l_fnd_user_id,

Line 783: Write_Debug('After updating eng_engineering_changes.approval_* columns.');

779: last_update_login = l_fnd_login_id
780: WHERE change_id = p_change_id;
781: l_updated := TRUE;
782: IF g_debug_flag THEN
783: Write_Debug('After updating eng_engineering_changes.approval_* columns.');
784: Write_Debug(' Row count = ' || SQL%ROWCOUNT);
785: END IF;
786: IF g_debug_flag THEN
787: Write_Debug('After: updating header approval columns FOR REJECTED, PROC_ERR, TIME_OUT');

Line 794: UPDATE eng_engineering_changes

790: ELSIF (l_doc_lc_object_flag AND l_status_type = G_ENG_REVIEWED)
791: THEN
792: l_updated := TRUE;
793: ELSE
794: UPDATE eng_engineering_changes
795: SET approval_status_type = p_appr_status,
796: approval_request_date = null,
797: approval_date = null,
798: last_update_date = sysdate,

Line 804: Write_Debug('After updating eng_engineering_changes.approval_* columns.');

800: last_update_login = l_fnd_login_id
801: WHERE change_id = p_change_id;
802: l_updated := TRUE;
803: IF g_debug_flag THEN
804: Write_Debug('After updating eng_engineering_changes.approval_* columns.');
805: Write_Debug(' Row count = ' || SQL%ROWCOUNT);
806: END IF;
807: IF g_debug_flag THEN
808: Write_Debug('After: updating header approval columns FOR other approval types');

Line 819: FROM eng_engineering_changes eec,

815: THEN
816: -- Select cm type and base type code for upcoming API calls
817: /*SELECT eec.change_mgmt_type_code, ecot.base_change_mgmt_type_code
818: INTO l_cm_type_code, l_base_cm_type_code
819: FROM eng_engineering_changes eec,
820: eng_change_order_types ecot
821: WHERE eec.change_id = p_change_id
822: AND ecot.change_order_type_id = eec.change_order_type_id;*/
823:

Line 1544: l_chg_notice eng_engineering_changes.change_notice%TYPE;

1540: l_wf_route_id eng_lifecycle_statuses.change_wf_route_id%TYPE;
1541: l_wf_route_temp_id eng_lifecycle_statuses.change_wf_route_template_id%TYPE;
1542: l_wf_item_key wf_item_activity_statuses.item_key%TYPE := NULL;
1543:
1544: l_chg_notice eng_engineering_changes.change_notice%TYPE;
1545: l_org_id eng_engineering_changes.organization_id%TYPE;
1546: l_request_id NUMBER;
1547:
1548: l_min_appr_sn eng_lifecycle_statuses.sequence_number%TYPE;

Line 1545: l_org_id eng_engineering_changes.organization_id%TYPE;

1541: l_wf_route_temp_id eng_lifecycle_statuses.change_wf_route_template_id%TYPE;
1542: l_wf_item_key wf_item_activity_statuses.item_key%TYPE := NULL;
1543:
1544: l_chg_notice eng_engineering_changes.change_notice%TYPE;
1545: l_org_id eng_engineering_changes.organization_id%TYPE;
1546: l_request_id NUMBER;
1547:
1548: l_min_appr_sn eng_lifecycle_statuses.sequence_number%TYPE;
1549: l_doc_lc_object_flag BOOLEAN := FALSE ;

Line 1961: l_curr_status_code eng_engineering_changes.status_code%TYPE;

1957: l_return_status VARCHAR2(1);
1958: l_msg_count NUMBER;
1959: l_msg_data VARCHAR2(2000);
1960:
1961: l_curr_status_code eng_engineering_changes.status_code%TYPE;
1962:
1963: l_curr_phase_sn eng_lifecycle_statuses.sequence_number%TYPE;
1964: l_new_phase_sn eng_lifecycle_statuses.sequence_number%TYPE;
1965: l_max_sn eng_lifecycle_statuses.sequence_number%TYPE;

Line 2006: l_cm_type_code eng_engineering_changes.CHANGE_MGMT_TYPE_CODE%TYPE;

2002: -- revItem's status_code's sequence_number
2003: l_ri_phase_sn eng_lifecycle_statuses.sequence_number%TYPE;
2004:
2005: l_last_imp_flag VARCHAR2(1) := 'N';
2006: l_cm_type_code eng_engineering_changes.CHANGE_MGMT_TYPE_CODE%TYPE;
2007: l_base_cm_type_code eng_change_order_types.BASE_CHANGE_MGMT_TYPE_CODE%TYPE;
2008: l_imp_eco_flag VARCHAR2(1) := 'N';
2009:
2010: --l_co_type_id eng_engineering_changes.CHANGE_ORDER_TYPE_ID%TYPE;

Line 2010: --l_co_type_id eng_engineering_changes.CHANGE_ORDER_TYPE_ID%TYPE;

2006: l_cm_type_code eng_engineering_changes.CHANGE_MGMT_TYPE_CODE%TYPE;
2007: l_base_cm_type_code eng_change_order_types.BASE_CHANGE_MGMT_TYPE_CODE%TYPE;
2008: l_imp_eco_flag VARCHAR2(1) := 'N';
2009:
2010: --l_co_type_id eng_engineering_changes.CHANGE_ORDER_TYPE_ID%TYPE;
2011: l_auto_prop_flag eng_type_org_properties.AUTO_PROPAGATE_FLAG%TYPE;
2012: l_change_notice eng_engineering_changes.change_notice%TYPE;
2013: l_hierarchy_name per_organization_structures.name%TYPE;
2014: l_org_name org_organization_definitions.organization_name%TYPE;

Line 2012: l_change_notice eng_engineering_changes.change_notice%TYPE;

2008: l_imp_eco_flag VARCHAR2(1) := 'N';
2009:
2010: --l_co_type_id eng_engineering_changes.CHANGE_ORDER_TYPE_ID%TYPE;
2011: l_auto_prop_flag eng_type_org_properties.AUTO_PROPAGATE_FLAG%TYPE;
2012: l_change_notice eng_engineering_changes.change_notice%TYPE;
2013: l_hierarchy_name per_organization_structures.name%TYPE;
2014: l_org_name org_organization_definitions.organization_name%TYPE;
2015: l_row_cnt NUMBER := 0;
2016:

Line 2026: eng_engineering_changes ec,

2022: ec.change_notice,
2023: pos.name,
2024: ood.name organization_name
2025: FROM eng_type_org_properties op,
2026: eng_engineering_changes ec,
2027: per_organization_structures pos,
2028: hr_all_organization_units_tl ood
2029: WHERE ec.change_id = p_change_id
2030: --AND ec.PLM_OR_ERP_CHANGE = 'PLM'

Line 2187: FROM eng_engineering_changes

2183: FROM eng_lifecycle_statuses
2184: WHERE entity_name = G_ENG_CHANGE
2185: AND entity_id1 = p_change_id
2186: AND status_code = ( SELECT status_code
2187: FROM eng_engineering_changes
2188: WHERE change_id = p_change_id)
2189: AND active_flag = 'Y'
2190: AND rownum = 1;
2191:

Line 2330: FROM eng_engineering_changes eec,

2326: -- Fix for bug 3731977
2327: -- Get the change header's cm type and base cm type
2328: SELECT eec.change_mgmt_type_code, ecot.base_change_mgmt_type_code, eec.approval_status_type
2329: INTO l_cm_type_code, l_base_cm_type_code, l_eco_approval_status
2330: FROM eng_engineering_changes eec,
2331: eng_change_order_types ecot
2332: WHERE eec.change_id = p_change_id
2333: AND ecot.change_order_type_id = eec.change_order_type_id;
2334:

Line 2449: UPDATE eng_engineering_changes

2445: l_imp_eco_flag := 'Y';
2446: l_skip_wf := 'Y'; -- fix for bug 3479509 design change of launching wf after concurrent program
2447:
2448: -- save new phase into header's promote_status_code column
2449: UPDATE eng_engineering_changes
2450: SET promote_status_code = p_status_code,
2451: last_update_date = sysdate,
2452: last_updated_by = l_fnd_user_id,
2453: last_update_login = l_fnd_login_id

Line 2574: UPDATE eng_engineering_changes

2570: Write_Debug('After: Completing the current phase and promote to the next phase');
2571: END IF;
2572:
2573: -- Promote change header to the new phase
2574: UPDATE eng_engineering_changes
2575: SET status_code = p_status_code,
2576: promote_status_code = null,
2577: status_type = l_new_status_type,
2578: last_update_date = sysdate,

Line 2583: Write_Debug('After updating eng_engineering_changes.');

2579: last_updated_by = l_fnd_user_id,
2580: last_update_login = l_fnd_login_id
2581: WHERE change_id = p_change_id;
2582: IF g_debug_flag THEN
2583: Write_Debug('After updating eng_engineering_changes.');
2584: Write_Debug(' Row count = ' || SQL%ROWCOUNT);
2585: END IF;
2586:
2587: IF g_debug_flag THEN

Line 3050: l_curr_appr_status eng_engineering_changes.approval_status_type%TYPE;

3046:
3047: l_fnd_user_id NUMBER := TO_NUMBER(FND_PROFILE.VALUE('USER_ID'));
3048: l_fnd_login_id NUMBER := TO_NUMBER(FND_PROFILE.VALUE('LOGIN_ID'));
3049:
3050: l_curr_appr_status eng_engineering_changes.approval_status_type%TYPE;
3051:
3052: l_is_imp_phase_used VARCHAR2(1) := 'F';
3053:
3054: l_last_status_type NUMBER;

Line 3066: l_change_mgmt_type_code eng_engineering_changes.change_mgmt_type_code%TYPE;

3062: l_new_phase_sn eng_lifecycle_statuses.sequence_number%TYPE;
3063:
3064: l_new_status_type eng_change_statuses.status_type%TYPE;
3065:
3066: l_change_mgmt_type_code eng_engineering_changes.change_mgmt_type_code%TYPE;
3067:
3068: -- Cursor to get all lifecycle phases between (inclusive) [demotionStatus, currentStatus]
3069: CURSOR c_lcStatuses IS
3070: SELECT *

Line 3121: select status_type, status_code into l_old_status_code, l_old_status_type from eng_engineering_changes where change_id = p_change_id;

3117: l_old_status_code NUMBER;
3118: l_old_status_type NUMBER;
3119:
3120: BEGIN
3121: select status_type, status_code into l_old_status_code, l_old_status_type from eng_engineering_changes where change_id = p_change_id;
3122: -- Standard Start of API savepoint
3123: SAVEPOINT Demote_Header;
3124: -- Standard call to check for call compatibility
3125: IF NOT FND_API.Compatible_API_Call ( l_api_version

Line 3173: FROM eng_engineering_changes

3169:
3170: -- Get the current header approval status
3171: SELECT approval_status_type
3172: INTO l_curr_appr_status
3173: FROM eng_engineering_changes
3174: where change_id = p_change_id;
3175:
3176: -- First check if the header is CO and last implement phase has been used
3177: Is_CO_Last_Imp_Phase_Used

Line 3186: UPDATE eng_engineering_changes

3182: );
3183:
3184: -- If so, adjust header phase to implemented phase before demotion
3185: IF ( l_is_imp_phase_used = 'T' ) THEN
3186: UPDATE eng_engineering_changes
3187: SET status_type = l_last_status_type,
3188: status_code = l_last_status_code,
3189: promote_status_code = NULL
3190: WHERE change_id = p_change_id;

Line 3202: FROM eng_engineering_changes

3198: WHERE entity_name = G_ENG_CHANGE
3199: AND entity_id1 = p_change_id
3200: AND active_flag = 'Y'
3201: AND status_code = ( SELECT status_code
3202: FROM eng_engineering_changes
3203: WHERE change_id = p_change_id)
3204: AND rownum = 1;
3205:
3206: -- Get the sequence number for the new phase of the change header

Line 3237: FROM eng_engineering_changes

3233: WHERE entity_name = G_ENG_CHANGE
3234: AND entity_id1 = p_change_id
3235: AND active_flag = 'Y'
3236: AND status_code = ( SELECT status_code
3237: FROM eng_engineering_changes
3238: WHERE change_id = p_change_id)
3239: AND sequence_number = l_curr_phase_sn
3240: AND rownum = 1;
3241: IF g_debug_flag THEN

Line 3452: UPDATE eng_engineering_changes

3448: FROM eng_change_statuses
3449: WHERE status_code = p_status_code;
3450:
3451: -- Demote change header record
3452: UPDATE eng_engineering_changes
3453: SET status_code = p_status_code,
3454: promote_status_code = null,
3455: status_type = l_new_status_type,
3456: last_update_date = sysdate,

Line 3461: Write_Debug('After updating eng_engineering_changes.');

3457: last_updated_by = l_fnd_user_id,
3458: last_update_login = l_fnd_login_id
3459: WHERE change_id = p_change_id;
3460: IF g_debug_flag THEN
3461: Write_Debug('After updating eng_engineering_changes.');
3462: Write_Debug(' Row count = ' || SQL%ROWCOUNT);
3463: END IF;
3464:
3465: -- Fix for bug 3775865: Reset header approval status

Line 3796: l_chg_notice eng_engineering_changes.change_notice%TYPE;

3792: l_new_status_type eng_change_statuses.status_type%TYPE;
3793: l_ri_status_code eng_change_lines.status_code%TYPE;
3794: l_ri_status_type eng_change_statuses.status_type%TYPE;
3795:
3796: l_chg_notice eng_engineering_changes.change_notice%TYPE;
3797: l_org_id eng_engineering_changes.organization_id%TYPE;
3798: l_request_id NUMBER;
3799:
3800: l_row_cnt NUMBER := 0;

Line 3797: l_org_id eng_engineering_changes.organization_id%TYPE;

3793: l_ri_status_code eng_change_lines.status_code%TYPE;
3794: l_ri_status_type eng_change_statuses.status_type%TYPE;
3795:
3796: l_chg_notice eng_engineering_changes.change_notice%TYPE;
3797: l_org_id eng_engineering_changes.organization_id%TYPE;
3798: l_request_id NUMBER;
3799:
3800: l_row_cnt NUMBER := 0;
3801: BEGIN

Line 3951: FROM eng_engineering_changes

3947:
3948:
3949: SELECT change_notice, organization_id
3950: INTO l_chg_notice, l_org_id
3951: FROM eng_engineering_changes
3952: WHERE change_id = p_change_id;
3953: -- If so, submit concurrent program to implement the eco and all its revised items
3954: -- as the lifecycle has already reach the last phase for implementation
3955: IF g_debug_flag THEN

Line 4315: FROM eng_engineering_changes

4311: WHERE entity_name = G_ENG_CHANGE
4312: AND entity_id1 = p_change_id
4313: AND active_flag = 'Y'
4314: AND status_code = ( SELECT status_code
4315: FROM eng_engineering_changes
4316: WHERE change_id = p_change_id)
4317: AND rownum = 1;
4318:
4319: IF g_debug_flag THEN

Line 4473: l_curr_status_code eng_engineering_changes.status_code%TYPE;

4469: l_return_status VARCHAR2(1);
4470: l_msg_count NUMBER;
4471: l_msg_data VARCHAR2(2000);
4472:
4473: l_curr_status_code eng_engineering_changes.status_code%TYPE;
4474: l_curr_status_type eng_engineering_changes.status_type%TYPE;
4475: l_wf_route_id eng_lifecycle_statuses.change_wf_route_id%TYPE;
4476: l_wf_status eng_lifecycle_statuses.workflow_status%TYPE;
4477: BEGIN

Line 4474: l_curr_status_type eng_engineering_changes.status_type%TYPE;

4470: l_msg_count NUMBER;
4471: l_msg_data VARCHAR2(2000);
4472:
4473: l_curr_status_code eng_engineering_changes.status_code%TYPE;
4474: l_curr_status_type eng_engineering_changes.status_type%TYPE;
4475: l_wf_route_id eng_lifecycle_statuses.change_wf_route_id%TYPE;
4476: l_wf_status eng_lifecycle_statuses.workflow_status%TYPE;
4477: BEGIN
4478: -- Standard Start of API savepoint

Line 4524: FROM eng_engineering_changes

4520: IF (p_object_name = G_ENG_CHANGE) THEN
4521: -- Get the current phase of the change header
4522: SELECT status_code, status_type
4523: INTO l_curr_status_code, l_curr_status_type
4524: FROM eng_engineering_changes
4525: WHERE change_id = p_change_id;
4526:
4527: -- Get the workflow route id and status for the current phase
4528: SELECT change_wf_route_id, workflow_status

Line 4851: l_chg_appr_status eng_engineering_changes.approval_status_type%TYPE;

4847: l_api_caller VARCHAR2(2) := NULL;
4848:
4849: l_action_id eng_change_actions.action_id%TYPE;
4850:
4851: l_chg_appr_status eng_engineering_changes.approval_status_type%TYPE;
4852: l_curr_appr_status eng_engineering_changes.approval_status_type%TYPE;
4853:
4854: l_cm_type_code eng_engineering_changes.change_mgmt_type_code%TYPE;
4855: l_base_cm_type_code eng_change_order_types.BASE_CHANGE_MGMT_TYPE_CODE%TYPE;

Line 4852: l_curr_appr_status eng_engineering_changes.approval_status_type%TYPE;

4848:
4849: l_action_id eng_change_actions.action_id%TYPE;
4850:
4851: l_chg_appr_status eng_engineering_changes.approval_status_type%TYPE;
4852: l_curr_appr_status eng_engineering_changes.approval_status_type%TYPE;
4853:
4854: l_cm_type_code eng_engineering_changes.change_mgmt_type_code%TYPE;
4855: l_base_cm_type_code eng_change_order_types.BASE_CHANGE_MGMT_TYPE_CODE%TYPE;
4856:

Line 4854: l_cm_type_code eng_engineering_changes.change_mgmt_type_code%TYPE;

4850:
4851: l_chg_appr_status eng_engineering_changes.approval_status_type%TYPE;
4852: l_curr_appr_status eng_engineering_changes.approval_status_type%TYPE;
4853:
4854: l_cm_type_code eng_engineering_changes.change_mgmt_type_code%TYPE;
4855: l_base_cm_type_code eng_change_order_types.BASE_CHANGE_MGMT_TYPE_CODE%TYPE;
4856:
4857: l_curr_status_code NUMBER;
4858: l_curr_status_type NUMBER;

Line 4881: l_chg_notice eng_engineering_changes.change_notice%TYPE;

4877: WHERE l.change_id = p_change_id
4878: AND s.status_code = l.status_code;
4879: l_line_status_type eng_change_statuses.status_type%TYPE;
4880:
4881: l_chg_notice eng_engineering_changes.change_notice%TYPE;
4882: l_org_id eng_engineering_changes.organization_id%TYPE;
4883: l_request_id NUMBER;
4884:
4885: l_imp_eco_flag VARCHAR2(1) := 'N';

Line 4882: l_org_id eng_engineering_changes.organization_id%TYPE;

4878: AND s.status_code = l.status_code;
4879: l_line_status_type eng_change_statuses.status_type%TYPE;
4880:
4881: l_chg_notice eng_engineering_changes.change_notice%TYPE;
4882: l_org_id eng_engineering_changes.organization_id%TYPE;
4883: l_request_id NUMBER;
4884:
4885: l_imp_eco_flag VARCHAR2(1) := 'N';
4886:

Line 4977: FROM eng_engineering_changes eec,

4973: SELECT eec.status_code, eec.promote_status_code, eec.change_mgmt_type_code,
4974: ecot.base_change_mgmt_type_code
4975: INTO l_curr_status_code, l_next_status_code, l_cm_type_code,
4976: l_base_cm_type_code
4977: FROM eng_engineering_changes eec,
4978: eng_change_order_types ecot
4979: WHERE eec.change_id = p_change_id
4980: AND ecot.change_order_type_id = eec.change_order_type_id;
4981:

Line 5064: FROM eng_engineering_changes

5060:
5061: -- Get the required parameters before calling concurrent program for implementing ECO
5062: SELECT change_notice, organization_id
5063: INTO l_chg_notice, l_org_id
5064: FROM eng_engineering_changes
5065: WHERE change_id = p_change_id;
5066:
5067: -- If so, submit concurrent program to implement the eco and all its revised items
5068: -- as the lifecycle has already reach the last phase for implementation

Line 5107: UPDATE eng_engineering_changes

5103: END IF;
5104:
5105: -- ATG Project
5106: -- Putting the request id flag in the implementation_req_id field
5107: UPDATE eng_engineering_changes
5108: SET implementation_req_id = l_request_id
5109: WHERE change_id = p_change_id;
5110: END IF;
5111:

Line 5120: UPDATE eng_engineering_changes

5116: l_flag_imp_failed := 'Y';
5117:
5118: IF (p_api_caller = 'WF') THEN
5119: -- Log implementation failure message
5120: UPDATE eng_engineering_changes
5121: SET status_type = G_ENG_IMP_FAILED,
5122: last_update_date = sysdate,
5123: last_updated_by = l_fnd_user_id,
5124: last_update_login = l_fnd_login_id

Line 5200: UPDATE eng_engineering_changes

5196: Write_Debug('l_request_id : ' || l_request_id );
5197: END IF;
5198:
5199: -- Update change header status_type
5200: UPDATE eng_engineering_changes
5201: SET status_type = G_ENG_IMP_IN_PROGRESS,
5202: last_update_date = sysdate,
5203: last_updated_by = l_fnd_user_id,
5204: last_update_login = l_fnd_login_id

Line 5330: FROM eng_engineering_changes

5326: -- Check if the change category is NIR, phase is on last implement phase
5327: -- and header approval status has not been set to APPROVED
5328: SELECT approval_status_type
5329: INTO l_curr_appr_status
5330: FROM eng_engineering_changes
5331: where change_id = p_change_id;
5332:
5333: IF ( l_base_cm_type_code = G_ENG_NEW_ITEM_REQ
5334: AND l_curr_phase_sn = l_max_phase_sn

Line 5480: FROM eng_engineering_changes eec,

5476: SELECT eec.change_mgmt_type_code, eec.change_notice, eec.organization_id,
5477: ecot.base_change_mgmt_type_code
5478: INTO l_cm_type_code, l_chg_notice, l_org_id,
5479: l_base_cm_type_code
5480: FROM eng_engineering_changes eec,
5481: eng_change_order_types ecot
5482: WHERE eec.change_id = p_change_id
5483: AND ecot.change_order_type_id = eec.change_order_type_id;
5484:

Line 5550: FROM eng_engineering_changes

5546: -- Find the promotion phase in the order of the following priority
5547: -- 1. promote_status_code in the change header (saved by promote action)
5548: SELECT promote_status_code
5549: INTO l_next_status_code
5550: FROM eng_engineering_changes
5551: WHERE change_id = p_change_id;
5552:
5553: -- 2. auto_promote_status in the lifecycle table
5554: IF ( l_next_status_code IS NULL ) THEN

Line 5665: UPDATE eng_engineering_changes

5661: AND active_flag = 'Y'
5662: AND rownum = 1;
5663:
5664: -- Reset promotion_status_code for the change header
5665: UPDATE eng_engineering_changes
5666: SET promote_status_code = NULL,
5667: last_update_date = sysdate,
5668: last_updated_by = l_fnd_user_id,
5669: last_update_login = l_fnd_login_id

Line 5672: Write_Debug('After updating eng_engineering_changes.');

5668: last_updated_by = l_fnd_user_id,
5669: last_update_login = l_fnd_login_id
5670: WHERE change_id = p_change_id;
5671: IF g_debug_flag THEN
5672: Write_Debug('After updating eng_engineering_changes.');
5673: Write_Debug(' Row count = ' || SQL%ROWCOUNT);
5674: END IF;
5675:
5676: IF g_debug_flag THEN

Line 5819: UPDATE eng_engineering_changes

5815: Write_Debug('After updating the current phase');
5816: END IF;
5817:
5818: -- Reset promotion_status_code for the change header
5819: UPDATE eng_engineering_changes
5820: SET promote_status_code = NULL,
5821: last_update_date = sysdate,
5822: last_updated_by = l_fnd_user_id,
5823: last_update_login = l_fnd_login_id

Line 5962: UPDATE eng_engineering_changes

5958: Write_Debug('Case 6: Concurrent Program Failure');
5959: END IF;
5960:
5961: -- Log implementation failure message
5962: UPDATE eng_engineering_changes
5963: SET status_type = G_ENG_IMP_FAILED,
5964: promote_status_code = NULL,
5965: last_update_date = sysdate,
5966: last_updated_by = l_fnd_user_id,

Line 6052: UPDATE eng_engineering_changes

6048: l_next_status_code := l_auto_demote_status;
6049:
6050: -- must set header phase to last implement phase before demotion
6051: -- just to make the CO implement phase demotion as a normal demotion
6052: UPDATE eng_engineering_changes
6053: SET status_type = G_ENG_IMPLEMENTED,
6054: status_code = l_last_status_code,
6055: last_update_date = sysdate,
6056: last_updated_by = l_fnd_user_id,

Line 6102: UPDATE eng_engineering_changes

6098: ELSE -- no auto demotion for implement phase, set to previous phase
6099:
6100: NULL;
6101: /*
6102: UPDATE eng_engineering_changes
6103: SET status_type = p_status_code, --G_ENG_IMP_FAILED
6104: promote_status_code = NULL,
6105: last_update_date = sysdate,
6106: last_updated_by = l_fnd_user_id,

Line 6519: l_cm_type_code eng_engineering_changes.change_mgmt_type_code%TYPE;

6515:
6516: l_fnd_user_id NUMBER := TO_NUMBER(FND_PROFILE.VALUE('USER_ID'));
6517: l_fnd_login_id NUMBER := TO_NUMBER(FND_PROFILE.VALUE('LOGIN_ID'));
6518:
6519: l_cm_type_code eng_engineering_changes.change_mgmt_type_code%TYPE;
6520: l_base_cm_type_code eng_change_order_types.BASE_CHANGE_MGMT_TYPE_CODE%TYPE;
6521: l_bug_number NUMBER := 0;
6522:
6523: l_initial_phase_sn eng_lifecycle_statuses.sequence_number%TYPE;

Line 6526: l_status_type eng_engineering_changes.status_type%TYPE;

6522:
6523: l_initial_phase_sn eng_lifecycle_statuses.sequence_number%TYPE;
6524:
6525: l_status_code eng_lifecycle_statuses.status_code%TYPE;
6526: l_status_type eng_engineering_changes.status_type%TYPE;
6527: l_sequence_number eng_lifecycle_statuses.sequence_number%TYPE;
6528: l_wf_route_id eng_lifecycle_statuses.change_wf_route_id%TYPE;
6529:
6530: l_pls_block VARCHAR2(5000);

Line 6534: l_change_notice eng_engineering_changes.change_notice%TYPE;

6530: l_pls_block VARCHAR2(5000);
6531:
6532: -- for auto-propagation if it's defined for first phase
6533: l_auto_prop_flag eng_type_org_properties.AUTO_PROPAGATE_FLAG%TYPE;
6534: l_change_notice eng_engineering_changes.change_notice%TYPE;
6535: l_hierarchy_name per_organization_structures.name%TYPE;
6536: l_org_name org_organization_definitions.organization_name%TYPE;
6537: l_row_cnt NUMBER := 0;
6538: CURSOR c_orgProp IS

Line 6544: eng_engineering_changes ec,

6540: ec.change_notice,
6541: pos.name,
6542: ood.name organization_name
6543: FROM eng_type_org_properties op,
6544: eng_engineering_changes ec,
6545: per_organization_structures pos,
6546: hr_all_organization_units_tl ood
6547: WHERE ec.change_id = p_change_id
6548: --AND ec.PLM_OR_ERP_CHANGE = 'PLM'

Line 6640: -- and set it in the eng_engineering_changes table

6636: IF g_debug_flag THEN
6637: Write_Debug('After: getting first phase from lifecycle definitions');
6638: END IF;
6639:
6640: -- and set it in the eng_engineering_changes table
6641: UPDATE eng_engineering_changes
6642: SET status_code = l_status_code,
6643: status_type = l_status_type,
6644: initiation_date = sysdate

Line 6641: UPDATE eng_engineering_changes

6637: Write_Debug('After: getting first phase from lifecycle definitions');
6638: END IF;
6639:
6640: -- and set it in the eng_engineering_changes table
6641: UPDATE eng_engineering_changes
6642: SET status_code = l_status_code,
6643: status_type = l_status_type,
6644: initiation_date = sysdate
6645: WHERE change_id = p_change_id;

Line 6655: FROM eng_engineering_changes

6651: /*
6652: -- Get the current phase from change header
6653: SELECT status_code, status_type
6654: INTO l_status_code, l_status_type
6655: FROM eng_engineering_changes
6656: WHERE change_id = p_change_id;
6657:
6658: IF g_debug_flag THEN
6659: Write_Debug('After: getting current phase from change header');

Line 6805: FROM eng_engineering_changes eec,

6801: -- raise business event for SUBMIT action
6802: -- Select cm type and base type code for upcoming API calls
6803: SELECT eec.change_mgmt_type_code, ecot.base_change_mgmt_type_code
6804: INTO l_cm_type_code, l_base_cm_type_code
6805: FROM eng_engineering_changes eec,
6806: eng_change_order_types ecot
6807: WHERE eec.change_id = p_change_id
6808: AND ecot.change_order_type_id = eec.change_order_type_id;
6809:

Line 7263: l_cm_type_code eng_engineering_changes.CHANGE_MGMT_TYPE_CODE%TYPE;

7259: l_msg_data VARCHAR2(2000);
7260:
7261: l_doc_lc_object_flag BOOLEAN := FALSE ;
7262:
7263: l_cm_type_code eng_engineering_changes.CHANGE_MGMT_TYPE_CODE%TYPE;
7264: l_base_cm_type_code eng_change_order_types.BASE_CHANGE_MGMT_TYPE_CODE%TYPE;
7265:
7266: l_next_status_code NUMBER;
7267: l_reset_status_code NUMBER;

Line 7270: l_curr_status_type eng_engineering_changes.status_type%TYPE;

7266: l_next_status_code NUMBER;
7267: l_reset_status_code NUMBER;
7268: l_last_status_code NUMBER;
7269: l_max_phase_sn eng_lifecycle_statuses.sequence_number%TYPE;
7270: l_curr_status_type eng_engineering_changes.status_type%TYPE;
7271:
7272: -- l_last_imp_flag VARCHAR2(1) := 'N';
7273:
7274:

Line 7283: FROM eng_engineering_changes eec,

7279: SELECT eec.status_code
7280: , eec.promote_status_code
7281: , eec.change_mgmt_type_code
7282: , ecot.base_change_mgmt_type_code
7283: FROM eng_engineering_changes eec,
7284: eng_change_order_types ecot
7285: WHERE eec.change_id = c_change_id
7286: AND ecot.change_order_type_id = eec.change_order_type_id ;
7287:

Line 7838: FROM ENG_ENGINEERING_CHANGES ch

7834: , l_fnd_login_id
7835: , cur_phase.ITERATION_NUMBER
7836: , 'S'
7837: , change_type.CHANGE_WF_ROUTE_ID
7838: FROM ENG_ENGINEERING_CHANGES ch
7839: , ENG_LIFECYCLE_STATUSES cur_phase
7840: , ENG_LIFECYCLE_STATUSES change_type
7841: WHERE change_type.entity_id1 = p_change_type_id
7842: AND change_type.entity_name = 'ENG_CHANGE_TYPE'

Line 7924: FROM ENG_ENGINEERING_CHANGES ch

7920: , l_fnd_login_id
7921: , 0 -- ITERATION_NUMBER
7922: , 'S' -- ACTIVE_FLAG
7923: , change_type.CHANGE_WF_ROUTE_ID
7924: FROM ENG_ENGINEERING_CHANGES ch
7925: , ENG_LIFECYCLE_STATUSES change_type
7926: WHERE change_type.entity_id1 = p_change_type_id
7927: AND change_type.entity_name = 'ENG_CHANGE_TYPE'
7928: AND ch.CHANGE_ORDER_TYPE_ID = change_type.entity_id1

Line 7976: , ENG_ENGINEERING_CHANGES ch

7972: , l_fnd_login_id
7973: FROM ENG_STATUS_PROPERTIES phase_prop_setup
7974: , ENG_LIFECYCLE_STATUSES lc_phase_setup
7975: , ENG_LIFECYCLE_STATUSES lc_phase
7976: , ENG_ENGINEERING_CHANGES ch
7977: WHERE lc_phase_setup.entity_id1 = p_change_type_id
7978: AND lc_phase_setup.entity_name = 'ENG_CHANGE_TYPE'
7979: AND phase_prop_setup.CHANGE_LIFECYCLE_STATUS_ID = lc_phase_setup.CHANGE_LIFECYCLE_STATUS_ID
7980: AND ch.CHANGE_ORDER_TYPE_ID = lc_phase_setup.ENTITY_ID1

Line 8019: FROM ENG_ENGINEERING_CHANGES ch

8015: UPDATE ENG_LIFECYCLE_STATUSES
8016: SET ACTIVE_FLAG = 'D'
8017: WHERE CHANGE_LIFECYCLE_STATUS_ID IN (
8018: SELECT change_phase.CHANGE_LIFECYCLE_STATUS_ID
8019: FROM ENG_ENGINEERING_CHANGES ch
8020: , ENG_LIFECYCLE_STATUSES cur_phase
8021: , ENG_LIFECYCLE_STATUSES change_phase
8022: WHERE ch.CHANGE_ORDER_TYPE_ID = p_change_type_id
8023: AND ch.STATUS_TYPE NOT IN (5, 6, 11) -- exclude cancel, implemented, completed

Line 8041: FROM ENG_ENGINEERING_CHANGES ch

8037: AND lc_phase_setup.STATUS_CODE = change_phase.STATUS_CODE
8038: )
8039: UNION ALL
8040: SELECT change_phase.CHANGE_LIFECYCLE_STATUS_ID
8041: FROM ENG_ENGINEERING_CHANGES ch
8042: , ENG_LIFECYCLE_STATUSES change_phase
8043: WHERE ch.CHANGE_ORDER_TYPE_ID = p_change_type_id
8044: AND ch.STATUS_CODE = 0 -- DRAFT
8045: AND ch.STATUS_TYPE NOT IN (5, 6, 11) -- exclude cancel, implemented, completed

Line 8077: FROM ENG_ENGINEERING_CHANGES ch

8073: UPDATE ENG_LIFECYCLE_STATUSES lc_phase
8074: SET lc_phase.ACTIVE_FLAG = 'Y'
8075: WHERE lc_phase.CHANGE_LIFECYCLE_STATUS_ID IN (
8076: SELECT added_change_phase.CHANGE_LIFECYCLE_STATUS_ID
8077: FROM ENG_ENGINEERING_CHANGES ch
8078: , ENG_LIFECYCLE_STATUSES added_change_phase
8079: WHERE ch.CHANGE_ORDER_TYPE_ID = p_change_type_id
8080: AND ch.STATUS_TYPE NOT IN (5, 6, 11) -- exclude cancel, implemented, completed
8081: AND added_change_phase.entity_name = G_ENG_CHANGE