DBA Data[Home] [Help]

APPS.LNS_FEE_ASSIGNMENT_PUB dependencies on LNS_FEE_ASSIGNMENTS

Line 107: FROM LNS_FEE_ASSIGNMENTS

103: THEN
104: BEGIN
105: SELECT 'Y'
106: INTO l_dummy
107: FROM LNS_FEE_ASSIGNMENTS
108: WHERE fee_assignment_id = l_fee_assignment_id;
109:
110: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_DUPLICATE_COLUMN');
111: FND_MESSAGE.SET_TOKEN('COLUMN', 'fee_assignment_id');

Line 122: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In do_create_fee_assignment procedure: Before call to LNS_FEE_ASSIGNMENTS_PKG.Insert_Row');

118: END;
119: END IF;
120:
121: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
122: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In do_create_fee_assignment procedure: Before call to LNS_FEE_ASSIGNMENTS_PKG.Insert_Row');
123: END IF;
124:
125: -- call table-handler.
126: LNS_FEE_ASSIGNMENTS_PKG.Insert_Row (

Line 126: LNS_FEE_ASSIGNMENTS_PKG.Insert_Row (

122: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In do_create_fee_assignment procedure: Before call to LNS_FEE_ASSIGNMENTS_PKG.Insert_Row');
123: END IF;
124:
125: -- call table-handler.
126: LNS_FEE_ASSIGNMENTS_PKG.Insert_Row (
127: X_FEE_ASSIGNMENT_ID => p_fee_assignment_rec.fee_assignment_id,
128: P_OBJECT_VERSION_NUMBER => 1,
129: P_LOAN_ID => p_fee_assignment_rec.loan_id,
130: P_FEE_ID => p_fee_assignment_rec.fee_id,

Line 211: FROM LNS_FEE_ASSIGNMENTS

207: -- check whether record has been updated by another user. If not, lock it.
208: BEGIN
209: SELECT OBJECT_VERSION_NUMBER
210: INTO l_object_version_number
211: FROM LNS_FEE_ASSIGNMENTS
212: WHERE FEE_ASSIGNMENT_ID = p_fee_assignment_rec.fee_assignment_id
213: FOR UPDATE OF FEE_ASSIGNMENT_ID NOWAIT;
214:
215: IF NOT

Line 226: FND_MESSAGE.SET_TOKEN('TABLE', 'lns_fee_assignments');

222: )
223: )
224: THEN
225: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_RECORD_CHANGED');
226: FND_MESSAGE.SET_TOKEN('TABLE', 'lns_fee_assignments');
227: FND_MSG_PUB.ADD;
228: RAISE FND_API.G_EXC_ERROR;
229: END IF;
230:

Line 242: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In do_update_fee_assignment procedure: Before call to LNS_FEE_ASSIGNMENTS_PKG.Update_Row');

238: RAISE FND_API.G_EXC_ERROR;
239: END;
240:
241: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
242: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In do_update_fee_assignment procedure: Before call to LNS_FEE_ASSIGNMENTS_PKG.Update_Row');
243: END IF;
244:
245: -- log history
246: LNS_LOAN_HISTORY_PUB.log_record_pre(p_fee_assignment_rec.fee_assignment_id,

Line 248: 'LNS_FEE_ASSIGNMENTS');

244:
245: -- log history
246: LNS_LOAN_HISTORY_PUB.log_record_pre(p_fee_assignment_rec.fee_assignment_id,
247: 'FEE_ASSIGNMENT_ID',
248: 'LNS_FEE_ASSIGNMENTS');
249:
250: --Call to table-handler
251: LNS_FEE_ASSIGNMENTS_PKG.Update_Row (
252: P_FEE_ASSIGNMENT_ID => p_fee_assignment_rec.fee_assignment_id,

Line 251: LNS_FEE_ASSIGNMENTS_PKG.Update_Row (

247: 'FEE_ASSIGNMENT_ID',
248: 'LNS_FEE_ASSIGNMENTS');
249:
250: --Call to table-handler
251: LNS_FEE_ASSIGNMENTS_PKG.Update_Row (
252: P_FEE_ASSIGNMENT_ID => p_fee_assignment_rec.fee_assignment_id,
253: P_LOAN_ID => p_fee_assignment_rec.LOAN_ID,
254: P_FEE_ID => p_fee_assignment_rec.FEE_ID,
255: P_FEE => p_fee_assignment_rec.FEE,

Line 281: 'LNS_FEE_ASSIGNMENTS',

277:
278: -- log record changes
279: LNS_LOAN_HISTORY_PUB.log_record_post(p_fee_assignment_rec.fee_assignment_id,
280: 'FEE_ASSIGNMENT_ID',
281: 'LNS_FEE_ASSIGNMENTS',
282: p_fee_assignment_rec.loan_id);
283:
284: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
285: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In do_update_fee_assignment procedure: After call to LNS_FEE_ASSIGNMENTS_PKG.Update_Row');

Line 285: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In do_update_fee_assignment procedure: After call to LNS_FEE_ASSIGNMENTS_PKG.Update_Row');

281: 'LNS_FEE_ASSIGNMENTS',
282: p_fee_assignment_rec.loan_id);
283:
284: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
285: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In do_update_fee_assignment procedure: After call to LNS_FEE_ASSIGNMENTS_PKG.Update_Row');
286: END IF;
287:
288: END do_update_fee_assignment;
289:

Line 338: FROM LNS_FEE_ASSIGNMENTS

334: -- check whether record has been deleted by another user. If not, lock it.
335: BEGIN
336: SELECT loan_id, fee_id, object_version_number
337: INTO l_loan_id, l_fee_id, l_object_version_num
338: FROM LNS_FEE_ASSIGNMENTS
339: WHERE FEE_ASSIGNMENT_ID = p_fee_assignment_id;
340:
341: EXCEPTION
342: WHEN NO_DATA_FOUND THEN

Line 352: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In do_delete_fee_assignment procedure: Before call to LNS_FEE_ASSIGNMENTS_PKG.Delete_Row');

348: END;
349: END IF;
350:
351: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
352: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In do_delete_fee_assignment procedure: Before call to LNS_FEE_ASSIGNMENTS_PKG.Delete_Row');
353: END IF;
354:
355: -- log history
356: LNS_LOAN_HISTORY_PUB.log_record_pre(p_fee_assignment_id,

Line 358: 'LNS_FEE_ASSIGNMENTS');

354:
355: -- log history
356: LNS_LOAN_HISTORY_PUB.log_record_pre(p_fee_assignment_id,
357: 'FEE_ASSIGNMENT_ID',
358: 'LNS_FEE_ASSIGNMENTS');
359:
360: BEGIN
361:
362: -- Update the end date active before physically deleting the record

Line 365: UPDATE LNS_FEE_ASSIGNMENTS

361:
362: -- Update the end date active before physically deleting the record
363: -- to record it in history table
364:
365: UPDATE LNS_FEE_ASSIGNMENTS
366: SET END_DATE_ACTIVE = SYSDATE
367: WHERE LOAN_ID = l_loan_id
368: AND FEE_ASSIGNMENT_ID = p_fee_assignment_id;
369:

Line 374: 'LNS_FEE_ASSIGNMENTS',

370:
371: -- log record changes
372: LNS_LOAN_HISTORY_PUB.log_record_post(p_fee_assignment_id,
373: 'FEE_ASSIGNMENT_ID',
374: 'LNS_FEE_ASSIGNMENTS',
375: l_loan_id);
376:
377: LNS_FEE_ASSIGNMENTS_PKG.Delete_Row(
378: P_FEE_ASSIGNMENT_ID => p_fee_assignment_id);

Line 377: LNS_FEE_ASSIGNMENTS_PKG.Delete_Row(

373: 'FEE_ASSIGNMENT_ID',
374: 'LNS_FEE_ASSIGNMENTS',
375: l_loan_id);
376:
377: LNS_FEE_ASSIGNMENTS_PKG.Delete_Row(
378: P_FEE_ASSIGNMENT_ID => p_fee_assignment_id);
379:
380:
381: EXCEPTION

Line 393: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In do_delete_fee_assignment procedure: After call to LNS_FEE_ASSIGNMENTS_PKG.Delete_Row');

389:
390:
391:
392: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
393: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, 'In do_delete_fee_assignment procedure: After call to LNS_FEE_ASSIGNMENTS_PKG.Delete_Row');
394: END IF;
395:
396: END do_delete_fee_assignment;
397:

Line 776: WHERE EXISTS ( SELECT NULL FROM LNS_FEE_ASSIGNMENTS

772: ) RETURN VARCHAR2 IS
773:
774: CURSOR C_Is_Exist_Assignment (X_Fee_Id NUMBER) IS
775: SELECT 'X' FROM DUAL
776: WHERE EXISTS ( SELECT NULL FROM LNS_FEE_ASSIGNMENTS
777: WHERE FEE_ID = X_FEE_ID )
778: OR EXISTS ( SELECT NULL FROM LNS_LOAN_PRODUCT_LINES
779: WHERE LINE_REFERENCE_ID = X_FEE_ID
780: AND ( LOAN_PRODUCT_LINE_TYPE = 'FEE' OR LOAN_PRODUCT_LINE_TYPE='DISB_FEE' )

Line 806: select LNS_FEE_ASSIGNMENTS_S.NEXTVAL FEE_ASSIGNMENT_ID,

802: PROCEDURE create_LP_FEE_ASSIGNMENT(
803: P_LOAN_ID IN NUMBER ) IS
804:
805: CURSOR loan_prod_fee ( c_loan_id NUMBER ) IS
806: select LNS_FEE_ASSIGNMENTS_S.NEXTVAL FEE_ASSIGNMENT_ID,
807: LnsLoanHeaders.LOAN_ID,
808: LnsFees.FEE_ID,
809: --decode(LnsFees.RATE_TYPE,'VARIABLE', lns_fee_engine.calculateFee(LnsFees.FEE_ID,LnsLoanHeaders.LOAN_ID) , LnsFees.FEE) FEE,
810: LnsFees.FEE,

Line 872: (SELECT NULL FROM LNS_FEE_ASSIGNMENTS LnsFeeAssignments

868: SELECT 'Y'
869: FROM DUAL
870: WHERE
871: EXISTS
872: (SELECT NULL FROM LNS_FEE_ASSIGNMENTS LnsFeeAssignments
873: WHERE LnsFeeAssignments.LOAN_ID = c_loan_id)
874: OR EXISTS
875: (SELECT NULL FROM LNS_LOAN_HISTORIES_H
876: WHERE TABLE_NAME = 'LNS_FEE_ASSIGNMENTS' AND LOAN_ID = c_loan_id) ;

Line 876: WHERE TABLE_NAME = 'LNS_FEE_ASSIGNMENTS' AND LOAN_ID = c_loan_id) ;

872: (SELECT NULL FROM LNS_FEE_ASSIGNMENTS LnsFeeAssignments
873: WHERE LnsFeeAssignments.LOAN_ID = c_loan_id)
874: OR EXISTS
875: (SELECT NULL FROM LNS_LOAN_HISTORIES_H
876: WHERE TABLE_NAME = 'LNS_FEE_ASSIGNMENTS' AND LOAN_ID = c_loan_id) ;
877:
878:
879:
880: l_fee_assignment_rec fee_assignment_rec_type ;

Line 1063: --If records have been inserted into lns_fee_assignments table

1059: is_commit_needed := true;
1060:
1061: END LOOP ;
1062:
1063: --If records have been inserted into lns_fee_assignments table
1064: --they need to be committed since the commit does not happen on the UI
1065: --unless the user explicitly commits from the UI page
1066: IF (is_commit_needed = TRUE) THEN
1067: COMMIT WORK;

Line 1082: select LNS_FEE_ASSIGNMENTS_S.NEXTVAL FEE_ASSIGNMENT_ID,

1078: PROCEDURE create_LP_DISB_FEE_ASSIGNMENT(
1079: P_DISB_HEADER_ID IN NUMBER , P_LOAN_PRODUCT_LINE_ID IN NUMBER, P_LOAN_ID IN NUMBER ) IS
1080:
1081: CURSOR loan_prod_disb_fee ( c_disb_header_id NUMBER , c_loan_prod_line_id NUMBER, c_loan_id NUMBER ) IS
1082: select LNS_FEE_ASSIGNMENTS_S.NEXTVAL FEE_ASSIGNMENT_ID,
1083: c_loan_id LOAN_ID,
1084: LnsFees.FEE_ID,
1085: LnsFees.FEE,
1086: LnsFees.FEE_TYPE,

Line 1311: --If records have been inserted into lns_fee_assignments table

1307:
1308: END LOOP ;
1309:
1310:
1311: --If records have been inserted into lns_fee_assignments table
1312: --they need to be committed since the commit does not happen on the UI
1313: --unless the user explicitly commits from the UI page
1314: --IF (is_commit_needed = TRUE) THEN
1315: --COMMIT WORK;

Line 1335: FROM LNS_FEE_ASSIGNMENTS LnsFeeAssignments

1331: PROCEDURE delete_DISB_FEE_ASSIGNMENT(P_DISB_HEADER_ID IN NUMBER ) IS
1332:
1333: CURSOR loan_disb_fee ( c_disb_header_id NUMBER ) IS
1334: select FEE_ASSIGNMENT_ID
1335: FROM LNS_FEE_ASSIGNMENTS LnsFeeAssignments
1336: WHERE LnsFeeAssignments.DISB_HEADER_ID = c_disb_header_id ;
1337:
1338: l_fee_assignment_id NUMBER ;
1339: x_return_status VARCHAR2(1) ;

Line 1432: WHERE EXISTS ( SELECT NULL FROM LNS_FEE_ASSIGNMENTS fasgn

1428: l_disb_status lns_disb_headers.status%TYPE;
1429:
1430: CURSOR c_fasgm_edit (c_loan_id NUMBER, c_fee_id NUMBER, c_disb_header_id NUMBER) IS
1431: SELECT 'X' FROM DUAL
1432: WHERE EXISTS ( SELECT NULL FROM LNS_FEE_ASSIGNMENTS fasgn
1433: WHERE (fasgn.LOAN_ID = c_loan_id
1434: OR (fasgn.DISB_HEADER_ID = c_disb_header_id ))
1435: AND fasgn.FEE_ID = c_fee_id
1436: AND nvl(trunc(fasgn.END_DATE_ACTIVE), trunc(SYSDATE)) >= trunc(SYSDATE)