eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.OKC_CONTRACT_DOCS_GRP dependencies on FND_API

Line 18: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;

14:
15: ------------------------------------------------------------------------------
16: -- GLOBAL CONSTANTS
17: ------------------------------------------------------------------------------
18: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
19: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
20:
21: G_RET_STS_SUCCESS CONSTANT varchar2(1) := FND_API.G_RET_STS_SUCCESS;
22: G_RET_STS_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_ERROR;

Line 19: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;

15: ------------------------------------------------------------------------------
16: -- GLOBAL CONSTANTS
17: ------------------------------------------------------------------------------
18: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
19: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
20:
21: G_RET_STS_SUCCESS CONSTANT varchar2(1) := FND_API.G_RET_STS_SUCCESS;
22: G_RET_STS_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_ERROR;
23: G_RET_STS_UNEXP_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_UNEXP_ERROR;

Line 21: G_RET_STS_SUCCESS CONSTANT varchar2(1) := FND_API.G_RET_STS_SUCCESS;

17: ------------------------------------------------------------------------------
18: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
19: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
20:
21: G_RET_STS_SUCCESS CONSTANT varchar2(1) := FND_API.G_RET_STS_SUCCESS;
22: G_RET_STS_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_ERROR;
23: G_RET_STS_UNEXP_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
24:
25: G_UNEXPECTED_ERROR CONSTANT varchar2(200) := 'OKC_UNEXPECTED_ERROR';

Line 22: G_RET_STS_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_ERROR;

18: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
19: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
20:
21: G_RET_STS_SUCCESS CONSTANT varchar2(1) := FND_API.G_RET_STS_SUCCESS;
22: G_RET_STS_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_ERROR;
23: G_RET_STS_UNEXP_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
24:
25: G_UNEXPECTED_ERROR CONSTANT varchar2(200) := 'OKC_UNEXPECTED_ERROR';
26: G_SQLERRM_TOKEN CONSTANT varchar2(200) := 'ERROR_MESSAGE';

Line 23: G_RET_STS_UNEXP_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_UNEXP_ERROR;

19: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
20:
21: G_RET_STS_SUCCESS CONSTANT varchar2(1) := FND_API.G_RET_STS_SUCCESS;
22: G_RET_STS_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_ERROR;
23: G_RET_STS_UNEXP_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
24:
25: G_UNEXPECTED_ERROR CONSTANT varchar2(200) := 'OKC_UNEXPECTED_ERROR';
26: G_SQLERRM_TOKEN CONSTANT varchar2(200) := 'ERROR_MESSAGE';
27: G_SQLCODE_TOKEN CONSTANT varchar2(200) := 'ERROR_CODE';

Line 48: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

44: -------------------------------------
45: PROCEDURE Insert_Contract_Doc(
46: p_api_version IN NUMBER,
47: p_init_msg_list IN VARCHAR2 ,
48: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
49: p_commit IN VARCHAR2 := FND_API.G_FALSE,
50:
51: x_return_status OUT NOCOPY VARCHAR2,
52: x_msg_count OUT NOCOPY NUMBER,

Line 49: p_commit IN VARCHAR2 := FND_API.G_FALSE,

45: PROCEDURE Insert_Contract_Doc(
46: p_api_version IN NUMBER,
47: p_init_msg_list IN VARCHAR2 ,
48: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
49: p_commit IN VARCHAR2 := FND_API.G_FALSE,
50:
51: x_return_status OUT NOCOPY VARCHAR2,
52: x_msg_count OUT NOCOPY NUMBER,
53: x_msg_data OUT NOCOPY VARCHAR2,

Line 168: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

164:
165: -- Standard Start of API savepoint
166: SAVEPOINT g_Insert_Contract_Doc_GRP;
167: -- Standard call to check for call compatibility.
168: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
169: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
170: END IF;
171: -- Initialize message list if p_init_msg_list is set to TRUE.
172: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 169: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

165: -- Standard Start of API savepoint
166: SAVEPOINT g_Insert_Contract_Doc_GRP;
167: -- Standard call to check for call compatibility.
168: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
169: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
170: END IF;
171: -- Initialize message list if p_init_msg_list is set to TRUE.
172: IF FND_API.to_Boolean( p_init_msg_list ) THEN
173: FND_MSG_PUB.initialize;

Line 172: IF FND_API.to_Boolean( p_init_msg_list ) THEN

168: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
169: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
170: END IF;
171: -- Initialize message list if p_init_msg_list is set to TRUE.
172: IF FND_API.to_Boolean( p_init_msg_list ) THEN
173: FND_MSG_PUB.initialize;
174: END IF;
175: -- Initialize API return status to success
176: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 176: x_return_status := FND_API.G_RET_STS_SUCCESS;

172: IF FND_API.to_Boolean( p_init_msg_list ) THEN
173: FND_MSG_PUB.initialize;
174: END IF;
175: -- Initialize API return status to success
176: x_return_status := FND_API.G_RET_STS_SUCCESS;
177:
178: -- Do Not Update Primary Flag when Copying or Versioning
179: IF p_primary_contract_doc_flag = 'Y' AND p_versioning_flag = 'N'
180: THEN

Line 188: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

184: x_return_status => x_return_status);
185: END IF;
186: --------------------------------------------
187: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
188: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
189: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
190: RAISE FND_API.G_EXC_ERROR ;
191: END IF;
192: --------------------------------------------

Line 190: RAISE FND_API.G_EXC_ERROR ;

186: --------------------------------------------
187: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
188: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
189: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
190: RAISE FND_API.G_EXC_ERROR ;
191: END IF;
192: --------------------------------------------
193:
194: -- Set the value for l_parent_attached_doc_id.

Line 334: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

330: x_attached_document_id => x_attached_document_id
331: );
332: --------------------------------------------
333: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
334: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
335: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
336: RAISE FND_API.G_EXC_ERROR ;
337: END IF;
338: --------------------------------------------

Line 336: RAISE FND_API.G_EXC_ERROR ;

332: --------------------------------------------
333: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
334: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
335: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
336: RAISE FND_API.G_EXC_ERROR ;
337: END IF;
338: --------------------------------------------
339:
340:

