/**Begin D:\PDM_UPGRADE\PDM1\POM_constraint.sql **/
 EXEC P_ALTERPK 'PK_POM_COORDINA_HEAT', 'T_POM_COORDINA_HEAT', 'FENTRYID', '1';

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


 EXEC P_ALTERPK 'PK_POM_COORDINA_MAC', 'T_POM_COORDINA_MAC', 'FENTRYID', '1';

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



/**End D:\PDM_UPGRADE\PDM1\POM_constraint.sql **/
