DBA Data[Home] [Help]

APPS.PRP_RTTAP_INT_PVT dependencies on FND_API

Line 24: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

20:
21:
22: PROCEDURE CALL_RUNTIME_TAP(
23: P_Api_Version_Number IN NUMBER,
24: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
25: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
26: p_Proposal_id IN NUMBER,
27: X_Return_Status OUT NOCOPY VARCHAR2,
28: X_Msg_Count OUT NOCOPY NUMBER,

Line 25: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

21:
22: PROCEDURE CALL_RUNTIME_TAP(
23: P_Api_Version_Number IN NUMBER,
24: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
25: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
26: p_Proposal_id IN NUMBER,
27: X_Return_Status OUT NOCOPY VARCHAR2,
28: X_Msg_Count OUT NOCOPY NUMBER,
29: X_Msg_Data OUT NOCOPY VARCHAR2

Line 45: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

41: BEGIN
42: G_PROPOSAL_ID := p_proposal_id;
43: SAVEPOINT CALL_RUNTIME_TAP;
44:
45: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
46: p_api_version_number,
47: l_api_name,
48: G_PKG_NAME)
49: THEN

Line 50: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

46: p_api_version_number,
47: l_api_name,
48: G_PKG_NAME)
49: THEN
50: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
51: END IF;
52:
53: -- Initialize message list if p_init_msg_list is set to TRUE.
54: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 54: IF FND_API.to_Boolean( p_init_msg_list ) THEN

50: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
51: END IF;
52:
53: -- Initialize message list if p_init_msg_list is set to TRUE.
54: IF FND_API.to_Boolean( p_init_msg_list ) THEN
55: FND_MSG_PUB.initialize;
56: END IF;
57:
58: -- Log Debug Messages.

Line 65: x_return_status := FND_API.G_RET_STS_SUCCESS;

61: P_LOG_MESSAGE => 'In CALL_RUNTIME_TAP.. Parameters: ' ||'P_Proposal_id: ' || p_proposal_id);
62:
63:
64: -- Initialize API return status to SUCCESS
65: x_return_status := FND_API.G_RET_STS_SUCCESS;
66:
67: IF NVL(FND_PROFILE.Value('PRP_ENABLE_ONLINE_TAP'), 'N') = 'Y' THEN
68:
69: l_trans_rec.trans_object_id1 := jtf_terr_number_list(G_PROPOSAL_ID);

Line 83: p_init_msg_list => FND_API.G_FALSE,

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,
86: p_mode => 'REAL TIME:RESOURCE',
87: p_param_passing_mechanism => 'PBR',

Line 103: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

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',
106: 'GET_WINNERS',
107: l_msg_data);

Line 114: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

110: FND_MSG_PUB.Count_And_Get
111: ( p_count => x_msg_count,
112: p_data => x_msg_data
113: );
114: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
115: END IF;
116:
117: IF (l_WinningTerrMember_tbl.resource_id.count > 0) THEN
118:

Line 147: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then

143: LOG_MESSAGES(P_LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,
144: P_MODULE_NAME => l_api_name,
145: p_LOG_MESSAGE => 'After Calling Explode_Groups... ' ||'x_return_status: ' || l_return_status);
146:
147: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
148: x_msg_data := l_errbuf;
149: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
150: End If;
151:

Line 149: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

145: p_LOG_MESSAGE => 'After Calling Explode_Groups... ' ||'x_return_status: ' || l_return_status);
146:
147: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
148: x_msg_data := l_errbuf;
149: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
150: End If;
151:
152: -- Log Debug Messages.
153: LOG_MESSAGES(P_LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,

Line 169: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then

165: LOG_MESSAGES(P_LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,
166: P_MODULE_NAME => l_api_name,
167: p_LOG_MESSAGE => 'After Calling Explode_Teams... ' ||' x_return_Status: ' || l_return_status);
168:
169: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
170: x_msg_data := l_errbuf;
171: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
172: End If;
173:

Line 171: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

167: p_LOG_MESSAGE => 'After Calling Explode_Teams... ' ||' x_return_Status: ' || l_return_status);
168:
169: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
170: x_msg_data := l_errbuf;
171: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
172: End If;
173:
174: -- Insert into Proposal Accesses from Winners
175:

Line 191: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then