Line 342: IF FND_API.To_Boolean( p_commit ) THEN

338: --------------------------------------------
339:
340:
341: -- Standard check of p_commit
342: IF FND_API.To_Boolean( p_commit ) THEN
343: COMMIT WORK;
344: END IF;
345: -- Standard call to get message count and if count is 1, get message info.
346: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );

Line 353: WHEN FND_API.G_EXC_ERROR THEN

349: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'700: Leaving Insert_Contract_Doc');
350: END IF;
351:
352: EXCEPTION
353: WHEN FND_API.G_EXC_ERROR THEN
354: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
355: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'800: Leaving Insert_Contract_Doc: OKC_API.G_EXCEPTION_ERROR Exception');
356: END IF;
357: IF l_attachment_id_csr%ISOPEN THEN

Line 364: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

360: ROLLBACK TO g_Insert_Contract_Doc_GRP;
361: x_return_status := G_RET_STS_ERROR ;
362: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
363:
364: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
365: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
366: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'900: Leaving Insert_Contract_Doc: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
367: END IF;
368: IF l_attachment_id_csr%ISOPEN THEN

Line 402: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

398: ---------------------------------------------------------------------------
399: PROCEDURE Update_Contract_Doc(
400: p_api_version IN NUMBER,
401: p_init_msg_list IN VARCHAR2 ,
402: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
403: p_commit IN VARCHAR2 := FND_API.G_FALSE,
404:
405: x_return_status OUT NOCOPY VARCHAR2,
406: x_msg_count OUT NOCOPY NUMBER,

Line 403: p_commit IN VARCHAR2 := FND_API.G_FALSE,

399: PROCEDURE Update_Contract_Doc(
400: p_api_version IN NUMBER,
401: p_init_msg_list IN VARCHAR2 ,
402: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
403: p_commit IN VARCHAR2 := FND_API.G_FALSE,
404:
405: x_return_status OUT NOCOPY VARCHAR2,
406: x_msg_count OUT NOCOPY NUMBER,
407: x_msg_data OUT NOCOPY VARCHAR2,

Line 494: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

490:
491: -- Standard Start of API savepoint
492: SAVEPOINT g_Update_Contract_Doc_GRP;
493: -- Standard call to check for call compatibility.
494: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
495: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
496: END IF;
497: -- Initialize message list if p_init_msg_list is set to TRUE.
498: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 495: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

491: -- Standard Start of API savepoint
492: SAVEPOINT g_Update_Contract_Doc_GRP;
493: -- Standard call to check for call compatibility.
494: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
495: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
496: END IF;
497: -- Initialize message list if p_init_msg_list is set to TRUE.
498: IF FND_API.to_Boolean( p_init_msg_list ) THEN
499: FND_MSG_PUB.initialize;

Line 498: IF FND_API.to_Boolean( p_init_msg_list ) THEN

494: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
495: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
496: END IF;
497: -- Initialize message list if p_init_msg_list is set to TRUE.
498: IF FND_API.to_Boolean( p_init_msg_list ) THEN
499: FND_MSG_PUB.initialize;
500: END IF;
501: -- Initialize API return status to success
502: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 502: x_return_status := FND_API.G_RET_STS_SUCCESS;

498: IF FND_API.to_Boolean( p_init_msg_list ) THEN
499: FND_MSG_PUB.initialize;
500: END IF;
501: -- Initialize API return status to success
502: x_return_status := FND_API.G_RET_STS_SUCCESS;
503:
504: -- Get the doc's primary_contract_doc_flag
505: OPEN contract_doc_csr;
506: FETCH contract_doc_csr INTO l_primary_doc_yn;

Line 523: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

519:
520: END IF;
521: --------------------------------------------
522: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
523: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
524: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
525: RAISE FND_API.G_EXC_ERROR ;
526: END IF;
527: --------------------------------------------

Line 525: RAISE FND_API.G_EXC_ERROR ;

521: --------------------------------------------
522: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
523: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
524: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
525: RAISE FND_API.G_EXC_ERROR ;
526: END IF;
527: --------------------------------------------
528: CLOSE contract_doc_csr;
529:

Line 558: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

554: p_mergeable_doc_flag => p_mergeable_doc_flag
555: );
556: --------------------------------------------
557: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
558: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
559: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
560: RAISE FND_API.G_EXC_ERROR ;
561: END IF;
562: --------------------------------------------

Line 560: RAISE FND_API.G_EXC_ERROR ;

556: --------------------------------------------
557: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
558: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
559: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
560: RAISE FND_API.G_EXC_ERROR ;
561: END IF;
562: --------------------------------------------
563:
564: -- Standard check of p_commit

Line 565: IF FND_API.To_Boolean( p_commit ) THEN

561: END IF;
562: --------------------------------------------
563:
564: -- Standard check of p_commit
565: IF FND_API.To_Boolean( p_commit ) THEN
566: COMMIT WORK;
567: END IF;
568: -- Standard call to get message count and if count is 1, get message info.
569: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );

Line 576: WHEN FND_API.G_EXC_ERROR THEN

572: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1800: Leaving Update_Contract_Doc');
573: END IF;
574:
575: EXCEPTION
576: WHEN FND_API.G_EXC_ERROR THEN
577: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
578: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1900: Leaving Update_Contract_Doc: OKC_API.G_EXCEPTION_ERROR Exception');
579: END IF;
580: IF (contract_doc_csr%ISOPEN) THEN

Line 587: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

583: ROLLBACK TO g_Update_Contract_Doc_GRP;
584: x_return_status := G_RET_STS_ERROR ;
585: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
586:
587: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
588: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
589: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2000: Leaving Update_Contract_Doc: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
590: END IF;
591: IF (contract_doc_csr%ISOPEN) THEN

Line 622: p_commit IN VARCHAR2 := FND_API.G_FALSE,

