DBA Data[Home] [Help]

PACKAGE BODY: APPS.CSC_RESPONSE_CENTER_PKG_V2

Source


1 PACKAGE BODY CSC_RESPONSE_CENTER_PKG_V2 AS
2 /* $Header: CSCV2RCB.pls 120.1.12010000.2 2008/08/11 06:29:24 mpathani ship $ */
3 
4    -- Local Function.  Returns the Value of the Constant FND_API.G_MISS_NUM
5    FUNCTION G_MISS_NUM RETURN NUMBER IS
6    BEGIN
7 	RETURN FND_API.G_MISS_NUM ;
8    END G_MISS_NUM ;
9 
10    -- Local Function.  Returns the Value of the Constant FND_API.G_MISS_CHAR to the caller
11    FUNCTION G_MISS_CHAR RETURN VARCHAR2 IS
12    BEGIN
13 	RETURN FND_API.G_MISS_CHAR ;
14    END G_MISS_CHAR ;
15 
16    -- Local Function.  REturns the Value of the Constant FND_API.G_MISS_DATE to the caller
17    FUNCTION G_MISS_DATE RETURN DATE IS
18    BEGIN
19 	RETURN FND_API.G_MISS_DATE ;
20    END G_MISS_DATE ;
21 
22    FUNCTION GET_ORG_REC_TYPE RETURN HZ_PARTY_V2PUB.ORGANIZATION_REC_TYPE IS
23    TMP_ORG_REC_TYPE HZ_PARTY_V2PUB.ORGANIZATION_REC_TYPE;
24    BEGIN
25     RETURN TMP_ORG_REC_TYPE;
26    END GET_ORG_REC_TYPE;
27 
28    -- hbchung
29    FUNCTION GET_ORG_CONTACT_REC_TYPE RETURN HZ_PARTY_CONTACT_V2PUB.ORG_CONTACT_REC_TYPE IS
30    TMP_ORG_CONTACT_REC_TYPE HZ_PARTY_CONTACT_V2PUB.ORG_CONTACT_REC_TYPE;
31    BEGIN
32     RETURN TMP_ORG_CONTACT_REC_TYPE;
33    END GET_ORG_CONTACT_REC_TYPE;
34    -- hbchung
35 
36    -- hbchung
37    FUNCTION GET_RELATIONSHIP_REC_TYPE RETURN HZ_RELATIONSHIP_V2PUB.RELATIONSHIP_REC_TYPE IS
38    TMP_RELATIONSHIP_REC_TYPE HZ_RELATIONSHIP_V2PUB.RELATIONSHIP_REC_TYPE;
39    BEGIN
40     RETURN TMP_RELATIONSHIP_REC_TYPE;
41    END GET_RELATIONSHIP_REC_TYPE;
42    -- hbchung
43 
44    -- hbchung
45    FUNCTION GET_PER_LANG_REC_TYPE RETURN HZ_PERSON_INFO_V2PUB.PERSON_LANGUAGE_REC_TYPE IS
46    TMP_PER_LANG_REC_TYPE HZ_PERSON_INFO_V2PUB.PERSON_LANGUAGE_REC_TYPE;
47    BEGIN
48     RETURN TMP_PER_LANG_REC_TYPE;
49    END GET_PER_LANG_REC_TYPE;
50    -- hbchung
51 
52    -- hbchung
53    FUNCTION GET_EDUCATION_REC_TYPE RETURN HZ_PERSON_INFO_V2PUB.EDUCATION_REC_TYPE IS
54    TMP_EDU_REC_TYPE HZ_PERSON_INFO_V2PUB.EDUCATION_REC_TYPE;
55    BEGIN
56     RETURN TMP_EDU_REC_TYPE;
57    END GET_EDUCATION_REC_TYPE;
58    -- hbchung
59 
60    -- hbchung
61    FUNCTION GET_EMP_HISTORY_REC_TYPE RETURN HZ_PERSON_INFO_V2PUB.EMPLOYMENT_HISTORY_REC_TYPE IS
62    TMP_EMP_HIST_REC_TYPE  HZ_PERSON_INFO_V2PUB.EMPLOYMENT_HISTORY_REC_TYPE;
63    BEGIN
64     RETURN TMP_EMP_HIST_REC_TYPE;
65    END GET_EMP_HISTORY_REC_TYPE;
66    -- hbchung
67 
68    -- hbchung
69    FUNCTION GET_PER_INTEREST_REC_TYPE RETURN HZ_PERSON_INFO_V2PUB.PERSON_INTEREST_REC_TYPE IS
70    TMP_PER_INT_REC_TYPE  HZ_PERSON_INFO_V2PUB.PERSON_INTEREST_REC_TYPE;
71    BEGIN
72     RETURN TMP_PER_INT_REC_TYPE;
73    END GET_PER_INTEREST_REC_TYPE;
74    -- hbchung
75 
76    FUNCTION GET_PERSON_REC_TYPE RETURN HZ_PARTY_V2PUB.PERSON_REC_TYPE IS
77    TMP_PERSON_REC_TYPE HZ_PARTY_V2PUB.PERSON_REC_TYPE;
78    BEGIN
79     RETURN TMP_PERSON_REC_TYPE;
80    END GET_PERSON_REC_TYPE;
81 
82 
83    FUNCTION GET_ACCOUNT_REC_TYPE RETURN HZ_CUST_ACCOUNT_V2PUB.CUST_ACCOUNT_REC_TYPE IS
84    TMP_ACCOUNT_REC_TYPE HZ_CUST_ACCOUNT_V2PUB.CUST_ACCOUNT_REC_TYPE;
85    BEGIN
86     RETURN TMP_ACCOUNT_REC_TYPE;
87    END GET_ACCOUNT_REC_TYPE;
88 
89    FUNCTION GET_CUST_ACCT_ROLES_REC_TYPE RETURN HZ_CUST_ACCOUNT_ROLE_V2PUB.CUST_ACCOUNT_ROLE_REC_TYPE IS
90    TMP_REC HZ_CUST_ACCOUNT_ROLE_V2PUB.CUST_ACCOUNT_ROLE_REC_TYPE;
91    BEGIN
92     RETURN TMP_REC;
93    END GET_CUST_ACCT_ROLES_REC_TYPE;
94 
95    FUNCTION GET_ACCT_SITE_REC_TYPE RETURN HZ_CUST_ACCOUNT_SITE_V2PUB.CUST_ACCT_SITE_REC_TYPE IS
96    TMP_REC HZ_CUST_ACCOUNT_SITE_V2PUB.CUST_ACCT_SITE_REC_TYPE;
97    BEGIN
98     RETURN TMP_REC;
99    END GET_ACCT_SITE_REC_TYPE;
100 
101 
102    FUNCTION GET_ACCT_SITE_USES_REC_TYPE RETURN HZ_CUST_ACCOUNT_SITE_V2PUB.CUST_SITE_USE_REC_TYPE IS
103    TMP_REC HZ_CUST_ACCOUNT_SITE_V2PUB.CUST_SITE_USE_REC_TYPE;
104    BEGIN
105     RETURN   TMP_REC;
106    END GET_ACCT_SITE_USES_REC_TYPE;
107 
108 
109    FUNCTION GET_CUST_ACCT_RELATE_REC_TYPE RETURN HZ_CUST_ACCOUNT_V2PUB.CUST_ACCT_RELATE_REC_TYPE IS
110    TMP_REC  HZ_CUST_ACCOUNT_V2PUB.CUST_ACCT_RELATE_REC_TYPE;
111    BEGIN
112     RETURN   TMP_REC;
113    END GET_CUST_ACCT_RELATE_REC_TYPE;
114 
115 
116    FUNCTION GET_CUST_PROFILE_REC_TYPE RETURN HZ_CUSTOMER_PROFILE_V2PUB.CUSTOMER_PROFILE_REC_TYPE IS
117    TMP_CUST_PROFILE_REC_TYPE HZ_CUSTOMER_PROFILE_V2PUB.CUSTOMER_PROFILE_REC_TYPE;
118    BEGIN
119       RETURN TMP_CUST_PROFILE_REC_TYPE;
120    END GET_CUST_PROFILE_REC_TYPE;
121 
122    FUNCTION GET_PARTY_REC_TYPE RETURN HZ_PARTY_V2PUB.PARTY_REC_TYPE IS
123    TMP_PARTY_REC_TYPE HZ_PARTY_V2PUB.PARTY_REC_TYPE;
124    BEGIN
125       RETURN TMP_PARTY_REC_TYPE;
126    END GET_PARTY_REC_TYPE;
127 
128    FUNCTION GET_PHONE_REC_TYPE RETURN HZ_CONTACT_POINT_V2PUB.PHONE_REC_TYPE IS
129    TMP_PHONE_REC_TYPE HZ_CONTACT_POINT_V2PUB.PHONE_REC_TYPE;
130    BEGIN
131       RETURN TMP_PHONE_REC_TYPE;
132    END GET_PHONE_REC_TYPE;
133 
134    FUNCTION GET_EMAIL_REC_TYPE RETURN HZ_CONTACT_POINT_V2PUB.EMAIL_REC_TYPE IS
135    TMP_EMAIL_REC_TYPE HZ_CONTACT_POINT_V2PUB.EMAIL_REC_TYPE;
136    BEGIN
137       RETURN TMP_EMAIL_REC_TYPE;
138    END GET_EMAIL_REC_TYPE;
139 
140    FUNCTION GET_WEB_REC_TYPE RETURN HZ_CONTACT_POINT_V2PUB.WEB_REC_TYPE IS
141    TMP_WEB_REC_TYPE HZ_CONTACT_POINT_V2PUB.WEB_REC_TYPE;
142    BEGIN
143       RETURN TMP_WEB_REC_TYPE;
144    END GET_WEB_REC_TYPE;
145 
146    FUNCTION GET_EDI_REC_TYPE RETURN HZ_CONTACT_POINT_V2PUB.EDI_REC_TYPE IS
147    TMP_EDI_REC_TYPE HZ_CONTACT_POINT_V2PUB.EDI_REC_TYPE;
148    BEGIN
149       RETURN TMP_EDI_REC_TYPE;
150    END GET_EDI_REC_TYPE;
151 
152    FUNCTION GET_TELEX_REC_TYPE RETURN HZ_CONTACT_POINT_V2PUB.TELEX_REC_TYPE IS
153    TMP_TELEX_REC_TYPE HZ_CONTACT_POINT_V2PUB.TELEX_REC_TYPE;
154    BEGIN
155       RETURN TMP_TELEX_REC_TYPE;
156    END GET_TELEX_REC_TYPE;
157 
158    FUNCTION GET_CONTACT_POINTS_REC_TYPE RETURN HZ_CONTACT_POINT_V2PUB.CONTACT_POINT_REC_TYPE IS
159    TMP_CONTACT_POINTS_REC_TYPE HZ_CONTACT_POINT_V2PUB.CONTACT_POINT_REC_TYPE;
160    BEGIN
161       RETURN TMP_CONTACT_POINTS_REC_TYPE;
162    END GET_CONTACT_POINTS_REC_TYPE;
163 
164    FUNCTION GET_CONT_POINTS_PREF_REC_TYPE RETURN HZ_CONTACT_PREFERENCE_V2PUB.CONTACT_PREFERENCE_REC_TYPE IS
165    TMP_CONTACT_POINTS_REC_TYPE HZ_CONTACT_PREFERENCE_V2PUB.CONTACT_PREFERENCE_REC_TYPE;
166    BEGIN
167       RETURN TMP_CONTACT_POINTS_REC_TYPE;
168    END GET_CONT_POINTS_PREF_REC_TYPE;
169 
170    FUNCTION GET_ADDRESS_REC_TYPE RETURN CSC_RESPONSE_CENTER_PKG_V2.ADDRESS_REC_TYPE IS
171    TMP_ADDRESS_REC_TYPE CSC_RESPONSE_CENTER_PKG_V2.ADDRESS_REC_TYPE;
172    BEGIN
173      RETURN TMP_ADDRESS_REC_TYPE;
174    END GET_ADDRESS_REC_TYPE;
175 
176    FUNCTION GET_PARTY_SITE_REC_TYPE RETURN HZ_PARTY_SITE_V2PUB.PARTY_SITE_REC_TYPE IS
177    TMP_PARTY_SITE_REC_TYPE HZ_PARTY_SITE_V2PUB.PARTY_SITE_REC_TYPE;
178    BEGIN
179       RETURN TMP_PARTY_SITE_REC_TYPE;
180    END GET_PARTY_SITE_REC_TYPE;
181 
182    FUNCTION GET_PARTY_SITE_USE_REC_TYPE RETURN HZ_PARTY_SITE_V2PUB.PARTY_SITE_USE_REC_TYPE IS
183    TMP_PARTY_SITE_USE_REC_TYPE HZ_PARTY_SITE_V2PUB.PARTY_SITE_USE_REC_TYPE;
184    BEGIN
185       RETURN TMP_PARTY_SITE_USE_REC_TYPE;
186    END GET_PARTY_SITE_USE_REC_TYPE;
187 
188   /* Returns CSC application_id passed to TCA V2 APIs */
189    FUNCTION get_csc_application_id RETURN NUMBER
190    IS
191       csc_application_id CONSTANT NUMBER := 511;
192    BEGIN
193       RETURN csc_application_id;
194    END;
195 
196 
197    PROCEDURE Create_Address ( p_address_rec     IN           ADDRESS_REC_TYPE,
198                               x_msg_count       OUT  NOCOPY  NUMBER,
199                               x_msg_data        OUT  NOCOPY  VARCHAR2,
200                               x_return_status   OUT  NOCOPY  VARCHAR2,
201                               x_location_id     OUT  NOCOPY  NUMBER)
202    IS
203       l_location_rec HZ_LOCATION_V2PUB.LOCATION_REC_TYPE;
204       l_return_status VARCHAR2(1);
205       l_msg_count NUMBER;
206       l_msg_data  VARCHAR2(2000);
207       l_location_id NUMBER;
208 
209    BEGIN
210       l_location_rec.address1 := p_address_rec.address1;
211       l_location_rec.address2 := p_address_rec.address2;
212       l_location_rec.address3 := p_address_rec.address3;
213       l_location_rec.address4 := p_address_rec.address4;
214       l_location_rec.address_lines_phonetic := p_address_rec.address_lines_phonetic;
215       l_location_rec.city     := p_address_rec.city;
216       l_location_rec.state    := p_address_rec.state;
217       l_location_rec.county   := p_address_rec.county;
218       l_location_rec.country  := p_address_rec.country;
219       l_location_rec.postal_code := p_address_rec.postal_code;
220       l_location_rec.province := p_address_rec.province;
221       l_location_rec.county   := p_address_rec.county;
222       l_location_rec.language := p_address_rec.language;
223       l_location_rec.po_box_number := p_address_rec.po_box_number;
224       l_location_rec.street   := p_address_rec.street;
225       l_location_rec.house_number  := p_address_rec.house_number;
226       l_location_rec.position := p_address_rec.position;
227       l_location_rec.address_key := p_address_rec.address_key;
228       l_location_rec.street_suffix := p_address_rec.street_suffix;
229       l_location_rec.street_number := p_address_rec.street_number;
230       l_location_rec.floor := p_address_rec.floor;
231       l_location_rec.suite := p_address_rec.suite;
232       l_location_rec.postal_plus4_code := p_address_rec.postal_plus4_code;
233       l_location_rec.delivery_point_code := p_address_rec.delivery_point_code;
234       l_location_rec.location_directions := p_address_rec.location_directions;
235       l_location_rec.clli_code := p_address_rec.clli_code;
236       l_location_rec.short_description := p_address_rec.short_description;
237       l_location_rec.description := p_address_rec.description;
238       l_location_rec.sales_tax_geocode := p_address_rec.sales_tax_geocode;
239       l_location_rec.sales_tax_inside_city_limits := p_address_rec.sales_tax_inside_city_limits;
240       l_location_rec.timezone_id := p_address_rec.timezone_id;
241       l_location_rec.created_by_module := p_address_rec.created_by_module;
242       l_location_rec.application_id := p_address_rec.application_id;
243 
244       HZ_LOCATION_V2PUB.create_location ( p_init_msg_list => FND_API.G_FALSE,
245                                           p_location_rec  => l_location_rec,
246                                           x_return_status => l_return_status,
247                                           x_msg_count     => l_msg_count,
248                                           x_msg_data      => l_msg_data,
249                                           x_location_id   => l_location_id);
250 
251       x_return_status := l_return_status;
252       x_msg_count     := l_msg_count;
253       x_msg_data      := l_msg_data;
254 
255       If x_return_status = CSC_CORE_UTILS_PVT.G_RET_STS_SUCCESS Then
256          x_location_id := l_location_id;
257       End If;
258 
259  End Create_Address;
260 
261  PROCEDURE Update_Address ( p_address_rec           IN               ADDRESS_REC_TYPE,
262                             x_msg_count             OUT     NOCOPY   NUMBER,
263                             x_msg_data              OUT     NOCOPY   VARCHAR2,
264                             x_object_version_number IN OUT  NOCOPY   NUMBER,
265                             x_return_status         OUT     NOCOPY   VARCHAR2)
266  IS
267     l_location_rec HZ_LOCATION_V2PUB.LOCATION_REC_TYPE;
268     l_return_status VARCHAR2(1);
269     l_msg_count NUMBER;
270     l_msg_data  VARCHAR2(2000);
271  BEGIN
272     l_location_rec.address1 := Nvl(p_address_rec.address1, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
273     l_location_rec.address2 := Nvl(p_address_rec.address2, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
274     l_location_rec.address3 := Nvl(p_address_rec.address3, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
275     l_location_rec.address4 := Nvl(p_address_rec.address4, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
276     l_location_rec.address_lines_phonetic := Nvl(p_address_rec.address_lines_phonetic, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
277     l_location_rec.city     := Nvl(p_address_rec.city, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
278     l_location_rec.state    := Nvl(p_address_rec.state, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
279     l_location_rec.county   := Nvl(p_address_rec.county, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
280     l_location_rec.country  := Nvl(p_address_rec.country, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
281     l_location_rec.postal_code := Nvl(p_address_rec.postal_code, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
282     l_location_rec.province := Nvl(p_address_rec.province, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
283     l_location_rec.county   := Nvl(p_address_rec.county, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
284     l_location_rec.language := Nvl(p_address_rec.language, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
285     l_location_rec.po_box_number := Nvl(p_address_rec.po_box_number, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
286     l_location_rec.street   := Nvl(p_address_rec.street, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
287     l_location_rec.house_number  := Nvl(p_address_rec.house_number, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
288     l_location_rec.position := Nvl(p_address_rec.position, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
289     l_location_rec.address_key := Nvl(p_address_rec.address_key, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
290     l_location_rec.street_suffix := Nvl(p_address_rec.street_suffix, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
291     l_location_rec.street_number := Nvl(p_address_rec.street_number, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
292     l_location_rec.floor := Nvl(p_address_rec.floor, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
293     l_location_rec.suite := Nvl(p_address_rec.suite, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
294     l_location_rec.postal_plus4_code := Nvl(p_address_rec.postal_plus4_code, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
295     l_location_rec.delivery_point_code := Nvl(p_address_rec.delivery_point_code, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
296     l_location_rec.location_directions := Nvl(p_address_rec.location_directions, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
297     l_location_rec.clli_code := Nvl(p_address_rec.clli_code, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
298     l_location_rec.short_description := Nvl(p_address_rec.short_description, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
299     l_location_rec.description := Nvl(p_address_rec.description, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
300     l_location_rec.sales_tax_geocode := Nvl(p_address_rec.sales_tax_geocode, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
301     l_location_rec.sales_tax_inside_city_limits := Nvl(p_address_rec.sales_tax_inside_city_limits, CSC_RESPONSE_CENTER_PKG_V2.g_miss_char);
302      --Begin Fix for Bug 7033623 by spamujul
303    -- l_location_rec.timezone_id := Nvl(p_address_rec.timezone_id, CSC_RESPONSE_CENTER_PKG_V2.g_miss_num);
304 	if l_location_rec.timezone_id <> CSC_RESPONSE_CENTER_PKG_V2.g_miss_num then
305 		l_location_rec.timezone_id := p_address_rec.timezone_id;
306 	else
307 	      l_location_rec.timezone_id := null;
308 	end if;
309      --End Fix for Bug 7033623 by spamujul
310     l_location_rec.location_id := p_address_rec.location_id;
311 
312     HZ_LOCATION_V2PUB.update_location ( p_init_msg_list => FND_API.G_FALSE,
313                                         p_location_rec => l_location_rec,
314                                         p_object_version_number => x_object_version_number,
315                                         x_return_status => l_return_status,
316                                         x_msg_count => l_msg_count,
317                                         x_msg_data => l_msg_data);
318 
319 	x_return_status := l_return_status;
320 	x_msg_count := l_msg_count;
321 	x_msg_data := l_msg_data;
322 
323  End Update_Address;
324 
325 END CSC_RESPONSE_CENTER_PKG_V2;
326