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_TOP_TASK_CUST_INVOICE_PVT dependencies on FND_API

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

17: -- p_def_top_task_cust NUMBER N The customer to be set as default top task customer
18: -- p_contr_update_cust NUMBER N The customer to be updated with 100% contribution
19: PROCEDURE enbl_disbl_cust_at_top_task(
20: p_api_version IN NUMBER := 1.0
21: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
22: , p_commit IN VARCHAR2 := FND_API.G_FALSE
23: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
24: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
25: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'

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

18: -- p_contr_update_cust NUMBER N The customer to be updated with 100% contribution
19: PROCEDURE enbl_disbl_cust_at_top_task(
20: p_api_version IN NUMBER := 1.0
21: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
22: , p_commit IN VARCHAR2 := FND_API.G_FALSE
23: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
24: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
25: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
26: , p_debug_mode IN VARCHAR2 := 'N'

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

19: PROCEDURE enbl_disbl_cust_at_top_task(
20: p_api_version IN NUMBER := 1.0
21: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
22: , p_commit IN VARCHAR2 := FND_API.G_FALSE
23: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
24: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
25: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
26: , p_debug_mode IN VARCHAR2 := 'N'
27: , p_mode IN VARCHAR2

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

20: p_api_version IN NUMBER := 1.0
21: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
22: , p_commit IN VARCHAR2 := FND_API.G_FALSE
23: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
24: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
25: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
26: , p_debug_mode IN VARCHAR2 := 'N'
27: , p_mode IN VARCHAR2
28: , p_project_id IN NUMBER

Line 65: x_return_status := FND_API.G_RET_STS_SUCCESS;

61:
62: BEGIN
63:
64: x_msg_count := 0;
65: x_return_status := FND_API.G_RET_STS_SUCCESS;
66: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
67:
68: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
69: FND_MSG_PUB.initialize;

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

64: x_msg_count := 0;
65: x_return_status := FND_API.G_RET_STS_SUCCESS;
66: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
67:
68: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
69: FND_MSG_PUB.initialize;
70: END IF;
71:
72: IF (p_commit = FND_API.G_TRUE) THEN

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

68: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
69: FND_MSG_PUB.initialize;
70: END IF;
71:
72: IF (p_commit = FND_API.G_TRUE) THEN
73: savepoint en_db_cust_at_top_task_pub;
74: END IF;
75:
76: IF l_debug_mode = 'Y' THEN

Line 105: IF ( ( p_mode IS NULL OR p_mode = FND_API.G_MISS_CHAR ) AND

101: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,
102: l_debug_level3);
103: END IF;
104:
105: IF ( ( p_mode IS NULL OR p_mode = FND_API.G_MISS_CHAR ) AND
106: ( p_project_id IS NULL OR p_project_id = FND_API.G_MISS_NUM ) AND
107: ( p_def_top_task_cust IS NULL OR p_def_top_task_cust = FND_API.G_MISS_NUM ) AND
108: ( p_contr_update_cust IS NULL OR p_contr_update_cust = FND_API.G_MISS_NUM )
109: )

Line 106: ( p_project_id IS NULL OR p_project_id = FND_API.G_MISS_NUM ) AND

102: l_debug_level3);
103: END IF;
104:
105: IF ( ( p_mode IS NULL OR p_mode = FND_API.G_MISS_CHAR ) AND
106: ( p_project_id IS NULL OR p_project_id = FND_API.G_MISS_NUM ) AND
107: ( p_def_top_task_cust IS NULL OR p_def_top_task_cust = FND_API.G_MISS_NUM ) AND
108: ( p_contr_update_cust IS NULL OR p_contr_update_cust = FND_API.G_MISS_NUM )
109: )
110: THEN

Line 107: ( p_def_top_task_cust IS NULL OR p_def_top_task_cust = FND_API.G_MISS_NUM ) AND

103: END IF;
104:
105: IF ( ( p_mode IS NULL OR p_mode = FND_API.G_MISS_CHAR ) AND
106: ( p_project_id IS NULL OR p_project_id = FND_API.G_MISS_NUM ) AND
107: ( p_def_top_task_cust IS NULL OR p_def_top_task_cust = FND_API.G_MISS_NUM ) AND
108: ( p_contr_update_cust IS NULL OR p_contr_update_cust = FND_API.G_MISS_NUM )
109: )
110: THEN
111: IF l_debug_mode = 'Y' THEN

Line 108: ( p_contr_update_cust IS NULL OR p_contr_update_cust = FND_API.G_MISS_NUM )

104:
105: IF ( ( p_mode IS NULL OR p_mode = FND_API.G_MISS_CHAR ) AND
106: ( p_project_id IS NULL OR p_project_id = FND_API.G_MISS_NUM ) AND
107: ( p_def_top_task_cust IS NULL OR p_def_top_task_cust = FND_API.G_MISS_NUM ) AND
108: ( p_contr_update_cust IS NULL OR p_contr_update_cust = FND_API.G_MISS_NUM )
109: )
110: THEN
111: IF l_debug_mode = 'Y' THEN
112: Pa_Debug.g_err_stage:= 'PA_TOP_TASK_CUST_INVOICE_PVT : enbl_disbl_cust_at_top_task :

Line 120: IF ( (p_mode IS NOT NULL AND p_mode <> FND_API.G_MISS_CHAR) AND

116: END IF;
117: RAISE Invalid_Arg_Exc;
118: END IF;
119:
120: IF ( (p_mode IS NOT NULL AND p_mode <> FND_API.G_MISS_CHAR) AND
121: (p_project_id IS NOT NULL AND p_project_id <> FND_API.G_MISS_NUM )
122: ) THEN
123: IF p_mode = 'DISABLE' THEN
124:

Line 121: (p_project_id IS NOT NULL AND p_project_id <> FND_API.G_MISS_NUM )

117: RAISE Invalid_Arg_Exc;
118: END IF;
119:
120: IF ( (p_mode IS NOT NULL AND p_mode <> FND_API.G_MISS_CHAR) AND
121: (p_project_id IS NOT NULL AND p_project_id <> FND_API.G_MISS_NUM )
122: ) THEN
123: IF p_mode = 'DISABLE' THEN
124:
125:

Line 172: , p_init_msg_list => FND_API.G_FALSE

168: END IF;
169:
170: PA_TOP_TASK_CUST_INVOICE_PVT.set_top_task_funding_level(
171: p_api_version => p_api_version
172: , p_init_msg_list => FND_API.G_FALSE
173: , p_commit => p_commit
174: , p_validate_only => p_validate_only
175: , p_validation_level => p_validation_level
176: , p_calling_module => p_calling_module

Line 183: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

179: , x_msg_count => x_msg_count
180: , x_msg_data => x_msg_data
181: );
182:
183: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
184: RAISE FND_API.G_EXC_ERROR;
185: END IF;*/
186:
187: END IF;

Line 184: RAISE FND_API.G_EXC_ERROR;

180: , x_msg_data => x_msg_data
181: );
182:
183: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
184: RAISE FND_API.G_EXC_ERROR;
185: END IF;*/
186:
187: END IF;
188: ELSE

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

194: END IF;
195: RAISE Invalid_Arg_Exc;
196: END IF;
197:
198: IF (p_commit = FND_API.G_TRUE) THEN
199: COMMIT;
200: END IF;
201:
202: EXCEPTION

Line 204: WHEN FND_API.G_EXC_ERROR THEN

200: END IF;
201:
202: EXCEPTION
203:
204: WHEN FND_API.G_EXC_ERROR THEN
205:
206: x_return_status := Fnd_Api.G_RET_STS_ERROR;
207:
208: IF p_commit = FND_API.G_TRUE THEN

Line 206: x_return_status := Fnd_Api.G_RET_STS_ERROR;

202: EXCEPTION
203:
204: WHEN FND_API.G_EXC_ERROR THEN
205:
206: x_return_status := Fnd_Api.G_RET_STS_ERROR;
207:
208: IF p_commit = FND_API.G_TRUE THEN
209: ROLLBACK TO en_db_cust_at_top_task_pub;
210: END IF;

Line 208: IF p_commit = FND_API.G_TRUE THEN

204: WHEN FND_API.G_EXC_ERROR THEN
205:
206: x_return_status := Fnd_Api.G_RET_STS_ERROR;
207:
208: IF p_commit = FND_API.G_TRUE THEN
209: ROLLBACK TO en_db_cust_at_top_task_pub;
210: END IF;
211:
212: l_msg_count := Fnd_Msg_Pub.count_msg;

Line 216: ( p_encoded => Fnd_Api.G_FALSE

212: l_msg_count := Fnd_Msg_Pub.count_msg;
213: IF l_msg_count = 1 AND x_msg_data IS NULL
214: THEN
215: Pa_Interface_Utils_Pub.get_messages
216: ( p_encoded => Fnd_Api.G_FALSE
217: , p_msg_index => 1
218: , p_msg_count => l_msg_count
219: , p_msg_data => l_msg_data
220: , p_data => l_data

Line 233: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

229: Pa_Debug.reset_curr_function;
230: END IF;
231:
232: WHEN Invalid_Arg_Exc THEN
233: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
234: x_msg_count := 1;
235: x_msg_data := ' PA_TOP_TASK_CUST_INVOICE_PVT : enbl_disbl_cust_at_top_task : NULL parameters passed';
236:
237: IF p_commit = FND_API.G_TRUE THEN

Line 237: IF p_commit = FND_API.G_TRUE THEN

233: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
234: x_msg_count := 1;
235: x_msg_data := ' PA_TOP_TASK_CUST_INVOICE_PVT : enbl_disbl_cust_at_top_task : NULL parameters passed';
236:
237: IF p_commit = FND_API.G_TRUE THEN
238: ROLLBACK TO en_db_cust_at_top_task_pub;
239: END IF;
240:
241: Fnd_Msg_Pub.add_exc_msg

Line 255: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

251: END IF;
252: RAISE;
253:
254: WHEN OTHERS THEN
255: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
256: x_msg_count := 1;
257: x_msg_data := SQLERRM;
258:
259: IF p_commit = FND_API.G_TRUE THEN

Line 259: IF p_commit = FND_API.G_TRUE THEN

255: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
256: x_msg_count := 1;
257: x_msg_data := SQLERRM;
258:
259: IF p_commit = FND_API.G_TRUE THEN
260: ROLLBACK TO en_db_cust_at_top_task_pub;
261: END IF;
262:
263: Fnd_Msg_Pub.add_exc_msg

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

295: -- x_highst_contr_cust_name VARCHAR2 N Customer Name of the highest contribution customer
296: -- x_highst_contr_cust_num VARCHAR2 N Customer Number of the highest contribution customer
297: PROCEDURE Get_Highest_Contr_Cust(
298: p_api_version IN NUMBER := 1.0
299: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
300: , p_commit IN VARCHAR2 := FND_API.G_FALSE
301: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
302: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
303: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'

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

296: -- x_highst_contr_cust_num VARCHAR2 N Customer Number of the highest contribution customer
297: PROCEDURE Get_Highest_Contr_Cust(
298: p_api_version IN NUMBER := 1.0
299: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
300: , p_commit IN VARCHAR2 := FND_API.G_FALSE
301: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
302: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
303: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
304: , p_debug_mode IN VARCHAR2 := 'N'

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

297: PROCEDURE Get_Highest_Contr_Cust(
298: p_api_version IN NUMBER := 1.0
299: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
300: , p_commit IN VARCHAR2 := FND_API.G_FALSE
301: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
302: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
303: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
304: , p_debug_mode IN VARCHAR2 := 'N'
305: , p_project_id IN NUMBER

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

298: p_api_version IN NUMBER := 1.0
299: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
300: , p_commit IN VARCHAR2 := FND_API.G_FALSE
301: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
302: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
303: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
304: , p_debug_mode IN VARCHAR2 := 'N'
305: , p_project_id IN NUMBER
306: , p_exclude_cust_id_tbl IN PA_PLSQL_DATATYPES.NumTabTyp

Line 355: x_return_status := FND_API.G_RET_STS_SUCCESS;

351: x_highst_contr_cust_name := null;
352: x_highst_contr_cust_num := null;
353:
354: x_msg_count := 0;
355: x_return_status := FND_API.G_RET_STS_SUCCESS;
356: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
357:
358: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
359: FND_MSG_PUB.initialize;

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

354: x_msg_count := 0;
355: x_return_status := FND_API.G_RET_STS_SUCCESS;
356: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
357:
358: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
359: FND_MSG_PUB.initialize;
360: END IF;
361:
362: IF (p_commit = FND_API.G_TRUE) THEN

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

358: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
359: FND_MSG_PUB.initialize;
360: END IF;
361:
362: IF (p_commit = FND_API.G_TRUE) THEN
363: savepoint get_highest_cont_cust_svpt;
364: END IF;
365:
366: IF l_debug_mode = 'Y' THEN

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

383: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,
384: l_debug_level3);
385: END IF;
386:
387: IF ( p_project_id IS NULL OR p_project_id = FND_API.G_MISS_NUM
388: )
389: THEN
390: IF l_debug_mode = 'Y' THEN
391: Pa_Debug.g_err_stage:= 'PA_TOP_TASK_CUST_INVOICE_PVT : Get_Highest_Contr_Cust :

Line 430: WHEN FND_API.G_EXC_ERROR THEN

426: END IF;
427:
428: EXCEPTION
429:
430: WHEN FND_API.G_EXC_ERROR THEN
431:
432: x_return_status := Fnd_Api.G_RET_STS_ERROR;
433:
434: -- 4537865 RESET OUT PARAMS

Line 432: x_return_status := Fnd_Api.G_RET_STS_ERROR;

428: EXCEPTION
429:
430: WHEN FND_API.G_EXC_ERROR THEN
431:
432: x_return_status := Fnd_Api.G_RET_STS_ERROR;
433:
434: -- 4537865 RESET OUT PARAMS
435: x_highst_contr_cust_id := null;
436: x_highst_contr_cust_name := null;

Line 439: IF p_commit = FND_API.G_TRUE THEN

435: x_highst_contr_cust_id := null;
436: x_highst_contr_cust_name := null;
437: x_highst_contr_cust_num := null;
438:
439: IF p_commit = FND_API.G_TRUE THEN
440: ROLLBACK TO get_highest_cont_cust_svpt;
441: END IF;
442:
443: l_msg_count := Fnd_Msg_Pub.count_msg;

Line 447: ( p_encoded => Fnd_Api.G_FALSE

443: l_msg_count := Fnd_Msg_Pub.count_msg;
444: IF l_msg_count = 1 AND x_msg_data IS NULL
445: THEN
446: Pa_Interface_Utils_Pub.get_messages
447: ( p_encoded => Fnd_Api.G_FALSE
448: , p_msg_index => 1
449: , p_msg_count => l_msg_count
450: , p_msg_data => l_msg_data
451: , p_data => l_data

Line 464: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

460: Pa_Debug.reset_curr_function;
461: END IF;
462:
463: WHEN Invalid_Arg_Exc THEN
464: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
465: x_msg_count := 1;
466: x_msg_data := ' PA_TOP_TASK_CUST_INVOICE_PVT : Get_Highest_Contr_Cust : NULL parameters passed';
467:
468: -- 4537865 RESET OUT PARAMS

Line 473: IF p_commit = FND_API.G_TRUE THEN

469: x_highst_contr_cust_id := null;
470: x_highst_contr_cust_name := null;
471: x_highst_contr_cust_num := null;
472:
473: IF p_commit = FND_API.G_TRUE THEN
474: ROLLBACK TO get_highest_cont_cust_svpt;
475: END IF;
476:
477: Fnd_Msg_Pub.add_exc_msg

Line 491: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

487: END IF;
488: RAISE;
489:
490: WHEN OTHERS THEN
491: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
492: x_msg_count := 1;
493: x_msg_data := SQLERRM;
494:
495: -- 4537865 RESET OUT PARAMS

Line 500: IF p_commit = FND_API.G_TRUE THEN

496: x_highst_contr_cust_id := null;
497: x_highst_contr_cust_name := null;
498: x_highst_contr_cust_num := null;
499:
500: IF p_commit = FND_API.G_TRUE THEN
501: ROLLBACK TO get_highest_cont_cust_svpt;
502: END IF;
503:
504: Fnd_Msg_Pub.add_exc_msg

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

528: -- p_project_id NUMBER Y Project ID for which revenue accrual method is to be set
529: -- p_rev_acc VARCHAR2 Y The revenue accrual method that is to be set
530: PROCEDURE Set_Rev_Acc_At_Top_Task(
531: p_api_version IN NUMBER := 1.0
532: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
533: , p_commit IN VARCHAR2 := FND_API.G_FALSE
534: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
535: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
536: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'

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

529: -- p_rev_acc VARCHAR2 Y The revenue accrual method that is to be set
530: PROCEDURE Set_Rev_Acc_At_Top_Task(
531: p_api_version IN NUMBER := 1.0
532: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
533: , p_commit IN VARCHAR2 := FND_API.G_FALSE
534: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
535: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
536: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
537: , p_debug_mode IN VARCHAR2 := 'N'

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

530: PROCEDURE Set_Rev_Acc_At_Top_Task(
531: p_api_version IN NUMBER := 1.0
532: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
533: , p_commit IN VARCHAR2 := FND_API.G_FALSE
534: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
535: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
536: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
537: , p_debug_mode IN VARCHAR2 := 'N'
538: , p_project_id IN NUMBER

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

531: p_api_version IN NUMBER := 1.0
532: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
533: , p_commit IN VARCHAR2 := FND_API.G_FALSE
534: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
535: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
536: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
537: , p_debug_mode IN VARCHAR2 := 'N'
538: , p_project_id IN NUMBER
539: , p_rev_acc IN VARCHAR2

Line 559: x_return_status := FND_API.G_RET_STS_SUCCESS;

555:
556: BEGIN
557:
558: x_msg_count := 0;
559: x_return_status := FND_API.G_RET_STS_SUCCESS;
560: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
561:
562: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
563: FND_MSG_PUB.initialize;

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

558: x_msg_count := 0;
559: x_return_status := FND_API.G_RET_STS_SUCCESS;
560: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
561:
562: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
563: FND_MSG_PUB.initialize;
564: END IF;
565:
566: IF (p_commit = FND_API.G_TRUE) THEN

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

562: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
563: FND_MSG_PUB.initialize;
564: END IF;
565:
566: IF (p_commit = FND_API.G_TRUE) THEN
567: savepoint Set_Rev_Acc_At_Top_Task_svpt;
568: END IF;
569:
570: IF l_debug_mode = 'Y' THEN

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

589: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,
590: l_debug_level3);
591: END IF;
592:
593: IF ( (p_project_id IS NULL OR p_project_id = FND_API.G_MISS_NUM) AND
594: (p_rev_acc IS NULL OR p_rev_acc = FND_API.G_MISS_CHAR)
595: )
596: THEN
597: IF l_debug_mode = 'Y' THEN

Line 594: (p_rev_acc IS NULL OR p_rev_acc = FND_API.G_MISS_CHAR)

590: l_debug_level3);
591: END IF;
592:
593: IF ( (p_project_id IS NULL OR p_project_id = FND_API.G_MISS_NUM) AND
594: (p_rev_acc IS NULL OR p_rev_acc = FND_API.G_MISS_CHAR)
595: )
596: THEN
597: IF l_debug_mode = 'Y' THEN
598: Pa_Debug.g_err_stage:= 'PA_TOP_TASK_CUST_INVOICE_PVT : Set_Rev_Acc_At_Top_Task :

Line 606: IF ( (p_project_id IS NOT NULL AND p_project_id <> FND_API.G_MISS_NUM) AND

602: END IF;
603: RAISE Invalid_Arg_Exc;
604: END IF;
605:
606: IF ( (p_project_id IS NOT NULL AND p_project_id <> FND_API.G_MISS_NUM) AND
607: (p_rev_acc IS NOT NULL AND p_rev_acc <> FND_API.G_MISS_CHAR)
608: ) THEN
609:
610: UPDATE pa_tasks SET revenue_accrual_method = p_rev_acc

Line 607: (p_rev_acc IS NOT NULL AND p_rev_acc <> FND_API.G_MISS_CHAR)

603: RAISE Invalid_Arg_Exc;
604: END IF;
605:
606: IF ( (p_project_id IS NOT NULL AND p_project_id <> FND_API.G_MISS_NUM) AND
607: (p_rev_acc IS NOT NULL AND p_rev_acc <> FND_API.G_MISS_CHAR)
608: ) THEN
609:
610: UPDATE pa_tasks SET revenue_accrual_method = p_rev_acc
611: WHERE project_id = p_project_id;

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

619: END IF;
620: RAISE Invalid_Arg_Exc;
621: END IF;
622:
623: IF (p_commit = FND_API.G_TRUE) THEN
624: COMMIT;
625: END IF;
626:
627: EXCEPTION

Line 629: WHEN FND_API.G_EXC_ERROR THEN

625: END IF;
626:
627: EXCEPTION
628:
629: WHEN FND_API.G_EXC_ERROR THEN
630:
631: x_return_status := Fnd_Api.G_RET_STS_ERROR;
632:
633: IF p_commit = FND_API.G_TRUE THEN

Line 631: x_return_status := Fnd_Api.G_RET_STS_ERROR;

627: EXCEPTION
628:
629: WHEN FND_API.G_EXC_ERROR THEN
630:
631: x_return_status := Fnd_Api.G_RET_STS_ERROR;
632:
633: IF p_commit = FND_API.G_TRUE THEN
634: ROLLBACK TO Set_Rev_Acc_At_Top_Task_svpt;
635: END IF;

Line 633: IF p_commit = FND_API.G_TRUE THEN

629: WHEN FND_API.G_EXC_ERROR THEN
630:
631: x_return_status := Fnd_Api.G_RET_STS_ERROR;
632:
633: IF p_commit = FND_API.G_TRUE THEN
634: ROLLBACK TO Set_Rev_Acc_At_Top_Task_svpt;
635: END IF;
636:
637: l_msg_count := Fnd_Msg_Pub.count_msg;

Line 641: ( p_encoded => Fnd_Api.G_FALSE

637: l_msg_count := Fnd_Msg_Pub.count_msg;
638: IF l_msg_count = 1 AND x_msg_data IS NULL
639: THEN
640: Pa_Interface_Utils_Pub.get_messages
641: ( p_encoded => Fnd_Api.G_FALSE
642: , p_msg_index => 1
643: , p_msg_count => l_msg_count
644: , p_msg_data => l_msg_data
645: , p_data => l_data

Line 658: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

654: Pa_Debug.reset_curr_function;
655: END IF;
656:
657: WHEN Invalid_Arg_Exc THEN
658: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
659: x_msg_count := 1;
660: x_msg_data := ' PA_TOP_TASK_CUST_INVOICE_PVT : Set_Rev_Acc_At_Top_Task : NULL parameters passed';
661:
662: IF p_commit = FND_API.G_TRUE THEN

Line 662: IF p_commit = FND_API.G_TRUE THEN

658: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
659: x_msg_count := 1;
660: x_msg_data := ' PA_TOP_TASK_CUST_INVOICE_PVT : Set_Rev_Acc_At_Top_Task : NULL parameters passed';
661:
662: IF p_commit = FND_API.G_TRUE THEN
663: ROLLBACK TO Set_Rev_Acc_At_Top_Task_svpt;
664: END IF;
665:
666: Fnd_Msg_Pub.add_exc_msg

Line 680: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

676: END IF;
677: RAISE;
678:
679: WHEN OTHERS THEN
680: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
681: x_msg_count := 1;
682: x_msg_data := SQLERRM;
683:
684: IF p_commit = FND_API.G_TRUE THEN

Line 684: IF p_commit = FND_API.G_TRUE THEN

680: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
681: x_msg_count := 1;
682: x_msg_data := SQLERRM;
683:
684: IF p_commit = FND_API.G_TRUE THEN
685: ROLLBACK TO Set_Rev_Acc_At_Top_Task_svpt;
686: END IF;
687:
688: Fnd_Msg_Pub.add_exc_msg

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

712: -- p_project_id NUMBER Y Project ID for which invoice method is to be set
713: -- p_inv_mth VARCHAR2 Y The invoice method that is to be set
714: PROCEDURE Set_Inv_Mth_At_Top_Task(
715: p_api_version IN NUMBER := 1.0
716: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
717: , p_commit IN VARCHAR2 := FND_API.G_FALSE
718: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
719: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
720: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'

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

713: -- p_inv_mth VARCHAR2 Y The invoice method that is to be set
714: PROCEDURE Set_Inv_Mth_At_Top_Task(
715: p_api_version IN NUMBER := 1.0
716: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
717: , p_commit IN VARCHAR2 := FND_API.G_FALSE
718: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
719: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
720: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
721: , p_debug_mode IN VARCHAR2 := 'N'

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

714: PROCEDURE Set_Inv_Mth_At_Top_Task(
715: p_api_version IN NUMBER := 1.0
716: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
717: , p_commit IN VARCHAR2 := FND_API.G_FALSE
718: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
719: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
720: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
721: , p_debug_mode IN VARCHAR2 := 'N'
722: , p_project_id IN NUMBER

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

715: p_api_version IN NUMBER := 1.0
716: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
717: , p_commit IN VARCHAR2 := FND_API.G_FALSE
718: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
719: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
720: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
721: , p_debug_mode IN VARCHAR2 := 'N'
722: , p_project_id IN NUMBER
723: , p_inv_mth IN VARCHAR2

Line 743: x_return_status := FND_API.G_RET_STS_SUCCESS;

739:
740: BEGIN
741:
742: x_msg_count := 0;
743: x_return_status := FND_API.G_RET_STS_SUCCESS;
744: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
745:
746: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
747: FND_MSG_PUB.initialize;

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

742: x_msg_count := 0;
743: x_return_status := FND_API.G_RET_STS_SUCCESS;
744: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
745:
746: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
747: FND_MSG_PUB.initialize;
748: END IF;
749:
750: IF (p_commit = FND_API.G_TRUE) THEN

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

746: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
747: FND_MSG_PUB.initialize;
748: END IF;
749:
750: IF (p_commit = FND_API.G_TRUE) THEN
751: savepoint Set_Inv_Mth_At_Top_Task_svpt;
752: END IF;
753:
754: IF l_debug_mode = 'Y' THEN

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

773: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,
774: l_debug_level3);
775: END IF;
776:
777: IF ( (p_project_id IS NULL OR p_project_id = FND_API.G_MISS_NUM) AND
778: (p_inv_mth IS NULL OR p_inv_mth = FND_API.G_MISS_CHAR)
779: )
780: THEN
781: IF l_debug_mode = 'Y' THEN

Line 778: (p_inv_mth IS NULL OR p_inv_mth = FND_API.G_MISS_CHAR)

774: l_debug_level3);
775: END IF;
776:
777: IF ( (p_project_id IS NULL OR p_project_id = FND_API.G_MISS_NUM) AND
778: (p_inv_mth IS NULL OR p_inv_mth = FND_API.G_MISS_CHAR)
779: )
780: THEN
781: IF l_debug_mode = 'Y' THEN
782: Pa_Debug.g_err_stage:= 'PA_TOP_TASK_CUST_INVOICE_PVT : Set_Inv_Mth_At_Top_Task :

Line 790: IF ( (p_project_id IS NOT NULL AND p_project_id <> FND_API.G_MISS_NUM) AND

786: END IF;
787: RAISE Invalid_Arg_Exc;
788: END IF;
789:
790: IF ( (p_project_id IS NOT NULL AND p_project_id <> FND_API.G_MISS_NUM) AND
791: (p_inv_mth IS NOT NULL AND p_inv_mth <> FND_API.G_MISS_CHAR)
792: ) THEN
793:
794: UPDATE pa_tasks SET invoice_method = p_inv_mth

Line 791: (p_inv_mth IS NOT NULL AND p_inv_mth <> FND_API.G_MISS_CHAR)

787: RAISE Invalid_Arg_Exc;
788: END IF;
789:
790: IF ( (p_project_id IS NOT NULL AND p_project_id <> FND_API.G_MISS_NUM) AND
791: (p_inv_mth IS NOT NULL AND p_inv_mth <> FND_API.G_MISS_CHAR)
792: ) THEN
793:
794: UPDATE pa_tasks SET invoice_method = p_inv_mth
795: WHERE project_id = p_project_id;

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

802: END IF;
803: RAISE Invalid_Arg_Exc;
804: END IF;
805:
806: IF (p_commit = FND_API.G_TRUE) THEN
807: COMMIT;
808: END IF;
809:
810: EXCEPTION

Line 812: WHEN FND_API.G_EXC_ERROR THEN

808: END IF;
809:
810: EXCEPTION
811:
812: WHEN FND_API.G_EXC_ERROR THEN
813:
814: x_return_status := Fnd_Api.G_RET_STS_ERROR;
815:
816: IF p_commit = FND_API.G_TRUE THEN

Line 814: x_return_status := Fnd_Api.G_RET_STS_ERROR;

810: EXCEPTION
811:
812: WHEN FND_API.G_EXC_ERROR THEN
813:
814: x_return_status := Fnd_Api.G_RET_STS_ERROR;
815:
816: IF p_commit = FND_API.G_TRUE THEN
817: ROLLBACK TO Set_Inv_Mth_At_Top_Task_svpt;
818: END IF;

Line 816: IF p_commit = FND_API.G_TRUE THEN

812: WHEN FND_API.G_EXC_ERROR THEN
813:
814: x_return_status := Fnd_Api.G_RET_STS_ERROR;
815:
816: IF p_commit = FND_API.G_TRUE THEN
817: ROLLBACK TO Set_Inv_Mth_At_Top_Task_svpt;
818: END IF;
819:
820: l_msg_count := Fnd_Msg_Pub.count_msg;

Line 824: ( p_encoded => Fnd_Api.G_FALSE

820: l_msg_count := Fnd_Msg_Pub.count_msg;
821: IF l_msg_count = 1 AND x_msg_data IS NULL
822: THEN
823: Pa_Interface_Utils_Pub.get_messages
824: ( p_encoded => Fnd_Api.G_FALSE
825: , p_msg_index => 1
826: , p_msg_count => l_msg_count
827: , p_msg_data => l_msg_data
828: , p_data => l_data

Line 841: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

837: Pa_Debug.reset_curr_function;
838: END IF;
839:
840: WHEN Invalid_Arg_Exc THEN
841: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
842: x_msg_count := 1;
843: x_msg_data := ' PA_TOP_TASK_CUST_INVOICE_PVT : Set_Inv_Mth_At_Top_Task : NULL parameters passed';
844:
845: IF p_commit = FND_API.G_TRUE THEN

Line 845: IF p_commit = FND_API.G_TRUE THEN

841: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
842: x_msg_count := 1;
843: x_msg_data := ' PA_TOP_TASK_CUST_INVOICE_PVT : Set_Inv_Mth_At_Top_Task : NULL parameters passed';
844:
845: IF p_commit = FND_API.G_TRUE THEN
846: ROLLBACK TO Set_Inv_Mth_At_Top_Task_svpt;
847: END IF;
848:
849: Fnd_Msg_Pub.add_exc_msg

Line 863: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

859: END IF;
860: RAISE;
861:
862: WHEN OTHERS THEN
863: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
864: x_msg_count := 1;
865: x_msg_data := SQLERRM;
866:
867: IF p_commit = FND_API.G_TRUE THEN

Line 867: IF p_commit = FND_API.G_TRUE THEN

863: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
864: x_msg_count := 1;
865: x_msg_data := SQLERRM;
866:
867: IF p_commit = FND_API.G_TRUE THEN
868: ROLLBACK TO Set_Inv_Mth_At_Top_Task_svpt;
869: END IF;
870:
871: Fnd_Msg_Pub.add_exc_msg

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

894: -- --------------------------- ------ -------- --------------------------------------------------------
895: -- p_project_id NUMBER Y Project ID for which funding flag is to be set
896: PROCEDURE set_top_task_funding_level(
897: p_api_version IN NUMBER := 1.0
898: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
899: , p_commit IN VARCHAR2 := FND_API.G_FALSE
900: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
901: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
902: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'

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

895: -- p_project_id NUMBER Y Project ID for which funding flag is to be set
896: PROCEDURE set_top_task_funding_level(
897: p_api_version IN NUMBER := 1.0
898: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
899: , p_commit IN VARCHAR2 := FND_API.G_FALSE
900: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
901: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
902: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
903: , p_debug_mode IN VARCHAR2 := 'N'

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

896: PROCEDURE set_top_task_funding_level(
897: p_api_version IN NUMBER := 1.0
898: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
899: , p_commit IN VARCHAR2 := FND_API.G_FALSE
900: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
901: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
902: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
903: , p_debug_mode IN VARCHAR2 := 'N'
904: , p_project_id IN NUMBER

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

897: p_api_version IN NUMBER := 1.0
898: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
899: , p_commit IN VARCHAR2 := FND_API.G_FALSE
900: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
901: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
902: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
903: , p_debug_mode IN VARCHAR2 := 'N'
904: , p_project_id IN NUMBER
905: , x_return_status OUT NOCOPY VARCHAR2 -- 4537865

Line 929: x_return_status := FND_API.G_RET_STS_SUCCESS;

925:
926: BEGIN
927:
928: x_msg_count := 0;
929: x_return_status := FND_API.G_RET_STS_SUCCESS;
930: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
931:
932: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
933: FND_MSG_PUB.initialize;

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

928: x_msg_count := 0;
929: x_return_status := FND_API.G_RET_STS_SUCCESS;
930: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
931:
932: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
933: FND_MSG_PUB.initialize;
934: END IF;
935:
936: IF (p_commit = FND_API.G_TRUE) THEN

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

932: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
933: FND_MSG_PUB.initialize;
934: END IF;
935:
936: IF (p_commit = FND_API.G_TRUE) THEN
937: savepoint set_top_tsk_funding_lvl_svpt;
938: END IF;
939:
940: IF l_debug_mode = 'Y' THEN

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

956: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,
957: l_debug_level3);
958: END IF;
959:
960: IF ( (p_project_id IS NULL OR p_project_id = FND_API.G_MISS_NUM)
961: )
962: THEN
963: IF l_debug_mode = 'Y' THEN
964: Pa_Debug.g_err_stage:= 'PA_TOP_TASK_CUST_INVOICE_PVT : set_top_task_funding_level :

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

985: UPDATE pa_projects_all SET project_level_funding_flag = 'N'
986: WHERE project_id = p_project_id;
987: --END IF;
988:
989: IF (p_commit = FND_API.G_TRUE) THEN
990: COMMIT;
991: END IF;
992:
993: EXCEPTION

Line 995: WHEN FND_API.G_EXC_ERROR THEN

991: END IF;
992:
993: EXCEPTION
994:
995: WHEN FND_API.G_EXC_ERROR THEN
996:
997: x_return_status := Fnd_Api.G_RET_STS_ERROR;
998:
999: IF p_commit = FND_API.G_TRUE THEN

Line 997: x_return_status := Fnd_Api.G_RET_STS_ERROR;

993: EXCEPTION
994:
995: WHEN FND_API.G_EXC_ERROR THEN
996:
997: x_return_status := Fnd_Api.G_RET_STS_ERROR;
998:
999: IF p_commit = FND_API.G_TRUE THEN
1000: ROLLBACK TO set_top_tsk_funding_lvl_svpt;
1001: END IF;

Line 999: IF p_commit = FND_API.G_TRUE THEN

995: WHEN FND_API.G_EXC_ERROR THEN
996:
997: x_return_status := Fnd_Api.G_RET_STS_ERROR;
998:
999: IF p_commit = FND_API.G_TRUE THEN
1000: ROLLBACK TO set_top_tsk_funding_lvl_svpt;
1001: END IF;
1002:
1003: l_msg_count := Fnd_Msg_Pub.count_msg;

Line 1007: ( p_encoded => Fnd_Api.G_FALSE

1003: l_msg_count := Fnd_Msg_Pub.count_msg;
1004: IF l_msg_count = 1 AND x_msg_data IS NULL
1005: THEN
1006: Pa_Interface_Utils_Pub.get_messages
1007: ( p_encoded => Fnd_Api.G_FALSE
1008: , p_msg_index => 1
1009: , p_msg_count => l_msg_count
1010: , p_msg_data => l_msg_data
1011: , p_data => l_data

Line 1024: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1020: Pa_Debug.reset_curr_function;
1021: END IF;
1022:
1023: WHEN Invalid_Arg_Exc THEN
1024: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1025: x_msg_count := 1;
1026: x_msg_data := ' PA_TOP_TASK_CUST_INVOICE_PVT : set_top_task_funding_level : NULL parameters passed';
1027:
1028: IF p_commit = FND_API.G_TRUE THEN

Line 1028: IF p_commit = FND_API.G_TRUE THEN

1024: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1025: x_msg_count := 1;
1026: x_msg_data := ' PA_TOP_TASK_CUST_INVOICE_PVT : set_top_task_funding_level : NULL parameters passed';
1027:
1028: IF p_commit = FND_API.G_TRUE THEN
1029: ROLLBACK TO set_top_tsk_funding_lvl_svpt;
1030: END IF;
1031:
1032: Fnd_Msg_Pub.add_exc_msg

Line 1046: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1042: END IF;
1043: RAISE;
1044:
1045: WHEN OTHERS THEN
1046: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1047: x_msg_count := 1;
1048: x_msg_data := SQLERRM;
1049:
1050: IF p_commit = FND_API.G_TRUE THEN

Line 1050: IF p_commit = FND_API.G_TRUE THEN

1046: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1047: x_msg_count := 1;
1048: x_msg_data := SQLERRM;
1049:
1050: IF p_commit = FND_API.G_TRUE THEN
1051: ROLLBACK TO set_top_tsk_funding_lvl_svpt;
1052: END IF;
1053:
1054: Fnd_Msg_Pub.add_exc_msg

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

1086: -- x_cust_name VARCHAR2 Customer Name of (new) default top task customer
1087: -- x_cust_num VARCHAR2 Customer Number of the (new) default top task customer
1088: PROCEDURE check_delete_customer(
1089: p_api_version IN NUMBER := 1.0
1090: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
1091: , p_commit IN VARCHAR2 := FND_API.G_FALSE
1092: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
1093: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1094: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'

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

1087: -- x_cust_num VARCHAR2 Customer Number of the (new) default top task customer
1088: PROCEDURE check_delete_customer(
1089: p_api_version IN NUMBER := 1.0
1090: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
1091: , p_commit IN VARCHAR2 := FND_API.G_FALSE
1092: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
1093: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1094: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
1095: , p_debug_mode IN VARCHAR2 := 'N'

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

1088: PROCEDURE check_delete_customer(
1089: p_api_version IN NUMBER := 1.0
1090: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
1091: , p_commit IN VARCHAR2 := FND_API.G_FALSE
1092: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
1093: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1094: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
1095: , p_debug_mode IN VARCHAR2 := 'N'
1096: , p_project_id IN NUMBER

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

1089: p_api_version IN NUMBER := 1.0
1090: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
1091: , p_commit IN VARCHAR2 := FND_API.G_FALSE
1092: , p_validate_only IN VARCHAR2 := FND_API.G_TRUE
1093: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1094: , p_calling_module IN VARCHAR2 := 'SELF_SERVICE'
1095: , p_debug_mode IN VARCHAR2 := 'N'
1096: , p_project_id IN NUMBER
1097: , p_customer_id IN NUMBER

Line 1150: x_return_status := FND_API.G_RET_STS_SUCCESS;

1146:
1147: BEGIN
1148:
1149: x_msg_count := 0;
1150: x_return_status := FND_API.G_RET_STS_SUCCESS;
1151: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
1152:
1153: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
1154: FND_MSG_PUB.initialize;

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

1149: x_msg_count := 0;
1150: x_return_status := FND_API.G_RET_STS_SUCCESS;
1151: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
1152:
1153: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
1154: FND_MSG_PUB.initialize;
1155: END IF;
1156:
1157: IF (p_commit = FND_API.G_TRUE) THEN

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

1153: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
1154: FND_MSG_PUB.initialize;
1155: END IF;
1156:
1157: IF (p_commit = FND_API.G_TRUE) THEN
1158: savepoint check_delete_customer;
1159: END IF;
1160:
1161: IF l_debug_mode = 'Y' THEN

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

1179: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,
1180: l_debug_level3);
1181: END IF;
1182:
1183: IF ( (p_project_id IS NULL OR p_project_id = FND_API.G_MISS_NUM) AND
1184: (p_customer_id IS NULL OR p_customer_id = FND_API.G_MISS_NUM)
1185: )
1186: THEN
1187: IF l_debug_mode = 'Y' THEN

Line 1184: (p_customer_id IS NULL OR p_customer_id = FND_API.G_MISS_NUM)

1180: l_debug_level3);
1181: END IF;
1182:
1183: IF ( (p_project_id IS NULL OR p_project_id = FND_API.G_MISS_NUM) AND
1184: (p_customer_id IS NULL OR p_customer_id = FND_API.G_MISS_NUM)
1185: )
1186: THEN
1187: IF l_debug_mode = 'Y' THEN
1188: Pa_Debug.g_err_stage:= 'PA_TOP_TASK_CUST_INVOICE_PVT : check_delete_customer :

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

1269: AND customer_id = x_cust_id;
1270: END IF;
1271: END IF;
1272:
1273: IF (p_commit = FND_API.G_TRUE) THEN
1274: COMMIT;
1275: END IF;
1276: EXCEPTION
1277: WHEN FND_API.G_EXC_ERROR THEN

Line 1277: WHEN FND_API.G_EXC_ERROR THEN

1273: IF (p_commit = FND_API.G_TRUE) THEN
1274: COMMIT;
1275: END IF;
1276: EXCEPTION
1277: WHEN FND_API.G_EXC_ERROR THEN
1278:
1279: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1280:
1281: -- 4537865 : RESET OUT PARAMS

Line 1279: x_return_status := Fnd_Api.G_RET_STS_ERROR;

1275: END IF;
1276: EXCEPTION
1277: WHEN FND_API.G_EXC_ERROR THEN
1278:
1279: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1280:
1281: -- 4537865 : RESET OUT PARAMS
1282: x_cust_assoc := NULL ;
1283: x_cust_id := NULL ;

Line 1287: IF p_commit = FND_API.G_TRUE THEN

1283: x_cust_id := NULL ;
1284: x_cust_name := NULL ;
1285: x_cust_num := NULL ;
1286:
1287: IF p_commit = FND_API.G_TRUE THEN
1288: ROLLBACK TO check_customer_delete;
1289: END IF;
1290:
1291: l_msg_count := Fnd_Msg_Pub.count_msg;

Line 1295: ( p_encoded => Fnd_Api.G_FALSE

1291: l_msg_count := Fnd_Msg_Pub.count_msg;
1292: IF l_msg_count = 1 AND x_msg_data IS NULL
1293: THEN
1294: Pa_Interface_Utils_Pub.get_messages
1295: ( p_encoded => Fnd_Api.G_FALSE
1296: , p_msg_index => 1
1297: , p_msg_count => l_msg_count
1298: , p_msg_data => l_msg_data
1299: , p_data => l_data

Line 1312: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1308: Pa_Debug.reset_curr_function;
1309: END IF;
1310:
1311: WHEN Invalid_Arg_Exc THEN
1312: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1313: x_msg_count := 1;
1314: x_msg_data := ' PA_TOP_TASK_CUST_INVOICE_PVT : check_delete_customer : NULL parameters passed';
1315:
1316: -- 4537865 : RESET OUT PARAMS

Line 1322: IF p_commit = FND_API.G_TRUE THEN

1318: x_cust_id := NULL ;
1319: x_cust_name := NULL ;
1320: x_cust_num := NULL ;
1321:
1322: IF p_commit = FND_API.G_TRUE THEN
1323: ROLLBACK TO check_delete_customer;
1324: END IF;
1325:
1326: Fnd_Msg_Pub.add_exc_msg

Line 1340: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1336: END IF;
1337: RAISE;
1338:
1339: WHEN OTHERS THEN
1340: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1341: x_msg_count := 1;
1342: x_msg_data := SQLERRM;
1343:
1344: -- 4537865 : RESET OUT PARAMS

Line 1350: IF p_commit = FND_API.G_TRUE THEN

1346: x_cust_id := NULL ;
1347: x_cust_name := NULL ;
1348: x_cust_num := NULL ;
1349:
1350: IF p_commit = FND_API.G_TRUE THEN
1351: ROLLBACK TO check_delete_customer;
1352: END IF;
1353:
1354: Fnd_Msg_Pub.add_exc_msg