618: ---------------------------------------------------------------------------
619: PROCEDURE Delete_Contract_Doc(
620: p_api_version IN NUMBER,
621: p_init_msg_list IN VARCHAR2 ,
622: p_commit IN VARCHAR2 := FND_API.G_FALSE,
623:
624: x_return_status OUT NOCOPY VARCHAR2,
625: x_msg_count OUT NOCOPY NUMBER,
626: x_msg_data OUT NOCOPY VARCHAR2,

Line 646: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

642: l_object_version_number NUMBER := -1;
643: l_doc_approved_flag VARCHAR2(1);
644: l_msg_count NUMBER;
645: l_msg_data FND_NEW_MESSAGES.MESSAGE_TEXT%TYPE;
646: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
647: l_parent_attached_doc_id OKC_CONTRACT_DOCS.PARENT_ATTACHED_DOC_ID%TYPE;
648: l_pk2_value FND_ATTACHED_DOCUMENTS.pk2_value%TYPE;
649:
650: CURSOR attach_csr(l_bus_doc_type VARCHAR2, l_bus_doc_id NUMBER, l_bus_doc_version NUMBER, l_attached_doc_id NUMBER) IS

Line 727: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

723:
724: -- Standard Start of API savepoint
725: SAVEPOINT g_Delete_Contract_Doc_GRP;
726: -- Standard call to check for call compatibility.
727: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
728: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
729: END IF;
730: -- Initialize message list if p_init_msg_list is set to TRUE.
731: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 728: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

724: -- Standard Start of API savepoint
725: SAVEPOINT g_Delete_Contract_Doc_GRP;
726: -- Standard call to check for call compatibility.
727: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
728: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
729: END IF;
730: -- Initialize message list if p_init_msg_list is set to TRUE.
731: IF FND_API.to_Boolean( p_init_msg_list ) THEN
732: FND_MSG_PUB.initialize;

Line 731: IF FND_API.to_Boolean( p_init_msg_list ) THEN

727: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
728: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
729: END IF;
730: -- Initialize message list if p_init_msg_list is set to TRUE.
731: IF FND_API.to_Boolean( p_init_msg_list ) THEN
732: FND_MSG_PUB.initialize;
733: END IF;
734: -- Initialize API return status to success
735: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 735: x_return_status := FND_API.G_RET_STS_SUCCESS;

731: IF FND_API.to_Boolean( p_init_msg_list ) THEN
732: FND_MSG_PUB.initialize;
733: END IF;
734: -- Initialize API return status to success
735: x_return_status := FND_API.G_RET_STS_SUCCESS;
736:
737: -- Get the parent attached_doc_id
738: SELECT parent_attached_doc_id
739: INTO l_parent_attached_doc_id

Line 777: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

773: x_msg_data => l_msg_data,
774: x_msg_count => l_msg_count,
775: x_return_status => l_return_status);
776: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
777: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
778: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
779: RAISE FND_API.G_EXC_ERROR ;
780: END IF;
781:

Line 779: RAISE FND_API.G_EXC_ERROR ;

775: x_return_status => l_return_status);
776: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
777: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
778: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
779: RAISE FND_API.G_EXC_ERROR ;
780: END IF;
781:
782: END LOOP;
783:

Line 812: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

808: x_msg_data => l_msg_data,
809: x_msg_count => l_msg_count,
810: x_return_status => l_return_status);
811: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
812: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
813: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
814: RAISE FND_API.G_EXC_ERROR ;
815: END IF;
816:

Line 814: RAISE FND_API.G_EXC_ERROR ;

810: x_return_status => l_return_status);
811: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
812: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
813: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
814: RAISE FND_API.G_EXC_ERROR ;
815: END IF;
816:
817: END LOOP;
818:

Line 930: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

926: p_delete_flag => 'Y',
927: p_object_version_number => p_object_version_number
928: );
929: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
930: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
931: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
932: RAISE FND_API.G_EXC_ERROR ;
933: END IF;
934: END LOOP;

Line 932: RAISE FND_API.G_EXC_ERROR ;

928: );
929: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
930: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
931: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
932: RAISE FND_API.G_EXC_ERROR ;
933: END IF;
934: END LOOP;
935: ELSE
936: -- Delete the record

Line 976: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

972: );
973: END IF;
974:
975: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
976: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
977: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
978: RAISE FND_API.G_EXC_ERROR ;
979: END IF;
980: --------------------------------------------

Line 978: RAISE FND_API.G_EXC_ERROR ;

974:
975: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
976: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
977: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
978: RAISE FND_API.G_EXC_ERROR ;
979: END IF;
980: --------------------------------------------
981:
982: -- Standard check of p_commit

Line 983: IF FND_API.To_Boolean( p_commit ) THEN

979: END IF;
980: --------------------------------------------
981:
982: -- Standard check of p_commit
983: IF FND_API.To_Boolean( p_commit ) THEN
984: COMMIT WORK;
985: END IF;
986: -- Standard call to get message count and if count is 1, get message info.
987: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );

Line 994: WHEN FND_API.G_EXC_ERROR THEN

990: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2300: Leaving Delete_Contract_Doc');
991: END IF;
992:
993: EXCEPTION
994: WHEN FND_API.G_EXC_ERROR THEN
995: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
996: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2400: Leaving Delete_Contract_Doc: OKC_API.G_EXCEPTION_ERROR Exception');
997: END IF;
998: --close cursors

Line 1009: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1005: ROLLBACK TO g_Delete_Contract_Doc_GRP;
1006: x_return_status := G_RET_STS_ERROR ;
1007: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
1008:
1009: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1010: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1011: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2500: Leaving Delete_Contract_Doc: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
1012: END IF;
1013: IF (fnd_attached_doc_csr%ISOPEN) THEN

