[Home] [Help]
PACKAGE BODY: APPS.OZF_OFFER_ADJ_TIER_PKG
Source
1 PACKAGE BODY OZF_Offer_Adj_Tier_PKG as
2 /* $Header: ozftoatb.pls 120.3 2005/08/03 01:55:38 appldev ship $ */
3 -- ===============================================================
4 -- Start of Comments
5 -- Package name
6 -- OZF_Offer_Adj_Tier_PKG
7 -- Purpose
8 --
9 -- History
10 -- Tue Aug 02 2005:10/45 PM RSSHARMA R12 changes.Added new Field for offer_discount_line_id
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_Offer_Adj_Tier_PKG';
21 G_FILE_NAME CONSTANT VARCHAR2(12) := 'offtadjb.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_offer_adjst_tier_id IN OUT NOCOPY NUMBER,
40 p_offer_adjustment_id NUMBER,
41 p_volume_offer_tiers_id NUMBER,
42 p_qp_list_header_id NUMBER,
43 p_discount_type_code VARCHAR2,
44 p_original_discount NUMBER,
45 p_modified_discount NUMBER,
46 p_offer_discount_line_id NUMBER,
47 p_last_update_date DATE,
48 p_last_updated_by NUMBER,
49 p_creation_date DATE,
50 p_created_by NUMBER,
51 p_last_update_login NUMBER,
52 px_object_version_number IN OUT NOCOPY NUMBER)
53
54 IS
55 x_rowid VARCHAR2(30);
56
57
58 BEGIN
59
60
61 px_object_version_number := nvl(px_object_version_number, 1);
62
63
64 INSERT INTO ozf_offer_adjustment_tiers(
65 offer_adjst_tier_id,
66 offer_adjustment_id,
67 volume_offer_tiers_id,
68 qp_list_header_id,
69 discount_type_code,
70 original_discount,
71 modified_discount,
72 offer_discount_line_id,
73 last_update_date,
74 last_updated_by,
75 creation_date,
76 created_by,
77 last_update_login,
78 object_version_number
79 ) VALUES (
80 DECODE(px_offer_adjst_tier_id, FND_API.G_MISS_NUM,NULL, px_offer_adjst_tier_id),
81 DECODE(p_offer_adjustment_id, FND_API.G_MISS_NUM, NULL, p_offer_adjustment_id),
82 decode(p_volume_offer_tiers_id, fnd_api.g_miss_num, null, p_volume_offer_tiers_id),
83 DECODE(p_qp_list_header_id, fnd_api.g_miss_num, null, p_qp_list_header_id),
84 DECODE(p_discount_type_code, FND_API.G_MISS_CHAR, NULL, p_discount_type_code),
85 decode(p_original_discount, FND_API.G_MISS_NUM, NULL, p_original_discount),
86 DECODE(p_modified_discount, FND_API.G_MISS_NUM, NULL, p_modified_discount),
87 decode(p_offer_discount_line_id , FND_API.G_MISS_NUM, NULL, p_offer_discount_line_id),
88 DECODE( p_last_update_date, FND_API.G_MISS_DATE, SYSDATE, p_last_update_date),
89 DECODE( p_last_updated_by, FND_API.G_MISS_NUM, FND_GLOBAL.USER_ID, p_last_updated_by),
90 DECODE( p_creation_date, FND_API.G_MISS_DATE, SYSDATE, p_creation_date),
91 DECODE( p_created_by, FND_API.G_MISS_NUM, FND_GLOBAL.USER_ID, p_created_by),
92 DECODE( p_last_update_login, FND_API.G_MISS_NUM, FND_GLOBAL.CONC_LOGIN_ID, p_last_update_login),
93 DECODE( px_object_version_number, FND_API.G_MISS_NUM, 1, px_object_version_number));
94
95 END Insert_Row;
96
97
98
99
100 -- ========================================================
101 --
102 -- NAME
103 -- Update_Row
104 --
105 -- PURPOSE
106 --
107 -- NOTES
108 --
109 -- HISTORY
110 --
111 -- ========================================================
112 PROCEDURE Update_Row(
113 p_offer_adjst_tier_id NUMBER,
114 p_offer_adjustment_id NUMBER,
115 p_volume_offer_tiers_id NUMBER,
116 p_qp_list_header_id NUMBER,
117 p_discount_type_code VARCHAR2,
118 p_original_discount NUMBER,
119 p_modified_discount NUMBER,
120 p_offer_discount_line_id NUMBER,
121 p_last_update_date DATE,
122 p_last_updated_by NUMBER,
123 p_last_update_login NUMBER,
124 px_object_version_number IN OUT NOCOPY NUMBER)
125
126 IS
127 BEGIN
128 Update ozf_offer_adjustment_tiers
129 SET
130 offer_adjst_tier_id = DECODE( p_offer_adjst_tier_id, null, offer_adjst_tier_id, FND_API.G_MISS_NUM, null, p_offer_adjst_tier_id),
131 offer_adjustment_id = DECODE( p_offer_adjustment_id, null, offer_adjustment_id, FND_API.G_MISS_NUM, null, p_offer_adjustment_id),
132 volume_offer_tiers_id = DECODE( p_volume_offer_tiers_id, null, volume_offer_tiers_id, FND_API.G_MISS_NUM, null, p_volume_offer_tiers_id),
133 qp_list_header_id = DECODE( p_qp_list_header_id, null, qp_list_header_id, FND_API.G_MISS_NUM, null, p_qp_list_header_id),
134 discount_type_code = DECODE( p_discount_type_code, null, discount_type_code, FND_API.g_miss_char, null, p_discount_type_code),
135 original_discount = DECODE( p_original_discount, null, original_discount, FND_API.G_MISS_NUM, null, p_original_discount),
136 modified_discount = DECODE( p_modified_discount, null, modified_discount, FND_API.G_MISS_NUM, null, p_modified_discount),
137 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),
138 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),
139 last_updated_by = DECODE( p_last_updated_by, null, last_updated_by, FND_API.G_MISS_NUM, null, p_last_updated_by),
140 last_update_login = DECODE( p_last_update_login, null, last_update_login, FND_API.G_MISS_NUM, null, p_last_update_login),
141 object_version_number = object_version_number + 1
142 WHERE offer_adjst_tier_id = p_offer_adjst_tier_id
143 AND object_version_number = px_object_version_number;
144
145
146 IF (SQL%NOTFOUND) THEN
147 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
148 END IF;
149
150 px_object_version_number := nvl(px_object_version_number,0) + 1;
151
152 END Update_Row;
153
154
155
156
157 -- ========================================================
158 --
159 -- NAME
160 -- Delete_Row
161 --
162 -- PURPOSE
163 --
164 -- NOTES
165 --
166 -- HISTORY
167 --
168 -- ========================================================
169 PROCEDURE Delete_Row(
170 p_offer_adjst_tier_id NUMBER,
171 p_object_version_number NUMBER)
172 IS
173 BEGIN
174 DELETE FROM ozf_offer_adjustment_tiers
175 WHERE offer_adjst_tier_id = p_offer_adjst_tier_id
176 AND object_version_number = p_object_version_number;
177 If (SQL%NOTFOUND) then
178 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
179 End If;
180 END Delete_Row ;
181
182
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_offer_adjst_tier_id NUMBER,
200 p_object_version_number NUMBER)
201 IS
202 CURSOR C IS
203 SELECT *
204 FROM ozf_offer_adjustment_tiers
205 WHERE offer_adjst_tier_id = p_offer_adjst_tier_id
206 AND object_version_number = p_object_version_number
207 FOR UPDATE OF offer_adjst_tier_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 OZF_Utility_PVT.error_message ('OZF_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_Offer_Adj_Tier_PKG;