DBA Data[Home] [Help]

APPS.LNS_PARTICIPANTS_PUB dependencies on LNS_PARTICIPANTS_PUB

Line 1: PACKAGE BODY LNS_PARTICIPANTS_PUB AS

1: PACKAGE BODY LNS_PARTICIPANTS_PUB AS
2: /* $Header: LNS_PART_PUBP_B.pls 120.19.12010000.1 2008/07/29 09:12:19 appldev ship $ */
3: G_DEBUG_COUNT CONSTANT NUMBER := 0;
4: G_DEBUG CONSTANT BOOLEAN := FALSE;
5: G_PKG_NAME CONSTANT VARCHAR2(30) := 'LNS_PARTICIPANTS_PUB';

Line 5: G_PKG_NAME CONSTANT VARCHAR2(30) := 'LNS_PARTICIPANTS_PUB';

1: PACKAGE BODY LNS_PARTICIPANTS_PUB AS
2: /* $Header: LNS_PART_PUBP_B.pls 120.19.12010000.1 2008/07/29 09:12:19 appldev ship $ */
3: G_DEBUG_COUNT CONSTANT NUMBER := 0;
4: G_DEBUG CONSTANT BOOLEAN := FALSE;
5: G_PKG_NAME CONSTANT VARCHAR2(30) := 'LNS_PARTICIPANTS_PUB';
6:
7: --------------------------------------------------
8: -- Procedure for logging debug messages
9: --------------------------------------------------

Line 407: l_last_api_called := 'LNS_PARTICIPANTS_PUB.createParticipant';

403: if (l_init_msg_list is null) then
404: l_init_msg_list := FND_API.G_FALSE;
405: end if;
406:
407: l_last_api_called := 'LNS_PARTICIPANTS_PUB.createParticipant';
408: l_participant_id := p_loan_participant_rec.participant_id;
409: l_loan_id := p_loan_participant_rec.loan_id;
410: l_hz_party_id := p_loan_participant_rec.hz_party_id;
411: l_loan_participant_rec := p_loan_participant_rec;

Line 452: l_last_api_called := 'LNS_PARTICIPANTS_PUB.validateParticipant';