Line 1050: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1046: -- PROCEDURE Version_Attachments
1047: ---------------------------------------------------------------------------
1048: PROCEDURE Version_Attachments(
1049: p_api_version IN NUMBER,
1050: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1051: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1052: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1053:
1054: x_return_status OUT NOCOPY VARCHAR2,

Line 1051: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1047: ---------------------------------------------------------------------------
1048: PROCEDURE Version_Attachments(
1049: p_api_version IN NUMBER,
1050: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1051: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1052: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1053:
1054: x_return_status OUT NOCOPY VARCHAR2,
1055: x_msg_count OUT NOCOPY NUMBER,

Line 1052: p_commit IN VARCHAR2 := FND_API.G_FALSE,

1048: PROCEDURE Version_Attachments(
1049: p_api_version IN NUMBER,
1050: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1051: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1052: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1053:
1054: x_return_status OUT NOCOPY VARCHAR2,
1055: x_msg_count OUT NOCOPY NUMBER,
1056: x_msg_data OUT NOCOPY VARCHAR2,

Line 1063: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

1059: p_business_document_id IN NUMBER,
1060: p_business_document_version IN NUMBER,
1061: p_include_gen_attach IN VARCHAR2 DEFAULT 'Y'
1062: ) IS l_api_name CONSTANT VARCHAR2(30) := 'Version_Attachments';
1063: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1064:
1065: l_msg_count NUMBER;
1066: l_msg_data FND_NEW_MESSAGES.MESSAGE_TEXT%TYPE;
1067: l_api_version NUMBER := 1;

Line 1123: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

1119:
1120: -- Standard Start of API savepoint
1121: SAVEPOINT Version_Attachments_GRP;
1122: -- Standard call to check for call compatibility.
1123: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1124: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1125: END IF;
1126: -- Initialize message list if p_init_msg_list is set to TRUE.
1127: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 1124: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1120: -- Standard Start of API savepoint
1121: SAVEPOINT Version_Attachments_GRP;
1122: -- Standard call to check for call compatibility.
1123: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1124: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1125: END IF;
1126: -- Initialize message list if p_init_msg_list is set to TRUE.
1127: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1128: FND_MSG_PUB.initialize;

Line 1127: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1123: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1124: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1125: END IF;
1126: -- Initialize message list if p_init_msg_list is set to TRUE.
1127: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1128: FND_MSG_PUB.initialize;
1129: END IF;
1130:
1131: -- Initialize API return status to success

Line 1132: x_return_status := FND_API.G_RET_STS_SUCCESS;

1128: FND_MSG_PUB.initialize;
1129: END IF;
1130:
1131: -- Initialize API return status to success
1132: x_return_status := FND_API.G_RET_STS_SUCCESS;
1133:
1134: FOR attach_rec IN attach_csr(p_business_document_type, p_business_document_id,G_CURRENT_VERSION) LOOP
1135: l_non_ref_attachment_created := 'N';
1136: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 1157: p_init_msg_list => FND_API.G_FALSE,

1153: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2731: Inserting New Ref recpord');
1154: END IF;
1155: Insert_Contract_Doc (
1156: p_api_version => l_api_version,
1157: p_init_msg_list => FND_API.G_FALSE,
1158: p_business_document_type => attach_rec.business_document_type,
1159: p_business_document_id => attach_rec.business_document_id,
1160: p_business_document_version => p_business_document_version,
1161: p_attached_document_id => attach_rec.attached_document_id,

Line 1192: p_init_msg_list => FND_API.G_FALSE,

1188: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2732: Inserting New Non-Ref recpord');
1189: END IF;
1190: Insert_Contract_Doc (
1191: p_api_version => l_api_version,
1192: p_init_msg_list => FND_API.G_FALSE,
1193: p_business_document_type => attach_rec.business_document_type,
1194: p_business_document_id => attach_rec.business_document_id,
1195: p_business_document_version => p_business_document_version,
1196: p_attached_document_id => attach_rec.attached_document_id,

Line 1225: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1221:
1222: END IF; -- (attach_rec.effective_from_version = G_CURRENT_VERSION)
1223: -- Check for errors
1224: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
1225: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1226: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
1227: RAISE FND_API.G_EXC_ERROR;
1228: END IF;
1229:

Line 1227: RAISE FND_API.G_EXC_ERROR;

1223: -- Check for errors
1224: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
1225: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1226: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
1227: RAISE FND_API.G_EXC_ERROR;
1228: END IF;
1229:
1230: -- Set the value of parent_attached_doc_id column of new current version attachments
1231: IF (l_non_ref_attachment_created = 'Y') THEN

Line 1273: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1269: x_msg_count => l_msg_count,
1270: x_return_status => l_return_status);
1271: -- Check for errors
1272: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
1273: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1274: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
1275: RAISE FND_API.G_EXC_ERROR;
1276: END IF;
1277: ELSE

Line 1275: RAISE FND_API.G_EXC_ERROR;

1271: -- Check for errors
1272: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
1273: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1274: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
1275: RAISE FND_API.G_EXC_ERROR;
1276: END IF;
1277: ELSE
1278: -- Delete the current generated record.
1279: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 1317: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1313: p_object_version_number => attach_rec.object_version_number
1314: );
1315: -- Check for errors
1316: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
1317: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1318: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
1319: RAISE FND_API.G_EXC_ERROR;
1320: END IF;
1321: END IF; -- NOT (p_include_gen_attach = 'N' AND attach_rec.generated_flag = 'Y')

Line 1319: RAISE FND_API.G_EXC_ERROR;

1315: -- Check for errors
1316: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
1317: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1318: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
1319: RAISE FND_API.G_EXC_ERROR;
1320: END IF;
1321: END IF; -- NOT (p_include_gen_attach = 'N' AND attach_rec.generated_flag = 'Y')
1322: END LOOP;
1323:

Line 1366: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1362: p_object_version_number => ref_del_rec.object_version_number
1363: );
1364: -- Check for errors
1365: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
1366: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1367: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
1368: RAISE FND_API.G_EXC_ERROR;
1369: END IF;
1370: END LOOP;

Line 1368: RAISE FND_API.G_EXC_ERROR;

1364: -- Check for errors
1365: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
1366: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1367: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
1368: RAISE FND_API.G_EXC_ERROR;
1369: END IF;
1370: END LOOP;
1371:
1372: -- Standard check of p_commit

Line 1373: IF FND_API.To_Boolean( p_commit ) THEN

1369: END IF;
1370: END LOOP;
1371:
1372: -- Standard check of p_commit
1373: IF FND_API.To_Boolean( p_commit ) THEN
1374: COMMIT WORK;
1375: END IF;
1376: -- Standard call to get message count and if count is 1, get message info.
1377: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );

Line 1384: WHEN FND_API.G_EXC_ERROR THEN

