32: l_errbuf VARCHAR2(4000);
33: l_retcode VARCHAR2(255);
34: l_msg_count NUMBER;
35: l_msg_data VARCHAR2(1000);
36: l_trans_rec JTY_ASSIGN_REALTIME_PUB.bulk_trans_id_type;
37: l_WinningTerrMember_tbl JTY_ASSIGN_REALTIME_PUB.bulk_winners_rec_type;
38: l_api_name CONSTANT VARCHAR2(30) := 'CALL_RUNTIME_TAP';
39: l_api_version_number CONSTANT NUMBER := 1.0;
40: L_RETURN_STATUS VARCHAR2(10);
33: l_retcode VARCHAR2(255);
34: l_msg_count NUMBER;
35: l_msg_data VARCHAR2(1000);
36: l_trans_rec JTY_ASSIGN_REALTIME_PUB.bulk_trans_id_type;
37: l_WinningTerrMember_tbl JTY_ASSIGN_REALTIME_PUB.bulk_winners_rec_type;
38: l_api_name CONSTANT VARCHAR2(30) := 'CALL_RUNTIME_TAP';
39: l_api_version_number CONSTANT NUMBER := 1.0;
40: L_RETURN_STATUS VARCHAR2(10);
41: BEGIN
75:
76: -- Log Debug Messages.
77: LOG_MESSAGES(P_LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,
78: P_MODULE_NAME => l_api_name,
79: p_LOG_MESSAGE => 'Before Calling JTY_ASSIGN_REALTIME_PUB.get_winners');
80:
81: JTY_ASSIGN_REALTIME_PUB.get_winners(
82: p_api_version_number => 1.0,
83: p_init_msg_list => FND_API.G_FALSE,
77: LOG_MESSAGES(P_LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,
78: P_MODULE_NAME => l_api_name,
79: p_LOG_MESSAGE => 'Before Calling JTY_ASSIGN_REALTIME_PUB.get_winners');
80:
81: JTY_ASSIGN_REALTIME_PUB.get_winners(
82: p_api_version_number => 1.0,
83: p_init_msg_list => FND_API.G_FALSE,
84: p_source_id => -1001,
85: p_trans_id => -1106,
97:
98: -- Log Debug Messages.
99: LOG_MESSAGES(P_LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,
100: P_MODULE_NAME => l_api_name,
101: P_LOG_MESSAGE => 'After Calling JTY_ASSIGN_REALTIME_PUB.get_winners.. x_return_status: '||l_return_status || ' x_message_data: ' || l_msg_data);
102:
103: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
104: If l_msg_data is NOT NULL THEN
105: FND_MSG_PUB.Add_Exc_Msg('JTY_ASSIGN_REALTIME_PUB',
101: P_LOG_MESSAGE => 'After Calling JTY_ASSIGN_REALTIME_PUB.get_winners.. x_return_status: '||l_return_status || ' x_message_data: ' || l_msg_data);
102:
103: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
104: If l_msg_data is NOT NULL THEN
105: FND_MSG_PUB.Add_Exc_Msg('JTY_ASSIGN_REALTIME_PUB',
106: 'GET_WINNERS',
107: l_msg_data);
108: End If;
109:
267: /************************** Start Explode Teams ******************/
268: PROCEDURE EXPLODE_TEAMS(
269: x_errbuf OUT NOCOPY VARCHAR2,
270: x_retcode OUT NOCOPY VARCHAR2,
271: p_WinningTerrMember_tbl IN OUT NOCOPY JTY_ASSIGN_REALTIME_PUB.bulk_winners_rec_type,
272: x_return_status OUT NOCOPY VARCHAR2)
273: IS
274:
275: /*-------------------------------------------------------------------------+
464: /************************** Start Explode Groups ******************/
465: PROCEDURE EXPLODE_GROUPS(
466: x_errbuf OUT NOCOPY VARCHAR2,
467: x_retcode OUT NOCOPY VARCHAR2,
468: p_WinningTerrMember_tbl IN OUT NOCOPY JTY_ASSIGN_REALTIME_PUB.bulk_winners_rec_type,
469: x_return_status OUT NOCOPY VARCHAR2)
470: IS
471: -------------RS_GROUP---------
472: /*-------------------------------------------------------------------------+
575: /************************** Start Insert Accessses ***************/
576: PROCEDURE INSERT_ACCESSES(
577: x_errbuf OUT NOCOPY VARCHAR2,
578: x_retcode OUT NOCOPY VARCHAR2,
579: p_WinningTerrMember_tbl IN OUT NOCOPY JTY_ASSIGN_REALTIME_PUB.bulk_winners_rec_type,
580: x_return_status OUT NOCOPY VARCHAR2) IS
581: BEGIN
582:
583: x_return_status := FND_API.G_RET_STS_SUCCESS;
635: /************************** Start Insert Territory Accessses ***************/
636: PROCEDURE INSERT_TERR_ACCESSES(
637: x_errbuf OUT NOCOPY VARCHAR2,
638: x_retcode OUT NOCOPY VARCHAR2,
639: p_WinningTerrMember_tbl IN OUT NOCOPY JTY_ASSIGN_REALTIME_PUB.bulk_winners_rec_type,
640: x_return_status OUT NOCOPY VARCHAR2) IS
641: BEGIN
642:
643: /*------------------------------------------------------------------------------+
706: /************************** Start Perform Cleanup ***************/
707: PROCEDURE PERFORM_CLEANUP(
708: x_errbuf OUT NOCOPY VARCHAR2,
709: x_retcode OUT NOCOPY VARCHAR2,
710: p_WinningTerrMember_tbl IN OUT NOCOPY JTY_ASSIGN_REALTIME_PUB.bulk_winners_rec_type,
711: x_return_status OUT NOCOPY VARCHAR2) IS
712:
713: BEGIN
714: x_return_status := FND_API.G_RET_STS_SUCCESS;