1: package body okl_am_repurchase_asset_pvt_w as
2: /* $Header: OKLERQUB.pls 120.2 2005/08/19 01:36:48 rmunjulu noship $ */
3: rosetta_g_mistake_date date := to_date('01/01/+4713', 'MM/DD/SYYYY');
4: rosetta_g_miss_date date := to_date('01/01/-4712', 'MM/DD/SYYYY');
5:
308: , p5_a79 DATE := fnd_api.g_miss_date
309: )
310:
311: as
312: ddp_qtev_rec okl_am_repurchase_asset_pvt.qtev_rec_type;
313: ddp_tqlv_tbl okl_am_repurchase_asset_pvt.tqlv_tbl_type;
314: ddx_qtev_rec okl_am_repurchase_asset_pvt.qtev_rec_type;
315: ddx_tqlv_tbl okl_am_repurchase_asset_pvt.tqlv_tbl_type;
316: ddindx binary_integer; indx binary_integer;
309: )
310:
311: as
312: ddp_qtev_rec okl_am_repurchase_asset_pvt.qtev_rec_type;
313: ddp_tqlv_tbl okl_am_repurchase_asset_pvt.tqlv_tbl_type;
314: ddx_qtev_rec okl_am_repurchase_asset_pvt.qtev_rec_type;
315: ddx_tqlv_tbl okl_am_repurchase_asset_pvt.tqlv_tbl_type;
316: ddindx binary_integer; indx binary_integer;
317: begin
310:
311: as
312: ddp_qtev_rec okl_am_repurchase_asset_pvt.qtev_rec_type;
313: ddp_tqlv_tbl okl_am_repurchase_asset_pvt.tqlv_tbl_type;
314: ddx_qtev_rec okl_am_repurchase_asset_pvt.qtev_rec_type;
315: ddx_tqlv_tbl okl_am_repurchase_asset_pvt.tqlv_tbl_type;
316: ddindx binary_integer; indx binary_integer;
317: begin
318:
311: as
312: ddp_qtev_rec okl_am_repurchase_asset_pvt.qtev_rec_type;
313: ddp_tqlv_tbl okl_am_repurchase_asset_pvt.tqlv_tbl_type;
314: ddx_qtev_rec okl_am_repurchase_asset_pvt.qtev_rec_type;
315: ddx_tqlv_tbl okl_am_repurchase_asset_pvt.tqlv_tbl_type;
316: ddindx binary_integer; indx binary_integer;
317: begin
318:
319: -- copy data to the local IN or IN-OUT args, if any
468:
469:
470:
471: -- here's the delegated call to the old PL/SQL routine
472: okl_am_repurchase_asset_pvt.create_repurchase_quote(p_api_version,
473: p_init_msg_list,
474: x_return_status,
475: x_msg_count,
476: x_msg_data,
921: , p5_a79 DATE := fnd_api.g_miss_date
922: )
923:
924: as
925: ddp_qtev_rec okl_am_repurchase_asset_pvt.qtev_rec_type;
926: ddp_tqlv_tbl okl_am_repurchase_asset_pvt.tqlv_tbl_type;
927: ddx_qtev_rec okl_am_repurchase_asset_pvt.qtev_rec_type;
928: ddx_tqlv_tbl okl_am_repurchase_asset_pvt.tqlv_tbl_type;
929: ddindx binary_integer; indx binary_integer;
922: )
923:
924: as
925: ddp_qtev_rec okl_am_repurchase_asset_pvt.qtev_rec_type;
926: ddp_tqlv_tbl okl_am_repurchase_asset_pvt.tqlv_tbl_type;
927: ddx_qtev_rec okl_am_repurchase_asset_pvt.qtev_rec_type;
928: ddx_tqlv_tbl okl_am_repurchase_asset_pvt.tqlv_tbl_type;
929: ddindx binary_integer; indx binary_integer;
930: begin
923:
924: as
925: ddp_qtev_rec okl_am_repurchase_asset_pvt.qtev_rec_type;
926: ddp_tqlv_tbl okl_am_repurchase_asset_pvt.tqlv_tbl_type;
927: ddx_qtev_rec okl_am_repurchase_asset_pvt.qtev_rec_type;
928: ddx_tqlv_tbl okl_am_repurchase_asset_pvt.tqlv_tbl_type;
929: ddindx binary_integer; indx binary_integer;
930: begin
931:
924: as
925: ddp_qtev_rec okl_am_repurchase_asset_pvt.qtev_rec_type;
926: ddp_tqlv_tbl okl_am_repurchase_asset_pvt.tqlv_tbl_type;
927: ddx_qtev_rec okl_am_repurchase_asset_pvt.qtev_rec_type;
928: ddx_tqlv_tbl okl_am_repurchase_asset_pvt.tqlv_tbl_type;
929: ddindx binary_integer; indx binary_integer;
930: begin
931:
932: -- copy data to the local IN or IN-OUT args, if any
1081:
1082:
1083:
1084: -- here's the delegated call to the old PL/SQL routine
1085: okl_am_repurchase_asset_pvt.update_repurchase_quote(p_api_version,
1086: p_init_msg_list,
1087: x_return_status,
1088: x_msg_count,
1089: x_msg_data,
1244: , p8_a60
1245: );
1246: end;
1247:
1248: end okl_am_repurchase_asset_pvt_w;