DBA Data[Home] [Help]

APPS.DPP_MIG_ADJ_PARA_APPROVAL_PVT dependencies on FND_FILE

Line 70: fnd_file.put_line(fnd_file.log, ' Begin checkMigrationCompletion ' );

66: -- Initialize API return status to sucess
67: x_return_status := fnd_api.g_ret_sts_success;
68:
69: IF G_DEBUG THEN
70: fnd_file.put_line(fnd_file.log, ' Begin checkMigrationCompletion ' );
71: END IF;
72:
73: OPEN validTransactionsCur;
74: FETCH validTransactionsCur INTO l_txn_count;

Line 77: fnd_file.put_line(fnd_file.log, ' Transactions with no entries in the dpp_execution_processes table - ' || l_txn_count );

73: OPEN validTransactionsCur;
74: FETCH validTransactionsCur INTO l_txn_count;
75: CLOSE validTransactionsCur;
76:
77: fnd_file.put_line(fnd_file.log, ' Transactions with no entries in the dpp_execution_processes table - ' || l_txn_count );
78:
79: IF l_txn_count = 0 THEN
80: IF G_DEBUG THEN
81: fnd_file.put_line(fnd_file.log, ' Migration has already been performed. ' );

Line 81: fnd_file.put_line(fnd_file.log, ' Migration has already been performed. ' );

77: fnd_file.put_line(fnd_file.log, ' Transactions with no entries in the dpp_execution_processes table - ' || l_txn_count );
78:
79: IF l_txn_count = 0 THEN
80: IF G_DEBUG THEN
81: fnd_file.put_line(fnd_file.log, ' Migration has already been performed. ' );
82: END IF;
83: RAISE FND_API.G_EXC_ERROR;
84: END IF;
85: EXCEPTION

Line 208: fnd_file.put_line(fnd_file.log, ' Begin validate_suppTradeProfile ' );

204: -- Initialize API return status to sucess
205: x_return_status := fnd_api.g_ret_sts_success;
206:
207: IF G_DEBUG THEN
208: fnd_file.put_line(fnd_file.log, ' Begin validate_suppTradeProfile ' );
209: END IF;
210:
211: FOR suppTradeProfile_rec IN suppTradeProfile_Cur
212: LOOP

Line 222: fnd_file.put_line(fnd_file.log, ' Supplier Trade Profile setup not available for ' );

218: l_vendor_site_id, l_vendor_site_code,
219: l_org_id, l_operating_unit;
220: CLOSE supplier_details_cur;
221:
222: fnd_file.put_line(fnd_file.log, ' Supplier Trade Profile setup not available for ' );
223: fnd_file.put_line(fnd_file.log, ' Supplier - ' || l_vendor_name || ' (' || l_vendor_id || ')' );
224: fnd_file.put_line(fnd_file.log, ' Supplier Site - ' || l_vendor_site_code || ' (' || l_vendor_site_id || ')' );
225: fnd_file.put_line(fnd_file.log, ' Operating Unit - ' || l_operating_unit || ' (' || l_org_id || ')' );
226:

Line 223: fnd_file.put_line(fnd_file.log, ' Supplier - ' || l_vendor_name || ' (' || l_vendor_id || ')' );

219: l_org_id, l_operating_unit;
220: CLOSE supplier_details_cur;
221:
222: fnd_file.put_line(fnd_file.log, ' Supplier Trade Profile setup not available for ' );
223: fnd_file.put_line(fnd_file.log, ' Supplier - ' || l_vendor_name || ' (' || l_vendor_id || ')' );
224: fnd_file.put_line(fnd_file.log, ' Supplier Site - ' || l_vendor_site_code || ' (' || l_vendor_site_id || ')' );
225: fnd_file.put_line(fnd_file.log, ' Operating Unit - ' || l_operating_unit || ' (' || l_org_id || ')' );
226:
227: END LOOP;

