DBA Data[Home] [Help]

PACKAGE: APPS.ENG_REVISED_ITEM_UTIL

Source


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;