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.OKL_SLA_ACC_SOURCES_PVT dependencies on FND_FILE

Line 7921: FND_FILE.PUT_LINE(p_destination, p_msg );

7917: p_destination IN NUMBER
7918: ,p_msg IN VARCHAR2)
7919: IS
7920: BEGIN
7921: FND_FILE.PUT_LINE(p_destination, p_msg );
7922: END;
7923:
7924: ------------------------------------------------------------------------------
7925: -- Start of comments

Line 8020: log_msg(FND_FILE.LOG, 'Parameters: ' );

8016: BEGIN
8017: -- Assign the input params to the Local Variables
8018: l_book_type_code := p_book_type_code;
8019: l_period_counter := TO_NUMBER(p_period_counter);
8020: log_msg(FND_FILE.LOG, 'Parameters: ' );
8021: log_msg(FND_FILE.LOG, ' Book Type Code = ' || l_book_type_code );
8022: log_msg(FND_FILE.LOG, ' Period Counter = ' || l_period_counter );
8023: log_msg(FND_FILE.LOG, ' Worker ID = ' || p_worker_id );
8024: log_msg(FND_FILE.LOG, ' Max. Deprn. ID = ' || p_max_deprn_run_id );

Line 8021: log_msg(FND_FILE.LOG, ' Book Type Code = ' || l_book_type_code );

8017: -- Assign the input params to the Local Variables
8018: l_book_type_code := p_book_type_code;
8019: l_period_counter := TO_NUMBER(p_period_counter);
8020: log_msg(FND_FILE.LOG, 'Parameters: ' );
8021: log_msg(FND_FILE.LOG, ' Book Type Code = ' || l_book_type_code );
8022: log_msg(FND_FILE.LOG, ' Period Counter = ' || l_period_counter );
8023: log_msg(FND_FILE.LOG, ' Worker ID = ' || p_worker_id );
8024: log_msg(FND_FILE.LOG, ' Max. Deprn. ID = ' || p_max_deprn_run_id );
8025: -- Find the Last Depreciation Run for which the Sources are captured

Line 8022: log_msg(FND_FILE.LOG, ' Period Counter = ' || l_period_counter );

8018: l_book_type_code := p_book_type_code;
8019: l_period_counter := TO_NUMBER(p_period_counter);
8020: log_msg(FND_FILE.LOG, 'Parameters: ' );
8021: log_msg(FND_FILE.LOG, ' Book Type Code = ' || l_book_type_code );
8022: log_msg(FND_FILE.LOG, ' Period Counter = ' || l_period_counter );
8023: log_msg(FND_FILE.LOG, ' Worker ID = ' || p_worker_id );
8024: log_msg(FND_FILE.LOG, ' Max. Deprn. ID = ' || p_max_deprn_run_id );
8025: -- Find the Last Depreciation Run for which the Sources are captured
8026: -- for the inputted Book Type Code and Period

Line 8023: log_msg(FND_FILE.LOG, ' Worker ID = ' || p_worker_id );

8019: l_period_counter := TO_NUMBER(p_period_counter);
8020: log_msg(FND_FILE.LOG, 'Parameters: ' );
8021: log_msg(FND_FILE.LOG, ' Book Type Code = ' || l_book_type_code );
8022: log_msg(FND_FILE.LOG, ' Period Counter = ' || l_period_counter );
8023: log_msg(FND_FILE.LOG, ' Worker ID = ' || p_worker_id );
8024: log_msg(FND_FILE.LOG, ' Max. Deprn. ID = ' || p_max_deprn_run_id );
8025: -- Find the Last Depreciation Run for which the Sources are captured
8026: -- for the inputted Book Type Code and Period
8027: l_max_deprn_run_id := TO_NUMBER( p_max_deprn_run_id );

Line 8024: log_msg(FND_FILE.LOG, ' Max. Deprn. ID = ' || p_max_deprn_run_id );

8020: log_msg(FND_FILE.LOG, 'Parameters: ' );
8021: log_msg(FND_FILE.LOG, ' Book Type Code = ' || l_book_type_code );
8022: log_msg(FND_FILE.LOG, ' Period Counter = ' || l_period_counter );
8023: log_msg(FND_FILE.LOG, ' Worker ID = ' || p_worker_id );
8024: log_msg(FND_FILE.LOG, ' Max. Deprn. ID = ' || p_max_deprn_run_id );
8025: -- Find the Last Depreciation Run for which the Sources are captured
8026: -- for the inputted Book Type Code and Period
8027: l_max_deprn_run_id := TO_NUMBER( p_max_deprn_run_id );
8028: -- Initialize the khr_index

Line 8032: log_msg(FND_FILE.LOG, 'Before Executing the Cursor get_okl_assets_csr' );

8028: -- Initialize the khr_index
8029: khr_index := 0;
8030: -- Fetch all the OKL Assets for which FA has generated Depreciation Transactions
8031: -- in the inputted Asset Book and Period
8032: log_msg(FND_FILE.LOG, 'Before Executing the Cursor get_okl_assets_csr' );
8033: OPEN get_okl_assets_csr(
8034: p_book_type_code => l_book_type_code
8035: ,p_period_counter => l_period_counter
8036: ,p_max_deprn_run_id => l_max_deprn_run_id

Line 8042: log_msg(FND_FILE.LOG, 'After Executing the Cursor get_okl_assets_csr' );

8038: );
8039: LOOP
8040: FETCH get_okl_assets_csr BULK COLLECT INTO l_fa_deprn_assets_tbl
8041: LIMIT 10000;
8042: log_msg(FND_FILE.LOG, 'After Executing the Cursor get_okl_assets_csr' );
8043: -- Exit when there are no Assets to be Processed
8044: EXIT WHEN get_okl_assets_csr%ROWCOUNT = 0;
8045: IF l_fa_deprn_assets_tbl.COUNT > 0
8046: THEN

Line 8047: log_msg(FND_FILE.LOG, 'Total Number of Assets to be Processed in this iteration=' || l_fa_deprn_assets_tbl.COUNT );

8043: -- Exit when there are no Assets to be Processed
8044: EXIT WHEN get_okl_assets_csr%ROWCOUNT = 0;
8045: IF l_fa_deprn_assets_tbl.COUNT > 0
8046: THEN
8047: log_msg(FND_FILE.LOG, 'Total Number of Assets to be Processed in this iteration=' || l_fa_deprn_assets_tbl.COUNT );
8048: l_curr_deprn_run_id := l_fa_deprn_assets_tbl(l_fa_deprn_assets_tbl.FIRST).deprn_run_id;
8049: l_khr_id := l_fa_deprn_assets_tbl(l_fa_deprn_assets_tbl.FIRST).khr_id;
8050: -- Increment the khr_index and store the contract number in the l_khr_id_tbl
8051: khr_index := khr_index + 1;

Line 8056: log_msg(FND_FILE.OUTPUT, '-------------------------------------------------------------------' );

8052: l_khr_id_tbl(khr_index) := l_khr_id; -- Store the Contract ID Already processed
8053: l_deprn_asset_tbl.DELETE;
8054: -- Initialize the ast_index
8055: ast_index := 1;
8056: log_msg(FND_FILE.OUTPUT, '-------------------------------------------------------------------' );
8057: log_msg(FND_FILE.OUTPUT, 'Capturing Sources for Deprn Run ID: ' || l_curr_deprn_run_id );
8058: log_msg(FND_FILE.OUTPUT, '-------------------------------------------------------------------' );
8059: log_msg(FND_FILE.OUTPUT, ' Capture Sources for ' );
8060: log_msg(FND_FILE.OUTPUT, ' KHR_ID=' || l_khr_id );

