 EXEC P_ALTERPK 'PK_PUR_COMPCNENT_L', 'T_PUR_COMPCNENT_L', 'FPKID', '1';

 IF NOT EXISTS (SELECT 1 FROM KSQL_INDEXES WHERE KSQL_INDNAME = 'IDX_PUR_COMPONENT_L_FID') CREATE INDEX IDX_PUR_COMPONENT_L_FID ON T_PUR_COMPCNENT_L ( FID ,FLOCALEID );
 