 EXEC P_ALTERPK 'PK_TSRBD_PORTRAIT', 'T_TSRBD_PORTRAIT', 'FID', '1';

 IF NOT EXISTS (SELECT 1 FROM KSQL_INDEXES WHERE KSQL_INDNAME = 'IDX_TSRBD_PORTRAIT') CREATE INDEX IDX_TSRBD_PORTRAIT ON T_TSRBD_PORTRAIT ( FTAGOBJID ,FTAGOBJTYPEID );