Line 224: fnd_file.put_line(fnd_file.log, ' Supplier Site - ' || l_vendor_site_code || ' (' || l_vendor_site_id || ')' );

220: CLOSE supplier_details_cur;
221:
222: fnd_file.put_line(fnd_file.log, ' Supplier Trade Profile setup not available for ' );
223: fnd_file.put_line(fnd_file.log, ' Supplier - ' || l_vendor_name || ' (' || l_vendor_id || ')' );
224: fnd_file.put_line(fnd_file.log, ' Supplier Site - ' || l_vendor_site_code || ' (' || l_vendor_site_id || ')' );
225: fnd_file.put_line(fnd_file.log, ' Operating Unit - ' || l_operating_unit || ' (' || l_org_id || ')' );
226:
227: END LOOP;
228:

Line 225: fnd_file.put_line(fnd_file.log, ' Operating Unit - ' || l_operating_unit || ' (' || l_org_id || ')' );

221:
222: fnd_file.put_line(fnd_file.log, ' Supplier Trade Profile setup not available for ' );
223: fnd_file.put_line(fnd_file.log, ' Supplier - ' || l_vendor_name || ' (' || l_vendor_id || ')' );
224: fnd_file.put_line(fnd_file.log, ' Supplier Site - ' || l_vendor_site_code || ' (' || l_vendor_site_id || ')' );
225: fnd_file.put_line(fnd_file.log, ' Operating Unit - ' || l_operating_unit || ' (' || l_org_id || ')' );
226:
227: END LOOP;
228:
229: IF l_setup_missing = 'Y' THEN

Line 230: fnd_file.put_line(fnd_file.log, ' Please perform the Supplier Trade Profile setup. ' );

226:
227: END LOOP;
228:
229: IF l_setup_missing = 'Y' THEN
230: fnd_file.put_line(fnd_file.log, ' Please perform the Supplier Trade Profile setup. ' );
231: RAISE FND_API.G_EXC_ERROR;
232: END IF;
233: EXCEPTION
234: WHEN FND_API.G_EXC_ERROR THEN

Line 360: fnd_file.put_line(fnd_file.log, ' Begin validate_execProcessSetup ' );

356: -- Initialize API return status to sucess
357: x_return_status := fnd_api.g_ret_sts_success;
358:
359: IF G_DEBUG THEN
360: fnd_file.put_line(fnd_file.log, ' Begin validate_execProcessSetup ' );
361: END IF;
362:
363: FOR orgId_rec IN orgId_Cur
364: LOOP

Line 371: fnd_file.put_line(fnd_file.log, ' No of execution processes enabled for the org ' || l_org_id || ' is ' || l_count );

367: FETCH get_process_setup_cnt_csr INTO l_count;
368: CLOSE get_process_setup_cnt_csr;
369:
370: IF G_DEBUG THEN
371: fnd_file.put_line(fnd_file.log, ' No of execution processes enabled for the org ' || l_org_id || ' is ' || l_count );
372: END IF;
373:
374: IF l_count = 0 THEN
375: OPEN operating_unit_cur(l_org_id);

Line 381: fnd_file.put_line(fnd_file.log, ' Execution Process setup not available for Operating Unit - ' || l_operating_unit || ' (' || l_org_id || ')' );

377: CLOSE operating_unit_cur;
378:
379: l_setup_missing := 'Y';
380:
381: fnd_file.put_line(fnd_file.log, ' Execution Process setup not available for Operating Unit - ' || l_operating_unit || ' (' || l_org_id || ')' );
382: END IF;
383:
384: END LOOP;
385:

Line 388: fnd_file.put_line(fnd_file.log, ' Please perform the Execution Process setup. ' );

384: END LOOP;
385:
386: IF l_setup_missing = 'Y' THEN
387: IF G_DEBUG THEN
388: fnd_file.put_line(fnd_file.log, ' Please perform the Execution Process setup. ' );
389: END IF;
390: RAISE FND_API.G_EXC_ERROR;
391: END IF;
392: EXCEPTION

