[Home] [Help]
PACKAGE BODY: APPS.AS_FUND_CONTACTS_PKG
Source
1 PACKAGE BODY AS_FUND_CONTACTS_PKG AS
2 /* $Header: asxiffcb.pls 115.4 2002/11/06 00:41:09 appldev ship $ */
3 -- Start of Comments
4 -- Package name : AS_FUND_CONTACTS_PKG
5
6 G_PKG_NAME CONSTANT VARCHAR2(30) := 'AS_FUND_CONTACTS_PKG';
7 G_FILE_NAME CONSTANT VARCHAR2(12) := 'asxiffcb.pls';
8
9 PROCEDURE insert_row(
10 p_row_id IN OUT VARCHAR2,
11 p_fund_id IN NUMBER,
12 p_party_id IN NUMBER,
13 p_contact_role_code IN VARCHAR2,
14 p_last_update_date IN DATE,
15 p_last_updated_by IN NUMBER,
16 p_creation_date IN DATE,
17 p_created_by IN NUMBER,
18 p_last_update_login IN NUMBER,
19 p_attribute_category IN VARCHAR2,
20 p_attribute1 IN VARCHAR2,
21 p_attribute2 IN VARCHAR2,
22 p_attribute3 IN VARCHAR2,
23 p_attribute4 IN VARCHAR2,
24 p_attribute5 IN VARCHAR2,
25 p_attribute6 IN VARCHAR2,
26 p_attribute7 IN VARCHAR2,
27 p_attribute8 IN VARCHAR2,
28 p_attribute9 IN VARCHAR2,
29 p_attribute10 IN VARCHAR2,
30 p_attribute11 IN VARCHAR2,
31 p_attribute12 IN VARCHAR2,
32 p_attribute13 IN VARCHAR2,
33 p_attribute14 IN VARCHAR2,
34 p_attribute15 IN VARCHAR2) IS
35
36 BEGIN
37
38 -- throw exception if data is null???
39 INSERT INTO AS_FUND_CONTACTS (
40 fund_id,
41 party_id,
42 contact_role_code,
43 last_update_date,
44 last_updated_by,
45 creation_date,
46 created_by,
47 last_update_login,
48 attribute_category,
49 attribute1,
50 attribute2,
51 attribute3,
52 attribute4,
53 attribute5,
54 attribute6,
55 attribute7,
56 attribute8,
57 attribute9,
58 attribute10,
59 attribute11,
60 attribute12,
61 attribute13,
62 attribute14,
63 attribute15) VALUES
64 (DECODE(p_fund_id, FND_API.G_MISS_NUM, NULL, p_fund_id),
65 DECODE(p_party_id, FND_API.G_MISS_NUM, NULL, p_party_id),
66 DECODE(p_contact_role_code, FND_API.G_MISS_CHAR, NULL, p_contact_role_code),
67 DECODE(p_last_update_date, FND_API.G_MISS_DATE, TO_DATE(NULL), p_last_update_date),
68 DECODE(p_last_updated_by, FND_API.G_MISS_NUM, NULL, p_last_updated_by),
69 DECODE(p_creation_date, FND_API.G_MISS_DATE, TO_DATE(NULL), p_creation_date),
70 DECODE(p_created_by, FND_API.G_MISS_NUM, NULL, p_created_by),
71 DECODE(p_last_update_login, FND_API.G_MISS_NUM, NULL, p_last_update_login),
72 DECODE(p_attribute_category, FND_API.G_MISS_CHAR, NULL, p_attribute_category),
73 DECODE(p_attribute1, FND_API.G_MISS_CHAR, NULL, p_attribute1),
74 DECODE(p_attribute2, FND_API.G_MISS_CHAR, NULL, p_attribute2),
75 DECODE(p_attribute3, FND_API.G_MISS_CHAR, NULL, p_attribute3),
76 DECODE(p_attribute4, FND_API.G_MISS_CHAR, NULL, p_attribute4),
77 DECODE(p_attribute5, FND_API.G_MISS_CHAR, NULL, p_attribute5),
78 DECODE(p_attribute6, FND_API.G_MISS_CHAR, NULL, p_attribute6),
79 DECODE(p_attribute7, FND_API.G_MISS_CHAR, NULL, p_attribute7),
80 DECODE(p_attribute8, FND_API.G_MISS_CHAR, NULL, p_attribute8),
81 DECODE(p_attribute9, FND_API.G_MISS_CHAR, NULL, p_attribute9),
82 DECODE(p_attribute10, FND_API.G_MISS_CHAR, NULL, p_attribute10),
83 DECODE(p_attribute11, FND_API.G_MISS_CHAR, NULL, p_attribute11),
84 DECODE(p_attribute12, FND_API.G_MISS_CHAR, NULL, p_attribute12),
85 DECODE(p_attribute13, FND_API.G_MISS_CHAR, NULL, p_attribute13),
86 DECODE(p_attribute14, FND_API.G_MISS_CHAR, NULL, p_attribute14),
87 DECODE(p_attribute15, FND_API.G_MISS_CHAR, NULL, p_attribute15));
88
89 END insert_row;
90
91 PROCEDURE update_row (
92 p_fund_id IN NUMBER,
93 p_party_id IN NUMBER,
94 p_contact_role_code IN VARCHAR2,
95 p_last_update_date IN DATE,
96 p_last_updated_by IN NUMBER,
97 p_creation_date IN DATE,
98 p_created_by IN NUMBER,
99 p_last_update_login IN NUMBER,
100 p_attribute_category IN VARCHAR2,
101 p_attribute1 IN VARCHAR2,
102 p_attribute2 IN VARCHAR2,
103 p_attribute3 IN VARCHAR2,
104 p_attribute4 IN VARCHAR2,
105 p_attribute5 IN VARCHAR2,
106 p_attribute6 IN VARCHAR2,
107 p_attribute7 IN VARCHAR2,
108 p_attribute8 IN VARCHAR2,
109 p_attribute9 IN VARCHAR2,
110 p_attribute10 IN VARCHAR2,
111 p_attribute11 IN VARCHAR2,
112 p_attribute12 IN VARCHAR2,
113 p_attribute13 IN VARCHAR2,
114 p_attribute14 IN VARCHAR2,
115 p_attribute15 IN VARCHAR2) IS
116
117 BEGIN
118
119 UPDATE AS_FUND_CONTACTS SET
120 fund_id = p_fund_id,
121 party_id = p_party_id,
122 contact_role_code = DECODE(p_contact_role_code, FND_API.G_MISS_CHAR, contact_role_code, p_contact_role_code),
123 last_update_date = DECODE(p_last_update_date, FND_API.G_MISS_DATE, last_update_date, p_last_update_date),
124 last_updated_by = DECODE(p_last_updated_by, FND_API.G_MISS_NUM, last_updated_by, p_last_updated_by),
125 creation_date = DECODE(p_creation_date, FND_API.G_MISS_DATE, creation_date, p_creation_date),
126 created_by = DECODE(p_created_by, FND_API.G_MISS_NUM, created_by, p_created_by),
127 last_update_login = DECODE(p_last_update_login, FND_API.G_MISS_NUM, last_update_login, p_last_update_login),
128 attribute1 = DECODE(p_attribute1, FND_API.G_MISS_CHAR, attribute1, p_attribute1),
129 attribute2 = DECODE(p_attribute2, FND_API.G_MISS_CHAR, attribute2, p_attribute2),
130 attribute3 = DECODE(p_attribute3, FND_API.G_MISS_CHAR, attribute3, p_attribute3),
131 attribute4 = DECODE(p_attribute4, FND_API.G_MISS_CHAR, attribute4, p_attribute4),
132 attribute5 = DECODE(p_attribute5, FND_API.G_MISS_CHAR, attribute5, p_attribute5),
133 attribute6 = DECODE(p_attribute6, FND_API.G_MISS_CHAR, attribute6, p_attribute6),
134 attribute7 = DECODE(p_attribute7, FND_API.G_MISS_CHAR, attribute7, p_attribute7),
135 attribute8 = DECODE(p_attribute8, FND_API.G_MISS_CHAR, attribute8, p_attribute8),
136 attribute9 = DECODE(p_attribute9, FND_API.G_MISS_CHAR, attribute9, p_attribute9),
137 attribute10 = DECODE(p_attribute10, FND_API.G_MISS_CHAR, attribute10, p_attribute10),
138 attribute11 = DECODE(p_attribute11, FND_API.G_MISS_CHAR, attribute11, p_attribute11),
139 attribute12 = DECODE(p_attribute12, FND_API.G_MISS_CHAR, attribute12, p_attribute12),
140 attribute13 = DECODE(p_attribute13, FND_API.G_MISS_CHAR, attribute13, p_attribute13),
141 attribute14 = DECODE(p_attribute14, FND_API.G_MISS_CHAR, attribute14, p_attribute14),
142 attribute15 = DECODE(p_attribute15, FND_API.G_MISS_CHAR, attribute15, p_attribute15),
143 attribute_category = DECODE(p_attribute_category, FND_API.G_MISS_CHAR, attribute_category, p_attribute_category)
144
145 WHERE fund_id = p_fund_id
146 AND party_id = p_party_id;
147
148 IF (SQL%NOTFOUND) THEN
149 RAISE NO_DATA_FOUND;
150 END IF;
151
152 END update_row;
153
154 PROCEDURE delete_row (
155 p_fund_id IN NUMBER,
156 p_party_id IN NUMBER) IS
157
158 BEGIN
159
160 -- throw exception if data is null??
161 DELETE FROM AS_FUND_CONTACTS
162 WHERE fund_id = p_fund_id
163 AND party_id = p_party_id;
164
165 IF (SQL%NOTFOUND) THEN
166 RAISE no_data_found;
167 END IF;
168
169 END delete_row;
170 /*
171 PROCEDURE lock_row (
172 p_fund_id IN NUMBER,
173 p_party_id IN NUMBER,
174 p_object_version_number IN NUMBER) IS
175
176 CURSOR C IS SELECT object_version_number
177 FROM AS_EXCHANGE_B
178 WHERE fund_id = p_fund_id
179 AND party_id = p_party_id
180 AND object_version_number = p_object_version_number
181 FOR UPDATE OF fund_id NOWAIT;
182
183 recinfo C%rowtype;
184
185 BEGIN
186
187 OPEN C;
188 FETCH C INTO recinfo;
189 IF (C%NOTFOUND) THEN
190 CLOSE C;
191 fnd_message.set_name('FND', 'FORM RECORD_DELETED');
192 app_exception.raise_exception;
193 END IF;
194 CLOSE C;
195
196 IF (recinfo.object_vesion_number = p_object_version_number) THEN
197 NULL;
198 ELSE
199 fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
200 app_exception.raise_exception;
201 END IF;
202
203 END lock_row;
204 */
205 END AS_FUND_CONTACTS_PKG;