/**Begin D:\pdm\PDM_UPGRADE\PDM1\HRPTMC_constraint.sql **/
 EXEC P_ALTERPK 'PK_HRPTMC_CALMAXLEN', 'T_HRPTMC_CALMAXLEN', 'FID', '1';

 IF NOT EXISTS (SELECT 1 FROM KSQL_INDEXES WHERE KSQL_INDNAME = 'IDX_CALMAXLEN') CREATE INDEX IDX_CALMAXLEN ON T_HRPTMC_CALMAXLEN ( FANOBJID ,FCALFIELDID );

/**End D:\pdm\PDM_UPGRADE\PDM1\HRPTMC_constraint.sql **/