Line 538: fnd_file.put_line(fnd_file.log, ' Begin insertExecutionProcesses ' );

534: -- Initialize API return status to sucess
535: x_return_status := fnd_api.g_ret_sts_success;
536:
537: IF G_DEBUG THEN
538: fnd_file.put_line(fnd_file.log, ' Begin insertExecutionProcesses ' );
539: END IF;
540:
541: FOR get_valid_transaction_rec IN get_valid_transaction_csr
542: LOOP

Line 551: fnd_file.put_line(fnd_file.log, ' Supplier Trade Profile Id: ' || l_supp_trade_profile_id );

547: FETCH get_supp_trd_prfl_csr INTO l_supp_trade_profile_id, l_org_id;
548: CLOSE get_supp_trd_prfl_csr;
549:
550: IF G_DEBUG THEN
551: fnd_file.put_line(fnd_file.log, ' Supplier Trade Profile Id: ' || l_supp_trade_profile_id );
552: fnd_file.put_line(fnd_file.log, ' Org Id: ' || l_org_id );
553: END IF;
554: EXCEPTION
555: WHEN OTHERS THEN

Line 552: fnd_file.put_line(fnd_file.log, ' Org Id: ' || l_org_id );

548: CLOSE get_supp_trd_prfl_csr;
549:
550: IF G_DEBUG THEN
551: fnd_file.put_line(fnd_file.log, ' Supplier Trade Profile Id: ' || l_supp_trade_profile_id );
552: fnd_file.put_line(fnd_file.log, ' Org Id: ' || l_org_id );
553: END IF;
554: EXCEPTION
555: WHEN OTHERS THEN
556: fnd_file.put_line(fnd_file.log,'Exception while fetching supplier trade profile id and org id: ' || SQLERRM);

Line 556: fnd_file.put_line(fnd_file.log,'Exception while fetching supplier trade profile id and org id: ' || SQLERRM);

552: fnd_file.put_line(fnd_file.log, ' Org Id: ' || l_org_id );
553: END IF;
554: EXCEPTION
555: WHEN OTHERS THEN
556: fnd_file.put_line(fnd_file.log,'Exception while fetching supplier trade profile id and org id: ' || SQLERRM);
557: fnd_file.new_line(fnd_file.log);
558: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
559: END;
560:

Line 557: fnd_file.new_line(fnd_file.log);

553: END IF;
554: EXCEPTION
555: WHEN OTHERS THEN
556: fnd_file.put_line(fnd_file.log,'Exception while fetching supplier trade profile id and org id: ' || SQLERRM);
557: fnd_file.new_line(fnd_file.log);
558: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
559: END;
560:
561: --Check if the Process Setup is done for the Supplier, Supplier site and Operating Unit

Line 570: fnd_file.put_line(fnd_file.log, ' Process Setup does not exist for ' );

566:
567: IF l_count = 0 THEN --Process Setup does not exist for the Supplier Trade Profile
568: l_supp_trade_profile_id := null;
569: IF G_DEBUG THEN
570: fnd_file.put_line(fnd_file.log, ' Process Setup does not exist for ' );
571: fnd_file.put_line(fnd_file.log, ' Supplier Trade Profile Id: ' || l_supp_trade_profile_id );
572: fnd_file.put_line(fnd_file.log, ' Org Id: ' || l_org_id );
573: END IF;
574: END IF;

Line 571: fnd_file.put_line(fnd_file.log, ' Supplier Trade Profile Id: ' || l_supp_trade_profile_id );

567: IF l_count = 0 THEN --Process Setup does not exist for the Supplier Trade Profile
568: l_supp_trade_profile_id := null;
569: IF G_DEBUG THEN
570: fnd_file.put_line(fnd_file.log, ' Process Setup does not exist for ' );
571: fnd_file.put_line(fnd_file.log, ' Supplier Trade Profile Id: ' || l_supp_trade_profile_id );
572: fnd_file.put_line(fnd_file.log, ' Org Id: ' || l_org_id );
573: END IF;
574: END IF;
575: EXCEPTION

