28: ( p_bo_identifier IN VARCHAR2 := 'EAM'
29: , p_api_version_number IN NUMBER := 1.0
30: , p_init_msg_list IN BOOLEAN
31: , p_commit IN VARCHAR2
32: , p_work_clearance_header_rec IN EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type
33: , p_clearance_establishment_tbl IN EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type
34: , p_clearance_re_estabish_tbl IN EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type
35: , p_clearance_workorder_asso_tbl IN EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_tbl_type
36: , p_clearance_permit_asso_tbl IN EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_tbl_type
29: , p_api_version_number IN NUMBER := 1.0
30: , p_init_msg_list IN BOOLEAN
31: , p_commit IN VARCHAR2
32: , p_work_clearance_header_rec IN EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type
33: , p_clearance_establishment_tbl IN EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type
34: , p_clearance_re_estabish_tbl IN EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type
35: , p_clearance_workorder_asso_tbl IN EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_tbl_type
36: , p_clearance_permit_asso_tbl IN EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_tbl_type
37: , x_work_clearance_header_rec OUT NOCOPY EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type
30: , p_init_msg_list IN BOOLEAN
31: , p_commit IN VARCHAR2
32: , p_work_clearance_header_rec IN EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type
33: , p_clearance_establishment_tbl IN EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type
34: , p_clearance_re_estabish_tbl IN EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type
35: , p_clearance_workorder_asso_tbl IN EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_tbl_type
36: , p_clearance_permit_asso_tbl IN EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_tbl_type
37: , x_work_clearance_header_rec OUT NOCOPY EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type
38: , x_return_status OUT NOCOPY VARCHAR2
31: , p_commit IN VARCHAR2
32: , p_work_clearance_header_rec IN EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type
33: , p_clearance_establishment_tbl IN EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type
34: , p_clearance_re_estabish_tbl IN EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type
35: , p_clearance_workorder_asso_tbl IN EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_tbl_type
36: , p_clearance_permit_asso_tbl IN EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_tbl_type
37: , x_work_clearance_header_rec OUT NOCOPY EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type
38: , x_return_status OUT NOCOPY VARCHAR2
39: , x_msg_count OUT NOCOPY NUMBER
32: , p_work_clearance_header_rec IN EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type
33: , p_clearance_establishment_tbl IN EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type
34: , p_clearance_re_estabish_tbl IN EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type
35: , p_clearance_workorder_asso_tbl IN EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_tbl_type
36: , p_clearance_permit_asso_tbl IN EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_tbl_type
37: , x_work_clearance_header_rec OUT NOCOPY EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type
38: , x_return_status OUT NOCOPY VARCHAR2
39: , x_msg_count OUT NOCOPY NUMBER
40: , p_debug IN VARCHAR2
33: , p_clearance_establishment_tbl IN EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type
34: , p_clearance_re_estabish_tbl IN EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type
35: , p_clearance_workorder_asso_tbl IN EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_tbl_type
36: , p_clearance_permit_asso_tbl IN EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_tbl_type
37: , x_work_clearance_header_rec OUT NOCOPY EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type
38: , x_return_status OUT NOCOPY VARCHAR2
39: , x_msg_count OUT NOCOPY NUMBER
40: , p_debug IN VARCHAR2
41: , p_output_dir IN VARCHAR2
48:
49: l_return_status VARCHAR2(1);
50: l_msg_count NUMBER;
51: l_msg_data VARCHAR2(240);
52: lx_clearance_establishment_tbl EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type;
53: lx_clearance_re_estab_tbl EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type;
54: l_safety_wp_asso_tbl EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_tbl_type;
55: l_safety_wo_asso_tbl EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_tbl_type;
56: l_safety_assoc_rec EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_rec_type;
49: l_return_status VARCHAR2(1);
50: l_msg_count NUMBER;
51: l_msg_data VARCHAR2(240);
52: lx_clearance_establishment_tbl EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type;
53: lx_clearance_re_estab_tbl EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type;
54: l_safety_wp_asso_tbl EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_tbl_type;
55: l_safety_wo_asso_tbl EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_tbl_type;
56: l_safety_assoc_rec EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_rec_type;
57:
50: l_msg_count NUMBER;
51: l_msg_data VARCHAR2(240);
52: lx_clearance_establishment_tbl EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type;
53: lx_clearance_re_estab_tbl EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type;
54: l_safety_wp_asso_tbl EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_tbl_type;
55: l_safety_wo_asso_tbl EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_tbl_type;
56: l_safety_assoc_rec EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_rec_type;
57:
58: /* Error Handling Variables */
51: l_msg_data VARCHAR2(240);
52: lx_clearance_establishment_tbl EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type;
53: lx_clearance_re_estab_tbl EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type;
54: l_safety_wp_asso_tbl EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_tbl_type;
55: l_safety_wo_asso_tbl EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_tbl_type;
56: l_safety_assoc_rec EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_rec_type;
57:
58: /* Error Handling Variables */
59: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type ;
52: lx_clearance_establishment_tbl EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type;
53: lx_clearance_re_estab_tbl EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type;
54: l_safety_wp_asso_tbl EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_tbl_type;
55: l_safety_wo_asso_tbl EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_tbl_type;
56: l_safety_assoc_rec EAM_PROCESS_SAFETY_PUB.eam_safety_assoc_rec_type;
57:
58: /* Error Handling Variables */
59: l_token_tbl EAM_ERROR_MESSAGE_PVT.Token_Tbl_Type ;
60: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type ;
236: PROCEDURE WORK_CLEARANCE
237: ( p_validation_level IN NUMBER
238: , p_work_clearance_id IN NUMBER
239: , p_organization_id IN NUMBER
240: , p_work_clearance_header_rec IN EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type
241: , x_work_clearance_header_rec OUT NOCOPY EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type
242: , x_mesg_token_tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.MESG_TOKEN_TBL_TYPE
243: , x_return_status OUT NOCOPY VARCHAR2
244: )IS
237: ( p_validation_level IN NUMBER
238: , p_work_clearance_id IN NUMBER
239: , p_organization_id IN NUMBER
240: , p_work_clearance_header_rec IN EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type
241: , x_work_clearance_header_rec OUT NOCOPY EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type
242: , x_mesg_token_tbl OUT NOCOPY EAM_ERROR_MESSAGE_PVT.MESG_TOKEN_TBL_TYPE
243: , x_return_status OUT NOCOPY VARCHAR2
244: )IS
245:
252:
253:
254: l_workflow_enabled VARCHAR2(1) :='N';
255: l_work_clearance_id NUMBER :=p_work_clearance_header_rec.WORK_CLEARANCE_ID;
256: l_work_clearance_header_rec EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type :=p_work_clearance_header_rec;
257: l_old_wc_header_rec EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type;
258: l_out_wc_header_rec EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type;
259:
260:
253:
254: l_workflow_enabled VARCHAR2(1) :='N';
255: l_work_clearance_id NUMBER :=p_work_clearance_header_rec.WORK_CLEARANCE_ID;
256: l_work_clearance_header_rec EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type :=p_work_clearance_header_rec;
257: l_old_wc_header_rec EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type;
258: l_out_wc_header_rec EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type;
259:
260:
261: l_maintenance_object_source NUMBER :=1; -- To check if work flow is enabled
254: l_workflow_enabled VARCHAR2(1) :='N';
255: l_work_clearance_id NUMBER :=p_work_clearance_header_rec.WORK_CLEARANCE_ID;
256: l_work_clearance_header_rec EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type :=p_work_clearance_header_rec;
257: l_old_wc_header_rec EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type;
258: l_out_wc_header_rec EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type;
259:
260:
261: l_maintenance_object_source NUMBER :=1; -- To check if work flow is enabled
262: l_status_pending_event VARCHAR2(100) := 'oracle.apps.eam.clearance.status.change.pending';
619: *********************************************************************/
620: PROCEDURE RAISE_WORKFLOW_EVENTS
621: ( p_api_version IN NUMBER
622: , p_validation_level IN NUMBER
623: , p_eam_wc_rec IN EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type
624: , p_old_eam_wc_rec IN EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type
625: , p_approval_required IN BOOLEAN
626: , p_new_system_status IN NUMBER
627: , p_workflow_name IN VARCHAR2
620: PROCEDURE RAISE_WORKFLOW_EVENTS
621: ( p_api_version IN NUMBER
622: , p_validation_level IN NUMBER
623: , p_eam_wc_rec IN EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type
624: , p_old_eam_wc_rec IN EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type
625: , p_approval_required IN BOOLEAN
626: , p_new_system_status IN NUMBER
627: , p_workflow_name IN VARCHAR2
628: , p_workflow_process IN VARCHAR2
774: l_org_id NUMBER :=p_org_id;
775: -- l_permit_name_char VARCHAR2(240);
776: l_clearance_name NUMBER;
777:
778: l_wc_header_rec EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type;
779: l_out_wc_header_rec EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type;
780:
781: /* Error Handling Variables */
782: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type ;
775: -- l_permit_name_char VARCHAR2(240);
776: l_clearance_name NUMBER;
777:
778: l_wc_header_rec EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type;
779: l_out_wc_header_rec EAM_PROCESS_SAFETY_PUB.eam_clearance_header_rec_type;
780:
781: /* Error Handling Variables */
782: l_out_Mesg_Token_Tbl EAM_ERROR_MESSAGE_PVT.Mesg_Token_Tbl_Type ;
783: l_error_level NUMBER :=EAM_ERROR_MESSAGE_PVT.G_BO_LEVEL;
784: l_entity_index number :=1;
785:
786:
787: --Variables for copying estimation details
788: l_safety_estab_rec EAM_PROCESS_SAFETY_PUB.eam_establishment_rec_type;
789: l_establish_tbl EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type;
790: lx_establish_tbl EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type;
791:
792: CURSOR saf_establishment_cur IS
785:
786:
787: --Variables for copying estimation details
788: l_safety_estab_rec EAM_PROCESS_SAFETY_PUB.eam_establishment_rec_type;
789: l_establish_tbl EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type;
790: lx_establish_tbl EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type;
791:
792: CURSOR saf_establishment_cur IS
793: SELECT eed.*
786:
787: --Variables for copying estimation details
788: l_safety_estab_rec EAM_PROCESS_SAFETY_PUB.eam_establishment_rec_type;
789: l_establish_tbl EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type;
790: lx_establish_tbl EAM_PROCESS_SAFETY_PUB.eam_establishment_tbl_type;
791:
792: CURSOR saf_establishment_cur IS
793: SELECT eed.*
794: FROM eam_establishment_details eed