DBA Data[Home] [Help]

APPS.LNS_FEE_ASSIGNMENT_PUB dependencies on LNS_FEE_ASSIGNMENTS

Line 103: FROM LNS_FEE_ASSIGNMENTS

99: THEN
100: BEGIN
101: SELECT 'Y'
102: INTO l_dummy
103: FROM LNS_FEE_ASSIGNMENTS
104: WHERE fee_assignment_id = l_fee_assignment_id;
105:
106: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_DUPLICATE_COLUMN');
107: FND_MESSAGE.SET_TOKEN('COLUMN', 'fee_assignment_id');

Line 118: 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');

114: END;
115: END IF;
116:
117: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
118: 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');
119: END IF;
120:
121: -- call table-handler.
122: LNS_FEE_ASSIGNMENTS_PKG.Insert_Row (

Line 122: LNS_FEE_ASSIGNMENTS_PKG.Insert_Row (

118: 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');
119: END IF;
120:
121: -- call table-handler.
122: LNS_FEE_ASSIGNMENTS_PKG.Insert_Row (
123: X_FEE_ASSIGNMENT_ID => p_fee_assignment_rec.fee_assignment_id,
124: P_OBJECT_VERSION_NUMBER => 1,
125: P_LOAN_ID => p_fee_assignment_rec.loan_id,
126: P_FEE_ID => p_fee_assignment_rec.fee_id,

Line 204: FROM LNS_FEE_ASSIGNMENTS

200: -- check whether record has been updated by another user. If not, lock it.
201: BEGIN
202: SELECT OBJECT_VERSION_NUMBER
203: INTO l_object_version_number
204: FROM LNS_FEE_ASSIGNMENTS
205: WHERE FEE_ASSIGNMENT_ID = p_fee_assignment_rec.fee_assignment_id
206: FOR UPDATE OF FEE_ASSIGNMENT_ID NOWAIT;
207:
208: IF NOT

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

215: )
216: )
217: THEN
218: FND_MESSAGE.SET_NAME('LNS', 'LNS_API_RECORD_CHANGED');
219: FND_MESSAGE.SET_TOKEN('TABLE', 'lns_fee_assignments');
220: FND_MSG_PUB.ADD;
221: RAISE FND_API.G_EXC_ERROR;
222: END IF;
223:

Line 235: 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');

231: RAISE FND_API.G_EXC_ERROR;
232: END;
233:
234: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
235: 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');
236: END IF;
237:
238: -- log history
239: LNS_LOAN_HISTORY_PUB.log_record_pre(p_fee_assignment_rec.fee_assignment_id,

Line 241: 'LNS_FEE_ASSIGNMENTS');

237:
238: -- log history
239: LNS_LOAN_HISTORY_PUB.log_record_pre(p_fee_assignment_rec.fee_assignment_id,
240: 'FEE_ASSIGNMENT_ID',
241: 'LNS_FEE_ASSIGNMENTS');
242:
243: --Call to table-handler
244: LNS_FEE_ASSIGNMENTS_PKG.Update_Row (
245: P_FEE_ASSIGNMENT_ID => p_fee_assignment_rec.fee_assignment_id,

Line 244: LNS_FEE_ASSIGNMENTS_PKG.Update_Row (

240: 'FEE_ASSIGNMENT_ID',
241: 'LNS_FEE_ASSIGNMENTS');
242:
243: --Call to table-handler
244: LNS_FEE_ASSIGNMENTS_PKG.Update_Row (
245: P_FEE_ASSIGNMENT_ID => p_fee_assignment_rec.fee_assignment_id,
246: P_LOAN_ID => p_fee_assignment_rec.LOAN_ID,
247: P_FEE_ID => p_fee_assignment_rec.FEE_ID,
248: P_FEE => p_fee_assignment_rec.FEE,

Line 271: 'LNS_FEE_ASSIGNMENTS',

267:
268: -- log record changes
269: LNS_LOAN_HISTORY_PUB.log_record_post(p_fee_assignment_rec.fee_assignment_id,
270: 'FEE_ASSIGNMENT_ID',
271: 'LNS_FEE_ASSIGNMENTS',
272: p_fee_assignment_rec.loan_id);
273:
274: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
275: 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 275: 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');

271: 'LNS_FEE_ASSIGNMENTS',
272: p_fee_assignment_rec.loan_id);
273:
274: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
275: 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');
276: END IF;
277:
278: END do_update_fee_assignment;
279:

Line 328: FROM LNS_FEE_ASSIGNMENTS

324: -- check whether record has been deleted by another user. If not, lock it.
325: BEGIN
326: SELECT loan_id, fee_id, object_version_number
327: INTO l_loan_id, l_fee_id, l_object_version_num
328: FROM LNS_FEE_ASSIGNMENTS
329: WHERE FEE_ASSIGNMENT_ID = p_fee_assignment_id;
330:
331: EXCEPTION
332: WHEN NO_DATA_FOUND THEN

Line 342: 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');

338: END;
339: END IF;
340:
341: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
342: 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');
343: END IF;
344:
345: -- log history
346: LNS_LOAN_HISTORY_PUB.log_record_pre(p_fee_assignment_id,

Line 348: 'LNS_FEE_ASSIGNMENTS');

344:
345: -- log history
346: LNS_LOAN_HISTORY_PUB.log_record_pre(p_fee_assignment_id,
347: 'FEE_ASSIGNMENT_ID',
348: 'LNS_FEE_ASSIGNMENTS');
349:
350: BEGIN
351:
352: -- Update the end date active before physically deleting the record

Line 355: UPDATE LNS_FEE_ASSIGNMENTS

351:
352: -- Update the end date active before physically deleting the record
353: -- to record it in history table
354:
355: UPDATE LNS_FEE_ASSIGNMENTS
356: SET END_DATE_ACTIVE = SYSDATE
357: WHERE LOAN_ID = l_loan_id
358: AND FEE_ASSIGNMENT_ID = p_fee_assignment_id;
359:

Line 364: 'LNS_FEE_ASSIGNMENTS',

360:
361: -- log record changes
362: LNS_LOAN_HISTORY_PUB.log_record_post(p_fee_assignment_id,
363: 'FEE_ASSIGNMENT_ID',
364: 'LNS_FEE_ASSIGNMENTS',
365: l_loan_id);
366:
367: LNS_FEE_ASSIGNMENTS_PKG.Delete_Row(
368: P_FEE_ASSIGNMENT_ID => p_fee_assignment_id);

Line 367: LNS_FEE_ASSIGNMENTS_PKG.Delete_Row(

363: 'FEE_ASSIGNMENT_ID',
364: 'LNS_FEE_ASSIGNMENTS',
365: l_loan_id);
366:
367: LNS_FEE_ASSIGNMENTS_PKG.Delete_Row(
368: P_FEE_ASSIGNMENT_ID => p_fee_assignment_id);
369:
370:
371: EXCEPTION

Line 383: 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');

379:
380:
381:
382: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
383: 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');
384: END IF;
385:
386: END do_delete_fee_assignment;
387:

Line 758: WHERE EXISTS ( SELECT NULL FROM LNS_FEE_ASSIGNMENTS

754: ) RETURN VARCHAR2 IS
755:
756: CURSOR C_Is_Exist_Assignment (X_Fee_Id NUMBER) IS
757: SELECT 'X' FROM DUAL
758: WHERE EXISTS ( SELECT NULL FROM LNS_FEE_ASSIGNMENTS
759: WHERE FEE_ID = X_FEE_ID )
760: OR EXISTS ( SELECT NULL FROM LNS_LOAN_PRODUCT_LINES
761: WHERE LINE_REFERENCE_ID = X_FEE_ID
762: AND ( LOAN_PRODUCT_LINE_TYPE = 'FEE' OR LOAN_PRODUCT_LINE_TYPE='DISB_FEE' )

Line 788: select LNS_FEE_ASSIGNMENTS_S.NEXTVAL FEE_ASSIGNMENT_ID,

784: PROCEDURE create_LP_FEE_ASSIGNMENT(
785: P_LOAN_ID IN NUMBER ) IS
786:
787: CURSOR loan_prod_fee ( c_loan_id NUMBER ) IS
788: select LNS_FEE_ASSIGNMENTS_S.NEXTVAL FEE_ASSIGNMENT_ID,
789: LnsLoanHeaders.LOAN_ID,
790: LnsFees.FEE_ID,
791: decode(LnsFees.RATE_TYPE,'VARIABLE', lns_fee_engine.calculateFee(LnsFees.FEE_ID,LnsLoanHeaders.LOAN_ID) , LnsFees.FEE) FEE,
792: LnsFees.FEE_TYPE,

Line 845: (SELECT NULL FROM LNS_FEE_ASSIGNMENTS LnsFeeAssignments

841: SELECT 'Y'
842: FROM DUAL
843: WHERE
844: EXISTS
845: (SELECT NULL FROM LNS_FEE_ASSIGNMENTS LnsFeeAssignments
846: WHERE LnsFeeAssignments.LOAN_ID = c_loan_id)
847: OR EXISTS
848: (SELECT NULL FROM LNS_LOAN_HISTORIES_H
849: WHERE TABLE_NAME = 'LNS_FEE_ASSIGNMENTS' AND LOAN_ID = c_loan_id) ;

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

845: (SELECT NULL FROM LNS_FEE_ASSIGNMENTS LnsFeeAssignments
846: WHERE LnsFeeAssignments.LOAN_ID = c_loan_id)
847: OR EXISTS
848: (SELECT NULL FROM LNS_LOAN_HISTORIES_H
849: WHERE TABLE_NAME = 'LNS_FEE_ASSIGNMENTS' AND LOAN_ID = c_loan_id) ;
850:
851:
852:
853: l_fee_assignment_rec fee_assignment_rec_type ;

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

1021: is_commit_needed := true;
1022:
1023: END LOOP ;
1024:
1025: --If records have been inserted into lns_fee_assignments table
1026: --they need to be committed since the commit does not happen on the UI
1027: --unless the user explicitly commits from the UI page
1028: IF (is_commit_needed = TRUE) THEN
1029: COMMIT WORK;

Line 1044: select LNS_FEE_ASSIGNMENTS_S.NEXTVAL FEE_ASSIGNMENT_ID,

1040: PROCEDURE create_LP_DISB_FEE_ASSIGNMENT(
1041: P_DISB_HEADER_ID IN NUMBER , P_LOAN_PRODUCT_LINE_ID IN NUMBER, P_LOAN_ID IN NUMBER ) IS
1042:
1043: CURSOR loan_prod_disb_fee ( c_disb_header_id NUMBER , c_loan_prod_line_id NUMBER ) IS
1044: select LNS_FEE_ASSIGNMENTS_S.NEXTVAL FEE_ASSIGNMENT_ID,
1045: NULL LOAN_ID,
1046: LnsFees.FEE_ID,
1047: LnsFees.FEE,
1048: LnsFees.FEE_TYPE,

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

1264:
1265: END LOOP ;
1266:
1267:
1268: --If records have been inserted into lns_fee_assignments table
1269: --they need to be committed since the commit does not happen on the UI
1270: --unless the user explicitly commits from the UI page
1271: --IF (is_commit_needed = TRUE) THEN
1272: --COMMIT WORK;

Line 1292: FROM LNS_FEE_ASSIGNMENTS LnsFeeAssignments

1288: PROCEDURE delete_DISB_FEE_ASSIGNMENT(P_DISB_HEADER_ID IN NUMBER ) IS
1289:
1290: CURSOR loan_disb_fee ( c_disb_header_id NUMBER ) IS
1291: select FEE_ASSIGNMENT_ID
1292: FROM LNS_FEE_ASSIGNMENTS LnsFeeAssignments
1293: WHERE LnsFeeAssignments.DISB_HEADER_ID = c_disb_header_id ;
1294:
1295: l_fee_assignment_id NUMBER ;
1296: x_return_status VARCHAR2(1) ;