Line 572: fnd_file.put_line(fnd_file.log, ' Org Id: ' || l_org_id );

568: l_supp_trade_profile_id := null;
569: IF G_DEBUG THEN
570: fnd_file.put_line(fnd_file.log, ' Process Setup does not exist for ' );
571: fnd_file.put_line(fnd_file.log, ' Supplier Trade Profile Id: ' || l_supp_trade_profile_id );
572: fnd_file.put_line(fnd_file.log, ' Org Id: ' || l_org_id );
573: END IF;
574: END IF;
575: EXCEPTION
576: WHEN OTHERS THEN

Line 577: fnd_file.put_line(fnd_file.log,'Exception while checking if the process setup exists: ' || SQLERRM);

573: END IF;
574: END IF;
575: EXCEPTION
576: WHEN OTHERS THEN
577: fnd_file.put_line(fnd_file.log,'Exception while checking if the process setup exists: ' || SQLERRM);
578: fnd_file.new_line(fnd_file.log);
579: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
580: END;
581:

Line 578: fnd_file.new_line(fnd_file.log);

574: END IF;
575: EXCEPTION
576: WHEN OTHERS THEN
577: fnd_file.put_line(fnd_file.log,'Exception while checking if the process setup exists: ' || SQLERRM);
578: fnd_file.new_line(fnd_file.log);
579: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
580: END;
581:
582: --Get the process code either from either supplier trade profile or system parameters

Line 607: fnd_file.put_line(fnd_file.log,'Exception while fetching the process code and inserting into DPP_EXECUTION_PROCESSES: ' || SQLERRM);

603: );
604: CLOSE get_process_codes_csr;
605: EXCEPTION
606: WHEN OTHERS THEN
607: fnd_file.put_line(fnd_file.log,'Exception while fetching the process code and inserting into DPP_EXECUTION_PROCESSES: ' || SQLERRM);
608: fnd_file.new_line(fnd_file.log);
609: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
610: END;
611: END LOOP;

Line 608: fnd_file.new_line(fnd_file.log);

604: CLOSE get_process_codes_csr;
605: EXCEPTION
606: WHEN OTHERS THEN
607: fnd_file.put_line(fnd_file.log,'Exception while fetching the process code and inserting into DPP_EXECUTION_PROCESSES: ' || SQLERRM);
608: fnd_file.new_line(fnd_file.log);
609: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
610: END;
611: END LOOP;
612:

Line 729: fnd_file.put_line(fnd_file.log, ' Begin clearAllApprovals ' );

725: -- Initialize API return status to sucess
726: x_return_status := fnd_api.g_ret_sts_success;
727:
728: IF G_DEBUG THEN
729: fnd_file.put_line(fnd_file.log, ' Begin clearAllApprovals ' );
730: END IF;
731:
732: BEGIN
733: --Delete the approval access

Line 741: fnd_file.put_line(fnd_file.log, ' Transactions approval entries have been deleted from DPP_APPROVAL_ACCESS' );

737: where transaction_status IN ( 'APPROVED' , 'REJECTED' , 'PENDING_APPROVAL' )
738: and trunc(effective_start_date) > trunc(sysdate) );
739:
740: IF G_DEBUG THEN
741: fnd_file.put_line(fnd_file.log, ' Transactions approval entries have been deleted from DPP_APPROVAL_ACCESS' );
742: END IF;
743:
744: EXCEPTION
745: WHEN OTHERS THEN

Line 763: fnd_file.put_line(fnd_file.log, ' Clear All Approvals from AME for the transaction ' || l_transaction_number );

