107: END IF;
108:
109: -- Initialize message list if p_init_msg_list is set to TRUE.
110: IF FND_API.to_Boolean( p_init_msg_list ) THEN
111: FND_MSG_PUB.initialize;
112: END IF;
113:
114: -- Update the status of the terminated contracts in the active contracts table
115: OPEN contracts_cur;
281: p_token1_value => SQLCODE,
282: p_token2 => G_SQLERRM_TOKEN,
283: p_token2_value => SQLERRM);
284:
285: FND_MSG_PUB.Count_And_Get(
286: p_count => x_msg_count,
287: p_data => x_msg_data
288: );
289:
344: );
345:
346: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
347: retcode := G_RETURN_CODE_ERROR;
348: errbuf := substr(FND_MSG_PUB.Get(), 1, 200);
349: END IF;
350:
351: FND_FILE.PUT_LINE(FND_FILE.LOG, '***** END contract_status_update_manager() *****');
352: