DBA Data[Home] [Help]

APPS.PA_PROJECT_PARTIES_PVT dependencies on PA_DEBUG

Line 4: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

1: package body PA_PROJECT_PARTIES_PVT as
2: /* $Header: PARPPUTB.pls 120.12.12010000.3 2008/11/30 08:49:36 jcgeorge ship $ */
3:
4: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
5:
6: PROCEDURE CREATE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,
7: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
8: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

Line 80: pa_debug.debug('Create_project_party: Calling validate_project_party.');

76:
77: if p_validation_level > 0 then
78: if (p_debug_mode = 'Y') then
79: IF P_DEBUG_MODE = 'Y' THEN
80: pa_debug.debug('Create_project_party: Calling validate_project_party.');
81: END IF;
82: end if;
83: pa_debug.G_err_stage := 'Calling validate_project_party';
84: pa_project_parties_utils.validate_project_party(

Line 83: pa_debug.G_err_stage := 'Calling validate_project_party';

79: IF P_DEBUG_MODE = 'Y' THEN
80: pa_debug.debug('Create_project_party: Calling validate_project_party.');
81: END IF;
82: end if;
83: pa_debug.G_err_stage := 'Calling validate_project_party';
84: pa_project_parties_utils.validate_project_party(
85: p_validation_level,
86: p_debug_mode,
87: p_object_id,

Line 140: pa_debug.G_err_stage := 'Calling create_resource';

136:
137:
138: /* End of code added for bug 3234293 */
139:
140: pa_debug.G_err_stage := 'Calling create_resource';
141: pa_r_project_resources_pub.create_resource(p_api_version => 1.0,
142: p_init_msg_list => fnd_api.g_false,
143: p_commit => p_commit,
144: p_validate_only => p_validate_only,

Line 187: pa_debug.G_err_stage := 'Calling create_resource';

183: IF ((nvl(p_scheduled_flag, 'N') = 'Y') OR (l_is_valid <> 'Y')) THEN
184:
185: /* End of code added for bug 3234293 */
186:
187: pa_debug.G_err_stage := 'Calling create_resource';
188: pa_r_project_resources_pub.create_resource(p_api_version => 1.0,
189: p_init_msg_list => fnd_api.g_false,
190: p_commit => p_commit,
191: p_validate_only => p_validate_only,

Line 253: pa_debug.debug('Create_project_party: Calling update_row.');

249: if x_call_overlap = 'N' and x_return_status = FND_API.G_RET_STS_SUCCESS then
250: -- call update api
251: if (p_debug_mode = 'Y') then
252: IF P_DEBUG_MODE = 'Y' THEN
253: pa_debug.debug('Create_project_party: Calling update_row.');
254: END IF;
255: end if;
256:
257: x_project_party_id := l_project_party_id;

Line 261: pa_debug.G_err_stage := 'Calling update_row from create_project_party';

257: x_project_party_id := l_project_party_id;
258: x_resource_id := l_resource_id;
259:
260: --dbms_output.put_line('calling update');
261: pa_debug.G_err_stage := 'Calling update_row from create_project_party';
262: PA_PROJECT_PARTIES_PKG.UPDATE_ROW (
263: X_PROJECT_PARTY_ID => l_project_party_id,
264: X_PROJECT_ID => l_project_id,
265: X_RESOURCE_SOURCE_ID => p_resource_source_id,

Line 313: pa_debug.debug('Create_project_party: Calling insert_row.');

309: x_resource_id := l_resource_id;
310:
311: if (p_debug_mode = 'Y') then
312: IF P_DEBUG_MODE = 'Y' THEN
313: pa_debug.debug('Create_project_party: Calling insert_row.');
314: END IF;
315: end if;
316: pa_debug.G_err_stage := 'Calling insert_row';
317: ----dbms_output.put_line('calling insert');

Line 316: pa_debug.G_err_stage := 'Calling insert_row';

312: IF P_DEBUG_MODE = 'Y' THEN
313: pa_debug.debug('Create_project_party: Calling insert_row.');
314: END IF;
315: end if;
316: pa_debug.G_err_stage := 'Calling insert_row';
317: ----dbms_output.put_line('calling insert');
318: PA_PROJECT_PARTIES_PKG.INSERT_ROW (
319: X_PROJECT_PARTY_ID => x_project_party_id,
320: X_OBJECT_ID => p_object_id,

Line 418: pa_debug.debug('Create_project_party: Commiting data.');

414:
415: if fnd_api.to_boolean(nvl(p_commit,FND_API.G_FALSE)) and x_return_status = FND_API.G_RET_STS_SUCCESS then
416: if (p_debug_mode = 'Y') then
417: IF P_DEBUG_MODE = 'Y' THEN
418: pa_debug.debug('Create_project_party: Commiting data.');
419: END IF;
420: end if;
421: commit work;
422: end if;

Line 427: pa_debug.reset_err_stack;

423: end if;
424: fnd_msg_pub.count_and_get(p_count => x_msg_count,
425: p_data => x_msg_data);
426:
427: pa_debug.reset_err_stack;
428:
429: EXCEPTION
430: --Bug 5186830
431: WHEN FND_API.G_EXC_ERROR THEN

Line 449: pa_debug.reset_err_stack;

445: ELSE
446: x_msg_count := l_msg_count;
447: END IF;
448: x_return_status := FND_API.G_RET_STS_ERROR;
449: pa_debug.reset_err_stack;
450:
451: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
452: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
453: fnd_message.set_name('PA','PA_UNEXPECTED_ERROR');

Line 467: p_procedure_name => pa_debug.G_err_stack,

463: rollback to project_parties;
464: end if;
465: x_return_status := fnd_api.g_ret_sts_unexp_error;
466: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_PARTIES_PUB',
467: p_procedure_name => pa_debug.G_err_stack,
468: p_error_text => SUBSTRB(SQLERRM,1,240));
469: raise;
470:
471: END CREATE_PROJECT_PARTY;

Line 553: pa_debug.debug('Update_project_party: Calling validate_project_party.');

549:
550: if p_validation_level > 0 then
551: if (p_debug_mode = 'Y') then
552: IF P_DEBUG_MODE = 'Y' THEN
553: pa_debug.debug('Update_project_party: Calling validate_project_party.');
554: END IF;
555: end if;
556: pa_debug.g_err_stage := 'Calling validate_project_party';
557: pa_project_parties_utils.validate_project_party(

Line 556: pa_debug.g_err_stage := 'Calling validate_project_party';

552: IF P_DEBUG_MODE = 'Y' THEN
553: pa_debug.debug('Update_project_party: Calling validate_project_party.');
554: END IF;
555: end if;
556: pa_debug.g_err_stage := 'Calling validate_project_party';
557: pa_project_parties_utils.validate_project_party(
558: p_validation_level,
559: p_debug_mode,
560: p_object_id,

Line 699: pa_debug.debug('Update_project_party: Calling update_row.');

695:
696: -- call update api
697: if (p_debug_mode = 'Y') then
698: IF P_DEBUG_MODE = 'Y' THEN
699: pa_debug.debug('Update_project_party: Calling update_row.');
700: END IF;
701: end if;
702:
703: /* FP-L status-based security

Line 735: pa_debug.g_err_stage := 'Calling Update_row';

731: if x_return_status = FND_API.G_RET_STS_SUCCESS then
732: l_grant_id := null;
733:
734: ----dbms_output.put_line('calling update api');
735: pa_debug.g_err_stage := 'Calling Update_row';
736: PA_PROJECT_PARTIES_PKG.UPDATE_ROW (
737: X_PROJECT_PARTY_ID => p_project_party_id,
738: X_PROJECT_ID => p_project_id,
739: X_RESOURCE_SOURCE_ID => p_resource_source_id,

Line 829: pa_debug.debug('Update_project_party: Commiting data.');

825:
826: if fnd_api.to_boolean(nvl(p_commit,fnd_api.G_FALSE)) and x_return_status = FND_API.G_RET_STS_SUCCESS then
827: if (p_debug_mode = 'Y') then
828: IF P_DEBUG_MODE = 'Y' THEN
829: pa_debug.debug('Update_project_party: Commiting data.');
830: END IF;
831: end if;
832: commit work;
833: end if;

Line 837: pa_debug.reset_err_stack;

833: end if;
834: fnd_msg_pub.count_and_get(p_count => x_msg_count,
835: p_data => x_msg_data);
836:
837: pa_debug.reset_err_stack;
838:
839: EXCEPTION
840:
841: -- bug 5856712

Line 860: pa_debug.reset_err_stack;

856: ELSE
857: x_msg_count := l_msg_count;
858: END IF;
859: x_return_status := FND_API.G_RET_STS_ERROR;
860: pa_debug.reset_err_stack;
861:
862: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
863: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
864: fnd_message.set_name('PA','PA_UNEXPECTED_ERROR');

Line 879: p_procedure_name => pa_debug.g_err_stack,

875: rollback to project_parties;
876: end if;
877: x_return_status := fnd_api.g_ret_sts_unexp_error;
878: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_PARTIES_PUB',
879: p_procedure_name => pa_debug.g_err_stack,
880: p_error_text => SUBSTRB(SQLERRM,1,240));
881: fnd_msg_pub.count_and_get(p_count => x_msg_count,
882: p_data => x_msg_data);
883:

Line 981: pa_debug.debug('Delete_project_party : Lock Key Members ');

977: x_return_status := FND_API.G_RET_STS_SUCCESS;
978:
979: if (p_debug_mode = 'Y') then
980: IF P_DEBUG_MODE = 'Y' THEN
981: pa_debug.debug('Delete_project_party : Lock Key Members ');
982: END IF;
983: end if;
984:
985: --lock the project player

Line 989: pa_debug.debug('Delete_project_party : Before delete from pa_project_players ');

985: --lock the project player
986:
987: if (p_debug_mode = 'Y') then
988: IF P_DEBUG_MODE = 'Y' THEN
989: pa_debug.debug('Delete_project_party : Before delete from pa_project_players ');
990: END IF;
991: end if;
992:
993: /* Added the following code for bug #2111806:

Line 1055: pa_debug.g_err_stage := 'Calling delete_row';

1051: RETURN;
1052: END IF;
1053:
1054: l_grant_id := pa_project_parties_utils.get_grant_id(p_project_party_id => p_project_party_id);
1055: pa_debug.g_err_stage := 'Calling delete_row';
1056: pa_project_parties_pkg.delete_row(x_project_id => l_project_id,
1057: x_project_party_id => p_project_party_id,
1058: x_record_version_number => p_record_version_number);
1059: end if;

Line 1126: pa_debug.debug('Delete_project_party: Commiting data.');

1122:
1123: if fnd_api.to_boolean(nvl(p_commit,fnd_api.G_FALSE)) and x_return_status = FND_API.G_RET_STS_SUCCESS then
1124: if (p_debug_mode = 'Y') then
1125: IF P_DEBUG_MODE = 'Y' THEN
1126: pa_debug.debug('Delete_project_party: Commiting data.');
1127: END IF;
1128: end if;
1129: commit work;
1130: end if;

Line 1136: pa_debug.reset_err_stack;

1132: fnd_msg_pub.count_and_get(p_count => x_msg_count,
1133: p_data => x_msg_data);
1134: end if;
1135:
1136: pa_debug.reset_err_stack;
1137:
1138: EXCEPTION
1139:
1140: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1154: pa_debug.debug('Delete_project_party : Exception NO_DATA_FOUND ');

1150: WHEN NO_DATA_FOUND THEN
1151:
1152: if (p_debug_mode = 'Y') then
1153: IF P_DEBUG_MODE = 'Y' THEN
1154: pa_debug.debug('Delete_project_party : Exception NO_DATA_FOUND ');
1155: END IF;
1156: end if;
1157:
1158: --fnd_message.set_name('PA', 'PA_XC_NO_DATA_FOUND');

Line 1165: pa_debug.debug('Delete_project_party : Exception TIMEOUT_ON_RESOURCE ');

1161: WHEN TIMEOUT_ON_RESOURCE THEN
1162:
1163: if (p_debug_mode = 'Y') then
1164: IF P_DEBUG_MODE = 'Y' THEN
1165: pa_debug.debug('Delete_project_party : Exception TIMEOUT_ON_RESOURCE ');
1166: END IF;
1167: end if;
1168:
1169: fnd_message.set_name('PA', 'PA_XC_ROW_ALREADY_LOCKED');

Line 1180: pa_debug.debug('Delete_project_party : Exception OTHERS ');

1176: end if;
1177:
1178: if (p_debug_mode = 'Y') then
1179: IF P_DEBUG_MODE = 'Y' THEN
1180: pa_debug.debug('Delete_project_party : Exception OTHERS ');
1181: END IF;
1182: end if;
1183:
1184: if(SQLCODE = -54) then

Line 1190: p_procedure_name => pa_debug.g_err_stack,

1186: x_msg_data := FND_MESSAGE.get;
1187: x_return_status := FND_API.G_RET_STS_ERROR;
1188: else
1189: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_PARTIES_PUB',
1190: p_procedure_name => pa_debug.g_err_stack,
1191: p_error_text => SUBSTRB(SQLERRM,1,240));
1192: x_return_status := FND_API.G_RET_STS_ERROR;
1193: end if;
1194: