1 PACKAGE AHL_MM_CANNIBALIZATION_PVT AUTHID CURRENT_USER AS
2 /* $Header: AHLVCANS.pls 120.0.12020000.2 2012/12/14 07:43:38 shnatu noship $ */
3
4 G_APP_NAME CONSTANT VARCHAR2(3) := 'AHL';
5 G_PKG_NAME CONSTANT VARCHAR2(30) := 'AHL_MM_CANNIBALIZATION_PVT';
6
7 -- Record for Cannibalization Input
8 TYPE cannibalization_rec_type IS RECORD
9 (
10 demand_asm_id NUMBER,
11 supply_instance_id NUMBER,
12 supply_nha_inst_id NUMBER,
13 supply_visit_id NUMBER,
14 supply_mc_header_id NUMBER,
15 supply_pos_key NUMBER,
16 reservation_id NUMBER
17 );
18
19 ------------------------------------------------------------------------------------
20 -- Procedure name : Launch_NR_Notification
21 -- Function : Launches a Workflow notification for NR of type
22 -- Description : This will send Notofication to CMRO Default Approver
23 -- When the Non-routine is created for Cannibalization
24 -- or Replace Cannibalization
25 ------------------------------------------------------------------------------------
26 PROCEDURE Launch_NR_Notification (
27 p_sr_incident_id IN NUMBER,
28 p_sr_profile_name IN VARCHAR2,
29 p_commit IN VARCHAR2 := FND_API.G_FALSE,
30 p_wf_sr_obj IN VARCHAR2 ,
31 p_wf_sr_sbj IN VARCHAR2 ,
32 x_item_key OUT NOCOPY VARCHAR2,
33 x_return_status OUT NOCOPY VARCHAR2
34 );
35
36
37 --------------------------------------------------------------------
38 -- Procedure name : create_nr_workorder
39 -- Type : Private
40 -- Function : Creates the Non-routine WO for cannibalization
41 -- Parameters :
42 --
43 -- Standard IN Parameters :
44 -- p_api_version IN NUMBER Required
45 -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
46 -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
47 -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
48 -- p_default IN VARCHAR2 Default FND_API.G_TRUE
49 -- p_module_type IN VARCHAR2 Default NULL.
50 --
51 -- Standard OUT Parameters :
52 -- x_return_status OUT VARCHAR2 Required
53 -- x_msg_count OUT NUMBER Required
54 -- x_msg_data OUT VARCHAR2 Required
55 --
56 -- process_cannibalization Parameters:
57 -- p_x_sr_task_rec IN OUT AHL_UMP_NONROUTINES_PVT.NonRoutine_Rec_Type Required
58 -- p_visit_id IN NUMBER
59 -- Input parameters in a record for NR WO creation and Visit_id to associate
60 --
61 -- Version :
62 -- Initial Version 1.0
63 --
64 -- Description : 1. Creates the Non-routine
65 -- 2. Create the Visit Tasks for NR Wo
66 -- 3. Release Task created in Step 2 and creates WO
67 -------------------------------------------------------------------
68
69 PROCEDURE create_nr_workorder (
70 p_api_version IN NUMBER,
71 p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
72 p_commit IN VARCHAR2 := Fnd_Api.g_false,
73 p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
74 p_module_type IN VARCHAR2 := 'API',
75 x_return_status OUT NOCOPY VARCHAR2,
76 x_msg_count OUT NOCOPY NUMBER,
77 x_msg_data OUT NOCOPY VARCHAR2,
78 p_x_sr_task_rec IN OUT NOCOPY ahl_ump_nonroutines_pvt.nonroutine_rec_type,
79 p_visit_id IN NUMBER,
80 p_orig_task_id IN NUMBER,
81 p_rts_flag IN VARCHAR2
82 );
83
84 --------------------------------------------------------------------
85 -- Procedure name : process_cannibalization
86 -- Type : Private
87 -- Function : To do cannibalization for a given item instance from visit unit
88 -- Parameters :
89 --
90 -- Standard IN Parameters :
91 -- p_api_version IN NUMBER Required
92 -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
93 -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
94 -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
95 -- p_default IN VARCHAR2 Default FND_API.G_TRUE
96 -- p_module_type IN VARCHAR2 Default NULL.
97 --
98 -- Standard OUT Parameters :
99 -- x_return_status OUT VARCHAR2 Required
100 -- x_msg_count OUT NUMBER Required
101 -- x_msg_data OUT VARCHAR2 Required
102 --
103 -- process_cannibalization Parameters:
104 -- p_can_input_rec IN OUT can_input_rec_type Required
105 -- Input parameters in a record for cannibalization
106 --
107 -- Version :
108 -- Initial Version 1.0
109 --
110 -- Description : 1. Creates Two NR Wos one in context supply item_instance_id and other in
111 -- context of visit header unit.
112 -- 2. Creates WO - Wo reservation between demand ASM wokorder and
113 -- NR WO ONE.
114 -- 3. Creates supply item_instance as position based Material Requirement
115 -- for NR WO TWO
116 -------------------------------------------------------------------
117
118 PROCEDURE process_cannibalization
119 (
120 p_api_version IN NUMBER,
121 p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
122 p_commit IN VARCHAR2 := FND_API.G_FALSE,
123 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
124 p_module_type IN VARCHAR2,
125 x_return_status OUT NOCOPY VARCHAR2,
126 x_msg_count OUT NOCOPY NUMBER,
127 x_msg_data OUT NOCOPY VARCHAR2,
128 p_cannibalization_rec IN OUT NOCOPY cannibalization_rec_type
129 );
130
131 END AHL_MM_CANNIBALIZATION_PVT;