[Home] [Help]
PACKAGE BODY: APPS.OZF_PROD_RELN_PKG
Source
1 PACKAGE BODY OZF_Prod_Reln_PKG as
2 /* $Header: ozftdprb.pls 120.0 2005/06/01 01:00:32 appldev noship $ */
3 -- ===============================================================
4 -- Start of Comments
5 -- Package name
6 -- OZF_Prod_Reln_PKG
7 -- Purpose
8 --
9 -- History
10 --
11 -- NOTE
12 --
13 -- This Api is generated with Latest version of
14 -- Rosetta, where g_miss indicates NULL and
15 -- NULL indicates missing value. Rosetta Version 1.55
16 -- End of Comments
17 -- ===============================================================
18
19
20 G_PKG_NAME CONSTANT VARCHAR2(30):= 'OZF_Prod_Reln_PKG';
21 G_FILE_NAME CONSTANT VARCHAR2(12) := 'ozftrb.b.pls';
22
23
24
25
26 -- ========================================================
27 --
28 -- NAME
29 -- Insert_Row
30 --
31 -- PURPOSE
32 --
33 -- NOTES
34 --
35 -- HISTORY
36 --
37 -- ========================================================
38 PROCEDURE Insert_Row(
39 px_discount_product_reln_id IN OUT NOCOPY NUMBER,
40 p_offer_discount_line_id NUMBER,
41 p_off_discount_product_id NUMBER,
42 p_creation_date DATE,
43 p_created_by NUMBER,
44 p_last_update_date DATE,
45 p_last_updated_by NUMBER,
46 p_last_update_login NUMBER,
47 px_object_version_number IN OUT NOCOPY NUMBER)
48
49 IS
50 x_rowid VARCHAR2(30);
51
52
53 BEGIN
54
55
56 px_object_version_number := nvl(px_object_version_number, 1);
57
58
59 INSERT INTO ozf_discount_product_reln(
60 discount_product_reln_id,
61 offer_discount_line_id,
62 off_discount_product_id,
63 creation_date,
64 created_by,
65 last_update_date,
66 last_updated_by,
67 last_update_login,
68 object_version_number
69 ) VALUES (
70 DECODE( px_discount_product_reln_id, FND_API.G_MISS_NUM, NULL, px_discount_product_reln_id),
71 DECODE( p_offer_discount_line_id, FND_API.G_MISS_NUM, NULL, p_offer_discount_line_id),
72 DECODE( p_off_discount_product_id, FND_API.G_MISS_NUM, NULL, p_off_discount_product_id),
73 DECODE( p_creation_date, FND_API.G_MISS_DATE, SYSDATE, p_creation_date),
74 DECODE( p_created_by, FND_API.G_MISS_NUM, FND_GLOBAL.USER_ID, p_created_by),
75 DECODE( p_last_update_date, FND_API.G_MISS_DATE, SYSDATE, p_last_update_date),
76 DECODE( p_last_updated_by, FND_API.G_MISS_NUM, FND_GLOBAL.USER_ID, p_last_updated_by),
77 DECODE( p_last_update_login, FND_API.G_MISS_NUM, FND_GLOBAL.CONC_LOGIN_ID, p_last_update_login),
78 DECODE( px_object_version_number, FND_API.G_MISS_NUM, 1, px_object_version_number));
79
80 END Insert_Row;
81
82
83
84
85 -- ========================================================
86 --
87 -- NAME
88 -- Update_Row
89 --
90 -- PURPOSE
91 --
92 -- NOTES
93 --
94 -- HISTORY
95 --
96 -- ========================================================
97 PROCEDURE Update_Row(
98 p_discount_product_reln_id NUMBER,
99 p_offer_discount_line_id NUMBER,
100 p_off_discount_product_id NUMBER,
101 p_last_update_date DATE,
102 p_last_updated_by NUMBER,
103 p_last_update_login NUMBER,
104 p_object_version_number IN NUMBER)
105
106
107 IS
108 BEGIN
109 Update ozf_discount_product_reln
110 SET
111 discount_product_reln_id = DECODE( p_discount_product_reln_id, null, discount_product_reln_id, FND_API.G_MISS_NUM, null, p_discount_product_reln_id),
112 offer_discount_line_id = DECODE( p_offer_discount_line_id, null, offer_discount_line_id, FND_API.G_MISS_NUM, null, p_offer_discount_line_id),
113 off_discount_product_id = DECODE( p_off_discount_product_id, null, off_discount_product_id, FND_API.G_MISS_NUM, null, p_off_discount_product_id),
114 last_update_date = DECODE( p_last_update_date, to_date(NULL), last_update_date, FND_API.G_MISS_DATE, to_date(NULL), p_last_update_date),
115 last_updated_by = DECODE( p_last_updated_by, null, last_updated_by, FND_API.G_MISS_NUM, null, p_last_updated_by),
116 last_update_login = DECODE( p_last_update_login, null, last_update_login, FND_API.G_MISS_NUM, null, p_last_update_login),
117 object_version_number = nvl(p_object_version_number,0) + 1
118 WHERE discount_product_reln_id = p_discount_product_reln_id
119 AND object_version_number = p_object_version_number;
120
121
122 IF (SQL%NOTFOUND) THEN
123 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
124 END IF;
125
126
127 END Update_Row;
128
129
130
131
132 -- ========================================================
133 --
134 -- NAME
135 -- Delete_Row
136 --
137 -- PURPOSE
138 --
139 -- NOTES
140 --
141 -- HISTORY
142 --
143 -- ========================================================
144 PROCEDURE Delete_Row(
145 p_discount_product_reln_id NUMBER,
146 p_object_version_number NUMBER)
147 IS
148 BEGIN
149 DELETE FROM ozf_discount_product_reln
150 WHERE discount_product_reln_id = p_discount_product_reln_id
151 AND object_version_number = p_object_version_number;
152 If (SQL%NOTFOUND) then
153 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
154 End If;
155 END Delete_Row ;
156
157 -- ========================================================
158 --
159 -- NAME
160 -- Delete
161 --
162 -- PURPOSE
163 -- Used for hard deleting a relationship if the Discount line is deleted
164 -- NOTES
165 --
166 -- HISTORY
167 --
168 -- ========================================================
169
170 PROCEDURE Delete(
171 p_offer_discount_line_id NUMBER
172 )
173 IS
174 BEGIN
175 DELETE FROM ozf_discount_product_reln
176 WHERE offer_discount_line_id = p_offer_discount_line_id;
177
178 If (SQL%NOTFOUND) then
179 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
180 End If;
181
182 END DELETE;
183
184
185
186 -- ========================================================
187 --
188 -- NAME
189 -- Lock_Row
190 --
191 -- PURPOSE
192 --
193 -- NOTES
194 --
195 -- HISTORY
196 --
197 -- ========================================================
198 PROCEDURE Lock_Row(
199 p_discount_product_reln_id NUMBER,
200 p_object_version_number NUMBER)
201 IS
202 CURSOR C IS
203 SELECT *
204 FROM ozf_discount_product_reln
205 WHERE discount_product_reln_id = p_discount_product_reln_id
206 AND object_version_number = p_object_version_number
207 FOR UPDATE OF discount_product_reln_id NOWAIT;
208 Recinfo C%ROWTYPE;
209 BEGIN
210
211 OPEN c;
212 FETCH c INTO Recinfo;
213 IF (c%NOTFOUND) THEN
214 CLOSE c;
215 AMS_Utility_PVT.error_message ('AMS_API_RECORD_NOT_FOUND');
216 RAISE FND_API.g_exc_error;
217 END IF;
218 CLOSE c;
219 END Lock_Row;
220
221
222
223 END OZF_Prod_Reln_PKG;