1: Package body okl_copy_asset_PUB as
2: /* $Header: OKLPCALB.pls 115.7 2004/04/13 10:34:35 rnaik noship $ */
3: subtype trxv_rec_type is OKL_TRX_ASSETS_PUB.thpv_rec_type;
4: subtype trxv_tbl_type is OKL_TRX_ASSETS_PUB.thpv_tbl_type;
5: subtype talv_rec_type is OKL_TXL_ASSETS_PUB.tlpv_rec_type;
35: G_SCOPE CONSTANT VARCHAR2(4) := '_PUB';
36: -------------------------------------------------------------------------------------------------
37: -- GLOBAL VARIABLES
38: -------------------------------------------------------------------------------------------------
39: G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_COPY_ASSET_PUB';
40: G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
41: G_FIN_LINE_LTY_CODE OKC_LINE_STYLES_V.LTY_CODE%TYPE := 'FREE_FORM1';
42: G_FA_LINE_LTY_CODE OKC_LINE_STYLES_V.LTY_CODE%TYPE := 'FIXED_ASSET';
43: G_ID2 CONSTANT VARCHAR2(200) := '#';
138: p_data => x_msg_data);
139: When OTHERS then
140: ROLLBACK TO copy_asset_lines_pub;
141: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
142: FND_MSG_PUB.ADD_EXC_MSG( G_PKG_NAME, 'OKL_COPY_ASSET_PUB');
143: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,
144: p_count => x_msg_count,
145: p_data => x_msg_data);
146:
204: p_data => x_msg_data);
205: When OTHERS then
206: ROLLBACK TO copy_asset_lines_pub;
207: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
208: FND_MSG_PUB.ADD_EXC_MSG( G_PKG_NAME, 'OKL_COPY_ASSET_PUB');
209: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,
210: p_count => x_msg_count,
211: p_data => x_msg_data);
212:
306: p_data => x_msg_data);
307: When OTHERS then
308: ROLLBACK TO copy_all_lines_pub;
309: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
310: FND_MSG_PUB.ADD_EXC_MSG( G_PKG_NAME, 'OKL_COPY_ASSET_PUB');
311: FND_MSG_PUB.count_and_get (p_encoded => FND_API.G_FALSE,
312: p_count => x_msg_count,
313: p_data => x_msg_data);
314:
312: p_count => x_msg_count,
313: p_data => x_msg_data);
314:
315: END copy_all_lines;
316: End okl_copy_asset_PUB;