Line 8057: log_msg(FND_FILE.OUTPUT, 'Capturing Sources for Deprn Run ID: ' || l_curr_deprn_run_id );

8053: l_deprn_asset_tbl.DELETE;
8054: -- Initialize the ast_index
8055: ast_index := 1;
8056: log_msg(FND_FILE.OUTPUT, '-------------------------------------------------------------------' );
8057: log_msg(FND_FILE.OUTPUT, 'Capturing Sources for Deprn Run ID: ' || l_curr_deprn_run_id );
8058: log_msg(FND_FILE.OUTPUT, '-------------------------------------------------------------------' );
8059: log_msg(FND_FILE.OUTPUT, ' Capture Sources for ' );
8060: log_msg(FND_FILE.OUTPUT, ' KHR_ID=' || l_khr_id );
8061: FOR i IN l_fa_deprn_assets_tbl.FIRST .. l_fa_deprn_assets_tbl.LAST

Line 8058: log_msg(FND_FILE.OUTPUT, '-------------------------------------------------------------------' );

8054: -- Initialize the ast_index
8055: ast_index := 1;
8056: log_msg(FND_FILE.OUTPUT, '-------------------------------------------------------------------' );
8057: log_msg(FND_FILE.OUTPUT, 'Capturing Sources for Deprn Run ID: ' || l_curr_deprn_run_id );
8058: log_msg(FND_FILE.OUTPUT, '-------------------------------------------------------------------' );
8059: log_msg(FND_FILE.OUTPUT, ' Capture Sources for ' );
8060: log_msg(FND_FILE.OUTPUT, ' KHR_ID=' || l_khr_id );
8061: FOR i IN l_fa_deprn_assets_tbl.FIRST .. l_fa_deprn_assets_tbl.LAST
8062: LOOP

Line 8059: log_msg(FND_FILE.OUTPUT, ' Capture Sources for ' );

8055: ast_index := 1;
8056: log_msg(FND_FILE.OUTPUT, '-------------------------------------------------------------------' );
8057: log_msg(FND_FILE.OUTPUT, 'Capturing Sources for Deprn Run ID: ' || l_curr_deprn_run_id );
8058: log_msg(FND_FILE.OUTPUT, '-------------------------------------------------------------------' );
8059: log_msg(FND_FILE.OUTPUT, ' Capture Sources for ' );
8060: log_msg(FND_FILE.OUTPUT, ' KHR_ID=' || l_khr_id );
8061: FOR i IN l_fa_deprn_assets_tbl.FIRST .. l_fa_deprn_assets_tbl.LAST
8062: LOOP
8063: -- Logic:

Line 8060: log_msg(FND_FILE.OUTPUT, ' KHR_ID=' || l_khr_id );

8056: log_msg(FND_FILE.OUTPUT, '-------------------------------------------------------------------' );
8057: log_msg(FND_FILE.OUTPUT, 'Capturing Sources for Deprn Run ID: ' || l_curr_deprn_run_id );
8058: log_msg(FND_FILE.OUTPUT, '-------------------------------------------------------------------' );
8059: log_msg(FND_FILE.OUTPUT, ' Capture Sources for ' );
8060: log_msg(FND_FILE.OUTPUT, ' KHR_ID=' || l_khr_id );
8061: FOR i IN l_fa_deprn_assets_tbl.FIRST .. l_fa_deprn_assets_tbl.LAST
8062: LOOP
8063: -- Logic:
8064: -- Loop on the OKL Assets Table [Ordered by KHR_ID]

