10: l_msg_count NUMBER;
11: l_msg_data VARCHAR2(2000);
12:
13: BEGIN
14: fun_net_util.log_string(1,'fun_net_conc_prog_pkg.create_net_batch','Before calling create batch API');
15: FUN_NET_ARAP_PKG.create_net_batch(
16: p_init_msg_list => FND_API.G_TRUE,
17: p_commit => FND_API.G_TRUE,
18: x_return_status => l_return_status,
18: x_return_status => l_return_status,
19: x_msg_count => l_msg_count,
20: x_msg_data => l_msg_data,
21: p_batch_id => p_batch_id);
22: fun_net_util.log_string(1,'fun_net_conc_prog_pkg.create_net_batch','return from create batch API');
23: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
24: fun_net_util.log_string(1,'fun_net_conc_prog_pkg.create_net_batch','Success');
25: retcode := 0;
26: ELSE
20: x_msg_data => l_msg_data,
21: p_batch_id => p_batch_id);
22: fun_net_util.log_string(1,'fun_net_conc_prog_pkg.create_net_batch','return from create batch API');
23: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
24: fun_net_util.log_string(1,'fun_net_conc_prog_pkg.create_net_batch','Success');
25: retcode := 0;
26: ELSE
27: fun_net_util.log_string(1,'fun_net_conc_prog_pkg.create_net_batch','Error');
28: retcode := 2;
23: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
24: fun_net_util.log_string(1,'fun_net_conc_prog_pkg.create_net_batch','Success');
25: retcode := 0;
26: ELSE
27: fun_net_util.log_string(1,'fun_net_conc_prog_pkg.create_net_batch','Error');
28: retcode := 2;
29: END IF;
30: EXCEPTION
31: WHEN OTHERS THEN