1 PACKAGE ENG_Revised_Item_Util AUTHID CURRENT_USER AS
2 /* $Header: ENGURITS.pls 120.2.12010000.3 2009/06/17 05:55:17 vggarg ship $ */
3
4 -- Attributes global constants
5
6 /*G_USING_ASSEMBLY CONSTANT NUMBER := 1;*/
7 G_CHANGE_NOTICE CONSTANT NUMBER := 2;
8 G_ORGANIZATION CONSTANT NUMBER := 3;
9 G_REVISED_ITEM CONSTANT NUMBER := 4;
10 G_LAST_UPDATE_DATE CONSTANT NUMBER := 5;
11 G_LAST_UPDATED_BY CONSTANT NUMBER := 6;
12 G_CREATION_DATE CONSTANT NUMBER := 7;
13 G_CREATED_BY CONSTANT NUMBER := 8;
14 G_LAST_UPDATE_LOGIN CONSTANT NUMBER := 9;
15 G_IMPLEMENTATION_DATE CONSTANT NUMBER := 10;
16 G_CANCELLATION_DATE CONSTANT NUMBER := 11;
17 G_CANCEL_COMMENTS CONSTANT NUMBER := 12;
18 G_DISPOSITION_TYPE CONSTANT NUMBER := 13;
19 G_NEW_ITEM_REVISION CONSTANT NUMBER := 14;
20 G_EARLY_SCHEDULE_DATE CONSTANT NUMBER := 15;
21 G_ATTRIBUTE_CATEGORY CONSTANT NUMBER := 16;
22 G_ATTRIBUTE2 CONSTANT NUMBER := 17;
23 G_ATTRIBUTE3 CONSTANT NUMBER := 18;
24 G_ATTRIBUTE4 CONSTANT NUMBER := 19;
25 G_ATTRIBUTE5 CONSTANT NUMBER := 20;
26 G_ATTRIBUTE7 CONSTANT NUMBER := 21;
27 G_ATTRIBUTE8 CONSTANT NUMBER := 22;
28 G_ATTRIBUTE9 CONSTANT NUMBER := 23;
29 G_ATTRIBUTE11 CONSTANT NUMBER := 24;
30 G_ATTRIBUTE12 CONSTANT NUMBER := 25;
31 G_ATTRIBUTE13 CONSTANT NUMBER := 26;
32 G_ATTRIBUTE14 CONSTANT NUMBER := 27;
33 G_ATTRIBUTE15 CONSTANT NUMBER := 28;
34 G_STATUS_TYPE CONSTANT NUMBER := 29;
35 G_SCHEDULED_DATE CONSTANT NUMBER := 30;
36 G_BILL_SEQUENCE CONSTANT NUMBER := 31;
37 G_MRP_ACTIVE CONSTANT NUMBER := 32;
38 G_REQUEST CONSTANT NUMBER := 33;
39 G_PROGRAM_APPLICATION CONSTANT NUMBER := 34;
40 G_PROGRAM CONSTANT NUMBER := 35;
41 G_PROGRAM_UPDATE_DATE CONSTANT NUMBER := 36;
42 G_UPDATE_WIP CONSTANT NUMBER := 37;
43 G_USE_UP CONSTANT NUMBER := 38;
44 G_USE_UP_ITEM CONSTANT NUMBER := 39;
45 G_REVISED_ITEM_SEQUENCE CONSTANT NUMBER := 40;
46 G_USE_UP_PLAN_NAME CONSTANT NUMBER := 41;
47 G_DESCRIPTIVE_TEXT CONSTANT NUMBER := 42;
48 G_AUTO_IMPLEMENT_DATE CONSTANT NUMBER := 43;
49 G_ATTRIBUTE1 CONSTANT NUMBER := 44;
50 G_ATTRIBUTE6 CONSTANT NUMBER := 45;
51 G_ATTRIBUTE10 CONSTANT NUMBER := 46;
52 G_MAX_ATTR_ID CONSTANT NUMBER := 47;
53
54 -- Procedure cancel_revised_items
55 Procedure Cancel_Revised_Item
56 ( rev_item_seq IN NUMBER
57 , bill_seq_id IN NUMBER
58 , routing_seq_id IN NUMBER -- Added by MK on 09/01/2000
59 , user_id IN NUMBER
60 , login IN NUMBER
61 , change_order IN VARCHAR2
62 , cancel_comments IN VARCHAR2
63 , p_Mesg_Token_Tbl IN Error_Handler.Mesg_Token_Tbl_Type
64 , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
65 , x_return_status OUT NOCOPY VARCHAR2
66 );
67
68 PROCEDURE Query_Row
69 ( p_revised_item_id IN NUMBER
70 , p_organization_id IN NUMBER
71 , p_change_notice IN VARCHAR2
72 , p_start_eff_date IN DATE := NULL
73 , p_new_item_revision IN VARCHAR2
74 , p_new_routing_revision IN VARCHAR2 -- Added by MK
75 , p_from_end_item_number IN VARCHAR2 := NULL
76 , p_alternate_designator IN VARCHAR2 := NULL -- To fix 2869146
77 , x_revised_item_rec OUT NOCOPY Eng_Eco_Pub.Revised_Item_Rec_Type
78 , x_rev_item_unexp_rec OUT NOCOPY Eng_Eco_Pub.Rev_Item_Unexposed_Rec_Type
79 , x_Return_status OUT NOCOPY VARCHAR2
80 );
81
82
83
84 PROCEDURE Perform_Writes( p_revised_item_rec IN
85 Eng_Eco_Pub.Revised_Item_Rec_Type
86 , p_rev_item_unexp_rec IN
87 Eng_Eco_Pub.Rev_Item_Unexposed_Rec_Type
88 , p_control_rec IN BOM_BO_Pub.Control_Rec_Type
89 := BOM_BO_PUB.G_DEFAULT_CONTROL_REC
90 , x_Mesg_Token_Tbl OUT NOCOPY
91 Error_Handler.Mesg_Token_Tbl_Type
92 , x_Return_Status OUT NOCOPY VARCHAR2
93 );
94
95
96 /********************************************************************
97 * API Name : Reschedule_Revised_Item
98 * API Type : Public PROCEDURE
99 * Purpose : API to reschedule the revised item.
100 * This API is called from the JAVA layer.
101 * Input : p_revised_item_sequence_id , p_effectivity_date
102 * Output : x_return_status
103 *********************************************************************/
104 PROCEDURE Reschedule_Revised_Item
105 ( p_api_version IN NUMBER := 1.0 --
106 , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE --
107 , p_commit IN VARCHAR2 := FND_API.G_FALSE --
108 , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL --
109 , p_debug IN VARCHAR2 := 'N' --
110 , p_output_dir IN VARCHAR2 := NULL --
111 , p_debug_filename IN VARCHAR2 := 'Resch_RevItem.log' --
112 , x_return_status OUT NOCOPY VARCHAR2 --
113 , x_msg_count OUT NOCOPY NUMBER --
114 , x_msg_data OUT NOCOPY VARCHAR2 --
115 , p_revised_item_sequence_id IN NUMBER
116 , p_effectivity_date IN DATE
117 );
118
119 ------------------------------------------------------------------------
120 -- API name : Copy_Revised_Item --
121 -- Type : Private --
122 -- Pre-reqs : None. --
123 -- Procedure : Propagates the specified ECO --
124 -- Parameters : --
125 -- IN : p_old_revised_item_seq_id NUMBER Required --
126 -- p_effectivity_date DATE Required --
127 -- OUT : x_new_revised_item_seq_id VARCHAR2(1) --
128 -- x_return_status VARCHAR2(30) --
129 -- Version : Current version 1.0 --
130 -- Initial version 1.0 --
131 -- --
132 -- Notes : This API is invoked only when a common bill has --
133 -- pending changes associated for its WIP supply type --
134 -- attributes and the common component in the source --
135 -- bill is being implemented. --
136 -- This API will create a revised item in the same --
137 -- status as the old revised item being passed as an --
138 -- input parameter. --
139 -- A copy of all the destination changes are then made --
140 -- to this revised item with the effectivity range of --
141 -- the component being implemented. --
142 ------------------------------------------------------------------------
143 PROCEDURE Copy_Revised_Item (
144 p_old_revised_item_seq_id IN NUMBER
145 , p_effectivity_date IN DATE
146 , x_new_revised_item_seq_id OUT NOCOPY NUMBER
147 -- , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
148 , x_return_status OUT NOCOPY VARCHAR2
149 );
150 -- Code changes for enhancement 6084027 start
151 /*****************************************************************************
152 * Added by vggarg on 09 Oct 2007
153 * Procedure : update_new_description
154 * Parameters IN : p_api_version, p_revised_item_sequence_id, p_new_description
155 * Purpose : Update the new_item_description column of the eng_revised_items table with the given value
156 *****************************************************************************/
157 PROCEDURE update_new_description
158 (
159 p_api_version IN NUMBER := 1.0
160 ,p_revised_item_sequence_id IN NUMBER
161 ,p_new_description mtl_system_items_b.description%TYPE
162 );
163 -- Code changes for enhancement 6084027 end
164
165 END ENG_Revised_Item_Util;