1380: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2800: Leaving Version_Attachments');
1381: END IF;
1382:
1383: EXCEPTION
1384: WHEN FND_API.G_EXC_ERROR THEN
1385: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1386: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2900: Leaving Version_Attachments: OKC_API.G_EXCEPTION_ERROR Exception');
1387: END IF;
1388: IF (datatype_csr%ISOPEN) THEN

Line 1395: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1391: ROLLBACK TO Version_Attachments_GRP;
1392: x_return_status := G_RET_STS_ERROR ;
1393: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
1394:
1395: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1396: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1397: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3000: Leaving Version_Attachments: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
1398: END IF;
1399: IF (datatype_csr%ISOPEN) THEN

Line 1435: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1431: -- PROCEDURE Delete_Ver_Attachments
1432: ---------------------------------------------------------------------------
1433: PROCEDURE Delete_Ver_Attachments(
1434: p_api_version IN NUMBER,
1435: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1436: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1437: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1438:
1439: x_return_status OUT NOCOPY VARCHAR2,

Line 1436: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1432: ---------------------------------------------------------------------------
1433: PROCEDURE Delete_Ver_Attachments(
1434: p_api_version IN NUMBER,
1435: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1436: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1437: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1438:
1439: x_return_status OUT NOCOPY VARCHAR2,
1440: x_msg_count OUT NOCOPY NUMBER,

Line 1437: p_commit IN VARCHAR2 := FND_API.G_FALSE,

1433: PROCEDURE Delete_Ver_Attachments(
1434: p_api_version IN NUMBER,
1435: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1436: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1437: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1438:
1439: x_return_status OUT NOCOPY VARCHAR2,
1440: x_msg_count OUT NOCOPY NUMBER,
1441: x_msg_data OUT NOCOPY VARCHAR2,

Line 1449: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

1445: p_business_document_version IN NUMBER
1446:
1447: ) IS
1448: l_api_name CONSTANT VARCHAR2(30) := 'Delete_Ver_Attachments';
1449: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1450: l_msg_count NUMBER;
1451: l_msg_data FND_NEW_MESSAGES.MESSAGE_TEXT%TYPE;
1452: l_api_version NUMBER := 1;
1453:

Line 1478: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

1474: -- Standard Start of API savepoint
1475: SAVEPOINT Delete_Ver_Attachments_GRP;
1476:
1477: -- Standard call to check for call compatibility.
1478: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1479: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1480: END IF;
1481: -- Initialize message list if p_init_msg_list is set to TRUE.
1482: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 1479: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1475: SAVEPOINT Delete_Ver_Attachments_GRP;
1476:
1477: -- Standard call to check for call compatibility.
1478: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1479: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1480: END IF;
1481: -- Initialize message list if p_init_msg_list is set to TRUE.
1482: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1483: FND_MSG_PUB.initialize;

Line 1482: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1478: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1479: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1480: END IF;
1481: -- Initialize message list if p_init_msg_list is set to TRUE.
1482: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1483: FND_MSG_PUB.initialize;
1484: END IF;
1485:
1486: -- Initialize API return status to success

Line 1487: x_return_status := FND_API.G_RET_STS_SUCCESS;

1483: FND_MSG_PUB.initialize;
1484: END IF;
1485:
1486: -- Initialize API return status to success
1487: x_return_status := FND_API.G_RET_STS_SUCCESS;
1488:
1489: FOR attach_rec IN attach_csr(p_business_document_type, p_business_document_id,
1490: p_business_document_version) LOOP
1491: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 1514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1510: x_return_status => l_return_status);
1511:
1512: -- Check for errors
1513: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
1514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1515: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
1516: RAISE FND_API.G_EXC_ERROR;
1517: END IF;
1518: END LOOP;

Line 1516: RAISE FND_API.G_EXC_ERROR;

1512: -- Check for errors
1513: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
1514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1515: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
1516: RAISE FND_API.G_EXC_ERROR;
1517: END IF;
1518: END LOOP;
1519:
1520: -- Standard check of p_commit

Line 1521: IF FND_API.To_Boolean( p_commit ) THEN

1517: END IF;
1518: END LOOP;
1519:
1520: -- Standard check of p_commit
1521: IF FND_API.To_Boolean( p_commit ) THEN
1522: COMMIT WORK;
1523: END IF;
1524: -- Standard call to get message count and if count is 1, get message info.
1525: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );

Line 1532: WHEN FND_API.G_EXC_ERROR THEN

1528: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3300: Leaving Delete_Ver_Attachments');
1529: END IF;
1530:
1531: EXCEPTION
1532: WHEN FND_API.G_EXC_ERROR THEN
1533: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1534: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3400: Leaving Delete_Ver_Attachments: OKC_API.G_EXCEPTION_ERROR Exception');
1535: END IF;
1536: ROLLBACK TO Delete_Ver_Attachments_GRP;

Line 1540: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1536: ROLLBACK TO Delete_Ver_Attachments_GRP;
1537: x_return_status := G_RET_STS_ERROR ;
1538: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
1539:
1540: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1541: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1542: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3500: Leaving Delete_Ver_Attachments: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
1543: END IF;
1544: ROLLBACK TO Delete_Ver_Attachments_GRP;