759: BEGIN
760: --Clear the approvals in AME
761: ame_api2.clearAllApprovals(l_application_id, l_transaction_type, l_transaction_header_id);
762: IF G_DEBUG THEN
763: fnd_file.put_line(fnd_file.log, ' Clear All Approvals from AME for the transaction ' || l_transaction_number );
764: END IF;
765:
766: EXCEPTION
767: WHEN OTHERS THEN

Line 882: fnd_file.put_line(fnd_file.log, ' Begin update_status ' );

878: -- Initialize API return status to sucess
879: x_return_status := fnd_api.g_ret_sts_success;
880:
881: IF G_DEBUG THEN
882: fnd_file.put_line(fnd_file.log, ' Begin update_status ' );
883: END IF;
884:
885: UPDATE dpp_transaction_headers_all
886: SET transaction_status = 'APPROVED',

Line 897: fnd_file.put_line(fnd_file.log, ' No of transactions from ACTIVE to APPROVED: ' || SQL%ROWCOUNT );

893: program_id = l_program_id,
894: program_update_date = sysdate
895: WHERE transaction_status = 'ACTIVE';
896:
897: fnd_file.put_line(fnd_file.log, ' No of transactions from ACTIVE to APPROVED: ' || SQL%ROWCOUNT );
898:
899: UPDATE dpp_transaction_headers_all
900: SET transaction_status = 'PENDING_ADJUSTMENT',
901: object_version_number = object_version_number +1,

Line 912: fnd_file.put_line(fnd_file.log, ' No of transactions from NEW to PENDING_ADJUSTMENT: ' || SQL%ROWCOUNT );

908: program_update_date = sysdate
909: WHERE transaction_status = 'NEW'
910: AND TRUNC(effective_start_date) <= TRUNC(SYSDATE);
911:
912: fnd_file.put_line(fnd_file.log, ' No of transactions from NEW to PENDING_ADJUSTMENT: ' || SQL%ROWCOUNT );
913:
914: UPDATE dpp_transaction_headers_all
915: SET transaction_status = 'ACTIVE',
916: object_version_number = object_version_number +1,

Line 927: fnd_file.put_line(fnd_file.log, ' No of transactions from NEW to ACTIVE: ' || SQL%ROWCOUNT );

923: program_update_date = sysdate
924: WHERE transaction_status = 'NEW'
925: AND TRUNC(effective_start_date) > TRUNC(SYSDATE);
926:
927: fnd_file.put_line(fnd_file.log, ' No of transactions from NEW to ACTIVE: ' || SQL%ROWCOUNT );
928:
929: UPDATE dpp_transaction_headers_all
930: SET transaction_status = 'ACTIVE',
931: object_version_number = object_version_number +1,

Line 942: fnd_file.put_line(fnd_file.log, ' No of transactions from APPROVED to ACTIVE: ' || SQL%ROWCOUNT );

938: program_update_date = sysdate
939: WHERE transaction_status = 'APPROVED'
940: AND TRUNC(effective_start_date) > TRUNC(SYSDATE);
941:
942: fnd_file.put_line(fnd_file.log, ' No of transactions from APPROVED to ACTIVE: ' || SQL%ROWCOUNT );
943:
944: UPDATE dpp_transaction_headers_all
945: SET transaction_status = 'ACTIVE',
946: object_version_number = object_version_number +1,

Line 957: fnd_file.put_line(fnd_file.log, ' No of transactions from REJECTED to ACTIVE: ' || SQL%ROWCOUNT );

953: program_update_date = sysdate
954: WHERE transaction_status = 'REJECTED'
955: AND TRUNC(effective_start_date) > TRUNC(SYSDATE);
956:
957: fnd_file.put_line(fnd_file.log, ' No of transactions from REJECTED to ACTIVE: ' || SQL%ROWCOUNT );
958:
959: UPDATE dpp_transaction_headers_all
960: SET transaction_status = 'ACTIVE',
961: object_version_number = object_version_number +1,

