eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PA_CUSTOMERS_CONTACTS_UTILS dependencies on FND_API

Line 13: -- p_customer_id IN NUMBER Optional Default = FND_API.G_MISS_NUM

9: -- API name : Check_Customer_Name_Or_Id
10: -- Type : Utility
11: -- Pre-reqs : None.
12: -- Parameters :
13: -- p_customer_id IN NUMBER Optional Default = FND_API.G_MISS_NUM
14: -- p_customer_name IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR
15: -- p_check_id_flag IN VARCHAR2 Optional Default = 'A'
16: -- x_customer_id OUT NUMBER Required
17: -- x_return_status OUT VARCHAR2 Required

Line 14: -- p_customer_name IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR

10: -- Type : Utility
11: -- Pre-reqs : None.
12: -- Parameters :
13: -- p_customer_id IN NUMBER Optional Default = FND_API.G_MISS_NUM
14: -- p_customer_name IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR
15: -- p_check_id_flag IN VARCHAR2 Optional Default = 'A'
16: -- x_customer_id OUT NUMBER Required
17: -- x_return_status OUT VARCHAR2 Required
18: -- x_error_msg_code OUT VARCHAR2 Required

Line 21: ( p_customer_id IN NUMBER := FND_API.G_MISS_NUM

17: -- x_return_status OUT VARCHAR2 Required
18: -- x_error_msg_code OUT VARCHAR2 Required
19:
20: PROCEDURE CHECK_CUSTOMER_NAME_OR_ID
21: ( p_customer_id IN NUMBER := FND_API.G_MISS_NUM
22: ,p_customer_name IN VARCHAR2 := FND_API.G_MISS_CHAR
23: ,p_check_id_flag IN VARCHAR2 := 'A'
24: ,x_customer_id OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
25: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895

Line 22: ,p_customer_name IN VARCHAR2 := FND_API.G_MISS_CHAR

18: -- x_error_msg_code OUT VARCHAR2 Required
19:
20: PROCEDURE CHECK_CUSTOMER_NAME_OR_ID
21: ( p_customer_id IN NUMBER := FND_API.G_MISS_NUM
22: ,p_customer_name IN VARCHAR2 := FND_API.G_MISS_CHAR
23: ,p_check_id_flag IN VARCHAR2 := 'A'
24: ,x_customer_id OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
25: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
26: ,x_error_msg_code OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895

Line 39: if (p_customer_id = FND_API.G_MISS_NUM) OR (p_customer_id is NULL) then

35: SELECT customer_id
36: FROM pa_customers_v
37: WHERE upper(substr(customer_name,1,50)) = upper(substr(p_customer_name,1,50)) and status = 'A'; -- Bug 8314123
38: BEGIN
39: if (p_customer_id = FND_API.G_MISS_NUM) OR (p_customer_id is NULL) then
40: if (p_customer_name is not NULL) then
41: SELECT customer_id
42: INTO x_customer_id
43: FROM pa_customers_v

Line 100: x_return_status := FND_API.G_RET_STS_SUCCESS;

96: x_customer_id := NULL;
97: end if;
98:
99: end if;
100: x_return_status := FND_API.G_RET_STS_SUCCESS;
101: EXCEPTION
102: when NO_DATA_FOUND then
103: x_customer_id := NULL;
104: x_return_status := FND_API.G_RET_STS_ERROR;

Line 104: x_return_status := FND_API.G_RET_STS_ERROR;

100: x_return_status := FND_API.G_RET_STS_SUCCESS;
101: EXCEPTION
102: when NO_DATA_FOUND then
103: x_customer_id := NULL;
104: x_return_status := FND_API.G_RET_STS_ERROR;
105: x_error_msg_code := 'PA_CUSTOMER_ID_INVALID';
106: when TOO_MANY_ROWS then
107: x_customer_id := NULL;
108: x_return_status := FND_API.G_RET_STS_ERROR;

Line 108: x_return_status := FND_API.G_RET_STS_ERROR;

104: x_return_status := FND_API.G_RET_STS_ERROR;
105: x_error_msg_code := 'PA_CUSTOMER_ID_INVALID';
106: when TOO_MANY_ROWS then
107: x_customer_id := NULL;
108: x_return_status := FND_API.G_RET_STS_ERROR;
109: x_error_msg_code := 'PA_CUST_NAME_NOT_UNIQUE';
110: when OTHERS then
111: x_customer_id := NULL;
112: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 112: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

108: x_return_status := FND_API.G_RET_STS_ERROR;
109: x_error_msg_code := 'PA_CUST_NAME_NOT_UNIQUE';
110: when OTHERS then
111: x_customer_id := NULL;
112: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
113: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_UTILS', p_procedure_name => 'CHECK_CUSTOMER_NAME_OR_ID');
114: raise;
115: END CHECK_CUSTOMER_NAME_OR_ID;
116:

Line 122: -- p_customer_id IN NUMBER Optional Default = FND_API.G_MISS_NUM

118: -- API name : Check_Customer_Number_Or_Id
119: -- Type : Utility
120: -- Pre-reqs : None.
121: -- Parameters :
122: -- p_customer_id IN NUMBER Optional Default = FND_API.G_MISS_NUM
123: -- p_customer_number IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR
124: -- p_check_id_flag IN VARCHAR2 Optional Default = 'A'
125: -- x_customer_id OUT NUMBER Required
126: -- x_return_status OUT VARCHAR2 Required

Line 123: -- p_customer_number IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR

119: -- Type : Utility
120: -- Pre-reqs : None.
121: -- Parameters :
122: -- p_customer_id IN NUMBER Optional Default = FND_API.G_MISS_NUM
123: -- p_customer_number IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR
124: -- p_check_id_flag IN VARCHAR2 Optional Default = 'A'
125: -- x_customer_id OUT NUMBER Required
126: -- x_return_status OUT VARCHAR2 Required
127: -- x_error_msg_code OUT VARCHAR2 Required

Line 130: ( p_customer_id IN NUMBER := FND_API.G_MISS_NUM

126: -- x_return_status OUT VARCHAR2 Required
127: -- x_error_msg_code OUT VARCHAR2 Required
128:
129: PROCEDURE CHECK_CUSTOMER_NUMBER_OR_ID
130: ( p_customer_id IN NUMBER := FND_API.G_MISS_NUM
131: ,p_customer_number IN VARCHAR2 := FND_API.G_MISS_CHAR
132: ,p_check_id_flag IN VARCHAR2 := 'A'
133: ,x_customer_id OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
134: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895

Line 131: ,p_customer_number IN VARCHAR2 := FND_API.G_MISS_CHAR

127: -- x_error_msg_code OUT VARCHAR2 Required
128:
129: PROCEDURE CHECK_CUSTOMER_NUMBER_OR_ID
130: ( p_customer_id IN NUMBER := FND_API.G_MISS_NUM
131: ,p_customer_number IN VARCHAR2 := FND_API.G_MISS_CHAR
132: ,p_check_id_flag IN VARCHAR2 := 'A'
133: ,x_customer_id OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
134: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
135: ,x_error_msg_code OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895

Line 149: if (p_customer_id = FND_API.G_MISS_NUM) OR (p_customer_id is NULL) then

145: FROM pa_customers_v
146: WHERE upper(customer_number) = upper(p_customer_number) and status = 'A';
147:
148: BEGIN
149: if (p_customer_id = FND_API.G_MISS_NUM) OR (p_customer_id is NULL) then
150: if (p_customer_number is not NULL) then
151: SELECT customer_id
152: INTO x_customer_id
153: FROM pa_customers_v

Line 207: x_return_status := FND_API.G_RET_STS_SUCCESS;

203: x_customer_id := NULL;
204: end if;
205: end if;
206:
207: x_return_status := FND_API.G_RET_STS_SUCCESS;
208:
209: EXCEPTION
210: when NO_DATA_FOUND then
211: x_customer_id := NULL;

Line 212: x_return_status := FND_API.G_RET_STS_ERROR;

208:
209: EXCEPTION
210: when NO_DATA_FOUND then
211: x_customer_id := NULL;
212: x_return_status := FND_API.G_RET_STS_ERROR;
213: x_error_msg_code := 'PA_CUSTOMER_ID_INVALID';
214: when TOO_MANY_ROWS then
215: x_customer_id := NULL;
216: x_return_status := FND_API.G_RET_STS_ERROR;

Line 216: x_return_status := FND_API.G_RET_STS_ERROR;

212: x_return_status := FND_API.G_RET_STS_ERROR;
213: x_error_msg_code := 'PA_CUSTOMER_ID_INVALID';
214: when TOO_MANY_ROWS then
215: x_customer_id := NULL;
216: x_return_status := FND_API.G_RET_STS_ERROR;
217: x_error_msg_code := 'PA_CUST_NUM_NOT_UNIQUE';
218: when OTHERS then
219: x_customer_id := NULL;
220: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 220: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

216: x_return_status := FND_API.G_RET_STS_ERROR;
217: x_error_msg_code := 'PA_CUST_NUM_NOT_UNIQUE';
218: when OTHERS then
219: x_customer_id := NULL;
220: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
221: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_UTILS', p_procedure_name => 'CHECK_CUSTOMER_NUMBER_OR_ID');
222: raise;
223:
224: END CHECK_CUSTOMER_NUMBER_OR_ID;

Line 232: -- p_bill_to_address_id IN NUMBER Optional Default = FND_API.G_MISS_NUM

228: -- Type : Utility
229: -- Pre-reqs : None.
230: -- Parameters :
231: -- p_customer_id IN NUMBER Required
232: -- p_bill_to_address_id IN NUMBER Optional Default = FND_API.G_MISS_NUM
233: -- p_bill_site_name IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR
234: -- p_check_id_flag IN VARCHAR2 Optional Default = 'A'
235: -- x_bill_to_address_id OUT NUMBER Optional
236: -- x_return_status OUT VARCHAR2 Required

Line 233: -- p_bill_site_name IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR

229: -- Pre-reqs : None.
230: -- Parameters :
231: -- p_customer_id IN NUMBER Required
232: -- p_bill_to_address_id IN NUMBER Optional Default = FND_API.G_MISS_NUM
233: -- p_bill_site_name IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR
234: -- p_check_id_flag IN VARCHAR2 Optional Default = 'A'
235: -- x_bill_to_address_id OUT NUMBER Optional
236: -- x_return_status OUT VARCHAR2 Required
237: -- x_error_msg_code OUT VARCHAR2 Required

Line 241: ,p_bill_to_address_id IN NUMBER := FND_API.G_MISS_NUM

237: -- x_error_msg_code OUT VARCHAR2 Required
238:
239: PROCEDURE CHECK_BILL_SITE_NAME_OR_ID
240: ( p_customer_id IN NUMBER
241: ,p_bill_to_address_id IN NUMBER := FND_API.G_MISS_NUM
242: ,p_bill_site_name IN VARCHAR2 := FND_API.G_MISS_CHAR
243: ,p_check_id_flag IN VARCHAR2 := 'A'
244: ,x_bill_to_address_id OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
245: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895

Line 242: ,p_bill_site_name IN VARCHAR2 := FND_API.G_MISS_CHAR

238:
239: PROCEDURE CHECK_BILL_SITE_NAME_OR_ID
240: ( p_customer_id IN NUMBER
241: ,p_bill_to_address_id IN NUMBER := FND_API.G_MISS_NUM
242: ,p_bill_site_name IN VARCHAR2 := FND_API.G_MISS_CHAR
243: ,p_check_id_flag IN VARCHAR2 := 'A'
244: ,x_bill_to_address_id OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
245: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
246: ,x_error_msg_code OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895

Line 262: if (p_bill_to_address_id = FND_API.G_MISS_NUM) OR (p_bill_to_address_id is NULL) then

258: customer_id = p_customer_id AND
259: site_use_code = 'BILL_TO';
260:
261: BEGIN
262: if (p_bill_to_address_id = FND_API.G_MISS_NUM) OR (p_bill_to_address_id is NULL) then
263: if (p_bill_site_name is not NULL) then
264: SELECT address_id
265: INTO x_bill_to_address_id
266: FROM pa_customer_sites_v

Line 321: x_return_status := FND_API.G_RET_STS_SUCCESS;

317: -- else
318: -- x_bill_to_address_id := p_bill_to_address_id;
319: end if;
320: end if;
321: x_return_status := FND_API.G_RET_STS_SUCCESS;
322: EXCEPTION
323: when NO_DATA_FOUND then
324: x_bill_to_address_id := NULL;
325: x_return_status := FND_API.G_RET_STS_ERROR;

Line 325: x_return_status := FND_API.G_RET_STS_ERROR;

321: x_return_status := FND_API.G_RET_STS_SUCCESS;
322: EXCEPTION
323: when NO_DATA_FOUND then
324: x_bill_to_address_id := NULL;
325: x_return_status := FND_API.G_RET_STS_ERROR;
326: x_error_msg_code := 'PA_BILL_TO_ADDR_ID_INVALID';
327: when TOO_MANY_ROWS then
328: x_bill_to_address_id := NULL;
329: x_return_status := FND_API.G_RET_STS_ERROR;

Line 329: x_return_status := FND_API.G_RET_STS_ERROR;

325: x_return_status := FND_API.G_RET_STS_ERROR;
326: x_error_msg_code := 'PA_BILL_TO_ADDR_ID_INVALID';
327: when TOO_MANY_ROWS then
328: x_bill_to_address_id := NULL;
329: x_return_status := FND_API.G_RET_STS_ERROR;
330: x_error_msg_code := 'PA_BILL_TO_ADDR_NOT_UNIQUE';
331: when OTHERS then
332: x_bill_to_address_id := NULL;
333: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 333: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

329: x_return_status := FND_API.G_RET_STS_ERROR;
330: x_error_msg_code := 'PA_BILL_TO_ADDR_NOT_UNIQUE';
331: when OTHERS then
332: x_bill_to_address_id := NULL;
333: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
334: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_UTILS', p_procedure_name => 'CHECK_BILL_SITE_NAME_OR_ID');
335: raise;
336: END CHECK_BILL_SITE_NAME_OR_ID;
337:

Line 344: -- p_ship_to_address_id IN NUMBER Optional Default = FND_API.G_MISS_NUM

340: -- Type : Utility
341: -- Pre-reqs : None.
342: -- Parameters :
343: -- p_customer_id IN NUMBER Required
344: -- p_ship_to_address_id IN NUMBER Optional Default = FND_API.G_MISS_NUM
345: -- p_work_site_name IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR
346: -- p_check_id_flag IN VARCHAR2 Optional Default = 'A'
347: -- x_ship_to_address_id OUT NUMBER Optional
348: -- x_return_status OUT VARCHAR2 Required

Line 345: -- p_work_site_name IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR

341: -- Pre-reqs : None.
342: -- Parameters :
343: -- p_customer_id IN NUMBER Required
344: -- p_ship_to_address_id IN NUMBER Optional Default = FND_API.G_MISS_NUM
345: -- p_work_site_name IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR
346: -- p_check_id_flag IN VARCHAR2 Optional Default = 'A'
347: -- x_ship_to_address_id OUT NUMBER Optional
348: -- x_return_status OUT VARCHAR2 Required
349: -- x_error_msg_code OUT VARCHAR2 Required

Line 353: ,p_ship_to_address_id IN NUMBER := FND_API.G_MISS_NUM

349: -- x_error_msg_code OUT VARCHAR2 Required
350:
351: PROCEDURE CHECK_WORK_SITE_NAME_OR_ID
352: ( p_customer_id IN NUMBER
353: ,p_ship_to_address_id IN NUMBER := FND_API.G_MISS_NUM
354: ,p_work_site_name IN VARCHAR2 := FND_API.G_MISS_CHAR
355: ,p_check_id_flag IN VARCHAR2 := 'A'
356: ,x_ship_to_address_id OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
357: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895

Line 354: ,p_work_site_name IN VARCHAR2 := FND_API.G_MISS_CHAR

350:
351: PROCEDURE CHECK_WORK_SITE_NAME_OR_ID
352: ( p_customer_id IN NUMBER
353: ,p_ship_to_address_id IN NUMBER := FND_API.G_MISS_NUM
354: ,p_work_site_name IN VARCHAR2 := FND_API.G_MISS_CHAR
355: ,p_check_id_flag IN VARCHAR2 := 'A'
356: ,x_ship_to_address_id OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
357: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
358: ,x_error_msg_code OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895

Line 373: if (p_ship_to_address_id = FND_API.G_MISS_NUM) OR (p_ship_to_address_id is NULL) then

369: WHERE upper(address1) = upper(p_work_site_name) AND
370: customer_id = p_customer_id AND
371: site_use_code = 'SHIP_TO';
372: BEGIN
373: if (p_ship_to_address_id = FND_API.G_MISS_NUM) OR (p_ship_to_address_id is NULL) then
374: if (p_work_site_name is not NULL) then
375: SELECT address_id
376: INTO x_ship_to_address_id
377: FROM pa_customer_sites_v

Line 433: x_return_status := FND_API.G_RET_STS_SUCCESS;

429: else
430: x_ship_to_address_id := NULL;
431: end if;
432: end if;
433: x_return_status := FND_API.G_RET_STS_SUCCESS;
434: EXCEPTION
435: when NO_DATA_FOUND then
436: x_return_status := FND_API.G_RET_STS_ERROR;
437: x_error_msg_code := 'PA_SHIP_TO_ADDR_ID_INVALID';

Line 436: x_return_status := FND_API.G_RET_STS_ERROR;

432: end if;
433: x_return_status := FND_API.G_RET_STS_SUCCESS;
434: EXCEPTION
435: when NO_DATA_FOUND then
436: x_return_status := FND_API.G_RET_STS_ERROR;
437: x_error_msg_code := 'PA_SHIP_TO_ADDR_ID_INVALID';
438: when TOO_MANY_ROWS then
439: x_return_status := FND_API.G_RET_STS_ERROR;
440: x_error_msg_code := 'PA_SHIP_TO_ADDR_NOT_UNIQUE';

Line 439: x_return_status := FND_API.G_RET_STS_ERROR;

435: when NO_DATA_FOUND then
436: x_return_status := FND_API.G_RET_STS_ERROR;
437: x_error_msg_code := 'PA_SHIP_TO_ADDR_ID_INVALID';
438: when TOO_MANY_ROWS then
439: x_return_status := FND_API.G_RET_STS_ERROR;
440: x_error_msg_code := 'PA_SHIP_TO_ADDR_NOT_UNIQUE';
441: when OTHERS then
442: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
443: raise;

Line 442: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

438: when TOO_MANY_ROWS then
439: x_return_status := FND_API.G_RET_STS_ERROR;
440: x_error_msg_code := 'PA_SHIP_TO_ADDR_NOT_UNIQUE';
441: when OTHERS then
442: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
443: raise;
444: END CHECK_WORK_SITE_NAME_OR_ID;
445:
446:

Line 453: -- p_contact_id IN NUMBER Optional Default = FND_API.G_MISS_NUM

449: -- Pre-reqs : None.
450: -- Parameters :
451: -- p_customer_id IN NUMBER Required
452: -- p_project_contact_type_code IN VARCHAR2 Required
453: -- p_contact_id IN NUMBER Optional Default = FND_API.G_MISS_NUM
454: -- p_contact_name IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR
455: -- p_check_id_flag IN VARCHAR2 Optional Default = 'A'
456: -- x_contact_id OUT NUMBER Required
457: -- x_return_status OUT VARCHAR2 Required

Line 454: -- p_contact_name IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR

450: -- Parameters :
451: -- p_customer_id IN NUMBER Required
452: -- p_project_contact_type_code IN VARCHAR2 Required
453: -- p_contact_id IN NUMBER Optional Default = FND_API.G_MISS_NUM
454: -- p_contact_name IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR
455: -- p_check_id_flag IN VARCHAR2 Optional Default = 'A'
456: -- x_contact_id OUT NUMBER Required
457: -- x_return_status OUT VARCHAR2 Required
458: -- x_error_msg_code OUT VARCHAR2 Required

Line 463: ,p_contact_id IN NUMBER := FND_API.G_MISS_NUM

459:
460: PROCEDURE CHECK_CONTACT_NAME_OR_ID
461: ( p_customer_id IN NUMBER
462: ,p_project_contact_type_code IN VARCHAR2
463: ,p_contact_id IN NUMBER := FND_API.G_MISS_NUM
464: ,p_contact_name IN VARCHAR2 := FND_API.G_MISS_CHAR
465: ,p_check_id_flag IN VARCHAR2 := 'A'
466: ,p_address_id IN NUMBER := NULL -- Added for Bug 2964227
467: ,x_contact_id OUT NOCOPY NUMBER --File.Sql.39 bug 4440895

Line 464: ,p_contact_name IN VARCHAR2 := FND_API.G_MISS_CHAR

460: PROCEDURE CHECK_CONTACT_NAME_OR_ID
461: ( p_customer_id IN NUMBER
462: ,p_project_contact_type_code IN VARCHAR2
463: ,p_contact_id IN NUMBER := FND_API.G_MISS_NUM
464: ,p_contact_name IN VARCHAR2 := FND_API.G_MISS_CHAR
465: ,p_check_id_flag IN VARCHAR2 := 'A'
466: ,p_address_id IN NUMBER := NULL -- Added for Bug 2964227
467: ,x_contact_id OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
468: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895

Line 489: if (p_contact_id = FND_API.G_MISS_NUM) OR (p_contact_id is NULL) then

485:
486: -- Bug 2964227 This change is backward compatible. Even if new parmeter is not passed, this will work unaffected.
487:
488: BEGIN
489: if (p_contact_id = FND_API.G_MISS_NUM) OR (p_contact_id is NULL) then
490: if (p_contact_name is not NULL) then
491: SELECT contact_id
492: INTO x_contact_id
493: FROM pa_customer_contact_names_v

Line 569: x_return_status := FND_API.G_RET_STS_SUCCESS;

565: else
566: x_contact_id := NULL;
567: end if;
568: end if;
569: x_return_status := FND_API.G_RET_STS_SUCCESS;
570: EXCEPTION
571: when NO_DATA_FOUND then
572: x_contact_id := NULL;
573: x_return_status := FND_API.G_RET_STS_ERROR;

Line 573: x_return_status := FND_API.G_RET_STS_ERROR;

569: x_return_status := FND_API.G_RET_STS_SUCCESS;
570: EXCEPTION
571: when NO_DATA_FOUND then
572: x_contact_id := NULL;
573: x_return_status := FND_API.G_RET_STS_ERROR;
574: x_error_msg_code := 'PA_CONTACT_ID_INVALID';
575: when TOO_MANY_ROWS then
576: x_contact_id := NULL;
577: x_return_status := FND_API.G_RET_STS_ERROR;

Line 577: x_return_status := FND_API.G_RET_STS_ERROR;

573: x_return_status := FND_API.G_RET_STS_ERROR;
574: x_error_msg_code := 'PA_CONTACT_ID_INVALID';
575: when TOO_MANY_ROWS then
576: x_contact_id := NULL;
577: x_return_status := FND_API.G_RET_STS_ERROR;
578: x_error_msg_code := 'PA_CONTACT_NAME_NOT_UNIQUE';
579: when OTHERS then
580: x_contact_id := NULL;
581: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 581: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

577: x_return_status := FND_API.G_RET_STS_ERROR;
578: x_error_msg_code := 'PA_CONTACT_NAME_NOT_UNIQUE';
579: when OTHERS then
580: x_contact_id := NULL;
581: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
582: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_UTILS', p_procedure_name => 'CHECK_CONTACT_NAME_OR_ID');
583: raise;
584: END CHECK_CONTACT_NAME_OR_ID;
585:

Line 591: -- p_project_contact_type_code IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR

587: -- API name : Check_Contact_Typ_Name_Or_Code
588: -- Type : Utility
589: -- Pre-reqs : None.
590: -- Parameters :
591: -- p_project_contact_type_code IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR
592: -- p_project_contact_type_name IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR
593: -- p_check_id_flag IN VARCHAR2 Optional Default = 'A'
594: -- x_project_contact_type_code OUT VARCHAR2 Required
595: -- x_return_status OUT VARCHAR2 Required

Line 592: -- p_project_contact_type_name IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR

588: -- Type : Utility
589: -- Pre-reqs : None.
590: -- Parameters :
591: -- p_project_contact_type_code IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR
592: -- p_project_contact_type_name IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR
593: -- p_check_id_flag IN VARCHAR2 Optional Default = 'A'
594: -- x_project_contact_type_code OUT VARCHAR2 Required
595: -- x_return_status OUT VARCHAR2 Required
596: -- x_error_msg_code OUT VARCHAR2 Required

Line 599: ( p_project_contact_type_code IN VARCHAR2 := FND_API.G_MISS_CHAR

595: -- x_return_status OUT VARCHAR2 Required
596: -- x_error_msg_code OUT VARCHAR2 Required
597:
598: PROCEDURE CHECK_CONTACT_TYP_NAME_OR_CODE
599: ( p_project_contact_type_code IN VARCHAR2 := FND_API.G_MISS_CHAR
600: ,p_project_contact_type_name IN VARCHAR2 := FND_API.G_MISS_CHAR
601: ,p_check_id_flag IN VARCHAR2 := 'A'
602: ,x_project_contact_type_code OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
603: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895

Line 600: ,p_project_contact_type_name IN VARCHAR2 := FND_API.G_MISS_CHAR

596: -- x_error_msg_code OUT VARCHAR2 Required
597:
598: PROCEDURE CHECK_CONTACT_TYP_NAME_OR_CODE
599: ( p_project_contact_type_code IN VARCHAR2 := FND_API.G_MISS_CHAR
600: ,p_project_contact_type_name IN VARCHAR2 := FND_API.G_MISS_CHAR
601: ,p_check_id_flag IN VARCHAR2 := 'A'
602: ,x_project_contact_type_code OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
603: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
604: ,x_error_msg_code OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895

Line 620: if (p_project_contact_type_code = FND_API.G_MISS_CHAR) OR

616: lookup_type = 'PROJECT CONTACT TYPE' AND
617: trunc(sysdate) between start_date_active and nvl(end_date_active, trunc(sysdate));
618:
619: BEGIN
620: if (p_project_contact_type_code = FND_API.G_MISS_CHAR) OR
621: (p_project_contact_type_code is NULL) then
622: if (p_project_contact_type_name is not NULL) then
623: SELECT lookup_code
624: INTO x_project_contact_type_code

Line 682: x_return_status := FND_API.G_RET_STS_SUCCESS;

678: else
679: x_project_contact_type_code := NULL;
680: end if;
681: end if;
682: x_return_status := FND_API.G_RET_STS_SUCCESS;
683: EXCEPTION
684: when NO_DATA_FOUND then
685: x_project_contact_type_code := NULL;
686: x_return_status := FND_API.G_RET_STS_ERROR;

Line 686: x_return_status := FND_API.G_RET_STS_ERROR;

682: x_return_status := FND_API.G_RET_STS_SUCCESS;
683: EXCEPTION
684: when NO_DATA_FOUND then
685: x_project_contact_type_code := NULL;
686: x_return_status := FND_API.G_RET_STS_ERROR;
687: x_error_msg_code := 'PA_CONTACT_TYP_CODE_INVALID';
688: when TOO_MANY_ROWS then
689: x_project_contact_type_code := NULL;
690: x_return_status := FND_API.G_RET_STS_ERROR;

Line 690: x_return_status := FND_API.G_RET_STS_ERROR;

686: x_return_status := FND_API.G_RET_STS_ERROR;
687: x_error_msg_code := 'PA_CONTACT_TYP_CODE_INVALID';
688: when TOO_MANY_ROWS then
689: x_project_contact_type_code := NULL;
690: x_return_status := FND_API.G_RET_STS_ERROR;
691: x_error_msg_code := 'PA_CONT_TYP_CODE_NOT_UNIQUE';
692: when OTHERS then
693: x_project_contact_type_code := NULL;
694: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 694: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

690: x_return_status := FND_API.G_RET_STS_ERROR;
691: x_error_msg_code := 'PA_CONT_TYP_CODE_NOT_UNIQUE';
692: when OTHERS then
693: x_project_contact_type_code := NULL;
694: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
695: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_UTILS', p_procedure_name => 'CHECK_CONTACT_TYP_NAME_OR_CODE');
696: raise;
697: END CHECK_CONTACT_TYP_NAME_OR_CODE;
698:

Line 727: x_return_status := FND_API.G_RET_STS_ERROR;

723: if (p_customer_id is not null) then
724: open C(p_project_id, p_customer_id);
725: fetch C into l_dummy;
726: if l_dummy is not NULL then
727: x_return_status := FND_API.G_RET_STS_ERROR;
728: x_error_msg_code := 'PA_ALL_DUPLICATE_NAME';
729: else
730: x_return_status := FND_API.G_RET_STS_SUCCESS;
731: end if;

Line 730: x_return_status := FND_API.G_RET_STS_SUCCESS;

726: if l_dummy is not NULL then
727: x_return_status := FND_API.G_RET_STS_ERROR;
728: x_error_msg_code := 'PA_ALL_DUPLICATE_NAME';
729: else
730: x_return_status := FND_API.G_RET_STS_SUCCESS;
731: end if;
732: close C;
733: else
734: x_return_status := FND_API.G_RET_STS_ERROR;

Line 734: x_return_status := FND_API.G_RET_STS_ERROR;

730: x_return_status := FND_API.G_RET_STS_SUCCESS;
731: end if;
732: close C;
733: else
734: x_return_status := FND_API.G_RET_STS_ERROR;
735: x_error_msg_code := 'PA_CUST_NAME_OR_NUM_REQD';
736: end if;
737: EXCEPTION
738: when OTHERS then

Line 739: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

735: x_error_msg_code := 'PA_CUST_NAME_OR_NUM_REQD';
736: end if;
737: EXCEPTION
738: when OTHERS then
739: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
740: raise;
741: END CHECK_DUPLICATE_CUSTOMER;
742:
743:

Line 778: x_return_status := FND_API.G_RET_STS_ERROR;

774: if (p_contact_id is not null) then
775: open C(p_project_id, p_customer_id, p_contact_id, p_project_contact_type_code);
776: fetch C into l_dummy;
777: if l_dummy is not NULL then
778: x_return_status := FND_API.G_RET_STS_ERROR;
779: x_error_msg_code := 'PA_ALL_DUPLICATE_NAME';
780: else
781: x_return_status := FND_API.G_RET_STS_SUCCESS;
782: end if;

Line 781: x_return_status := FND_API.G_RET_STS_SUCCESS;

777: if l_dummy is not NULL then
778: x_return_status := FND_API.G_RET_STS_ERROR;
779: x_error_msg_code := 'PA_ALL_DUPLICATE_NAME';
780: else
781: x_return_status := FND_API.G_RET_STS_SUCCESS;
782: end if;
783: close C;
784: else
785: x_return_status := FND_API.G_RET_STS_ERROR;

Line 785: x_return_status := FND_API.G_RET_STS_ERROR;

781: x_return_status := FND_API.G_RET_STS_SUCCESS;
782: end if;
783: close C;
784: else
785: x_return_status := FND_API.G_RET_STS_ERROR;
786: x_error_msg_code := 'PA_CONTACT_NAME_REQD';
787: end if;
788: EXCEPTION
789: when OTHERS then

Line 790: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

786: x_error_msg_code := 'PA_CONTACT_NAME_REQD';
787: end if;
788: EXCEPTION
789: when OTHERS then
790: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
791: raise;
792: END CHECK_DUPLICATE_CONTACT;
793:
794:

Line 811: x_return_status := FND_API.G_RET_STS_ERROR;

807: )
808: IS
809: BEGIN
810: if (p_customer_bill_split < 0) OR (p_customer_bill_split > 100) then
811: x_return_status := FND_API.G_RET_STS_ERROR;
812: x_error_msg_code := 'PA_CUST_BILL_SPLIT_INVALID';
813: else
814: x_return_status := FND_API.G_RET_STS_SUCCESS;
815: end if;

Line 814: x_return_status := FND_API.G_RET_STS_SUCCESS;

810: if (p_customer_bill_split < 0) OR (p_customer_bill_split > 100) then
811: x_return_status := FND_API.G_RET_STS_ERROR;
812: x_error_msg_code := 'PA_CUST_BILL_SPLIT_INVALID';
813: else
814: x_return_status := FND_API.G_RET_STS_SUCCESS;
815: end if;
816: EXCEPTION
817: when OTHERS then
818: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 818: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

814: x_return_status := FND_API.G_RET_STS_SUCCESS;
815: end if;
816: EXCEPTION
817: when OTHERS then
818: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
819: raise;
820: END CHECK_CONTRIBUTION_PERCENTAGE;
821:
822:

Line 853: x_return_status := FND_API.G_RET_STS_ERROR;

849: fetch C into l_total;
850: close C;
851: l_total := l_total + p_customer_bill_split;
852: if l_total > 100 then
853: x_return_status := FND_API.G_RET_STS_ERROR;
854: -- space in the error msg code due to error in akuploading to seed115
855: x_error_msg_code := 'PA_TOT_CUST_BILL_SPLIT_INVLD';
856: else
857: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 857: x_return_status := FND_API.G_RET_STS_SUCCESS;

853: x_return_status := FND_API.G_RET_STS_ERROR;
854: -- space in the error msg code due to error in akuploading to seed115
855: x_error_msg_code := 'PA_TOT_CUST_BILL_SPLIT_INVLD';
856: else
857: x_return_status := FND_API.G_RET_STS_SUCCESS;
858: end if;
859:
860: EXCEPTION
861: when OTHERS then

Line 862: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

858: end if;
859:
860: EXCEPTION
861: when OTHERS then
862: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
863: raise;
864: END CHECK_CONTRIBUTION_TOTAL;
865:
866:

Line 872: -- p_bill_to_address_id IN NUMBER Optional Default = FND_API.G_MISS_NUM

868: -- Type : Utility
869: -- Pre-reqs : None.
870: -- Parameters :
871: -- p_customer_bill_split IN NUMBER Required
872: -- p_bill_to_address_id IN NUMBER Optional Default = FND_API.G_MISS_NUM
873: -- p_ship_to_address_id IN NUMBER Optional Default = FND_API.G_MISS_NUM
874: -- x_return_status OUT VARCHAR2 Required
875: -- x_error_msg_code OUT VARCHAR2 Required
876:

Line 873: -- p_ship_to_address_id IN NUMBER Optional Default = FND_API.G_MISS_NUM

869: -- Pre-reqs : None.
870: -- Parameters :
871: -- p_customer_bill_split IN NUMBER Required
872: -- p_bill_to_address_id IN NUMBER Optional Default = FND_API.G_MISS_NUM
873: -- p_ship_to_address_id IN NUMBER Optional Default = FND_API.G_MISS_NUM
874: -- x_return_status OUT VARCHAR2 Required
875: -- x_error_msg_code OUT VARCHAR2 Required
876:
877: PROCEDURE CHECK_BILL_WORK_SITES_REQUIRED

Line 879: ,p_bill_to_address_id IN NUMBER := FND_API.G_MISS_NUM

875: -- x_error_msg_code OUT VARCHAR2 Required
876:
877: PROCEDURE CHECK_BILL_WORK_SITES_REQUIRED
878: ( p_customer_bill_split IN NUMBER
879: ,p_bill_to_address_id IN NUMBER := FND_API.G_MISS_NUM
880: ,p_ship_to_address_id IN NUMBER := FND_API.G_MISS_NUM
881: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
882: ,x_error_msg_code OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
883: )

Line 880: ,p_ship_to_address_id IN NUMBER := FND_API.G_MISS_NUM

876:
877: PROCEDURE CHECK_BILL_WORK_SITES_REQUIRED
878: ( p_customer_bill_split IN NUMBER
879: ,p_bill_to_address_id IN NUMBER := FND_API.G_MISS_NUM
880: ,p_ship_to_address_id IN NUMBER := FND_API.G_MISS_NUM
881: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
882: ,x_error_msg_code OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
883: )
884: IS

Line 887: if ((p_bill_to_address_id = FND_API.G_MISS_NUM) OR (p_bill_to_address_id is NULL)) OR

883: )
884: IS
885: BEGIN
886: if p_customer_bill_split > 0 then
887: if ((p_bill_to_address_id = FND_API.G_MISS_NUM) OR (p_bill_to_address_id is NULL)) OR
888: ((p_ship_to_address_id = FND_API.G_MISS_NUM) OR (p_ship_to_address_id is NULL)) then
889: x_return_status := FND_API.G_RET_STS_ERROR;
890: x_error_msg_code := 'PA_BILL_AND_WORK_SITE_REQD';
891: return;

Line 888: ((p_ship_to_address_id = FND_API.G_MISS_NUM) OR (p_ship_to_address_id is NULL)) then

884: IS
885: BEGIN
886: if p_customer_bill_split > 0 then
887: if ((p_bill_to_address_id = FND_API.G_MISS_NUM) OR (p_bill_to_address_id is NULL)) OR
888: ((p_ship_to_address_id = FND_API.G_MISS_NUM) OR (p_ship_to_address_id is NULL)) then
889: x_return_status := FND_API.G_RET_STS_ERROR;
890: x_error_msg_code := 'PA_BILL_AND_WORK_SITE_REQD';
891: return;
892: end if;

Line 889: x_return_status := FND_API.G_RET_STS_ERROR;

885: BEGIN
886: if p_customer_bill_split > 0 then
887: if ((p_bill_to_address_id = FND_API.G_MISS_NUM) OR (p_bill_to_address_id is NULL)) OR
888: ((p_ship_to_address_id = FND_API.G_MISS_NUM) OR (p_ship_to_address_id is NULL)) then
889: x_return_status := FND_API.G_RET_STS_ERROR;
890: x_error_msg_code := 'PA_BILL_AND_WORK_SITE_REQD';
891: return;
892: end if;
893: end if;

Line 894: x_return_status := FND_API.G_RET_STS_SUCCESS;

890: x_error_msg_code := 'PA_BILL_AND_WORK_SITE_REQD';
891: return;
892: end if;
893: end if;
894: x_return_status := FND_API.G_RET_STS_SUCCESS;
895: EXCEPTION
896: when OTHERS then
897: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
898: raise;

Line 897: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

893: end if;
894: x_return_status := FND_API.G_RET_STS_SUCCESS;
895: EXCEPTION
896: when OTHERS then
897: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
898: raise;
899: END CHECK_BILL_WORK_SITES_REQUIRED;
900:
901:

Line 960: x_return_status := FND_API.G_RET_STS_ERROR;

956:
957: if l_cc_prvdr_flag = 'Y' then
958: if p_action = 'INSERT' then
959: if l_recinfo.count > 0 then
960: x_return_status := FND_API.G_RET_STS_ERROR;
961: x_error_msg_code := 'PA_ONLY_ONE_CUST_ALLOWED';
962: return;
963: else
964: if p_customer_bill_split <> 100 then

Line 965: x_return_status := FND_API.G_RET_STS_ERROR;

961: x_error_msg_code := 'PA_ONLY_ONE_CUST_ALLOWED';
962: return;
963: else
964: if p_customer_bill_split <> 100 then
965: x_return_status := FND_API.G_RET_STS_ERROR;
966: x_error_msg_code := 'PA_PR_INSUF_BILL_SPLIT';
967: return;
968: end if;
969: end if;

Line 972: x_return_status := FND_API.G_RET_STS_ERROR;

968: end if;
969: end if;
970: elsif p_action = 'UPDATE' then
971: if l_recinfo.count > 1 then
972: x_return_status := FND_API.G_RET_STS_ERROR;
973: x_error_msg_code := 'PA_ONLY_ONE_CUST_ALLOWED';
974: return;
975: elsif l_recinfo.count = 1 then
976: open C3(p_project_id, p_customer_id);

Line 981: x_return_status := FND_API.G_RET_STS_ERROR;

977: fetch C3 into l_dummy;
978: close C3;
979:
980: if l_dummy is NULL then
981: x_return_status := FND_API.G_RET_STS_ERROR;
982: x_error_msg_code := 'PA_ONLY_ONE_CUST_ALLOWED';
983: return;
984: else
985: if p_customer_bill_split <> 100 then

Line 986: x_return_status := FND_API.G_RET_STS_ERROR;

982: x_error_msg_code := 'PA_ONLY_ONE_CUST_ALLOWED';
983: return;
984: else
985: if p_customer_bill_split <> 100 then
986: x_return_status := FND_API.G_RET_STS_ERROR;
987: x_error_msg_code := 'PA_PR_INSUF_BILL_SPLIT';
988: return;
989: end if;
990: end if;

Line 995: x_return_status := FND_API.G_RET_STS_SUCCESS;

991: end if;
992: end if;
993: end if;
994:
995: x_return_status := FND_API.G_RET_STS_SUCCESS;
996: EXCEPTION
997: when OTHERS then
998: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
999: raise;

Line 998: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

994:
995: x_return_status := FND_API.G_RET_STS_SUCCESS;
996: EXCEPTION
997: when OTHERS then
998: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
999: raise;
1000: END CHECK_CC_PRVDR_FLAG_CONTRIB;
1001:
1002:

Line 1009: -- p_receiver_task_id IN NUMBER Optional Default = FND_API.G_MISS_NUM

1005: -- Pre-reqs : None.
1006: -- Parameters :
1007: -- p_project_id IN NUMBER Required
1008: -- p_customer_id IN NUMBER Required
1009: -- p_receiver_task_id IN NUMBER Optional Default = FND_API.G_MISS_NUM
1010: -- x_bill_another_project_flag OUT VARCHAR2 Required
1011: -- x_return_status OUT VARCHAR2 Required
1012: -- x_error_msg_code OUT VARCHAR2 Required
1013:

Line 1017: ,p_receiver_task_id IN NUMBER := FND_API.G_MISS_NUM

1013:
1014: PROCEDURE CHECK_RECEIVER_PROJ_ENTERABLE
1015: ( p_project_id IN NUMBER
1016: ,p_customer_id IN NUMBER
1017: ,p_receiver_task_id IN NUMBER := FND_API.G_MISS_NUM
1018: ,x_bill_another_project_flag OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
1019: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
1020: ,x_error_msg_code OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
1021: )

Line 1057: if (p_receiver_task_id <> FND_API.G_MISS_NUM) AND (p_receiver_task_id is not NULL) then

1053: open C3;
1054: fetch C3 into l_dummy;
1055:
1056: if (C1%FOUND AND C2%FOUND AND C3%FOUND) then
1057: if (p_receiver_task_id <> FND_API.G_MISS_NUM) AND (p_receiver_task_id is not NULL) then
1058: x_bill_another_project_flag := 'Y';
1059: else
1060: x_bill_another_project_flag := 'N';
1061: end if;

Line 1062: x_return_status := FND_API.G_RET_STS_SUCCESS;

1058: x_bill_another_project_flag := 'Y';
1059: else
1060: x_bill_another_project_flag := 'N';
1061: end if;
1062: x_return_status := FND_API.G_RET_STS_SUCCESS;
1063: else
1064: if (p_receiver_task_id <> FND_API.G_MISS_NUM) AND (p_receiver_task_id is not NULL) then
1065: x_return_status := FND_API.G_RET_STS_ERROR;
1066: x_error_msg_code := 'PA_REC_PROJ_NOT_ALLOWED';

Line 1064: if (p_receiver_task_id <> FND_API.G_MISS_NUM) AND (p_receiver_task_id is not NULL) then

1060: x_bill_another_project_flag := 'N';
1061: end if;
1062: x_return_status := FND_API.G_RET_STS_SUCCESS;
1063: else
1064: if (p_receiver_task_id <> FND_API.G_MISS_NUM) AND (p_receiver_task_id is not NULL) then
1065: x_return_status := FND_API.G_RET_STS_ERROR;
1066: x_error_msg_code := 'PA_REC_PROJ_NOT_ALLOWED';
1067: else
1068: x_bill_another_project_flag := 'N';

Line 1065: x_return_status := FND_API.G_RET_STS_ERROR;

1061: end if;
1062: x_return_status := FND_API.G_RET_STS_SUCCESS;
1063: else
1064: if (p_receiver_task_id <> FND_API.G_MISS_NUM) AND (p_receiver_task_id is not NULL) then
1065: x_return_status := FND_API.G_RET_STS_ERROR;
1066: x_error_msg_code := 'PA_REC_PROJ_NOT_ALLOWED';
1067: else
1068: x_bill_another_project_flag := 'N';
1069: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1069: x_return_status := FND_API.G_RET_STS_SUCCESS;

1065: x_return_status := FND_API.G_RET_STS_ERROR;
1066: x_error_msg_code := 'PA_REC_PROJ_NOT_ALLOWED';
1067: else
1068: x_bill_another_project_flag := 'N';
1069: x_return_status := FND_API.G_RET_STS_SUCCESS;
1070: end if;
1071: end if;
1072:
1073: close C1;

Line 1078: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1074: close C2;
1075: close C3;
1076: EXCEPTION
1077: when OTHERS then
1078: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1079: raise;
1080: END CHECK_RECEIVER_PROJ_ENTERABLE;
1081:
1082:

Line 1088: -- p_inv_currency_code IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR

1084: -- Type : Utility
1085: -- Pre-reqs : None.
1086: -- Parameters :
1087: -- p_project_id IN NUMBER Required
1088: -- p_inv_currency_code IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR
1089: -- p_inv_rate_type IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR
1090: -- p_inv_rate_date IN DATE Optional Default = FND_API.G_MISS_DATE
1091: -- p_inv_exchange_rate IN NUMBER Optional Default = FND_API.G_MISS_NUM
1092: -- p_allow_user_rate_type_flag IN VARCHAR2 Required Default = 'N'

Line 1089: -- p_inv_rate_type IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR

1085: -- Pre-reqs : None.
1086: -- Parameters :
1087: -- p_project_id IN NUMBER Required
1088: -- p_inv_currency_code IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR
1089: -- p_inv_rate_type IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR
1090: -- p_inv_rate_date IN DATE Optional Default = FND_API.G_MISS_DATE
1091: -- p_inv_exchange_rate IN NUMBER Optional Default = FND_API.G_MISS_NUM
1092: -- p_allow_user_rate_type_flag IN VARCHAR2 Required Default = 'N'
1093: -- x_return_status OUT VARCHAR2 Required

Line 1090: -- p_inv_rate_date IN DATE Optional Default = FND_API.G_MISS_DATE

1086: -- Parameters :
1087: -- p_project_id IN NUMBER Required
1088: -- p_inv_currency_code IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR
1089: -- p_inv_rate_type IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR
1090: -- p_inv_rate_date IN DATE Optional Default = FND_API.G_MISS_DATE
1091: -- p_inv_exchange_rate IN NUMBER Optional Default = FND_API.G_MISS_NUM
1092: -- p_allow_user_rate_type_flag IN VARCHAR2 Required Default = 'N'
1093: -- x_return_status OUT VARCHAR2 Required
1094: -- x_error_msg_code OUT VARCHAR2 Required

Line 1091: -- p_inv_exchange_rate IN NUMBER Optional Default = FND_API.G_MISS_NUM

1087: -- p_project_id IN NUMBER Required
1088: -- p_inv_currency_code IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR
1089: -- p_inv_rate_type IN VARCHAR2 Optional Default = FND_API.G_MISS_CHAR
1090: -- p_inv_rate_date IN DATE Optional Default = FND_API.G_MISS_DATE
1091: -- p_inv_exchange_rate IN NUMBER Optional Default = FND_API.G_MISS_NUM
1092: -- p_allow_user_rate_type_flag IN VARCHAR2 Required Default = 'N'
1093: -- x_return_status OUT VARCHAR2 Required
1094: -- x_error_msg_code OUT VARCHAR2 Required
1095:

Line 1098: ,p_inv_currency_code IN VARCHAR2 := FND_API.G_MISS_CHAR

1094: -- x_error_msg_code OUT VARCHAR2 Required
1095:
1096: PROCEDURE CHECK_INVOICE_CURRENCY_INFO
1097: ( p_project_id IN NUMBER
1098: ,p_inv_currency_code IN VARCHAR2 := FND_API.G_MISS_CHAR
1099: ,p_inv_rate_type IN VARCHAR2 := FND_API.G_MISS_CHAR
1100: ,p_inv_rate_date IN DATE := FND_API.G_MISS_DATE
1101: ,p_inv_exchange_rate IN NUMBER := FND_API.G_MISS_NUM
1102: ,p_allow_user_rate_type_flag IN VARCHAR2 := 'N'

Line 1099: ,p_inv_rate_type IN VARCHAR2 := FND_API.G_MISS_CHAR

1095:
1096: PROCEDURE CHECK_INVOICE_CURRENCY_INFO
1097: ( p_project_id IN NUMBER
1098: ,p_inv_currency_code IN VARCHAR2 := FND_API.G_MISS_CHAR
1099: ,p_inv_rate_type IN VARCHAR2 := FND_API.G_MISS_CHAR
1100: ,p_inv_rate_date IN DATE := FND_API.G_MISS_DATE
1101: ,p_inv_exchange_rate IN NUMBER := FND_API.G_MISS_NUM
1102: ,p_allow_user_rate_type_flag IN VARCHAR2 := 'N'
1103: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895

Line 1100: ,p_inv_rate_date IN DATE := FND_API.G_MISS_DATE

1096: PROCEDURE CHECK_INVOICE_CURRENCY_INFO
1097: ( p_project_id IN NUMBER
1098: ,p_inv_currency_code IN VARCHAR2 := FND_API.G_MISS_CHAR
1099: ,p_inv_rate_type IN VARCHAR2 := FND_API.G_MISS_CHAR
1100: ,p_inv_rate_date IN DATE := FND_API.G_MISS_DATE
1101: ,p_inv_exchange_rate IN NUMBER := FND_API.G_MISS_NUM
1102: ,p_allow_user_rate_type_flag IN VARCHAR2 := 'N'
1103: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
1104: ,x_error_msg_code OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895

Line 1101: ,p_inv_exchange_rate IN NUMBER := FND_API.G_MISS_NUM

1097: ( p_project_id IN NUMBER
1098: ,p_inv_currency_code IN VARCHAR2 := FND_API.G_MISS_CHAR
1099: ,p_inv_rate_type IN VARCHAR2 := FND_API.G_MISS_CHAR
1100: ,p_inv_rate_date IN DATE := FND_API.G_MISS_DATE
1101: ,p_inv_exchange_rate IN NUMBER := FND_API.G_MISS_NUM
1102: ,p_allow_user_rate_type_flag IN VARCHAR2 := 'N'
1103: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
1104: ,x_error_msg_code OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
1105: )

Line 1121: if p_inv_currency_code = FND_API.G_MISS_CHAR then

1117: open C1(p_project_id);
1118: fetch C1 into l_project_currency_code, l_mcb_flag;
1119: close C1;
1120:
1121: if p_inv_currency_code = FND_API.G_MISS_CHAR then
1122: l_project_currency_code2 := NULL;
1123: else
1124: l_project_currency_code2 := p_inv_currency_code;
1125: end if;

Line 1138: If (nvl(p_inv_currency_code,FND_API.G_MISS_CHAR)<> FND_API.G_MISS_CHAR) then

1134: AND p.project_id = p_project_id
1135: AND p.org_id = pt.org_id;
1136:
1137:
1138: If (nvl(p_inv_currency_code,FND_API.G_MISS_CHAR)<> FND_API.G_MISS_CHAR) then
1139: IF ((p_inv_currency_code <> l_project_currency_code) AND ((l_mcb_flag = 'N') and (l_cc_prvdr_flag = 'N'))) then
1140: x_return_status := FND_API.G_RET_STS_ERROR;
1141: x_error_msg_code := 'PA_INV_CURR_NON_MCB_OPTION';
1142: return;

Line 1140: x_return_status := FND_API.G_RET_STS_ERROR;

1136:
1137:
1138: If (nvl(p_inv_currency_code,FND_API.G_MISS_CHAR)<> FND_API.G_MISS_CHAR) then
1139: IF ((p_inv_currency_code <> l_project_currency_code) AND ((l_mcb_flag = 'N') and (l_cc_prvdr_flag = 'N'))) then
1140: x_return_status := FND_API.G_RET_STS_ERROR;
1141: x_error_msg_code := 'PA_INV_CURR_NON_MCB_OPTION';
1142: return;
1143: END if;
1144: END if;

Line 1152: if (p_inv_rate_type is NULL) or (p_inv_rate_type = FND_API.G_MISS_CHAR) then

1148: if (l_project_currency_code <> nvl(l_project_currency_code2, l_project_currency_code))
1149: AND ((l_mcb_flag = 'Y') OR (l_cc_prvdr_flag = 'Y')) --bug#5554475
1150: -- anlee end of changes
1151: THEN
1152: if (p_inv_rate_type is NULL) or (p_inv_rate_type = FND_API.G_MISS_CHAR) then
1153: x_return_status := FND_API.G_RET_STS_ERROR;
1154: x_error_msg_code := 'PA_RATE_TYPE_REQD';
1155: return;
1156: end if;

Line 1153: x_return_status := FND_API.G_RET_STS_ERROR;

1149: AND ((l_mcb_flag = 'Y') OR (l_cc_prvdr_flag = 'Y')) --bug#5554475
1150: -- anlee end of changes
1151: THEN
1152: if (p_inv_rate_type is NULL) or (p_inv_rate_type = FND_API.G_MISS_CHAR) then
1153: x_return_status := FND_API.G_RET_STS_ERROR;
1154: x_error_msg_code := 'PA_RATE_TYPE_REQD';
1155: return;
1156: end if;
1157: END IF; --bug 2131206

Line 1164: x_return_status := FND_API.G_RET_STS_ERROR;

1160: /*OR
1161: (pa_multi_currency.is_user_rate_type_allowed(p_inv_currency_code,
1162: l_project_currency_code, nvl(p_inv_rate_date, sysdate)) = 'N')*/
1163: )) then
1164: x_return_status := FND_API.G_RET_STS_ERROR;
1165: x_error_msg_code := 'PA_USR_RATE_NOT_ALLOWED';
1166: return;
1167: end if;
1168:

Line 1172: (p_inv_rate_date = FND_API.G_MISS_DATE) OR (p_inv_rate_date is NULL)) OR*/

1168:
1169: if upper(p_inv_rate_type) = 'USER' then
1170: if
1171: /* (
1172: (p_inv_rate_date = FND_API.G_MISS_DATE) OR (p_inv_rate_date is NULL)) OR*/
1173: ((p_inv_exchange_rate = FND_API.G_MISS_NUM) OR (p_inv_exchange_rate is NULL)) then
1174: x_return_status := FND_API.G_RET_STS_ERROR;
1175: x_error_msg_code := 'PA_XCH_RATE_AND_DATE_REQD';
1176: return;

Line 1173: ((p_inv_exchange_rate = FND_API.G_MISS_NUM) OR (p_inv_exchange_rate is NULL)) then

1169: if upper(p_inv_rate_type) = 'USER' then
1170: if
1171: /* (
1172: (p_inv_rate_date = FND_API.G_MISS_DATE) OR (p_inv_rate_date is NULL)) OR*/
1173: ((p_inv_exchange_rate = FND_API.G_MISS_NUM) OR (p_inv_exchange_rate is NULL)) then
1174: x_return_status := FND_API.G_RET_STS_ERROR;
1175: x_error_msg_code := 'PA_XCH_RATE_AND_DATE_REQD';
1176: return;
1177: end if;

Line 1174: x_return_status := FND_API.G_RET_STS_ERROR;

1170: if
1171: /* (
1172: (p_inv_rate_date = FND_API.G_MISS_DATE) OR (p_inv_rate_date is NULL)) OR*/
1173: ((p_inv_exchange_rate = FND_API.G_MISS_NUM) OR (p_inv_exchange_rate is NULL)) then
1174: x_return_status := FND_API.G_RET_STS_ERROR;
1175: x_error_msg_code := 'PA_XCH_RATE_AND_DATE_REQD';
1176: return;
1177: end if;
1178: end if;

Line 1181: if ((p_inv_rate_type <> FND_API.G_MISS_CHAR) AND (p_inv_rate_type is not NULL)) OR

1177: end if;
1178: end if;
1179:
1180: /* elsif l_project_currency_code = l_project_currency_code2 then
1181: if ((p_inv_rate_type <> FND_API.G_MISS_CHAR) AND (p_inv_rate_type is not NULL)) OR
1182: ((p_inv_rate_date <> FND_API.G_MISS_DATE) AND (p_inv_rate_date is not NULL)) OR
1183: ((p_inv_exchange_rate <>FND_API.G_MISS_NUM) AND (p_inv_exchange_rate is not NULL)) then
1184: x_return_status := FND_API.G_RET_STS_ERROR;
1185: x_error_msg_code := 'PA_RATE_INFO_NOT_ALLOWED';

Line 1182: ((p_inv_rate_date <> FND_API.G_MISS_DATE) AND (p_inv_rate_date is not NULL)) OR

1178: end if;
1179:
1180: /* elsif l_project_currency_code = l_project_currency_code2 then
1181: if ((p_inv_rate_type <> FND_API.G_MISS_CHAR) AND (p_inv_rate_type is not NULL)) OR
1182: ((p_inv_rate_date <> FND_API.G_MISS_DATE) AND (p_inv_rate_date is not NULL)) OR
1183: ((p_inv_exchange_rate <>FND_API.G_MISS_NUM) AND (p_inv_exchange_rate is not NULL)) then
1184: x_return_status := FND_API.G_RET_STS_ERROR;
1185: x_error_msg_code := 'PA_RATE_INFO_NOT_ALLOWED';
1186: return;

Line 1183: ((p_inv_exchange_rate <>FND_API.G_MISS_NUM) AND (p_inv_exchange_rate is not NULL)) then

1179:
1180: /* elsif l_project_currency_code = l_project_currency_code2 then
1181: if ((p_inv_rate_type <> FND_API.G_MISS_CHAR) AND (p_inv_rate_type is not NULL)) OR
1182: ((p_inv_rate_date <> FND_API.G_MISS_DATE) AND (p_inv_rate_date is not NULL)) OR
1183: ((p_inv_exchange_rate <>FND_API.G_MISS_NUM) AND (p_inv_exchange_rate is not NULL)) then
1184: x_return_status := FND_API.G_RET_STS_ERROR;
1185: x_error_msg_code := 'PA_RATE_INFO_NOT_ALLOWED';
1186: return;
1187: end if;

Line 1184: x_return_status := FND_API.G_RET_STS_ERROR;

1180: /* elsif l_project_currency_code = l_project_currency_code2 then
1181: if ((p_inv_rate_type <> FND_API.G_MISS_CHAR) AND (p_inv_rate_type is not NULL)) OR
1182: ((p_inv_rate_date <> FND_API.G_MISS_DATE) AND (p_inv_rate_date is not NULL)) OR
1183: ((p_inv_exchange_rate <>FND_API.G_MISS_NUM) AND (p_inv_exchange_rate is not NULL)) then
1184: x_return_status := FND_API.G_RET_STS_ERROR;
1185: x_error_msg_code := 'PA_RATE_INFO_NOT_ALLOWED';
1186: return;
1187: end if;
1188: end if;

Line 1191: x_return_status := FND_API.G_RET_STS_SUCCESS;

1187: end if;
1188: end if;
1189: */
1190:
1191: x_return_status := FND_API.G_RET_STS_SUCCESS;
1192: EXCEPTION
1193: when OTHERS then
1194: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1195: raise;

Line 1194: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1190:
1191: x_return_status := FND_API.G_RET_STS_SUCCESS;
1192: EXCEPTION
1193: when OTHERS then
1194: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1195: raise;
1196: END CHECK_INVOICE_CURRENCY_INFO;
1197:
1198:

Line 1280: x_return_status := FND_API.G_RET_STS_ERROR;

1276: fetch C3 into l_customer_bill_split;
1277: close C3;
1278:
1279: if p_customer_bill_split <> l_customer_bill_split then
1280: x_return_status := FND_API.G_RET_STS_ERROR;
1281: x_error_msg_code := 'PA_UPD_CUST_NOT_ALLOWED';
1282: return;
1283: end if;
1284: /*Added for bug 2520222*/

Line 1287: x_return_status := FND_API.G_RET_STS_ERROR;

1283: end if;
1284: /*Added for bug 2520222*/
1285: elsif (p_customer_bill_split = 0) then
1286: if (c2_exists is not NULL ) then
1287: x_return_status := FND_API.G_RET_STS_ERROR;
1288: x_error_msg_code := 'PA_BILL_CUST_CONTR_ZERO';
1289: return;
1290: end if;
1291: end if;

Line 1294: x_return_status := FND_API.G_RET_STS_SUCCESS;

1290: end if;
1291: end if;
1292:
1293:
1294: x_return_status := FND_API.G_RET_STS_SUCCESS;
1295: EXCEPTION
1296: when OTHERS then
1297: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1298: raise;

Line 1297: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1293:
1294: x_return_status := FND_API.G_RET_STS_SUCCESS;
1295: EXCEPTION
1296: when OTHERS then
1297: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1298: raise;
1299: END CHECK_UPDATE_CONTRIB_ALLOWED;
1300:
1301:

Line 1333: x_return_status := FND_API.G_RET_STS_ERROR;

1329: fetch C into c_exists;
1330: close C;
1331:
1332: if c_exists is not NULL then
1333: x_return_status := FND_API.G_RET_STS_ERROR;
1334: x_error_msg_code := 'PA_PR_CANT_DEL_FUND_CUST';
1335: else
1336: x_return_status := FND_API.G_RET_STS_SUCCESS;
1337: end if;

Line 1336: x_return_status := FND_API.G_RET_STS_SUCCESS;

1332: if c_exists is not NULL then
1333: x_return_status := FND_API.G_RET_STS_ERROR;
1334: x_error_msg_code := 'PA_PR_CANT_DEL_FUND_CUST';
1335: else
1336: x_return_status := FND_API.G_RET_STS_SUCCESS;
1337: end if;
1338: EXCEPTION
1339: when OTHERS then
1340: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1340: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1336: x_return_status := FND_API.G_RET_STS_SUCCESS;
1337: end if;
1338: EXCEPTION
1339: when OTHERS then
1340: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1341: raise;
1342: END CHECK_DELETE_CUSTOMER_ALLOWED;
1343:
1344:

Line 1392: x_return_status := FND_API.G_RET_STS_SUCCESS;

1388: WHERE upper(customer_number) = upper(p_customer_number) and
1389: upper(substr(customer_name,1,50)) = upper(substr(p_customer_name,1,50)) -- Bug 8314123
1390: and status = 'A';
1391:
1392: x_return_status := FND_API.G_RET_STS_SUCCESS;
1393:
1394: EXCEPTION
1395: when NO_DATA_FOUND then
1396: x_customer_id := NULL;

Line 1397: x_return_status := FND_API.G_RET_STS_ERROR;

1393:
1394: EXCEPTION
1395: when NO_DATA_FOUND then
1396: x_customer_id := NULL;
1397: x_return_status := FND_API.G_RET_STS_ERROR;
1398: x_error_msg_code := 'PA_CUST_NAME_NUMBER_INVALID';
1399: when TOO_MANY_ROWS then
1400: x_customer_id := NULL;
1401: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1401: x_return_status := FND_API.G_RET_STS_ERROR;

1397: x_return_status := FND_API.G_RET_STS_ERROR;
1398: x_error_msg_code := 'PA_CUST_NAME_NUMBER_INVALID';
1399: when TOO_MANY_ROWS then
1400: x_customer_id := NULL;
1401: x_return_status := FND_API.G_RET_STS_ERROR;
1402: x_error_msg_code := 'PA_CUST_NAME_NOT_UNIQUE';
1403: when OTHERS then
1404: x_customer_id := NULL;
1405: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1405: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1401: x_return_status := FND_API.G_RET_STS_ERROR;
1402: x_error_msg_code := 'PA_CUST_NAME_NOT_UNIQUE';
1403: when OTHERS then
1404: x_customer_id := NULL;
1405: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1406: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_UTILS', p_procedure_name => 'CHECK_CUSTOMER_NAME_AND_NUMBER');
1407: raise;
1408: END CHECK_CUSTOMER_NAME_AND_NUMBER;
1409:

Line 1451: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE

1447: -- to be returned
1448: -- x_highst_contr_cust_id NUMBER N Customer ID of the highest contribution customer
1449: PROCEDURE Get_Highest_Contr_Fed_Cust(
1450: p_api_version IN NUMBER := 1.0
1451: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
1452: , p_commit IN VARCHAR2 := FND_API.G_FALSE
1453: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
1454: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1455: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'

Line 1452: , p_commit IN VARCHAR2 := FND_API.G_FALSE

1448: -- x_highst_contr_cust_id NUMBER N Customer ID of the highest contribution customer
1449: PROCEDURE Get_Highest_Contr_Fed_Cust(
1450: p_api_version IN NUMBER := 1.0
1451: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
1452: , p_commit IN VARCHAR2 := FND_API.G_FALSE
1453: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
1454: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1455: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
1456: , p_debug_mode IN VARCHAR2 := 'N'

Line 1453: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE

1449: PROCEDURE Get_Highest_Contr_Fed_Cust(
1450: p_api_version IN NUMBER := 1.0
1451: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
1452: , p_commit IN VARCHAR2 := FND_API.G_FALSE
1453: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
1454: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1455: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
1456: , p_debug_mode IN VARCHAR2 := 'N'
1457: , p_project_id IN NUMBER

Line 1454: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

1450: p_api_version IN NUMBER := 1.0
1451: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
1452: , p_commit IN VARCHAR2 := FND_API.G_FALSE
1453: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
1454: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1455: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
1456: , p_debug_mode IN VARCHAR2 := 'N'
1457: , p_project_id IN NUMBER
1458: , x_highst_contr_cust_id OUT NOCOPY NUMBER

Line 1506: x_return_status := FND_API.G_RET_STS_SUCCESS;

1502: BEGIN
1503:
1504: x_highst_contr_cust_id := null;
1505: x_msg_count := 0;
1506: x_return_status := FND_API.G_RET_STS_SUCCESS;
1507: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
1508:
1509:
1510: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN

Line 1510: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN

1506: x_return_status := FND_API.G_RET_STS_SUCCESS;
1507: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
1508:
1509:
1510: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
1511: FND_MSG_PUB.initialize;
1512: END IF;
1513:
1514: IF (p_commit = FND_API.G_TRUE) THEN

Line 1514: IF (p_commit = FND_API.G_TRUE) THEN

1510: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
1511: FND_MSG_PUB.initialize;
1512: END IF;
1513:
1514: IF (p_commit = FND_API.G_TRUE) THEN
1515: savepoint get_highest_cont_cust_svpt;
1516: END IF;
1517:
1518: IF l_debug_mode = 'Y' THEN

Line 1540: IF ( p_project_id IS NULL OR p_project_id = FND_API.G_MISS_NUM)

1536: Pa_Debug.WRITE(G_PKG_NAME,Pa_Debug.g_err_stage,
1537: l_debug_level3);
1538: END IF;
1539:
1540: IF ( p_project_id IS NULL OR p_project_id = FND_API.G_MISS_NUM)
1541: THEN
1542: IF l_debug_mode = 'Y' THEN
1543: Pa_Debug.g_err_stage:= 'PA_CUSTOMERS_CONTACTS_UTILS : Get_Highest_Contr_Fed_Cust :
1544: p_project_id is NULL';

Line 1569: WHEN FND_API.G_EXC_ERROR THEN

1565: END IF;
1566:
1567: EXCEPTION
1568:
1569: WHEN FND_API.G_EXC_ERROR THEN
1570:
1571: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1572:
1573:

Line 1571: x_return_status := Fnd_Api.G_RET_STS_ERROR;

1567: EXCEPTION
1568:
1569: WHEN FND_API.G_EXC_ERROR THEN
1570:
1571: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1572:
1573:
1574: x_highst_contr_cust_id := null;
1575:

Line 1577: IF p_commit = FND_API.G_TRUE THEN

1573:
1574: x_highst_contr_cust_id := null;
1575:
1576:
1577: IF p_commit = FND_API.G_TRUE THEN
1578: ROLLBACK TO get_highest_cont_cust_svpt;
1579: END IF;
1580:
1581: l_msg_count := Fnd_Msg_Pub.count_msg;

Line 1585: ( p_encoded => Fnd_Api.G_FALSE

1581: l_msg_count := Fnd_Msg_Pub.count_msg;
1582: IF l_msg_count = 1 AND x_msg_data IS NULL
1583: THEN
1584: Pa_Interface_Utils_Pub.get_messages
1585: ( p_encoded => Fnd_Api.G_FALSE
1586: , p_msg_index => 1
1587: , p_msg_count => l_msg_count
1588: , p_msg_data => l_msg_data
1589: , p_data => l_data

Line 1602: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1598: Pa_Debug.reset_curr_function;
1599: END IF;
1600:
1601: WHEN Invalid_Arg_Exc THEN
1602: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1603: x_msg_count := 1;
1604: x_msg_data := ' PA_CUSTOMERS_CONTACTS_UTILS : Get_Highest_Contr_Fed_Cust : NULL parameters passed';
1605:
1606:

Line 1610: IF p_commit = FND_API.G_TRUE THEN

1606:
1607: x_highst_contr_cust_id := null;
1608:
1609:
1610: IF p_commit = FND_API.G_TRUE THEN
1611: ROLLBACK TO get_highest_cont_cust_svpt;
1612: END IF;
1613:
1614: Fnd_Msg_Pub.add_exc_msg

Line 1628: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1624: END IF;
1625: RAISE;
1626:
1627: WHEN OTHERS THEN
1628: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1629: x_msg_count := 1;
1630: x_msg_data := SQLERRM;
1631:
1632:

Line 1636: IF p_commit = FND_API.G_TRUE THEN

1632:
1633: x_highst_contr_cust_id := null;
1634:
1635:
1636: IF p_commit = FND_API.G_TRUE THEN
1637: ROLLBACK TO get_highest_cont_cust_svpt;
1638: END IF;
1639:
1640: Fnd_Msg_Pub.add_exc_msg