The following lines contain the word 'select', 'insert', 'update' or 'delete':
-- EVERYTHING LOOKS OK LET'S INSERT THIS ROW
----------------------------------------------------
SELECT FA_LEASE_SCHEDULES_S.NEXTVAL
INTO
L_PAYMENT_SCHEDULE_ID
FROM DUAL;
INSERT INTO FA_LEASE_SCHEDULES
(PAYMENT_SCHEDULE_ID
,PAYMENT_SCHEDULE_NAME
,PRESENT_VALUE
,INTEREST_RATE
,LEASE_INCEPTION_DATE
,CREATED_BY
,CREATION_DATE
,LAST_UPDATE_LOGIN
,LAST_UPDATE_DATE
,LAST_UPDATED_BY
,CURRENCY_CODE
,FREQUENCY)
VALUES
(L_PAYMENT_SCHEDULE_ID
,PX_LEASE_SCHEDULES_REC.PAYMENT_SCHEDULE_NAME
,PX_LEASE_SCHEDULES_REC.PRESENT_VALUE
,PX_LEASE_SCHEDULES_REC.INTEREST_RATE
,PX_LEASE_SCHEDULES_REC.LEASE_INCEPTION_DATE
,NVL(P_TRANS_REC.WHO_INFO.CREATED_BY,-1)
,NVL(P_TRANS_REC.WHO_INFO.CREATION_DATE,SYSDATE)
,NVL(P_TRANS_REC.WHO_INFO.LAST_UPDATE_LOGIN,-1)
,NVL(P_TRANS_REC.WHO_INFO.LAST_UPDATE_DATE,SYSDATE)
,NVL(P_TRANS_REC.WHO_INFO.LAST_UPDATED_BY,-1)
,PX_LEASE_SCHEDULES_REC.CURRENCY_CODE
,UPPER(PX_LEASE_SCHEDULES_REC.FREQUENCY));
INSERT INTO FA_LEASE_PAYMENTS (
PAYMENT_LINE_NUMBER
,PAYMENT_SCHEDULE_ID
,START_DATE
,PAYMENT_AMOUNT
,NUMBER_OF_PAYMENTS
,PERIOD
,END_DATE
,ROW_PRESENT_VALUE
,CREATED_BY
,CREATION_DATE
,LAST_UPDATE_LOGIN
,LAST_UPDATE_DATE
,LAST_UPDATED_BY )
VALUES
(L_PAYMENT_LINE_NUMBER
,L_PAYMENT_SCHEDULE_ID
,P_LEASE_PAYMENTS_TBL(TBL_INDEX).START_DATE
,P_LEASE_PAYMENTS_TBL(TBL_INDEX).PAYMENT_AMOUNT
,P_LEASE_PAYMENTS_TBL(TBL_INDEX).NUMBER_OF_PAYMENTS
,P_LEASE_PAYMENTS_TBL(TBL_INDEX).PAYMENT_TYPE
,L_END_DATE
,NULL
,NVL(P_TRANS_REC.WHO_INFO.CREATED_BY,-1)
,NVL(P_TRANS_REC.WHO_INFO.CREATION_DATE,SYSDATE)
,NVL(P_TRANS_REC.WHO_INFO.LAST_UPDATE_LOGIN,-1)
,NVL(P_TRANS_REC.WHO_INFO.LAST_UPDATE_DATE,SYSDATE)
,NVL(P_TRANS_REC.WHO_INFO.LAST_UPDATED_BY,-1)
);
DELETE FROM FA_AMORT_SCHEDULES WHERE PAYMENT_SCHEDULE_ID=P_PAYMENT_SCHEDULE_ID;