 EXEC P_ALTERPK 'PK_POM_MROORDERENTRY_S', 'T_POM_MROORDERENTRY_S', 'FENTRYID', '1';
 IF NOT EXISTS (SELECT 1 FROM KSQL_INDEXES WHERE KSQL_INDNAME = 'IDX_POM_MROORDERENTRY_S') CREATE INDEX IDX_POM_MROORDERENTRY_S ON T_POM_MROORDERENTRY_S ( FID );
 
 EXEC P_ALTERPK 'PK_POM_MROORDER_S_E', 'T_POM_MROORDER_S_E', 'FENTRYID', '1';
 IF NOT EXISTS (SELECT 1 FROM KSQL_INDEXES WHERE KSQL_INDNAME = 'IDX_POM_MROORDER_S_E') CREATE INDEX IDX_POM_MROORDER_S_E ON T_POM_MROORDER_S_E ( FID );
 
 EXEC P_ALTERPK 'PK_POM_MROORDERENTRY_P', 'T_POM_MROORDERENTRY_P', 'FENTRYID', '1';
 IF NOT EXISTS (SELECT 1 FROM KSQL_INDEXES WHERE KSQL_INDNAME = 'IDX_POM_MROORDERENTRY_P') CREATE INDEX IDX_POM_MROORDERENTRY_P ON T_POM_MROORDERENTRY_P ( FID );
 
  EXEC P_ALTERPK 'PK_POM_MROORDER_P_E', 'T_POM_MROORDER_P_E', 'FENTRYID', '1';
 IF NOT EXISTS (SELECT 1 FROM KSQL_INDEXES WHERE KSQL_INDNAME = 'IDX_POM_MROORDER_P_E') CREATE INDEX IDX_POM_MROORDER_P_E ON T_POM_MROORDER_P_E ( FID );
