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.

[Home] [Help]

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 1368: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

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

Line 1370: RAISE FND_API.G_EXC_ERROR;

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

Line 1375: IF FND_API.To_Boolean( p_commit ) THEN

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

Line 1386: WHEN FND_API.G_EXC_ERROR THEN

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

Line 1397: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

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

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

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

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

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

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

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

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

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

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

Line 1481: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

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

Line 1484: IF FND_API.to_Boolean( p_init_msg_list ) THEN

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

Line 1489: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

Line 1516: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

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

Line 1518: RAISE FND_API.G_EXC_ERROR;

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

Line 1523: IF FND_API.To_Boolean( p_commit ) THEN

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

Line 1534: WHEN FND_API.G_EXC_ERROR THEN

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

Line 1542: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

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

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

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

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

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

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

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

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

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

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

Line 1615: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

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

Line 1618: IF FND_API.to_Boolean( p_init_msg_list ) THEN

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

Line 1623: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

Line 1632: p_commit => FND_API.G_FALSE,

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

Line 1644: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

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

Line 1646: RAISE FND_API.G_EXC_ERROR;

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

Line 1656: p_commit => FND_API.G_FALSE,

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

Line 1668: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

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

Line 1670: RAISE FND_API.G_EXC_ERROR;

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

Line 1675: IF FND_API.To_Boolean( p_commit ) THEN

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

Line 1686: WHEN FND_API.G_EXC_ERROR THEN

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

Line 1694: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

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

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

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

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

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

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

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

1858: '4808: p_copy_for_amendment: ' || p_copy_for_amendment);
1859: END IF;
1860:
1861: -- Standard call to check for call compatibility.
1862: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1863: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1864: END IF;
1865:
1866: -- Initialize API return status to success

Line 1863: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1859: END IF;
1860:
1861: -- Standard call to check for call compatibility.
1862: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1863: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1864: END IF;
1865:
1866: -- Initialize API return status to success
1867: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1867: x_return_status := FND_API.G_RET_STS_SUCCESS;

1863: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1864: END IF;
1865:
1866: -- Initialize API return status to success
1867: x_return_status := FND_API.G_RET_STS_SUCCESS;
1868: l_from_bus_doc_version_latest := p_from_bus_doc_version; --For bug 6468721
1869:
1870: IF (p_copy_for_amendment = 'Y') THEN -- Copy called for amendment. Need to copy all categories
1871:

Line 2063: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2059: x_business_document_version => l_business_document_version,
2060: x_attached_document_id => l_attached_document_id);
2061:
2062: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
2063: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2064: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
2065: RAISE FND_API.G_EXC_ERROR;
2066: END IF;
2067: END LOOP;

Line 2065: RAISE FND_API.G_EXC_ERROR;

2061:
2062: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
2063: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2064: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
2065: RAISE FND_API.G_EXC_ERROR;
2066: END IF;
2067: END LOOP;
2068:
2069: -- Standard call to get message count and if count is 1, get message info.

Line 2077: WHEN FND_API.G_EXC_ERROR THEN

2073: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4900: Leaving Copy_Attachment_Docs');
2074: END IF;
2075:
2076: EXCEPTION
2077: WHEN FND_API.G_EXC_ERROR THEN
2078: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2079: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4840: Leaving Copy_Attachment_Docs: OKC_API.G_EXCEPTION_ERROR Exception');
2080: END IF;
2081:

Line 2090: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2086:
2087: x_return_status := G_RET_STS_ERROR ;
2088: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
2089:
2090: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2091: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2092: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4841: Leaving Copy_Attachment_Docs: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
2093: END IF;
2094:

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