Line 1572: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1568: -- PROCEDURE Delete_Doc_Attachments
1569: ---------------------------------------------------------------------------
1570: PROCEDURE Delete_Doc_Attachments(
1571: p_api_version IN NUMBER,
1572: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1573: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1574: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1575:
1576: x_return_status OUT NOCOPY VARCHAR2,

Line 1573: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1569: ---------------------------------------------------------------------------
1570: PROCEDURE Delete_Doc_Attachments(
1571: p_api_version IN NUMBER,
1572: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1573: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1574: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1575:
1576: x_return_status OUT NOCOPY VARCHAR2,
1577: x_msg_count OUT NOCOPY NUMBER,

Line 1574: p_commit IN VARCHAR2 := FND_API.G_FALSE,

1570: PROCEDURE Delete_Doc_Attachments(
1571: p_api_version IN NUMBER,
1572: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1573: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1574: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1575:
1576: x_return_status OUT NOCOPY VARCHAR2,
1577: x_msg_count OUT NOCOPY NUMBER,
1578: x_msg_data OUT NOCOPY VARCHAR2,

Line 1585: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

1581: p_business_document_id IN NUMBER
1582:
1583: ) IS
1584: l_api_name CONSTANT VARCHAR2(30) := 'Delete_Doc_Attachments';
1585: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1586: l_msg_count NUMBER;
1587: l_msg_data FND_NEW_MESSAGES.MESSAGE_TEXT%TYPE;
1588: l_api_version NUMBER := 1;
1589:

Line 1612: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

1608:
1609: -- Standard Start of API savepoint
1610: SAVEPOINT Delete_Doc_Attachments_GRP;
1611: -- Standard call to check for call compatibility.
1612: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1613: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1614: END IF;
1615: -- Initialize message list if p_init_msg_list is set to TRUE.
1616: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 1613: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1609: -- Standard Start of API savepoint
1610: SAVEPOINT Delete_Doc_Attachments_GRP;
1611: -- Standard call to check for call compatibility.
1612: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1613: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1614: END IF;
1615: -- Initialize message list if p_init_msg_list is set to TRUE.
1616: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1617: FND_MSG_PUB.initialize;

Line 1616: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1612: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1613: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1614: END IF;
1615: -- Initialize message list if p_init_msg_list is set to TRUE.
1616: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1617: FND_MSG_PUB.initialize;
1618: END IF;
1619:
1620: -- Initialize API return status to success

Line 1621: x_return_status := FND_API.G_RET_STS_SUCCESS;

1617: FND_MSG_PUB.initialize;
1618: END IF;
1619:
1620: -- Initialize API return status to success
1621: x_return_status := FND_API.G_RET_STS_SUCCESS;
1622:
1623:
1624:
1625: -- Call delete version attachments for -99

Line 1630: p_commit => FND_API.G_FALSE,

1626: Delete_Ver_Attachments (
1627: p_api_version => l_api_version,
1628: p_init_msg_list => p_init_msg_list,
1629: p_validation_level => p_validation_level,
1630: p_commit => FND_API.G_FALSE,
1631:
1632: p_business_document_type => p_business_document_type,
1633: p_business_document_id => p_business_document_id,
1634: p_business_document_version => -99,

Line 1642: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1638: x_return_status => l_return_status);
1639:
1640: -- Check for errors
1641: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
1642: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1643: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
1644: RAISE FND_API.G_EXC_ERROR;
1645: END IF;
1646:

Line 1644: RAISE FND_API.G_EXC_ERROR;

1640: -- Check for errors
1641: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
1642: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1643: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
1644: RAISE FND_API.G_EXC_ERROR;
1645: END IF;
1646:
1647: FOR attach_rec IN attach_csr(p_business_document_type, p_business_document_id) LOOP
1648:

Line 1654: p_commit => FND_API.G_FALSE,

1650: Delete_Ver_Attachments (
1651: p_api_version => l_api_version,
1652: p_init_msg_list => p_init_msg_list,
1653: p_validation_level => p_validation_level,
1654: p_commit => FND_API.G_FALSE,
1655:
1656: p_business_document_type => p_business_document_type,
1657: p_business_document_id => p_business_document_id,
1658: p_business_document_version => attach_rec.business_document_version,

Line 1666: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1662: x_return_status => l_return_status);
1663:
1664: -- Check for errors
1665: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
1666: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1667: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
1668: RAISE FND_API.G_EXC_ERROR;
1669: END IF;
1670: END LOOP;

Line 1668: RAISE FND_API.G_EXC_ERROR;

1664: -- Check for errors
1665: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
1666: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1667: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
1668: RAISE FND_API.G_EXC_ERROR;
1669: END IF;
1670: END LOOP;
1671:
1672: -- Standard check of p_commit

Line 1673: IF FND_API.To_Boolean( p_commit ) THEN

1669: END IF;
1670: END LOOP;
1671:
1672: -- Standard check of p_commit
1673: IF FND_API.To_Boolean( p_commit ) THEN
1674: COMMIT WORK;
1675: END IF;
1676: -- Standard call to get message count and if count is 1, get message info.
1677: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );

Line 1684: WHEN FND_API.G_EXC_ERROR THEN

1680: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'3900: Leaving Delete_Doc_Attachments');
1681: END IF;
1682:
1683: EXCEPTION
1684: WHEN FND_API.G_EXC_ERROR THEN
1685: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1686: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4000: Leaving Delete_Doc_Attachments: OKC_API.G_EXCEPTION_ERROR Exception');
1687: END IF;
1688: ROLLBACK TO Delete_Doc_Attachments_GRP;

Line 1692: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1688: ROLLBACK TO Delete_Doc_Attachments_GRP;
1689: x_return_status := G_RET_STS_ERROR ;
1690: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
1691:
1692: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1693: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1694: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4100: Leaving Delete_Doc_Attachments: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
1695: END IF;
1696: ROLLBACK TO Delete_Doc_Attachments_GRP;

Line 1739: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1735: -- copy all categories
1736: ---------------------------------------------------------------------------
1737: PROCEDURE Copy_Attachment_Docs(
1738: p_api_version IN NUMBER,
1739: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1740: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1741:
1742: x_return_status OUT NOCOPY VARCHAR2,
1743: x_msg_count OUT NOCOPY NUMBER,

Line 1740: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1736: ---------------------------------------------------------------------------
1737: PROCEDURE Copy_Attachment_Docs(
1738: p_api_version IN NUMBER,
1739: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1740: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1741:
1742: x_return_status OUT NOCOPY VARCHAR2,
1743: x_msg_count OUT NOCOPY NUMBER,
1744: x_msg_data OUT NOCOPY VARCHAR2,

Line 1756: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

1752: p_copy_primary_doc_flag IN VARCHAR2 := 'N',
1753: p_copy_for_amendment IN VARCHAR2 := 'N'
1754:
1755: ) IS l_api_name CONSTANT VARCHAR2(30) := 'Copy_Attachment_Docs';
1756: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1757: l_datatype_id NUMBER;
1758: l_msg_count NUMBER;
1759: l_msg_data FND_NEW_MESSAGES.MESSAGE_TEXT%TYPE;
1760: l_api_version NUMBER := 1;

Line 1851: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

1847: '4808: p_copy_for_amendment: ' || p_copy_for_amendment);
1848: END IF;
1849:
1850: -- Standard call to check for call compatibility.
1851: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1852: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1853: END IF;
1854:
1855: -- Initialize API return status to success