Line 972: fnd_file.put_line(fnd_file.log, ' No of transactions from PENDING_APPROVAL to ACTIVE: ' || SQL%ROWCOUNT );

968: program_update_date = sysdate
969: WHERE transaction_status = 'PENDING_APPROVAL'
970: AND TRUNC(effective_start_date) > TRUNC(SYSDATE);
971:
972: fnd_file.put_line(fnd_file.log, ' No of transactions from PENDING_APPROVAL to ACTIVE: ' || SQL%ROWCOUNT );
973:
974: EXCEPTION
975: WHEN FND_API.G_EXC_ERROR THEN
976: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1065: fnd_file.put_line(fnd_file.LOG,'Check if the migration has already been completed successfully.');

1061: retcode := 0;
1062: l_return_status := FND_API.G_RET_STS_SUCCESS;
1063:
1064: IF G_DEBUG THEN
1065: fnd_file.put_line(fnd_file.LOG,'Check if the migration has already been completed successfully.');
1066: END IF;
1067:
1068: checkMigrationCompletion(
1069: p_api_version => l_api_version

Line 1079: fnd_file.put_line(fnd_file.log, ' Check migration completion. Return Status: ' || l_return_status || ' Error Msg: ' || l_msg_data);

1075: , x_msg_data => l_msg_data
1076: ) ;
1077:
1078: IF G_DEBUG THEN
1079: fnd_file.put_line(fnd_file.log, ' Check migration completion. Return Status: ' || l_return_status || ' Error Msg: ' || l_msg_data);
1080: END IF;
1081:
1082: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
1083: fnd_file.put_line(fnd_file.log, l_msg_data);

Line 1083: fnd_file.put_line(fnd_file.log, l_msg_data);

1079: fnd_file.put_line(fnd_file.log, ' Check migration completion. Return Status: ' || l_return_status || ' Error Msg: ' || l_msg_data);
1080: END IF;
1081:
1082: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
1083: fnd_file.put_line(fnd_file.log, l_msg_data);
1084: errbuf := 'Warning';
1085: retcode := 1;
1086: RETURN;
1087: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

Line 1091: fnd_file.put_line(fnd_file.log,('-----------------------------------------------------------'));

1087: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1088: RAISE Fnd_Api.g_exc_unexpected_error;
1089: END IF;
1090:
1091: fnd_file.put_line(fnd_file.log,('-----------------------------------------------------------'));
1092: fnd_file.put_line(fnd_file.log,(' Migration started at ' || to_char(sysdate,'dd-mon-yyyy hh24:mi:ss')));
1093: fnd_file.put_line(fnd_file.log,('-----------------------------------------------------------'));
1094:
1095: IF G_DEBUG THEN

Line 1092: fnd_file.put_line(fnd_file.log,(' Migration started at ' || to_char(sysdate,'dd-mon-yyyy hh24:mi:ss')));

1088: RAISE Fnd_Api.g_exc_unexpected_error;
1089: END IF;
1090:
1091: fnd_file.put_line(fnd_file.log,('-----------------------------------------------------------'));
1092: fnd_file.put_line(fnd_file.log,(' Migration started at ' || to_char(sysdate,'dd-mon-yyyy hh24:mi:ss')));
1093: fnd_file.put_line(fnd_file.log,('-----------------------------------------------------------'));
1094:
1095: IF G_DEBUG THEN
1096: fnd_file.put_line(fnd_file.LOG,'Validate Supplier Trade Profile');

Line 1093: fnd_file.put_line(fnd_file.log,('-----------------------------------------------------------'));

1089: END IF;
1090:
1091: fnd_file.put_line(fnd_file.log,('-----------------------------------------------------------'));
1092: fnd_file.put_line(fnd_file.log,(' Migration started at ' || to_char(sysdate,'dd-mon-yyyy hh24:mi:ss')));
1093: fnd_file.put_line(fnd_file.log,('-----------------------------------------------------------'));
1094:
1095: IF G_DEBUG THEN
1096: fnd_file.put_line(fnd_file.LOG,'Validate Supplier Trade Profile');
1097: END IF;