2136: -- copy all categories
2137: ---------------------------------------------------------------------------
2138: PROCEDURE Copy_Attachment_Refs(
2139: p_api_version IN NUMBER,
2140: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2141: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2142: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2143:
2144: x_return_status OUT NOCOPY VARCHAR2,

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

2137: ---------------------------------------------------------------------------
2138: PROCEDURE Copy_Attachment_Refs(
2139: p_api_version IN NUMBER,
2140: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2141: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2142: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2143:
2144: x_return_status OUT NOCOPY VARCHAR2,
2145: x_msg_count OUT NOCOPY NUMBER,

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

2138: PROCEDURE Copy_Attachment_Refs(
2139: p_api_version IN NUMBER,
2140: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2141: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2142: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2143:
2144: x_return_status OUT NOCOPY VARCHAR2,
2145: x_msg_count OUT NOCOPY NUMBER,
2146: x_msg_data OUT NOCOPY VARCHAR2,

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

2155: p_copy_for_amendment IN VARCHAR2 := 'N'
2156:
2157: ) IS l_api_name CONSTANT VARCHAR2(30) := 'Copy_Attachment_Refs';
2158:
2159: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2160: l_datatype_id NUMBER;
2161: l_msg_count NUMBER;
2162: l_msg_data FND_NEW_MESSAGES.MESSAGE_TEXT%TYPE;
2163: l_api_version NUMBER := 1;

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

2208: '5008: p_copy_for_amendment: ' || p_copy_for_amendment);
2209: END IF;
2210:
2211: -- Standard call to check for call compatibility.
2212: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2213: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2214: END IF;
2215:
2216: -- Initialize API return status to success

Line 2213: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2209: END IF;
2210:
2211: -- Standard call to check for call compatibility.
2212: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2213: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2214: END IF;
2215:
2216: -- Initialize API return status to success
2217: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 2217: x_return_status := FND_API.G_RET_STS_SUCCESS;

2213: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2214: END IF;
2215:
2216: -- Initialize API return status to success
2217: x_return_status := FND_API.G_RET_STS_SUCCESS;
2218:
2219:
2220: -- Loop through the existing attachments to create new attachments
2221: FOR attach_rec IN attach_csr(p_from_bus_doc_type, p_from_bus_doc_id,

Line 2293: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2289: END IF; -- ((p_copy_for_amendment = 'Y') ......
2290: CLOSE category_csr;
2291: -- Check for errors
2292: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
2293: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2294: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
2295: RAISE FND_API.G_EXC_ERROR;
2296: END IF;
2297: END LOOP;

Line 2295: RAISE FND_API.G_EXC_ERROR;

2291: -- Check for errors
2292: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
2293: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2294: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
2295: RAISE FND_API.G_EXC_ERROR;
2296: END IF;
2297: END LOOP;
2298:
2299:

Line 2307: WHEN FND_API.G_EXC_ERROR THEN

2303: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'5100: Leaving Copy_Attachment_Refs');
2304: END IF;
2305:
2306: EXCEPTION
2307: WHEN FND_API.G_EXC_ERROR THEN
2308: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2309: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'5081: Leaving Copy_Attachment_Refs: OKC_API.G_EXCEPTION_ERROR Exception');
2310: END IF;
2311: IF (category_csr%ISOPEN) THEN

Line 2317: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2313: END IF;
2314: x_return_status := G_RET_STS_ERROR ;
2315: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
2316:
2317: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2318: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2319: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'5082: Leaving Copy_Attachment_Refs: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
2320: END IF;
2321: IF (category_csr%ISOPEN) THEN

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

2360: -- copy all categories
2361: ---------------------------------------------------------------------------
2362: PROCEDURE Copy_Attachments(
2363: p_api_version IN NUMBER,
2364: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2365: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2366: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2367:
2368: x_return_status OUT NOCOPY VARCHAR2,

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

2361: ---------------------------------------------------------------------------
2362: PROCEDURE Copy_Attachments(
2363: p_api_version IN NUMBER,
2364: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2365: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2366: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2367:
2368: x_return_status OUT NOCOPY VARCHAR2,
2369: x_msg_count OUT NOCOPY NUMBER,

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

2362: PROCEDURE Copy_Attachments(
2363: p_api_version IN NUMBER,
2364: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2365: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2366: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2367:
2368: x_return_status OUT NOCOPY VARCHAR2,
2369: x_msg_count OUT NOCOPY NUMBER,
2370: x_msg_data OUT NOCOPY VARCHAR2,

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

2380: p_copy_for_amendment IN VARCHAR2
2381:
2382: ) IS
2383: l_api_name CONSTANT VARCHAR2(30) := 'Copy_Attachments';
2384: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2385: l_datatype_id FND_DOCUMENTS.DATATYPE_ID%TYPE;
2386: l_msg_count NUMBER;
2387: l_msg_data FND_NEW_MESSAGES.MESSAGE_TEXT%TYPE;
2388: l_api_version NUMBER:= 1;

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

2414:
2415: -- Standard Start of API savepoint
2416: SAVEPOINT Copy_Attachments_GRP;
2417: -- Standard call to check for call compatibility.
2418: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2419: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2420: END IF;
2421: -- Initialize message list if p_init_msg_list is set to TRUE.
2422: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 2419: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2415: -- Standard Start of API savepoint
2416: SAVEPOINT Copy_Attachments_GRP;
2417: -- Standard call to check for call compatibility.
2418: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2419: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2420: END IF;
2421: -- Initialize message list if p_init_msg_list is set to TRUE.
2422: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2423: FND_MSG_PUB.initialize;

Line 2422: IF FND_API.to_Boolean( p_init_msg_list ) THEN

2418: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2419: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2420: END IF;
2421: -- Initialize message list if p_init_msg_list is set to TRUE.
2422: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2423: FND_MSG_PUB.initialize;
2424: END IF;
2425:
2426: -- Initialize API return status to success

Line 2427: x_return_status := FND_API.G_RET_STS_SUCCESS;

2423: FND_MSG_PUB.initialize;
2424: END IF;
2425:
2426: -- Initialize API return status to success
2427: x_return_status := FND_API.G_RET_STS_SUCCESS;
2428:
2429: IF (p_copy_by_ref = 'Y') THEN
2430: Copy_Attachment_Refs(
2431: p_api_version => l_api_version,

Line 2471: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2467:
2468:
2469: -- Check for errors
2470: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
2471: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2472: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
2473: RAISE FND_API.G_EXC_ERROR;
2474: END IF;
2475:

Line 2473: RAISE FND_API.G_EXC_ERROR;

2469: -- Check for errors
2470: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
2471: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2472: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
2473: RAISE FND_API.G_EXC_ERROR;
2474: END IF;
2475:
2476: -- Standard check of p_commit
2477: IF FND_API.To_Boolean( p_commit ) THEN

Line 2477: IF FND_API.To_Boolean( p_commit ) THEN

2473: RAISE FND_API.G_EXC_ERROR;
2474: END IF;
2475:
2476: -- Standard check of p_commit
2477: IF FND_API.To_Boolean( p_commit ) THEN
2478: COMMIT WORK;
2479: END IF;
2480: -- Standard call to get message count and if count is 1, get message info.
2481: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );

Line 2487: WHEN FND_API.G_EXC_ERROR THEN

2483: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4400: Leaving Copy_Attachments');
2484: END IF;
2485:
2486: EXCEPTION
2487: WHEN FND_API.G_EXC_ERROR THEN
2488: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2489: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4500: Leaving Copy_Attachments: OKC_API.G_EXCEPTION_ERROR Exception');
2490: END IF;
2491: ROLLBACK TO Copy_Attachments_GRP;

Line 2495: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2491: ROLLBACK TO Copy_Attachments_GRP;
2492: x_return_status := G_RET_STS_ERROR ;
2493: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
2494:
2495: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2496: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2497: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'4600: Leaving Copy_Attachments: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
2498: END IF;
2499: ROLLBACK TO Copy_Attachments_GRP;

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

2527:
2528: ) IS
2529:
2530: l_api_name CONSTANT VARCHAR2(30) := 'qa_doc';
2531: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2532: l_msg_count NUMBER;
2533: l_msg_data FND_NEW_MESSAGES.MESSAGE_TEXT%TYPE;
2534: l_api_version NUMBER:= 1;
2535: l_qa_name FND_LOOKUPS.MEANING%TYPE;

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

2554: END IF;
2555:
2556: x_return_status := G_RET_STS_SUCCESS;
2557: x_qa_return_status := G_QA_STS_SUCCESS;
2558: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2559: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2560: END IF;
2561:
2562: OPEN l_get_qa_detail_csr;

Line 2559: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2555:
2556: x_return_status := G_RET_STS_SUCCESS;
2557: x_qa_return_status := G_QA_STS_SUCCESS;
2558: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
2559: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2560: END IF;
2561:
2562: OPEN l_get_qa_detail_csr;
2563: FETCH l_get_qa_detail_csr INTO l_qa_name,l_severity_flag,l_perform_qa;

Line 2599: WHEN FND_API.G_EXC_ERROR THEN

2595: END IF;
2596: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2597:
2598: EXCEPTION
2599: WHEN FND_API.G_EXC_ERROR THEN
2600: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2601: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2400: Leaving QA_Doc : OKC_API.G_EXCEPTION_ERROR Exception');
2602: END IF;
2603: IF (l_get_qa_detail_csr%ISOPEN) THEN

Line 2610: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2606: ROLLBACK TO g_QA_Doc;
2607: x_return_status := G_RET_STS_ERROR ;
2608: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2609:
2610: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2611: ROLLBACK TO g_QA_Doc;
2612: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2613: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'2500: Leaving QA_Doc : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
2614: END IF;