Line 1852: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1848: END IF;
1849:
1850: -- Standard call to check for call compatibility.
1851: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1852: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1853: END IF;
1854:
1855: -- Initialize API return status to success
1856: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1856: x_return_status := FND_API.G_RET_STS_SUCCESS;

1852: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1853: END IF;
1854:
1855: -- Initialize API return status to success
1856: x_return_status := FND_API.G_RET_STS_SUCCESS;
1857: l_from_bus_doc_version_latest := p_from_bus_doc_version; --For bug 6468721
1858:
1859: IF (p_copy_for_amendment = 'Y') THEN -- Copy called for amendment. Need to copy all categories
1860:

Line 2052: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2048: x_business_document_version => l_business_document_version,
2049: x_attached_document_id => l_attached_document_id);
2050:
2051: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
2052: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2053: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
2054: RAISE FND_API.G_EXC_ERROR;
2055: END IF;
2056: END LOOP;

Line 2054: RAISE FND_API.G_EXC_ERROR;

2050:
2051: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
2052: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2053: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
2054: RAISE FND_API.G_EXC_ERROR;
2055: END IF;
2056: END LOOP;
2057:
2058: -- Standard call to get message count and if count is 1, get message info.

Line 2066: WHEN FND_API.G_EXC_ERROR THEN

2062: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4900: Leaving Copy_Attachment_Docs');
2063: END IF;
2064:
2065: EXCEPTION
2066: WHEN FND_API.G_EXC_ERROR THEN
2067: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2068: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4840: Leaving Copy_Attachment_Docs: OKC_API.G_EXCEPTION_ERROR Exception');
2069: END IF;
2070:

Line 2079: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2075:
2076: x_return_status := G_RET_STS_ERROR ;
2077: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
2078:
2079: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2080: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2081: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4841: Leaving Copy_Attachment_Docs: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
2082: END IF;
2083:

Line 2129: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

