[Home] [Help]
PACKAGE BODY: APPS.OZF_QUAL_MARKET_OPTION_PKG
Source
1 PACKAGE BODY OZF_QUAL_MARKET_OPTION_PKG as
2 /* $Header: ozftqmob.pls 120.1 2005/08/24 02:59:23 rssharma noship $ */
3 -- ===============================================================
4 -- Start of Comments
5 -- Package name
6 -- OZF_QUAL_MARKET_OPTION_PKG
7 -- Purpose
8 --
9 -- History
10 -- Wed May 18 2005:11/57 AM RSSHARMA Added Insert_row and Update_row for Volume Offers
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_QUAL_MARKET_OPTION_PKG';
21 G_FILE_NAME CONSTANT VARCHAR2(12) := 'ozftqmob.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_qualifier_market_option_id IN OUT NOCOPY NUMBER
40 , p_offer_market_option_id NUMBER
41 , p_qp_qualifier_id NUMBER
42 , px_object_version_number IN OUT NOCOPY NUMBER
43 , p_last_update_date DATE
44 , p_last_updated_by NUMBER
45 , p_creation_date DATE
46 , p_created_by NUMBER
47 , p_last_update_login NUMBER
48 )
49 IS
50 x_rowid VARCHAR2(30);
51
52
53 BEGIN
54
55 px_object_version_number := nvl(px_object_version_number, 1);
56
57 INSERT INTO ozf_qualifier_market_option(
58 qualifier_market_option_id
59 , offer_market_option_id
60 , qp_qualifier_id
61 , object_version_number
62 , last_update_date
63 , last_updated_by
64 , creation_date
65 , created_by
66 , last_update_login
67 )
68 VALUES
69 (
70 DECODE( px_qualifier_market_option_id, FND_API.G_MISS_NUM, NULL, px_qualifier_market_option_id)
71 , DECODE( p_offer_market_option_id, FND_API.G_MISS_NUM, NULL, p_offer_market_option_id)
72 , DECODE( p_qp_qualifier_id, FND_API.G_MISS_NUM, NULL, p_qp_qualifier_id)
73 , DECODE( px_object_version_number, FND_API.G_MISS_NUM, 1, px_object_version_number)
74 , DECODE( p_last_update_date, FND_API.G_MISS_DATE, SYSDATE, p_last_update_date)
75 , DECODE( p_last_updated_by, FND_API.G_MISS_NUM, FND_GLOBAL.USER_ID, p_last_updated_by)
76 , DECODE( p_creation_date, FND_API.G_MISS_DATE, SYSDATE, p_creation_date)
77 , DECODE( p_created_by, FND_API.G_MISS_NUM, FND_GLOBAL.USER_ID, p_created_by)
78 , DECODE( p_last_update_login, FND_API.G_MISS_NUM, FND_GLOBAL.CONC_LOGIN_ID, p_last_update_login)
79 );
80
81 END Insert_Row;
82
83
84 -- ========================================================
85 --
86 -- NAME
87 -- Update_Row
88 --
89 -- PURPOSE
90 --
91 -- NOTES
92 --
93 -- HISTORY
94 --
95 -- ========================================================
96 PROCEDURE Update_Row(
97 p_qualifier_market_option_id NUMBER
98 , p_offer_market_option_id NUMBER
99 , p_qp_qualifier_id NUMBER
100 , p_object_version_number NUMBER
101 , p_last_update_date DATE
102 , p_last_updated_by NUMBER
103 , p_last_update_login NUMBER
104 )
105 IS
106 BEGIN
107 Update ozf_qualifier_market_option
108 SET
109 qualifier_market_option_id = DECODE(p_qualifier_market_option_id , null, qualifier_market_option_id , FND_API.G_MISS_NUM, null, p_qualifier_market_option_id),
110 offer_market_option_id = DECODE( p_offer_market_option_id, null, offer_market_option_id, FND_API.G_MISS_NUM, null, p_offer_market_option_id),
111 qp_qualifier_id = DECODE( p_qp_qualifier_id , null, qp_qualifier_id , FND_API.G_MISS_NUM, null, p_qp_qualifier_id),
112 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),
113 last_updated_by = DECODE( p_last_updated_by, null, last_updated_by, FND_API.G_MISS_NUM, null, p_last_updated_by),
114 last_update_login = DECODE( p_last_update_login, null, last_update_login, FND_API.G_MISS_NUM, null, p_last_update_login),
115 object_version_number = nvl(p_object_version_number,0) + 1
116 WHERE qualifier_market_option_id = p_qualifier_market_option_id
117 AND object_version_number = p_object_version_number;
118
119
120 IF (SQL%NOTFOUND) THEN
121 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
122 END IF;
123
124
125 END Update_Row;
126
127 -- ========================================================
128 --
129 -- NAME
130 -- Delete_Row
131 --
132 -- PURPOSE
133 --
134 -- NOTES
135 --
136 -- HISTORY
137 --
138 -- ========================================================
139 PROCEDURE Delete_Row(
140 p_qualifier_market_option_id NUMBER,
141 p_object_version_number NUMBER)
142 IS
143 BEGIN
144 DELETE FROM ozf_qualifier_market_option
145 WHERE qualifier_market_option_id = p_qualifier_market_option_id
146 AND object_version_number = p_object_version_number;
147 If (SQL%NOTFOUND) then
148 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
149 End If;
150 END Delete_Row ;
151
152
153 -- ========================================================
154 --
155 -- NAME
156 -- Lock_Row
157 --
158 -- PURPOSE
159 --
160 -- NOTES
161 --
162 -- HISTORY
163 --
164 -- ========================================================
165 PROCEDURE Lock_Row(
166 p_qualifier_market_option_id NUMBER,
167 p_object_version_number NUMBER)
168 IS
169 CURSOR C IS
170 SELECT *
171 FROM ozf_qualifier_market_option
172 WHERE qualifier_market_option_id = p_qualifier_market_option_id
173 AND object_version_number = p_object_version_number
174 FOR UPDATE OF qualifier_market_option_id NOWAIT;
175 Recinfo C%ROWTYPE;
176 BEGIN
177
178 OPEN c;
179 FETCH c INTO Recinfo;
180 IF (c%NOTFOUND) THEN
181 CLOSE c;
182 AMS_Utility_PVT.error_message ('AMS_API_RECORD_NOT_FOUND');
183 RAISE FND_API.g_exc_error;
184 END IF;
185 CLOSE c;
186 END Lock_Row;
187
188
189
190 END OZF_QUAL_MARKET_OPTION_PKG;