Line 8073: log_msg(FND_FILE.OUTPUT, ' KLE_ID=' || l_fa_deprn_assets_tbl(i).kle_id ||

8069: THEN
8070: -- Keep Storing the KLE_ID and ASSET_ID in the l_deprn_asset_tbl
8071: l_deprn_asset_tbl(ast_index).kle_id := l_fa_deprn_assets_tbl(i).kle_id;
8072: l_deprn_asset_tbl(ast_index).asset_id := l_fa_deprn_assets_tbl(i).asset_id;
8073: log_msg(FND_FILE.OUTPUT, ' KLE_ID=' || l_fa_deprn_assets_tbl(i).kle_id ||
8074: ' ASSET_ID=' || l_fa_deprn_assets_tbl(i).asset_id );
8075: -- Increment the Index
8076: ast_index := ast_index + 1;
8077: ELSE

Line 8079: log_msg(FND_FILE.LOG, 'Before Calling Populate Sources - Contract/Deprn Run Break' );

8075: -- Increment the Index
8076: ast_index := ast_index + 1;
8077: ELSE
8078: -- Call the Populate Sources
8079: log_msg(FND_FILE.LOG, 'Before Calling Populate Sources - Contract/Deprn Run Break' );
8080: log_msg(FND_FILE.LOG, ' khr_id=' || l_khr_id );
8081: log_msg(FND_FILE.LOG, ' Asset Count=' || l_deprn_asset_tbl.COUNT );
8082: log_msg(FND_FILE.LOG, ' Book Type=' || l_book_type_code );
8083: log_msg(FND_FILE.LOG, ' Period Counter=' || l_period_counter );

Line 8080: log_msg(FND_FILE.LOG, ' khr_id=' || l_khr_id );

8076: ast_index := ast_index + 1;
8077: ELSE
8078: -- Call the Populate Sources
8079: log_msg(FND_FILE.LOG, 'Before Calling Populate Sources - Contract/Deprn Run Break' );
8080: log_msg(FND_FILE.LOG, ' khr_id=' || l_khr_id );
8081: log_msg(FND_FILE.LOG, ' Asset Count=' || l_deprn_asset_tbl.COUNT );
8082: log_msg(FND_FILE.LOG, ' Book Type=' || l_book_type_code );
8083: log_msg(FND_FILE.LOG, ' Period Counter=' || l_period_counter );
8084: populate_sources(

Line 8081: log_msg(FND_FILE.LOG, ' Asset Count=' || l_deprn_asset_tbl.COUNT );

8077: ELSE
8078: -- Call the Populate Sources
8079: log_msg(FND_FILE.LOG, 'Before Calling Populate Sources - Contract/Deprn Run Break' );
8080: log_msg(FND_FILE.LOG, ' khr_id=' || l_khr_id );
8081: log_msg(FND_FILE.LOG, ' Asset Count=' || l_deprn_asset_tbl.COUNT );
8082: log_msg(FND_FILE.LOG, ' Book Type=' || l_book_type_code );
8083: log_msg(FND_FILE.LOG, ' Period Counter=' || l_period_counter );
8084: populate_sources(
8085: p_api_version => l_api_version

Line 8082: log_msg(FND_FILE.LOG, ' Book Type=' || l_book_type_code );

8078: -- Call the Populate Sources
8079: log_msg(FND_FILE.LOG, 'Before Calling Populate Sources - Contract/Deprn Run Break' );
8080: log_msg(FND_FILE.LOG, ' khr_id=' || l_khr_id );
8081: log_msg(FND_FILE.LOG, ' Asset Count=' || l_deprn_asset_tbl.COUNT );
8082: log_msg(FND_FILE.LOG, ' Book Type=' || l_book_type_code );
8083: log_msg(FND_FILE.LOG, ' Period Counter=' || l_period_counter );
8084: populate_sources(
8085: p_api_version => l_api_version
8086: ,p_init_msg_list => l_init_msg_list

Line 8083: log_msg(FND_FILE.LOG, ' Period Counter=' || l_period_counter );

8079: log_msg(FND_FILE.LOG, 'Before Calling Populate Sources - Contract/Deprn Run Break' );
8080: log_msg(FND_FILE.LOG, ' khr_id=' || l_khr_id );
8081: log_msg(FND_FILE.LOG, ' Asset Count=' || l_deprn_asset_tbl.COUNT );
8082: log_msg(FND_FILE.LOG, ' Book Type=' || l_book_type_code );
8083: log_msg(FND_FILE.LOG, ' Period Counter=' || l_period_counter );
8084: populate_sources(
8085: p_api_version => l_api_version
8086: ,p_init_msg_list => l_init_msg_list
8087: ,p_khr_id => l_khr_id

Line 8096: log_msg(FND_FILE.LOG, ' After Calling the Populate Sources return_status=' || l_return_status );

8092: ,x_return_status => l_return_status
8093: ,x_msg_count => l_msg_count
8094: ,x_msg_data => l_msg_data
8095: );
8096: log_msg(FND_FILE.LOG, ' After Calling the Populate Sources return_status=' || l_return_status );
8097: IF l_return_status = OKL_API.G_RET_STS_ERROR
8098: THEN
8099: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
8100: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

Line 8103: log_msg(FND_FILE.OUTPUT, '---------------------------------------------------------' );

8099: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
8100: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
8101: RAISE OKL_API.G_EXCEPTION_ERROR;
8102: END IF;
8103: log_msg(FND_FILE.OUTPUT, '---------------------------------------------------------' );
8104: -- Reset the Khr_id to the current KHR_ID
8105: l_khr_id := l_fa_deprn_assets_tbl(i).khr_id;
8106: -- Increment the khr_index and store the contract number in the l_khr_id_tbl
8107: khr_index := khr_index + 1;

Line 8114: log_msg(FND_FILE.OUTPUT, '-------------------------------------------------------------------' );

8110: THEN
8111: -- Break Happened on the Deprn Run ID itself .. Hence,
8112: -- Reset the Depreciation Run ID
8113: l_curr_deprn_run_id := l_fa_deprn_assets_tbl(i).deprn_run_id;
8114: log_msg(FND_FILE.OUTPUT, '-------------------------------------------------------------------' );
8115: log_msg(FND_FILE.OUTPUT, 'Capturing Sources for Deprn Run ID: ' || l_curr_deprn_run_id );
8116: log_msg(FND_FILE.OUTPUT, '-------------------------------------------------------------------' );
8117: END IF; -- Break on the Deprn Run ID
8118: -- Delete the l_deprn_asset_tbl

Line 8115: log_msg(FND_FILE.OUTPUT, 'Capturing Sources for Deprn Run ID: ' || l_curr_deprn_run_id );

8111: -- Break Happened on the Deprn Run ID itself .. Hence,
8112: -- Reset the Depreciation Run ID
8113: l_curr_deprn_run_id := l_fa_deprn_assets_tbl(i).deprn_run_id;
8114: log_msg(FND_FILE.OUTPUT, '-------------------------------------------------------------------' );
8115: log_msg(FND_FILE.OUTPUT, 'Capturing Sources for Deprn Run ID: ' || l_curr_deprn_run_id );
8116: log_msg(FND_FILE.OUTPUT, '-------------------------------------------------------------------' );
8117: END IF; -- Break on the Deprn Run ID
8118: -- Delete the l_deprn_asset_tbl
8119: l_deprn_asset_tbl.DELETE;

Line 8116: log_msg(FND_FILE.OUTPUT, '-------------------------------------------------------------------' );

8112: -- Reset the Depreciation Run ID
8113: l_curr_deprn_run_id := l_fa_deprn_assets_tbl(i).deprn_run_id;
8114: log_msg(FND_FILE.OUTPUT, '-------------------------------------------------------------------' );
8115: log_msg(FND_FILE.OUTPUT, 'Capturing Sources for Deprn Run ID: ' || l_curr_deprn_run_id );
8116: log_msg(FND_FILE.OUTPUT, '-------------------------------------------------------------------' );
8117: END IF; -- Break on the Deprn Run ID
8118: -- Delete the l_deprn_asset_tbl
8119: l_deprn_asset_tbl.DELETE;
8120: -- Initialize teh ast_index

Line 8125: log_msg(FND_FILE.OUTPUT, 'Capture Sources for ' );

8121: ast_index := 1;
8122: -- Store the kle_id and asset_id in the current index of the l_deprn_asset_tbl
8123: l_deprn_asset_tbl(ast_index).kle_id := l_fa_deprn_assets_tbl(i).kle_id;
8124: l_deprn_asset_tbl(ast_index).asset_id := l_fa_deprn_assets_tbl(i).asset_id;
8125: log_msg(FND_FILE.OUTPUT, 'Capture Sources for ' );
8126: log_msg(FND_FILE.OUTPUT, ' KHR_ID=' || l_khr_id );
8127: log_msg(FND_FILE.OUTPUT, ' KLE_ID=' || l_fa_deprn_assets_tbl(i).kle_id ||
8128: ' ASSET_ID=' || l_fa_deprn_assets_tbl(i).asset_id );
8129: -- Increment the Index

Line 8126: log_msg(FND_FILE.OUTPUT, ' KHR_ID=' || l_khr_id );

8122: -- Store the kle_id and asset_id in the current index of the l_deprn_asset_tbl
8123: l_deprn_asset_tbl(ast_index).kle_id := l_fa_deprn_assets_tbl(i).kle_id;
8124: l_deprn_asset_tbl(ast_index).asset_id := l_fa_deprn_assets_tbl(i).asset_id;
8125: log_msg(FND_FILE.OUTPUT, 'Capture Sources for ' );
8126: log_msg(FND_FILE.OUTPUT, ' KHR_ID=' || l_khr_id );
8127: log_msg(FND_FILE.OUTPUT, ' KLE_ID=' || l_fa_deprn_assets_tbl(i).kle_id ||
8128: ' ASSET_ID=' || l_fa_deprn_assets_tbl(i).asset_id );
8129: -- Increment the Index
8130: ast_index := ast_index + 1;

Line 8127: log_msg(FND_FILE.OUTPUT, ' KLE_ID=' || l_fa_deprn_assets_tbl(i).kle_id ||

8123: l_deprn_asset_tbl(ast_index).kle_id := l_fa_deprn_assets_tbl(i).kle_id;
8124: l_deprn_asset_tbl(ast_index).asset_id := l_fa_deprn_assets_tbl(i).asset_id;
8125: log_msg(FND_FILE.OUTPUT, 'Capture Sources for ' );
8126: log_msg(FND_FILE.OUTPUT, ' KHR_ID=' || l_khr_id );
8127: log_msg(FND_FILE.OUTPUT, ' KLE_ID=' || l_fa_deprn_assets_tbl(i).kle_id ||
8128: ' ASSET_ID=' || l_fa_deprn_assets_tbl(i).asset_id );
8129: -- Increment the Index
8130: ast_index := ast_index + 1;
8131: END IF;

Line 8134: log_msg(FND_FILE.OUTPUT, '---------------------------------------------------------' );

8130: ast_index := ast_index + 1;
8131: END IF;
8132: END LOOP; -- FOR i IN l_deprn_assets_tbl.FIRST .. l_deprn_assets_tbl.LAST
8133: -- Call the Populate Sources at the End too for the lastly Populated Records
8134: log_msg(FND_FILE.OUTPUT, '---------------------------------------------------------' );
8135: -- Call the Populate Sources
8136: log_msg(FND_FILE.LOG, 'Before Calling Populate Sources - At the End of the Loop' );
8137: log_msg(FND_FILE.LOG, ' khr_id=' || l_khr_id );
8138: log_msg(FND_FILE.LOG, ' Asset Count=' || l_deprn_asset_tbl.COUNT );

Line 8136: log_msg(FND_FILE.LOG, 'Before Calling Populate Sources - At the End of the Loop' );

8132: END LOOP; -- FOR i IN l_deprn_assets_tbl.FIRST .. l_deprn_assets_tbl.LAST
8133: -- Call the Populate Sources at the End too for the lastly Populated Records
8134: log_msg(FND_FILE.OUTPUT, '---------------------------------------------------------' );
8135: -- Call the Populate Sources
8136: log_msg(FND_FILE.LOG, 'Before Calling Populate Sources - At the End of the Loop' );
8137: log_msg(FND_FILE.LOG, ' khr_id=' || l_khr_id );
8138: log_msg(FND_FILE.LOG, ' Asset Count=' || l_deprn_asset_tbl.COUNT );
8139: log_msg(FND_FILE.LOG, ' Book Type=' || l_book_type_code );
8140: log_msg(FND_FILE.LOG, ' Period Counter=' || l_period_counter );

Line 8137: log_msg(FND_FILE.LOG, ' khr_id=' || l_khr_id );

8133: -- Call the Populate Sources at the End too for the lastly Populated Records
8134: log_msg(FND_FILE.OUTPUT, '---------------------------------------------------------' );
8135: -- Call the Populate Sources
8136: log_msg(FND_FILE.LOG, 'Before Calling Populate Sources - At the End of the Loop' );
8137: log_msg(FND_FILE.LOG, ' khr_id=' || l_khr_id );
8138: log_msg(FND_FILE.LOG, ' Asset Count=' || l_deprn_asset_tbl.COUNT );
8139: log_msg(FND_FILE.LOG, ' Book Type=' || l_book_type_code );
8140: log_msg(FND_FILE.LOG, ' Period Counter=' || l_period_counter );
8141: populate_sources(

Line 8138: log_msg(FND_FILE.LOG, ' Asset Count=' || l_deprn_asset_tbl.COUNT );

8134: log_msg(FND_FILE.OUTPUT, '---------------------------------------------------------' );
8135: -- Call the Populate Sources
8136: log_msg(FND_FILE.LOG, 'Before Calling Populate Sources - At the End of the Loop' );
8137: log_msg(FND_FILE.LOG, ' khr_id=' || l_khr_id );
8138: log_msg(FND_FILE.LOG, ' Asset Count=' || l_deprn_asset_tbl.COUNT );
8139: log_msg(FND_FILE.LOG, ' Book Type=' || l_book_type_code );
8140: log_msg(FND_FILE.LOG, ' Period Counter=' || l_period_counter );
8141: populate_sources(
8142: p_api_version => l_api_version

Line 8139: log_msg(FND_FILE.LOG, ' Book Type=' || l_book_type_code );

8135: -- Call the Populate Sources
8136: log_msg(FND_FILE.LOG, 'Before Calling Populate Sources - At the End of the Loop' );
8137: log_msg(FND_FILE.LOG, ' khr_id=' || l_khr_id );
8138: log_msg(FND_FILE.LOG, ' Asset Count=' || l_deprn_asset_tbl.COUNT );
8139: log_msg(FND_FILE.LOG, ' Book Type=' || l_book_type_code );
8140: log_msg(FND_FILE.LOG, ' Period Counter=' || l_period_counter );
8141: populate_sources(
8142: p_api_version => l_api_version
8143: ,p_init_msg_list => l_init_msg_list

Line 8140: log_msg(FND_FILE.LOG, ' Period Counter=' || l_period_counter );

8136: log_msg(FND_FILE.LOG, 'Before Calling Populate Sources - At the End of the Loop' );
8137: log_msg(FND_FILE.LOG, ' khr_id=' || l_khr_id );
8138: log_msg(FND_FILE.LOG, ' Asset Count=' || l_deprn_asset_tbl.COUNT );
8139: log_msg(FND_FILE.LOG, ' Book Type=' || l_book_type_code );
8140: log_msg(FND_FILE.LOG, ' Period Counter=' || l_period_counter );
8141: populate_sources(
8142: p_api_version => l_api_version
8143: ,p_init_msg_list => l_init_msg_list
8144: ,p_khr_id => l_khr_id

Line 8153: log_msg(FND_FILE.LOG, ' After Calling the Populate Sources return_status=' || l_return_status );

8149: ,x_return_status => l_return_status
8150: ,x_msg_count => l_msg_count
8151: ,x_msg_data => l_msg_data
8152: );
8153: log_msg(FND_FILE.LOG, ' After Calling the Populate Sources return_status=' || l_return_status );
8154: IF l_return_status = OKL_API.G_RET_STS_ERROR
8155: THEN
8156: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
8157: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

Line 8179: log_msg(FND_FILE.OUTPUT,'');

8175: WHEN Okl_Api.G_EXCEPTION_ERROR
8176: THEN
8177: l_return_status := Okl_Api.G_RET_STS_ERROR;
8178: -- print the error message in the log file and output files
8179: log_msg(FND_FILE.OUTPUT,'');
8180: log_msg(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_PROGRAM_ERROR'));
8181: log_msg(FND_FILE.LOG,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_PROGRAM_STATUS')
8182: ||' '||l_return_status);
8183: Okl_Accounting_Util.GET_ERROR_MESSAGE(l_outer_error_msg_tbl);

Line 8180: log_msg(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_PROGRAM_ERROR'));

8176: THEN
8177: l_return_status := Okl_Api.G_RET_STS_ERROR;
8178: -- print the error message in the log file and output files
8179: log_msg(FND_FILE.OUTPUT,'');
8180: log_msg(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_PROGRAM_ERROR'));
8181: log_msg(FND_FILE.LOG,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_PROGRAM_STATUS')
8182: ||' '||l_return_status);
8183: Okl_Accounting_Util.GET_ERROR_MESSAGE(l_outer_error_msg_tbl);
8184: IF (l_outer_error_msg_tbl.COUNT > 0) THEN

Line 8181: log_msg(FND_FILE.LOG,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_PROGRAM_STATUS')

8177: l_return_status := Okl_Api.G_RET_STS_ERROR;
8178: -- print the error message in the log file and output files
8179: log_msg(FND_FILE.OUTPUT,'');
8180: log_msg(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_PROGRAM_ERROR'));
8181: log_msg(FND_FILE.LOG,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_PROGRAM_STATUS')
8182: ||' '||l_return_status);
8183: Okl_Accounting_Util.GET_ERROR_MESSAGE(l_outer_error_msg_tbl);
8184: IF (l_outer_error_msg_tbl.COUNT > 0) THEN
8185: FOR i IN l_outer_error_msg_tbl.FIRST..l_outer_error_msg_tbl.LAST

Line 8187: log_msg(FND_FILE.LOG, l_outer_error_msg_tbl(i));

8183: Okl_Accounting_Util.GET_ERROR_MESSAGE(l_outer_error_msg_tbl);
8184: IF (l_outer_error_msg_tbl.COUNT > 0) THEN
8185: FOR i IN l_outer_error_msg_tbl.FIRST..l_outer_error_msg_tbl.LAST
8186: LOOP
8187: log_msg(FND_FILE.LOG, l_outer_error_msg_tbl(i));
8188: END LOOP;
8189: END IF;
8190: retcode := 2;
8191:

Line 8196: log_msg(FND_FILE.OUTPUT,'');

8192: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR
8193: THEN
8194: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
8195: -- print the error message in the log file
8196: log_msg(FND_FILE.OUTPUT,'');
8197: log_msg(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_PROGRAM_ERROR'));
8198: log_msg(FND_FILE.LOG,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_PROGRAM_STATUS')
8199: ||' '||l_return_status);
8200: Okl_Accounting_Util.GET_ERROR_MESSAGE(l_outer_error_msg_tbl);

Line 8197: log_msg(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_PROGRAM_ERROR'));

8193: THEN
8194: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
8195: -- print the error message in the log file
8196: log_msg(FND_FILE.OUTPUT,'');
8197: log_msg(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_PROGRAM_ERROR'));
8198: log_msg(FND_FILE.LOG,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_PROGRAM_STATUS')
8199: ||' '||l_return_status);
8200: Okl_Accounting_Util.GET_ERROR_MESSAGE(l_outer_error_msg_tbl);
8201: IF (l_outer_error_msg_tbl.COUNT > 0)

Line 8198: log_msg(FND_FILE.LOG,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_PROGRAM_STATUS')

8194: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
8195: -- print the error message in the log file
8196: log_msg(FND_FILE.OUTPUT,'');
8197: log_msg(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_PROGRAM_ERROR'));
8198: log_msg(FND_FILE.LOG,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_PROGRAM_STATUS')
8199: ||' '||l_return_status);
8200: Okl_Accounting_Util.GET_ERROR_MESSAGE(l_outer_error_msg_tbl);
8201: IF (l_outer_error_msg_tbl.COUNT > 0)
8202: THEN

Line 8205: log_msg(FND_FILE.LOG, l_outer_error_msg_tbl(i));

8201: IF (l_outer_error_msg_tbl.COUNT > 0)
8202: THEN
8203: FOR i IN l_outer_error_msg_tbl.FIRST..l_outer_error_msg_tbl.LAST
8204: LOOP
8205: log_msg(FND_FILE.LOG, l_outer_error_msg_tbl(i));
8206: END LOOP;
8207: END IF;
8208: retcode := 2;
8209:

Line 8214: log_msg(FND_FILE.OUTPUT,'');

8210: WHEN OTHERS
8211: THEN
8212: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
8213: -- print the error message in the log file
8214: log_msg(FND_FILE.OUTPUT,'');
8215: log_msg(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_PROGRAM_ERROR'));
8216: log_msg(FND_FILE.LOG,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_PROGRAM_STATUS')
8217: ||' '||l_return_status);
8218: Okl_Accounting_Util.GET_ERROR_MESSAGE(l_outer_error_msg_tbl);

Line 8215: log_msg(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_PROGRAM_ERROR'));

8211: THEN
8212: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
8213: -- print the error message in the log file
8214: log_msg(FND_FILE.OUTPUT,'');
8215: log_msg(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_PROGRAM_ERROR'));
8216: log_msg(FND_FILE.LOG,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_PROGRAM_STATUS')
8217: ||' '||l_return_status);
8218: Okl_Accounting_Util.GET_ERROR_MESSAGE(l_outer_error_msg_tbl);
8219: IF (l_outer_error_msg_tbl.COUNT > 0)

Line 8216: log_msg(FND_FILE.LOG,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_PROGRAM_STATUS')

8212: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
8213: -- print the error message in the log file
8214: log_msg(FND_FILE.OUTPUT,'');
8215: log_msg(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_PROGRAM_ERROR'));
8216: log_msg(FND_FILE.LOG,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_PROGRAM_STATUS')
8217: ||' '||l_return_status);
8218: Okl_Accounting_Util.GET_ERROR_MESSAGE(l_outer_error_msg_tbl);
8219: IF (l_outer_error_msg_tbl.COUNT > 0)
8220: THEN

Line 8223: log_msg(FND_FILE.LOG, l_outer_error_msg_tbl(i));

8219: IF (l_outer_error_msg_tbl.COUNT > 0)
8220: THEN
8221: FOR i IN l_outer_error_msg_tbl.FIRST..l_outer_error_msg_tbl.LAST
8222: LOOP
8223: log_msg(FND_FILE.LOG, l_outer_error_msg_tbl(i));
8224: END LOOP;
8225: END IF;
8226: errbuf := SQLERRM;
8227: retcode := 2;

Line 8321: log_msg(FND_FILE.LOG, 'Request Data= ' || req_data );

8317: l_lightest_load NUMBER;
8318: l_reqid FND_CONCURRENT_REQUESTS.request_id%TYPE;
8319: BEGIN
8320: req_data := fnd_conc_global.request_data;
8321: log_msg(FND_FILE.LOG, 'Request Data= ' || req_data );
8322: IF req_data IS NOT NULL
8323: THEN
8324: errbuf:='Done';
8325: retcode := 0;

Line 8326: log_msg(FND_FILE.LOG, 'Returning Out Successfully !' );

8322: IF req_data IS NOT NULL
8323: THEN
8324: errbuf:='Done';
8325: retcode := 0;
8326: log_msg(FND_FILE.LOG, 'Returning Out Successfully !' );
8327: RETURN;
8328: ELSE
8329: -- When the req_data is NULL, it means that this is the first run of the Program ..
8330: -- in the Sense, the current request is the run before triggerring off any parallel workers

Line 8333: log_msg(FND_FILE.LOG, 'Number of Workers ' || TO_CHAR(l_num_workers) );

8329: -- When the req_data is NULL, it means that this is the first run of the Program ..
8330: -- in the Sense, the current request is the run before triggerring off any parallel workers
8331: -- Fetch the Number of Workers to be Assigned
8332: l_num_workers := FND_PROFILE.VALUE(G_OKL_DEPRN_WORKERS);
8333: log_msg(FND_FILE.LOG, 'Number of Workers ' || TO_CHAR(l_num_workers) );
8334: IF l_num_workers IS NULL OR l_num_workers <= 0
8335: THEN
8336: OKL_API.set_message(
8337: p_app_name => G_APP_NAME

Line 8339: log_msg(FND_FILE.LOG, 'Please specify positive value for the profile option OKL: Capture Sources for Asset Depreciation Concurrent Workers');

8335: THEN
8336: OKL_API.set_message(
8337: p_app_name => G_APP_NAME
8338: ,p_msg_name => G_OKL_DEPRN_WORKER_ERROR);
8339: log_msg(FND_FILE.LOG, 'Please specify positive value for the profile option OKL: Capture Sources for Asset Depreciation Concurrent Workers');
8340: RAISE OKL_API.G_EXCEPTION_ERROR;
8341: END IF;
8342: -- Select sequence for marking processes
8343: SELECT okl_opp_seq.NEXTVAL

Line 8350: log_msg(FND_FILE.LOG, 'Parameters: ' );

8346: -- Assign the input params to the Local Variables
8347: l_book_type_code := p_book_type_code;
8348: l_period_counter := p_period_counter;
8349: -- Log the Input Variables
8350: log_msg(FND_FILE.LOG, 'Parameters: ' );
8351: log_msg(FND_FILE.LOG, ' Book Type Code =' || l_book_type_code );
8352: log_msg(FND_FILE.LOG, ' Period Counter =' || l_period_counter );
8353: -- Find the Last Depreciation Run for which the Sources are captured
8354: -- for the inputted Book Type Code and Period

Line 8351: log_msg(FND_FILE.LOG, ' Book Type Code =' || l_book_type_code );

8347: l_book_type_code := p_book_type_code;
8348: l_period_counter := p_period_counter;
8349: -- Log the Input Variables
8350: log_msg(FND_FILE.LOG, 'Parameters: ' );
8351: log_msg(FND_FILE.LOG, ' Book Type Code =' || l_book_type_code );
8352: log_msg(FND_FILE.LOG, ' Period Counter =' || l_period_counter );
8353: -- Find the Last Depreciation Run for which the Sources are captured
8354: -- for the inputted Book Type Code and Period
8355: log_msg(FND_FILE.LOG, 'Before Executing the Cursor get_max_deprn_run_id' );

Line 8352: log_msg(FND_FILE.LOG, ' Period Counter =' || l_period_counter );

8348: l_period_counter := p_period_counter;
8349: -- Log the Input Variables
8350: log_msg(FND_FILE.LOG, 'Parameters: ' );
8351: log_msg(FND_FILE.LOG, ' Book Type Code =' || l_book_type_code );
8352: log_msg(FND_FILE.LOG, ' Period Counter =' || l_period_counter );
8353: -- Find the Last Depreciation Run for which the Sources are captured
8354: -- for the inputted Book Type Code and Period
8355: log_msg(FND_FILE.LOG, 'Before Executing the Cursor get_max_deprn_run_id' );
8356: l_max_deprn_run_id := NULL;

Line 8355: log_msg(FND_FILE.LOG, 'Before Executing the Cursor get_max_deprn_run_id' );

8351: log_msg(FND_FILE.LOG, ' Book Type Code =' || l_book_type_code );
8352: log_msg(FND_FILE.LOG, ' Period Counter =' || l_period_counter );
8353: -- Find the Last Depreciation Run for which the Sources are captured
8354: -- for the inputted Book Type Code and Period
8355: log_msg(FND_FILE.LOG, 'Before Executing the Cursor get_max_deprn_run_id' );
8356: l_max_deprn_run_id := NULL;
8357: FOR t_rec IN get_max_deprn_run_id(
8358: p_asset_book_type_code => l_book_type_code
8359: ,p_period_counter => l_period_counter

Line 8365: log_msg(FND_FILE.LOG, 'After Executing the Cursor get_max_deprn_run_id. Max Deprn Run ID= ' || l_max_deprn_run_id );

8361: LOOP
8362: -- Store the Max. Deprn Run ID in the l_max_deprn_run_id
8363: l_max_deprn_run_id := t_rec.max_deprn_run_id;
8364: END LOOP; -- FOR t_rec IN get_max_deprn_run_id(
8365: log_msg(FND_FILE.LOG, 'After Executing the Cursor get_max_deprn_run_id. Max Deprn Run ID= ' || l_max_deprn_run_id );
8366: -- Initialize the dep_index first
8367: dep_index := 1;
8368: -- Fetch all the OKL Assets for which FA has generated Depreciation Transactions
8369: -- in the inputted Asset Book and Period

Line 8370: log_msg(FND_FILE.LOG, 'Before Executing the Cursor get_deprn_contracts_csr' );

8366: -- Initialize the dep_index first
8367: dep_index := 1;
8368: -- Fetch all the OKL Assets for which FA has generated Depreciation Transactions
8369: -- in the inputted Asset Book and Period
8370: log_msg(FND_FILE.LOG, 'Before Executing the Cursor get_deprn_contracts_csr' );
8371: OPEN get_deprn_contracts_csr(
8372: p_book_type_code => l_book_type_code
8373: ,p_period_counter => l_period_counter
8374: ,p_max_deprn_run_id => l_max_deprn_run_id

Line 8381: log_msg(FND_FILE.LOG, 'After Executing the fetch on the Cursor get_okl_assets_csr' );

8377: -- Bulk Collect the Contracts which has Assets depreciated in the inputted
8378: -- Book Type and Period
8379: FETCH get_deprn_contracts_csr BULK COLLECT INTO l_temp_deprn_contracts_tbl
8380: LIMIT G_LIMIT_SIZE;
8381: log_msg(FND_FILE.LOG, 'After Executing the fetch on the Cursor get_okl_assets_csr' );
8382: log_msg(FND_FILE.LOG, 'Distinct Contracts fetched in this Loop ' || l_temp_deprn_contracts_tbl.COUNT );
8383: -- Exit without setting the l_data_found to TRUE as no records found here
8384: EXIT WHEN get_deprn_contracts_csr%ROWCOUNT = 0;
8385: -- Assign the flag to indicate that there are few records found

Line 8382: log_msg(FND_FILE.LOG, 'Distinct Contracts fetched in this Loop ' || l_temp_deprn_contracts_tbl.COUNT );

8378: -- Book Type and Period
8379: FETCH get_deprn_contracts_csr BULK COLLECT INTO l_temp_deprn_contracts_tbl
8380: LIMIT G_LIMIT_SIZE;
8381: log_msg(FND_FILE.LOG, 'After Executing the fetch on the Cursor get_okl_assets_csr' );
8382: log_msg(FND_FILE.LOG, 'Distinct Contracts fetched in this Loop ' || l_temp_deprn_contracts_tbl.COUNT );
8383: -- Exit without setting the l_data_found to TRUE as no records found here
8384: EXIT WHEN get_deprn_contracts_csr%ROWCOUNT = 0;
8385: -- Assign the flag to indicate that there are few records found
8386: l_data_found := TRUE;

Line 8404: log_msg(FND_FILE.LOG, 'Total Number of records fetched=' || l_deprn_contracts_tbl.COUNT );

8400: CLOSE get_deprn_contracts_csr; -- Close the Cursor
8401:
8402: IF l_data_found = TRUE
8403: THEN
8404: log_msg(FND_FILE.LOG, 'Total Number of records fetched=' || l_deprn_contracts_tbl.COUNT );
8405: -- Assign the data from the l_deprn_contracts_tbl to l_pp_deprn_khrs_tbl
8406: FOR dep_index IN l_deprn_contracts_tbl.FIRST .. l_deprn_contracts_tbl.LAST
8407: LOOP
8408: l_object_value_tbl(dep_index) := l_deprn_contracts_tbl(dep_index).contract_number;

Line 8413: log_msg(FND_FILE.LOG, 'Successfully Populated the Individual Collection Tables object_value, khr_id, volume tables');

8409: l_khr_id_tbl(dep_index) := l_deprn_contracts_tbl(dep_index).khr_id;
8410: l_volume_tbl(dep_index) := l_deprn_contracts_tbl(dep_index).no_of_assets;
8411: l_assigned_process_tbl(dep_index) := TO_CHAR(l_seq_next);
8412: END LOOP;
8413: log_msg(FND_FILE.LOG, 'Successfully Populated the Individual Collection Tables object_value, khr_id, volume tables');
8414: -- Bulk Insert all the records into the OKL_PARALLEL_PROCESSES
8415: log_msg(FND_FILE.LOG, 'Before calling the Bulk Insert into the OKL_PARALLEL_PROCESSES' );
8416: FORALL dep_index IN l_deprn_contracts_tbl.FIRST .. l_deprn_contracts_tbl.LAST
8417: INSERT INTO OKL_PARALLEL_PROCESSES (

Line 8415: log_msg(FND_FILE.LOG, 'Before calling the Bulk Insert into the OKL_PARALLEL_PROCESSES' );

8411: l_assigned_process_tbl(dep_index) := TO_CHAR(l_seq_next);
8412: END LOOP;
8413: log_msg(FND_FILE.LOG, 'Successfully Populated the Individual Collection Tables object_value, khr_id, volume tables');
8414: -- Bulk Insert all the records into the OKL_PARALLEL_PROCESSES
8415: log_msg(FND_FILE.LOG, 'Before calling the Bulk Insert into the OKL_PARALLEL_PROCESSES' );
8416: FORALL dep_index IN l_deprn_contracts_tbl.FIRST .. l_deprn_contracts_tbl.LAST
8417: INSERT INTO OKL_PARALLEL_PROCESSES (
8418: OBJECT_TYPE
8419: ,OBJECT_VALUE

Line 8435: log_msg(FND_FILE.LOG, 'After calling the Bulk Insert into the OKL_PARALLEL_PROCESSES' );

8431: ,SYSDATE -- Creation Date
8432: ,l_khr_id_tbl(dep_index) -- KHR_ID
8433: ,l_volume_tbl(dep_index) -- Volume
8434: );
8435: log_msg(FND_FILE.LOG, 'After calling the Bulk Insert into the OKL_PARALLEL_PROCESSES' );
8436: -- Commit the Records
8437: COMMIT;
8438: log_msg(FND_FILE.LOG, 'Committed the Insertion of the OKL_PARALLEL_PROCESSES Records' );
8439: -- Create l_num_workers number of Workers

Line 8438: log_msg(FND_FILE.LOG, 'Committed the Insertion of the OKL_PARALLEL_PROCESSES Records' );

8434: );
8435: log_msg(FND_FILE.LOG, 'After calling the Bulk Insert into the OKL_PARALLEL_PROCESSES' );
8436: -- Commit the Records
8437: COMMIT;
8438: log_msg(FND_FILE.LOG, 'Committed the Insertion of the OKL_PARALLEL_PROCESSES Records' );
8439: -- Create l_num_workers number of Workers
8440: FOR i in 1..l_num_workers
8441: LOOP -- put all workers into a table
8442: l_worker_load(i).worker_number := i;

Line 8446: log_msg(FND_FILE.LOG, 'Initialized totally ' || l_num_workers || ' workers ' );

8442: l_worker_load(i).worker_number := i;
8443: l_worker_load(i).worker_load := 0; -- initialize load with zero
8444: l_worker_load(i).used := FALSE; -- Initialize with FALSE as none are assigned to this
8445: END LOOP;
8446: log_msg(FND_FILE.LOG, 'Initialized totally ' || l_num_workers || ' workers ' );
8447: log_msg(FND_FILE.LOG, 'Allocation of Workers for every contract is in Progress .. ' );
8448: l_lightest_worker := 1;
8449: -- Loop through the Depreciation Contracts and Assign the Workers
8450: FOR dep_index IN l_deprn_contracts_tbl.FIRST .. l_deprn_contracts_tbl.LAST

Line 8447: log_msg(FND_FILE.LOG, 'Allocation of Workers for every contract is in Progress .. ' );

8443: l_worker_load(i).worker_load := 0; -- initialize load with zero
8444: l_worker_load(i).used := FALSE; -- Initialize with FALSE as none are assigned to this
8445: END LOOP;
8446: log_msg(FND_FILE.LOG, 'Initialized totally ' || l_num_workers || ' workers ' );
8447: log_msg(FND_FILE.LOG, 'Allocation of Workers for every contract is in Progress .. ' );
8448: l_lightest_worker := 1;
8449: -- Loop through the Depreciation Contracts and Assign the Workers
8450: FOR dep_index IN l_deprn_contracts_tbl.FIRST .. l_deprn_contracts_tbl.LAST
8451: LOOP

Line 8480: log_msg(FND_FILE.LOG, 'Done with allocation of Workers for every contract.' );

8476: END IF;
8477: END LOOP;
8478: END IF;
8479: END LOOP; -- FOR dep_index IN l_deprn_contracts_tbl.FIRST .. l_deprn_contracts_tbl.LAST
8480: log_msg(FND_FILE.LOG, 'Done with allocation of Workers for every contract.' );
8481: log_msg(FND_FILE.LOG, 'Process Sequence Number =' || l_seq_next );
8482: log_msg(FND_FILE.LOG, 'G_OBJECT_TYPE_DEP_KHR =' || G_OBJECT_TYPE_DEP_KHR );
8483: log_msg(FND_FILE.LOG, 'Assigned Process Contract Number KHR_ID Volume ');
8484: log_msg(FND_FILE.LOG, '------------------------------------------------------------------------------------------------------------------------');

Line 8481: log_msg(FND_FILE.LOG, 'Process Sequence Number =' || l_seq_next );

8477: END LOOP;
8478: END IF;
8479: END LOOP; -- FOR dep_index IN l_deprn_contracts_tbl.FIRST .. l_deprn_contracts_tbl.LAST
8480: log_msg(FND_FILE.LOG, 'Done with allocation of Workers for every contract.' );
8481: log_msg(FND_FILE.LOG, 'Process Sequence Number =' || l_seq_next );
8482: log_msg(FND_FILE.LOG, 'G_OBJECT_TYPE_DEP_KHR =' || G_OBJECT_TYPE_DEP_KHR );
8483: log_msg(FND_FILE.LOG, 'Assigned Process Contract Number KHR_ID Volume ');
8484: log_msg(FND_FILE.LOG, '------------------------------------------------------------------------------------------------------------------------');
8485: FOR dep_index in l_deprn_contracts_tbl.FIRST .. l_deprn_contracts_tbl.LAST

Line 8482: log_msg(FND_FILE.LOG, 'G_OBJECT_TYPE_DEP_KHR =' || G_OBJECT_TYPE_DEP_KHR );

8478: END IF;
8479: END LOOP; -- FOR dep_index IN l_deprn_contracts_tbl.FIRST .. l_deprn_contracts_tbl.LAST
8480: log_msg(FND_FILE.LOG, 'Done with allocation of Workers for every contract.' );
8481: log_msg(FND_FILE.LOG, 'Process Sequence Number =' || l_seq_next );
8482: log_msg(FND_FILE.LOG, 'G_OBJECT_TYPE_DEP_KHR =' || G_OBJECT_TYPE_DEP_KHR );
8483: log_msg(FND_FILE.LOG, 'Assigned Process Contract Number KHR_ID Volume ');
8484: log_msg(FND_FILE.LOG, '------------------------------------------------------------------------------------------------------------------------');
8485: FOR dep_index in l_deprn_contracts_tbl.FIRST .. l_deprn_contracts_tbl.LAST
8486: LOOP

Line 8483: log_msg(FND_FILE.LOG, 'Assigned Process Contract Number KHR_ID Volume ');

8479: END LOOP; -- FOR dep_index IN l_deprn_contracts_tbl.FIRST .. l_deprn_contracts_tbl.LAST
8480: log_msg(FND_FILE.LOG, 'Done with allocation of Workers for every contract.' );
8481: log_msg(FND_FILE.LOG, 'Process Sequence Number =' || l_seq_next );
8482: log_msg(FND_FILE.LOG, 'G_OBJECT_TYPE_DEP_KHR =' || G_OBJECT_TYPE_DEP_KHR );
8483: log_msg(FND_FILE.LOG, 'Assigned Process Contract Number KHR_ID Volume ');
8484: log_msg(FND_FILE.LOG, '------------------------------------------------------------------------------------------------------------------------');
8485: FOR dep_index in l_deprn_contracts_tbl.FIRST .. l_deprn_contracts_tbl.LAST
8486: LOOP
8487: log_msg(FND_FILE.LOG, RPAD(l_assigned_process_tbl(dep_index),30, ' ') ||

Line 8484: log_msg(FND_FILE.LOG, '------------------------------------------------------------------------------------------------------------------------');

8480: log_msg(FND_FILE.LOG, 'Done with allocation of Workers for every contract.' );
8481: log_msg(FND_FILE.LOG, 'Process Sequence Number =' || l_seq_next );
8482: log_msg(FND_FILE.LOG, 'G_OBJECT_TYPE_DEP_KHR =' || G_OBJECT_TYPE_DEP_KHR );
8483: log_msg(FND_FILE.LOG, 'Assigned Process Contract Number KHR_ID Volume ');
8484: log_msg(FND_FILE.LOG, '------------------------------------------------------------------------------------------------------------------------');
8485: FOR dep_index in l_deprn_contracts_tbl.FIRST .. l_deprn_contracts_tbl.LAST
8486: LOOP
8487: log_msg(FND_FILE.LOG, RPAD(l_assigned_process_tbl(dep_index),30, ' ') ||
8488: RPAD(l_object_value_tbl(dep_index),40, ' ') ||

Line 8487: log_msg(FND_FILE.LOG, RPAD(l_assigned_process_tbl(dep_index),30, ' ') ||

8483: log_msg(FND_FILE.LOG, 'Assigned Process Contract Number KHR_ID Volume ');
8484: log_msg(FND_FILE.LOG, '------------------------------------------------------------------------------------------------------------------------');
8485: FOR dep_index in l_deprn_contracts_tbl.FIRST .. l_deprn_contracts_tbl.LAST
8486: LOOP
8487: log_msg(FND_FILE.LOG, RPAD(l_assigned_process_tbl(dep_index),30, ' ') ||
8488: RPAD(l_object_value_tbl(dep_index),40, ' ') ||
8489: RPAD(l_khr_id_tbl(dep_index),32, ' ' ) ||
8490: LPAD(l_volume_tbl(dep_index),15, ' ') );
8491: END LOOP;

Line 8502: log_msg(FND_FILE.LOG, 'Updated the Records in OKL_PARALLEL_PROCESSES with the Assigned Process' );

8498: WHERE object_type = G_OBJECT_TYPE_DEP_KHR
8499: AND object_value = l_object_value_tbl(dep_index)
8500: AND process_status = 'PENDING_ASSIGNMENT'
8501: AND khr_id = l_khr_id_tbl(dep_index);
8502: log_msg(FND_FILE.LOG, 'Updated the Records in OKL_PARALLEL_PROCESSES with the Assigned Process' );
8503: -- COMMIT the Updation;
8504: COMMIT;
8505: log_msg(FND_FILE.LOG, 'Committed the Updation Changes' );
8506: FOR i in l_worker_load.FIRST .. l_worker_load.LAST

Line 8505: log_msg(FND_FILE.LOG, 'Committed the Updation Changes' );

8501: AND khr_id = l_khr_id_tbl(dep_index);
8502: log_msg(FND_FILE.LOG, 'Updated the Records in OKL_PARALLEL_PROCESSES with the Assigned Process' );
8503: -- COMMIT the Updation;
8504: COMMIT;
8505: log_msg(FND_FILE.LOG, 'Committed the Updation Changes' );
8506: FOR i in l_worker_load.FIRST .. l_worker_load.LAST
8507: LOOP
8508: -- Request only if the Worker is used and has some load to process ..
8509: IF l_worker_load(i).used

Line 8513: log_msg(FND_FILE.LOG, 'Submitted the Request with worker_id=' || l_worker_id );

8509: IF l_worker_load(i).used
8510: THEN
8511: l_worker_id := TO_CHAR(l_seq_next)||'-'||TO_CHAR(i);
8512: -- FND_REQUEST.set_org_id(MO_GLOBAL.get_current_org_id); --MOAC- Concurrent request
8513: log_msg(FND_FILE.LOG, 'Submitted the Request with worker_id=' || l_worker_id );
8514: l_reqid := FND_REQUEST.submit_request(
8515: application => 'OKL'
8516: ,program => 'OKLCAPFADEPRNW' -- Parallel Worker Conc. Program
8517: ,sub_request => TRUE

Line 8522: log_msg(FND_FILE.LOG, ' Returned request_id=' || l_reqid );

8518: ,argument1 => p_book_type_code
8519: ,argument2 => p_period_counter
8520: ,argument3 => l_worker_id
8521: ,argument4 => l_max_deprn_run_id);
8522: log_msg(FND_FILE.LOG, ' Returned request_id=' || l_reqid );
8523: IF l_reqid = 0
8524: THEN
8525: -- Request Submission failed with Error .. Hence, Exit with Error
8526: errbuf := fnd_message.get;

Line 8532: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Launching Process '||l_worker_id||' with Request ID '||l_reqid);

8528: ELSE
8529: errbuf := 'Sub-Request submitted successfully';
8530: retcode := 0 ;
8531: END IF;
8532: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Launching Process '||l_worker_id||' with Request ID '||l_reqid);
8533: END IF; -- IF l_worker_load(i).used
8534: END LOOP; -- FOR j in 1 .. l_worker_load.LAST
8535: -- Set the Request Data to be used in the re-run of the Master Program ..
8536: FND_CONC_GLOBAL.set_req_globals(

Line 8540: log_msg(FND_FILE.LOG, 'No workers assigned due to no data found for prcocesing');

8536: FND_CONC_GLOBAL.set_req_globals(
8537: conc_status => 'PAUSED'
8538: ,request_data => '2 RUN'); -- Instead of NULL, it was i here ..
8539: ELSE
8540: log_msg(FND_FILE.LOG, 'No workers assigned due to no data found for prcocesing');
8541: END IF; -- IF l_data_found = TRUE
8542: END IF;
8543: END populate_deprn_sources_conc;
8544: