APPS.FA_LEASE_SCHEDULE_PVT dependencies on FA_AMORT_SCHEDULES

Line 942: FROM FA_AMORT_SCHEDULES

938: SELECT AMORTIZATION_LINE_NUM, PAYMENT_DATE, PAYMENT_AMOUNT,
939: INTEREST, PRINCIPAL, LEASE_OBLIGATION ,
940: LAST_UPDATE_DATE, LAST_UPDATED_BY, CREATION_DATE,
941: CREATED_BY, LAST_UPDATE_LOGIN
942: FROM FA_AMORT_SCHEDULES
943: WHERE PAYMENT_SCHEDULE_ID = P_PAYMENT_SCHEDULE_ID
944: ORDER BY PAYMENT_DATE
945: FOR UPDATE OF AMORTIZATION_LINE_NUM, PAYMENT_DATE, PAYMENT_AMOUNT,
946: INTEREST, PRINCIPAL, LEASE_OBLIGATION ,

Line 958: FROM FA_AMORT_SCHEDULES

954: -------------------------------------------------------------------------------
955:
956: SELECT COUNT(*)
957: INTO L_AMORT_COUNT
958: FROM FA_AMORT_SCHEDULES
959: WHERE PAYMENT_SCHEDULE_ID = P_PAYMENT_SCHEDULE_ID;
960:
961: IF L_AMORT_COUNT > 0 THEN
962: FND_MESSAGE.SET_NAME ('OFA','FA_AMORT_EXISTS');

Line 995: INSERT INTO FA_AMORT_SCHEDULES

991:
992: L_PAYMENT_AMOUNT:=ROUND(C1_REC.PAYMENT_AMOUNT,L_CURRENCY_PRECISION);
993: L_TOT_PAY_CALC := L_TOT_PAY_CALC + L_PAYMENT_AMOUNT;
994:
995: INSERT INTO FA_AMORT_SCHEDULES
996: (PAYMENT_SCHEDULE_ID
997: , AMORTIZATION_LINE_NUM
998: , PAYMENT_DATE
999: , PAYMENT_AMOUNT

Line 1045: UPDATE FA_AMORT_SCHEDULES

1041: WHERE PAYMENT_SCHEDULE_ID=P_PAYMENT_SCHEDULE_ID;
1042:
1043: L_INTEREST_PER_PERIOD := (L_INTEREST_RATE/100) / L_PERIODS_PER_YEAR;
1044:
1045: UPDATE FA_AMORT_SCHEDULES
1046: SET AMORTIZATION_LINE_NUM = AMORTIZATION_LINE_NUM + 100000
1047: WHERE PAYMENT_SCHEDULE_ID = P_PAYMENT_SCHEDULE_ID;
1048:
1049: L_LINE_NUM := 0;

Line 1082: UPDATE FA_AMORT_SCHEDULES

1078: L_CURRENT_INTEREST := L_CURRENT_INTEREST - L_INTEREST_PAID;
1079: L_LEASE_OBLIGATION := L_LEASE_OBLIGATION - L_PRINCIPAL_PAID;
1080:
1081: -- NOW UPDATE COMPUTED VALUES INTO CURSOR
1082: UPDATE FA_AMORT_SCHEDULES
1083: SET AMORTIZATION_LINE_NUM = L_LINE_NUM,
1084: PAYMENT_DATE = REC.PAYMENT_DATE,
1085: PAYMENT_AMOUNT = REC.PAYMENT_AMOUNT,
1086: INTEREST = L_INTEREST_PAID,