Line 1096: fnd_file.put_line(fnd_file.LOG,'Validate Supplier Trade Profile');

1092: fnd_file.put_line(fnd_file.log,(' Migration started at ' || to_char(sysdate,'dd-mon-yyyy hh24:mi:ss')));
1093: fnd_file.put_line(fnd_file.log,('-----------------------------------------------------------'));
1094:
1095: IF G_DEBUG THEN
1096: fnd_file.put_line(fnd_file.LOG,'Validate Supplier Trade Profile');
1097: END IF;
1098:
1099: validate_suppTradeProfile(
1100: p_api_version => l_api_version

Line 1110: fnd_file.put_line(fnd_file.log, ' Validate Supplier Trade Profile. Return Status: ' || l_return_status || ' Error Msg: ' || l_msg_data);

1106: , x_msg_data => l_msg_data
1107: ) ;
1108:
1109: IF G_DEBUG THEN
1110: fnd_file.put_line(fnd_file.log, ' Validate Supplier Trade Profile. Return Status: ' || l_return_status || ' Error Msg: ' || l_msg_data);
1111: END IF;
1112:
1113: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
1114: RAISE Fnd_Api.g_exc_error;

Line 1120: FND_FILE.PUT_LINE(FND_FILE.LOG,'Validate Execution Process Setup');

1116: RAISE Fnd_Api.g_exc_unexpected_error;
1117: END IF;
1118:
1119: IF G_DEBUG THEN
1120: FND_FILE.PUT_LINE(FND_FILE.LOG,'Validate Execution Process Setup');
1121: END IF;
1122:
1123: validate_execProcessSetup(
1124: p_api_version => l_api_version

Line 1134: fnd_file.put_line(fnd_file.log, ' Validate Execution Process Setup. Return Status: ' || l_return_status || ' Error Msg: ' || l_msg_data);

1130: , x_msg_data => l_msg_data
1131: ) ;
1132:
1133: IF G_DEBUG THEN
1134: fnd_file.put_line(fnd_file.log, ' Validate Execution Process Setup. Return Status: ' || l_return_status || ' Error Msg: ' || l_msg_data);
1135: END IF;
1136:
1137: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
1138: fnd_file.put_line(fnd_file.log, l_msg_data);

Line 1138: fnd_file.put_line(fnd_file.log, l_msg_data);

1134: fnd_file.put_line(fnd_file.log, ' Validate Execution Process Setup. Return Status: ' || l_return_status || ' Error Msg: ' || l_msg_data);
1135: END IF;
1136:
1137: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
1138: fnd_file.put_line(fnd_file.log, l_msg_data);
1139: errbuf := 'Error';
1140: retcode := 2;
1141: RETURN;
1142: ELSIF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

Line 1147: FND_FILE.PUT_LINE(FND_FILE.LOG,'Insert Execution Processes');

1143: RAISE Fnd_Api.g_exc_unexpected_error;
1144: END IF;
1145:
1146: IF G_DEBUG THEN
1147: FND_FILE.PUT_LINE(FND_FILE.LOG,'Insert Execution Processes');
1148: END IF;
1149:
1150: InsertExecutionProcesses(
1151: p_api_version => l_api_version

Line 1161: fnd_file.put_line(fnd_file.log, ' Insert Execution Processes. Return Status: ' || l_return_status || ' Error Msg: ' || l_msg_data);

1157: , x_msg_data => l_msg_data
1158: ) ;
1159:
1160: IF G_DEBUG THEN
1161: fnd_file.put_line(fnd_file.log, ' Insert Execution Processes. Return Status: ' || l_return_status || ' Error Msg: ' || l_msg_data);
1162: END IF;
1163:
1164: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
1165: RAISE Fnd_Api.g_exc_error;