187: LOG_MESSAGES(P_LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,
188: P_MODULE_NAME => l_api_name,
189: p_LOG_MESSAGE => 'After Calling Insert_Accesses... ' ||' x_return_Status: ' || l_return_status);
190:
191: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
192: x_msg_data := l_errbuf;
193: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
194: End If;
195:

Line 193: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

189: p_LOG_MESSAGE => 'After Calling Insert_Accesses... ' ||' x_return_Status: ' || l_return_status);
190:
191: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
192: x_msg_data := l_errbuf;
193: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
194: End If;
195:
196: -- Insert into territory Accesses
197:

Line 213: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then

209: LOG_MESSAGES(P_LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,
210: P_MODULE_NAME => l_api_name,
211: p_LOG_MESSAGE => 'After Calling Insert_Terr_Accesses... ' ||' x_return_Status: ' || l_return_status);
212:
213: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
214: x_msg_data := l_errbuf;
215: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
216: End If;
217: END IF;

Line 215: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

211: p_LOG_MESSAGE => 'After Calling Insert_Terr_Accesses... ' ||' x_return_Status: ' || l_return_status);
212:
213: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
214: x_msg_data := l_errbuf;
215: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
216: End If;
217: END IF;
218:
219:

Line 236: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then

232: LOG_MESSAGES(P_LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,
233: P_MODULE_NAME => l_api_name,
234: p_LOG_MESSAGE => 'After Calling Perform_Cleanup... ' ||' x_return_Status: ' || l_return_status);
235:
236: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
237: l_msg_data := l_errbuf;
238: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
239: End If;
240:

Line 238: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

234: p_LOG_MESSAGE => 'After Calling Perform_Cleanup... ' ||' x_return_Status: ' || l_return_status);
235:
236: If l_return_status <> FND_API.G_RET_STS_SUCCESS Then
237: l_msg_data := l_errbuf;
238: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
239: End If;
240:
241:
242: END IF;

Line 245: IF FND_API.to_Boolean( p_commit ) THEN

241:
242: END IF;
243:
244: -- Standard check for p_commit
245: IF FND_API.to_Boolean( p_commit ) THEN
246: COMMIT WORK;
247: END IF;
248:
249: EXCEPTION

Line 250: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

246: COMMIT WORK;
247: END IF;
248:
249: EXCEPTION
250: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
251: ROLLBACK to CALL_RUNTIME_TAP;
252: X_Return_Status := FND_API.G_RET_STS_ERROR;
253: FND_MSG_PUB.Count_And_Get
254: ( p_count => x_msg_count,

Line 252: X_Return_Status := FND_API.G_RET_STS_ERROR;

248:
249: EXCEPTION
250: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
251: ROLLBACK to CALL_RUNTIME_TAP;
252: X_Return_Status := FND_API.G_RET_STS_ERROR;
253: FND_MSG_PUB.Count_And_Get
254: ( p_count => x_msg_count,
255: p_data => x_msg_data
256: );

Line 259: X_Return_Status := FND_API.G_RET_STS_ERROR;

255: p_data => x_msg_data
256: );
257: WHEN OTHERS THEN
258: ROLLBACK to CALL_RUNTIME_TAP;
259: X_Return_Status := FND_API.G_RET_STS_ERROR;
260: FND_MSG_PUB.Count_And_Get
261: ( p_count => x_msg_count,
262: p_data => x_msg_data
263: );

Line 299: x_return_status := FND_API.G_RET_STS_SUCCESS;

295:
296:
297: BEGIN
298:
299: x_return_status := FND_API.G_RET_STS_SUCCESS;
300: /* Get resources within a resource team */
301:
302: IF p_WinningTerrMember_tbl.resource_id.COUNT > 0 THEN
303: FOR l_index IN p_WinningTerrMember_tbl.resource_id.FIRST..p_WinningTerrMember_tbl.resource_id.LAST LOOP

Line 454: x_return_status := FND_API.G_RET_STS_ERROR;