2125: -- copy all categories
2126: ---------------------------------------------------------------------------
2127: PROCEDURE Copy_Attachment_Refs(
2128: p_api_version IN NUMBER,
2129: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2130: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2131: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2132:
2133: x_return_status OUT NOCOPY VARCHAR2,

Line 2130: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

2126: ---------------------------------------------------------------------------
2127: PROCEDURE Copy_Attachment_Refs(
2128: p_api_version IN NUMBER,
2129: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2130: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2131: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2132:
2133: x_return_status OUT NOCOPY VARCHAR2,
2134: x_msg_count OUT NOCOPY NUMBER,

Line 2131: p_commit IN VARCHAR2 := FND_API.G_FALSE,

2127: PROCEDURE Copy_Attachment_Refs(
2128: p_api_version IN NUMBER,
2129: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2130: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2131: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2132:
2133: x_return_status OUT NOCOPY VARCHAR2,
2134: x_msg_count OUT NOCOPY NUMBER,
2135: x_msg_data OUT NOCOPY VARCHAR2,

Line 2148: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

2144: p_copy_for_amendment IN VARCHAR2 := 'N'
2145:
2146: ) IS l_api_name CONSTANT VARCHAR2(30) := 'Copy_Attachment_Refs';
2147:
2148: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2149: l_datatype_id NUMBER;
2150: l_msg_count NUMBER;
2151: l_msg_data FND_NEW_MESSAGES.MESSAGE_TEXT%TYPE;
2152: l_api_version NUMBER := 1;

Line 2201: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

2197: '5008: p_copy_for_amendment: ' || p_copy_for_amendment);
2198: END IF;
2199:
2200: -- Standard call to check for call compatibility.
2201: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2202: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2203: END IF;
2204:
2205: -- Initialize API return status to success

Line 2202: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2198: END IF;
2199:
2200: -- Standard call to check for call compatibility.
2201: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2202: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2203: END IF;
2204:
2205: -- Initialize API return status to success
2206: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 2206: x_return_status := FND_API.G_RET_STS_SUCCESS;

2202: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2203: END IF;
2204:
2205: -- Initialize API return status to success
2206: x_return_status := FND_API.G_RET_STS_SUCCESS;
2207:
2208:
2209: -- Loop through the existing attachments to create new attachments
2210: FOR attach_rec IN attach_csr(p_from_bus_doc_type, p_from_bus_doc_id,

Line 2282: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2278: END IF; -- ((p_copy_for_amendment = 'Y') ......
2279: CLOSE category_csr;
2280: -- Check for errors
2281: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
2282: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2283: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
2284: RAISE FND_API.G_EXC_ERROR;
2285: END IF;
2286: END LOOP;

Line 2284: RAISE FND_API.G_EXC_ERROR;

2280: -- Check for errors
2281: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
2282: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2283: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
2284: RAISE FND_API.G_EXC_ERROR;
2285: END IF;
2286: END LOOP;
2287:
2288:

Line 2296: WHEN FND_API.G_EXC_ERROR THEN

2292: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'5100: Leaving Copy_Attachment_Refs');
2293: END IF;
2294:
2295: EXCEPTION
2296: WHEN FND_API.G_EXC_ERROR THEN
2297: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2298: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'5081: Leaving Copy_Attachment_Refs: OKC_API.G_EXCEPTION_ERROR Exception');
2299: END IF;
2300: IF (category_csr%ISOPEN) THEN

Line 2306: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2302: END IF;
2303: x_return_status := G_RET_STS_ERROR ;
2304: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
2305:
2306: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2307: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2308: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'5082: Leaving Copy_Attachment_Refs: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
2309: END IF;
2310: IF (category_csr%ISOPEN) THEN

Line 2353: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

2349: -- copy all categories
2350: ---------------------------------------------------------------------------
2351: PROCEDURE Copy_Attachments(
2352: p_api_version IN NUMBER,
2353: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2354: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2355: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2356:
2357: x_return_status OUT NOCOPY VARCHAR2,

Line 2354: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

2350: ---------------------------------------------------------------------------
2351: PROCEDURE Copy_Attachments(
2352: p_api_version IN NUMBER,
2353: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2354: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2355: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2356:
2357: x_return_status OUT NOCOPY VARCHAR2,
2358: x_msg_count OUT NOCOPY NUMBER,

Line 2355: p_commit IN VARCHAR2 := FND_API.G_FALSE,

2351: PROCEDURE Copy_Attachments(
2352: p_api_version IN NUMBER,
2353: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2354: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2355: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2356:
2357: x_return_status OUT NOCOPY VARCHAR2,
2358: x_msg_count OUT NOCOPY NUMBER,
2359: x_msg_data OUT NOCOPY VARCHAR2,

Line 2373: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

2369: p_copy_for_amendment IN VARCHAR2
2370:
2371: ) IS
2372: l_api_name CONSTANT VARCHAR2(30) := 'Copy_Attachments';
2373: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2374: l_datatype_id FND_DOCUMENTS.DATATYPE_ID%TYPE;
2375: l_msg_count NUMBER;
2376: l_msg_data FND_NEW_MESSAGES.MESSAGE_TEXT%TYPE;
2377: l_api_version NUMBER:= 1;

Line 2407: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

2403:
2404: -- Standard Start of API savepoint
2405: SAVEPOINT Copy_Attachments_GRP;
2406: -- Standard call to check for call compatibility.
2407: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2408: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2409: END IF;
2410: -- Initialize message list if p_init_msg_list is set to TRUE.
2411: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 2408: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2404: -- Standard Start of API savepoint
2405: SAVEPOINT Copy_Attachments_GRP;
2406: -- Standard call to check for call compatibility.
2407: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2408: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2409: END IF;
2410: -- Initialize message list if p_init_msg_list is set to TRUE.
2411: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2412: FND_MSG_PUB.initialize;

Line 2411: IF FND_API.to_Boolean( p_init_msg_list ) THEN

2407: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2408: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2409: END IF;
2410: -- Initialize message list if p_init_msg_list is set to TRUE.
2411: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2412: FND_MSG_PUB.initialize;
2413: END IF;
2414:
2415: -- Initialize API return status to success

Line 2416: x_return_status := FND_API.G_RET_STS_SUCCESS;

2412: FND_MSG_PUB.initialize;
2413: END IF;
2414:
2415: -- Initialize API return status to success
2416: x_return_status := FND_API.G_RET_STS_SUCCESS;
2417:
2418: IF (p_copy_by_ref = 'Y') THEN
2419: Copy_Attachment_Refs(
2420: p_api_version => l_api_version,

Line 2460: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2456:
2457:
2458: -- Check for errors
2459: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
2460: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2461: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
2462: RAISE FND_API.G_EXC_ERROR;
2463: END IF;
2464:

Line 2462: RAISE FND_API.G_EXC_ERROR;

2458: -- Check for errors
2459: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
2460: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2461: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
2462: RAISE FND_API.G_EXC_ERROR;
2463: END IF;
2464:
2465: -- Standard check of p_commit
2466: IF FND_API.To_Boolean( p_commit ) THEN

Line 2466: IF FND_API.To_Boolean( p_commit ) THEN

2462: RAISE FND_API.G_EXC_ERROR;
2463: END IF;
2464:
2465: -- Standard check of p_commit
2466: IF FND_API.To_Boolean( p_commit ) THEN
2467: COMMIT WORK;
2468: END IF;
2469: -- Standard call to get message count and if count is 1, get message info.
2470: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );

Line 2476: WHEN FND_API.G_EXC_ERROR THEN

2472: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4400: Leaving Copy_Attachments');
2473: END IF;
2474:
2475: EXCEPTION
2476: WHEN FND_API.G_EXC_ERROR THEN
2477: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2478: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4500: Leaving Copy_Attachments: OKC_API.G_EXCEPTION_ERROR Exception');
2479: END IF;
2480: ROLLBACK TO Copy_Attachments_GRP;

Line 2484: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2480: ROLLBACK TO Copy_Attachments_GRP;
2481: x_return_status := G_RET_STS_ERROR ;
2482: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
2483:
2484: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2485: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2486: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4600: Leaving Copy_Attachments: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
2487: END IF;
2488: ROLLBACK TO Copy_Attachments_GRP;

Line 2520: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

2516:
2517: ) IS
2518:
2519: l_api_name CONSTANT VARCHAR2(30) := 'qa_doc';
2520: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2521: l_msg_count NUMBER;
2522: l_msg_data FND_NEW_MESSAGES.MESSAGE_TEXT%TYPE;
2523: l_api_version NUMBER:= 1;
2524: l_qa_name FND_LOOKUPS.MEANING%TYPE;

Line 2547: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

2543: END IF;
2544:
2545: x_return_status := G_RET_STS_SUCCESS;
2546: x_qa_return_status := G_QA_STS_SUCCESS;
2547: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2548: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2549: END IF;
2550:
2551: OPEN l_get_qa_detail_csr;

Line 2548: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2544:
2545: x_return_status := G_RET_STS_SUCCESS;
2546: x_qa_return_status := G_QA_STS_SUCCESS;
2547: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2548: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2549: END IF;
2550:
2551: OPEN l_get_qa_detail_csr;
2552: FETCH l_get_qa_detail_csr INTO l_qa_name,l_severity_flag,l_perform_qa;

Line 2588: WHEN FND_API.G_EXC_ERROR THEN

2584: END IF;
2585: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2586:
2587: EXCEPTION
2588: WHEN FND_API.G_EXC_ERROR THEN
2589: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2590: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2400: Leaving QA_Doc : OKC_API.G_EXCEPTION_ERROR Exception');
2591: END IF;
2592: IF (l_get_qa_detail_csr%ISOPEN) THEN

Line 2599: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2595: ROLLBACK TO g_QA_Doc;
2596: x_return_status := G_RET_STS_ERROR ;
2597: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2598:
2599: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2600: ROLLBACK TO g_QA_Doc;
2601: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2602: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2500: Leaving QA_Doc : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
2603: END IF;