APPS.FA_LEASE_SCHEDULE_PVT dependencies on FA_AMORT_SCHEDULES

Line 965: FROM FA_AMORT_SCHEDULES

961: SELECT AMORTIZATION_LINE_NUM, PAYMENT_DATE, PAYMENT_AMOUNT,
962: INTEREST, PRINCIPAL, LEASE_OBLIGATION ,
963: LAST_UPDATE_DATE, LAST_UPDATED_BY, CREATION_DATE,
964: CREATED_BY, LAST_UPDATE_LOGIN
965: FROM FA_AMORT_SCHEDULES
966: WHERE PAYMENT_SCHEDULE_ID = P_PAYMENT_SCHEDULE_ID
967: ORDER BY PAYMENT_DATE
968: FOR UPDATE OF AMORTIZATION_LINE_NUM, PAYMENT_DATE, PAYMENT_AMOUNT,
969: INTEREST, PRINCIPAL, LEASE_OBLIGATION ,

Line 981: FROM FA_AMORT_SCHEDULES

977: -------------------------------------------------------------------------------
978:
979: SELECT COUNT(*)
980: INTO L_AMORT_COUNT
981: FROM FA_AMORT_SCHEDULES
982: WHERE PAYMENT_SCHEDULE_ID = P_PAYMENT_SCHEDULE_ID;
983:
984: IF L_AMORT_COUNT > 0 THEN
985: FND_MESSAGE.SET_NAME ('OFA','FA_AMORT_EXISTS');

Line 1018: INSERT INTO FA_AMORT_SCHEDULES

1014:
1015: L_PAYMENT_AMOUNT:=ROUND(C1_REC.PAYMENT_AMOUNT,L_CURRENCY_PRECISION);
1016: L_TOT_PAY_CALC := L_TOT_PAY_CALC + L_PAYMENT_AMOUNT;
1017:
1018: INSERT INTO FA_AMORT_SCHEDULES
1019: (PAYMENT_SCHEDULE_ID
1020: , AMORTIZATION_LINE_NUM
1021: , PAYMENT_DATE
1022: , PAYMENT_AMOUNT

Line 1068: UPDATE FA_AMORT_SCHEDULES

1064: WHERE PAYMENT_SCHEDULE_ID=P_PAYMENT_SCHEDULE_ID;
1065:
1066: L_INTEREST_PER_PERIOD := (L_INTEREST_RATE/100) / L_PERIODS_PER_YEAR;
1067:
1068: UPDATE FA_AMORT_SCHEDULES
1069: SET AMORTIZATION_LINE_NUM = AMORTIZATION_LINE_NUM + 100000
1070: WHERE PAYMENT_SCHEDULE_ID = P_PAYMENT_SCHEDULE_ID;
1071:
1072: L_LINE_NUM := 0;

Line 1105: UPDATE FA_AMORT_SCHEDULES

1101: L_CURRENT_INTEREST := L_CURRENT_INTEREST - L_INTEREST_PAID;
1102: L_LEASE_OBLIGATION := L_LEASE_OBLIGATION - L_PRINCIPAL_PAID;
1103:
1104: -- NOW UPDATE COMPUTED VALUES INTO CURSOR
1105: UPDATE FA_AMORT_SCHEDULES
1106: SET AMORTIZATION_LINE_NUM = L_LINE_NUM,
1107: PAYMENT_DATE = REC.PAYMENT_DATE,
1108: PAYMENT_AMOUNT = REC.PAYMENT_AMOUNT,
1109: INTEREST = L_INTEREST_PAID,