 EXEC P_ALTERPK 'PK_T_CAS_VOUCHERBOOK', 'T_CAS_VOUCHERBOOK', 'FID', '1';

 IF NOT EXISTS (SELECT 1 FROM KSQL_INDEXES WHERE KSQL_INDNAME = 'IDX_CAS_VOUCHERBOOK_SID') CREATE INDEX IDX_CAS_VOUCHERBOOK_SID ON T_CAS_VOUCHERBOOK ( FSOURCEBILLID );