448:
449: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
450: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In createParticipant: Before call to validateParticipant');
451: END IF;
452: l_last_api_called := 'LNS_PARTICIPANTS_PUB.validateParticipant';
453: validateParticipant(p_loan_participant_rec => p_loan_participant_rec,
454: p_mode => 'CREATE',
455: x_return_status => l_return_status,
456: x_msg_count => l_msg_count,

Line 480: l_last_api_called := 'LNS_PARTICIPANTS_PUB.createCreditRequest';

476: END IF;
477:
478: if (l_loan_credit_review_flag = 'Y' and l_loan_status = 'INCOMPLETE' and (l_loan_sec_status is null OR l_loan_sec_status NOT IN ('IN_CREDIT_REVIEW','CREDIT_REVIEW_COMPLETE'))) then
479: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before calling createCreditRequest');
480: l_last_api_called := 'LNS_PARTICIPANTS_PUB.createCreditRequest';
481: createCreditRequest(p_loan_participant_rec => l_loan_participant_rec,
482: x_return_status => l_return_status,
483: x_msg_count => l_msg_count,
484: x_msg_data => l_msg_data);

Line 500: l_last_api_called := 'LNS_PARTICIPANTS_PUB.do_create_participant';

496: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'Begin do_create_participant procedure');
497: END IF;
498:
499: -- call to business logic.
500: l_last_api_called := 'LNS_PARTICIPANTS_PUB.do_create_participant';
501: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before calling do_create_participant');
502: do_create_participant(
503: l_loan_participant_rec,
504: x_participant_id,

Line 571: l_last_api_called := 'LNS_PARTICIPANTS_PUB.updateParticipant';

567: if (l_init_msg_list is null) then
568: l_init_msg_list := FND_API.G_FALSE;
569: end if;
570:
571: l_last_api_called := 'LNS_PARTICIPANTS_PUB.updateParticipant';
572: l_loan_participant_rec := p_loan_participant_rec;
573: savepoint updateParticipant;
574:
575: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN

Line 768: l_last_api_called := 'LNS_PARTICIPANTS_PUB.createAppealCreditRequest';

764:
765: BEGIN
766: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - BEGIN');
767:
768: l_last_api_called := 'LNS_PARTICIPANTS_PUB.createAppealCreditRequest';
769: -- Standard Start of API savepoint
770: SAVEPOINT createAppealCreditRequest;
771: x_return_status := FND_API.G_RET_STS_SUCCESS;
772: l_loan_id := p_loan_id;

Line 788: l_last_api_called := 'LNS_PARTICIPANTS_PUB.createCreditRequest';

784: return;
785: end if;
786:
787: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before calling ');
788: l_last_api_called := 'LNS_PARTICIPANTS_PUB.createCreditRequest';
789: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before calling '|| l_last_api_called);
790: createCreditRequest(p_loan_participant_rec => l_loan_participant_rec,
791: x_return_status => l_return_status,
792: x_msg_count => l_msg_count,

Line 806: l_last_api_called := 'LNS_PARTICIPANTS_PUB.updateParticipant';

802: --new credit request has not been submitted!
803: return;
804: end if;
805:
806: l_last_api_called := 'LNS_PARTICIPANTS_PUB.updateParticipant';
807: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - Before calling '|| l_last_api_called);
808: l_object_version := l_loan_participant_rec.object_version_number;
809: updateParticipant(p_init_msg_list => 'T',
810: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

Line 917: l_last_api_called := 'LNS_PARTICIPANTS_PUB.createCreditRequest';

913: BEGIN
914:
915: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - BEGIN');
916:
917: l_last_api_called := 'LNS_PARTICIPANTS_PUB.createCreditRequest';
918: l_participant_type := p_loan_participant_rec.LOAN_PARTICIPANT_TYPE;
919: l_loan_id := p_loan_participant_rec.loan_id;
920: l_credit_request_id := null;
921: l_review_type := p_loan_participant_rec.REVIEW_TYPE;

Line 1179: l_last_api_called := 'LNS_PARTICIPANTS_PUB.denormalizePrimaryInfo';

1175: WHERE LOAN_ID = pLoanId;
1176:
1177: BEGIN
1178: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - BEGIN');
1179: l_last_api_called := 'LNS_PARTICIPANTS_PUB.denormalizePrimaryInfo';
1180: l_participant_type := p_loan_participant_rec.LOAN_PARTICIPANT_TYPE;
1181: l_loan_id := p_loan_participant_rec.loan_id;
1182:
1183: -- Standard Start of API savepoint

Line 1410: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In LNS_PARTICIPANTS_PUB.CASE_FOLDER_UPDATE: Before calling update for lns_participants to update case_folder_id');

1406: return l_return_flag;
1407: end if;
1408:
1409: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1410: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In LNS_PARTICIPANTS_PUB.CASE_FOLDER_UPDATE: Before calling update for lns_participants to update case_folder_id');
1411: END IF;
1412:
1413: l_user_id := LNS_UTILITY_PUB.created_by;
1414: l_login_id := LNS_UTILITY_PUB.last_update_login;

Line 1429: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In LNS_PARTICIPANTS_PUB.CASE_FOLDER_UPDATE: After calling update for lns_participants to update case_folder_id');

1425: WHERE PARTICIPANT_ID = case_folder_rec.participant_id;
1426: END LOOP;
1427:
1428: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1429: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In LNS_PARTICIPANTS_PUB.CASE_FOLDER_UPDATE: After calling update for lns_participants to update case_folder_id');
1430: END IF;
1431:
1432: --Call to record history
1433: LNS_LOAN_HISTORY_PUB.log_record_pre(

Line 1440: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In LNS_PARTICIPANTS_PUB.CASE_FOLDER_UPDATE: Before calling update for lns_loan_headers_all to update new secondary status');

1436: p_table_name => 'LNS_LOAN_HEADERS_ALL'
1437: );
1438:
1439: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1440: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In LNS_PARTICIPANTS_PUB.CASE_FOLDER_UPDATE: Before calling update for lns_loan_headers_all to update new secondary status');
1441: END IF;
1442:
1443: UPDATE LNS_LOAN_HEADERS_ALL
1444: SET SECONDARY_STATUS = 'CREDIT_REVIEW_COMPLETE',

Line 1456: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In LNS_PARTICIPANTS_PUB.CASE_FOLDER_UPDATE: After calling update for lns_loan_headers_all to update new secondary status');

1452: FROM LNS_PARTICIPANTS
1453: WHERE loan_id = LNS_LOAN_HEADERS_ALL.loan_id and hz_party_id = LNS_LOAN_HEADERS_ALL.primary_borrower_id);
1454:
1455: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1456: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In LNS_PARTICIPANTS_PUB.CASE_FOLDER_UPDATE: After calling update for lns_loan_headers_all to update new secondary status');
1457: END IF;
1458:
1459: --Call to record history
1460: LNS_LOAN_HISTORY_PUB.log_record_post(

Line 1485: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In LNS_PARTICIPANTS_PUB.CASE_FOLDER_UPDATE: Unexpected ERROR in the function call. SQLERRM is: ' || SQLERRM);

1481: EXCEPTION
1482: WHEN OTHERS THEN
1483:
1484: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1485: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In LNS_PARTICIPANTS_PUB.CASE_FOLDER_UPDATE: Unexpected ERROR in the function call. SQLERRM is: ' || SQLERRM);
1486: END IF;
1487:
1488: return l_return_flag;
1489:

Line 1554: l_update_status_flag := LNS_PARTICIPANTS_PUB.CASE_FOLDER_UPDATE(l_loan_id);

1550: MO_GLOBAL.set_policy_context('S',l_org_id);
1551:
1552: IF (l_source_name = 'LNS') THEN
1553: l_loan_id := l_source_column1;
1554: l_update_status_flag := LNS_PARTICIPANTS_PUB.CASE_FOLDER_UPDATE(l_loan_id);
1555:
1556: if (l_update_status_flag NOT IN ('I', 'Y')) then
1557: l_wf_return_status := 'ERROR';
1558: end if;

Line 1673: END LNS_PARTICIPANTS_PUB;

1669: END getDefaultPrimaryContact;
1670:
1671:
1672:
1673: END LNS_PARTICIPANTS_PUB;