Line 1171: FND_FILE.PUT_LINE(FND_FILE.LOG,'Clear all the approvals in both Price Protection and AME');

1167: RAISE Fnd_Api.g_exc_unexpected_error;
1168: END IF;
1169:
1170: IF G_DEBUG THEN
1171: FND_FILE.PUT_LINE(FND_FILE.LOG,'Clear all the approvals in both Price Protection and AME');
1172: END IF;
1173:
1174: clearAllApprovals(
1175: p_api_version => l_api_version

Line 1185: fnd_file.put_line(fnd_file.log, ' Clear All Approvals. Return Status: ' || l_return_status || ' Error Msg: ' || l_msg_data);

1181: , x_msg_data => l_msg_data
1182: ) ;
1183:
1184: IF G_DEBUG THEN
1185: fnd_file.put_line(fnd_file.log, ' Clear All Approvals. Return Status: ' || l_return_status || ' Error Msg: ' || l_msg_data);
1186: END IF;
1187:
1188: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
1189: RAISE Fnd_Api.g_exc_error;

Line 1195: FND_FILE.PUT_LINE(FND_FILE.LOG,'Update status');

1191: RAISE Fnd_Api.g_exc_unexpected_error;
1192: END IF;
1193:
1194: IF G_DEBUG THEN
1195: FND_FILE.PUT_LINE(FND_FILE.LOG,'Update status');
1196: END IF;
1197:
1198: update_status(
1199: p_api_version => l_api_version

Line 1209: fnd_file.put_line(fnd_file.log, ' Update status. Return Status: ' || l_return_status || ' Error Msg: ' || l_msg_data);

1205: , x_msg_data => l_msg_data
1206: ) ;
1207:
1208: IF G_DEBUG THEN
1209: fnd_file.put_line(fnd_file.log, ' Update status. Return Status: ' || l_return_status || ' Error Msg: ' || l_msg_data);
1210: END IF;
1211:
1212: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
1213: RAISE Fnd_Api.g_exc_error;

Line 1220: fnd_file.put_line(fnd_file.log,('-----------------------------------------------------------'));

1216: END IF;
1217:
1218: COMMIT;
1219:
1220: fnd_file.put_line(fnd_file.log,('-----------------------------------------------------------'));
1221: fnd_file.put_line(fnd_file.log,(' Migration completed at ' || to_char(sysdate,'dd-mon-yyyy hh24:mi:ss')));
1222: fnd_file.put_line(fnd_file.log,('-----------------------------------------------------------'));
1223:
1224: EXCEPTION

Line 1221: fnd_file.put_line(fnd_file.log,(' Migration completed at ' || to_char(sysdate,'dd-mon-yyyy hh24:mi:ss')));

1217:
1218: COMMIT;
1219:
1220: fnd_file.put_line(fnd_file.log,('-----------------------------------------------------------'));
1221: fnd_file.put_line(fnd_file.log,(' Migration completed at ' || to_char(sysdate,'dd-mon-yyyy hh24:mi:ss')));
1222: fnd_file.put_line(fnd_file.log,('-----------------------------------------------------------'));
1223:
1224: EXCEPTION
1225: WHEN FND_API.G_EXC_ERROR THEN

Line 1222: fnd_file.put_line(fnd_file.log,('-----------------------------------------------------------'));

1218: COMMIT;
1219:
1220: fnd_file.put_line(fnd_file.log,('-----------------------------------------------------------'));
1221: fnd_file.put_line(fnd_file.log,(' Migration completed at ' || to_char(sysdate,'dd-mon-yyyy hh24:mi:ss')));
1222: fnd_file.put_line(fnd_file.log,('-----------------------------------------------------------'));
1223:
1224: EXCEPTION
1225: WHEN FND_API.G_EXC_ERROR THEN
1226: ROLLBACK TO update_transaction_status;