EXEC P_ALTERPK 'PK_T_BD_EXRATE_CROSS', 'T_BD_EXRATE_CROSS', 'FID', '1';

IF NOT EXISTS (SELECT 1 FROM KSQL_INDEXES WHERE KSQL_INDNAME = 'IDX_T_BD_EXRATE_CROSS') CREATE INDEX IDX_T_BD_EXRATE_CROSS ON T_BD_EXRATE_CROSS ( FBILLNO );

EXEC P_ALTERPK 'PK_T_BD_EXRATE_CROSSENTRY', 'T_BD_EXRATE_CROSSENTRY', 'FENTRYID', '1';

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