450: EXCEPTION
451: WHEN others THEN
452: x_errbuf := SQLERRM;
453: x_retcode := SQLCODE;
454: x_return_status := FND_API.G_RET_STS_ERROR;
455: FND_MSG_PUB.Add_Exc_Msg('PRP_RTTAP_INT_PVT','EXPLODE_TEAMS',SQLERRM);
456: -- Log Debug Messages.
457: LOG_MESSAGES(P_LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,
458: P_MODULE_NAME => 'Insert_Terr_Accesses',

Line 490: x_return_status := FND_API.G_RET_STS_SUCCESS;

486: l_person_id num_list;
487:
488: BEGIN
489:
490: x_return_status := FND_API.G_RET_STS_SUCCESS;
491: /* Get resources within a resource team */
492: /** Note
493: Hard coding RS_EMPLOYEE INSTEAD OF resource_category IN following SQL
494: because JTA returns RS_EMPLOYEE AND NOT EMPLOYEE

Line 564: x_return_status := FND_API.G_RET_STS_ERROR;

560: EXCEPTION
561: WHEN OTHERS THEN
562: x_errbuf := SQLERRM;
563: x_retcode := SQLCODE;
564: x_return_status := FND_API.G_RET_STS_ERROR;
565: FND_MSG_PUB.Add_Exc_Msg('PRP_RTTAP_INT_PVT','EXPLODE_GROUPS',SQLERRM);
566: -- Log Debug Messages.
567: LOG_MESSAGES(P_LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,
568: P_MODULE_NAME => 'Insert_Terr_Accesses',

Line 583: x_return_status := FND_API.G_RET_STS_SUCCESS;

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;
584: IF p_WinningTerrMember_tbl.resource_id.COUNT > 0 THEN
585: FOR l_index IN p_WinningTerrMember_tbl.resource_id.FIRST..p_WinningTerrMember_tbl.resource_id.LAST LOOP
586: IF p_WinningTerrMember_tbl.resource_type(l_index) = 'RS_EMPLOYEE' AND p_WinningTerrMember_tbl.group_id(l_index) IS NOT NULL THEN
587:

Line 626: x_return_status := FND_API.G_RET_STS_ERROR;

622: EXCEPTION
623: WHEN OTHERS THEN
624: x_errbuf := SQLERRM;
625: x_retcode := SQLCODE;
626: x_return_status := FND_API.G_RET_STS_ERROR;
627: FND_MSG_PUB.Add_Exc_Msg('PRP_RTTAP_INT_PVT','INSERT_ACCESS',SQLERRM);
628: -- Log Debug Messages.
629: LOG_MESSAGES(P_LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,
630: P_MODULE_NAME => 'Insert_Terr_Accesses',

Line 648: x_return_status := FND_API.G_RET_STS_SUCCESS;

644: | we are deleting all rows for the entity from as_territory_accesses prior to
645: | inserting into it because the logic for removing only certain terr_id/access_id
646: | combinations is very complex and could be slow..
647: +-------------------------------------------------------------------------------*/
648: x_return_status := FND_API.G_RET_STS_SUCCESS;
649:
650: DELETE FROM PRP_TERRITORY_ACCESSES TACC
651: WHERE TACC.proposal_access_id IN
652: (SELECT ACC.proposal_access_id

Line 695: x_return_status := FND_API.G_RET_STS_ERROR;

691: EXCEPTION
692: WHEN OTHERS THEN
693: x_errbuf := SQLERRM;
694: x_retcode := SQLCODE;
695: x_return_status := FND_API.G_RET_STS_ERROR;
696:
697: FND_MSG_PUB.Add_Exc_Msg('PRP_RTTAP_INT_PVT','INSERT_TERR_ACCESSES',SQLERRM);
698: -- Log Debug Messages.
699: LOG_MESSAGES(P_LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,

Line 714: x_return_status := FND_API.G_RET_STS_SUCCESS;

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;
715:
716: DELETE FROM PRP_PROPOSAL_ACCESSES ACC
717: WHERE proposal_id = G_PROPOSAL_ID
718: AND NVL(keep_flag, 'N') <> 'Y'

Line 730: x_return_status := FND_API.G_RET_STS_ERROR;

726: EXCEPTION
727: WHEN OTHERS THEN
728: x_errbuf := SQLERRM;
729: x_retcode := SQLCODE;
730: x_return_status := FND_API.G_RET_STS_ERROR;
731: FND_MSG_PUB.Add_Exc_Msg('PRP_RTTAP_INT_PVT','PERFORM_CLEANUP',SQLERRM);
732: -- Log Debug Messages.
733: LOG_MESSAGES(P_LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,
734: P_MODULE_NAME => 'Insert_Terr_Accesses',