EXEC P_ALTERPK 'PK_T_FA_LEASE_CHG_ITEMS', 'T_FA_LEASE_CHG_ITEMS', 'FPKID', '1';

IF NOT EXISTS (SELECT 1 FROM KSQL_INDEXES WHERE KSQL_INDNAME = 'IDX_FA_LEASE_CHG_ITEMS') CREATE INDEX IDX_FA_LEASE_CHG_ITEMS ON T_FA_LEASE_CHG_ITEMS ( FID );


EXEC P_ALTERPK 'PK_T_FA_LEASE_CHANGE_BILL', 'T_FA_LEASE_CHANGE_BILL', 'FID', '1';

IF NOT EXISTS (SELECT 1 FROM KSQL_INDEXES WHERE KSQL_INDNAME = 'IDX_FA_LEASECHANGE') CREATE INDEX IDX_FA_LEASECHANGE ON T_FA_LEASE_CHANGE_BILL ( FORGID ,FLEASECONTRACTID ,FEFFECTIVEDATE );
