replaced clob -> varchar(3900)

replaced clob -> varchar(3900)

--- ddl.clj
+++ ddl.clj
@@ -14,7 +14,7 @@
 	"AGENT_NOTES" varchar(1000),
 	"LISTEDNESS_NOTES" varchar(1000),
 	"BFARM_CAUSALITY" NUMBER(10,0),
-	"BFARM_MANUAL_TEXT" CLOB,
+	"BFARM_MANUAL_TEXT" varchar(3900),
 	"COMPANY_DIAGNOSIS" varchar(250),
 	"COMPANY_DIAGNOSIS_NOTES" varchar(1000),
 	"DIAGNOSIS_DICT_ID" NUMBER,
@@ -63,8 +63,8 @@
 	"UD_NUMBER_10" NUMBER(30,10),
 	"UD_NUMBER_11" NUMBER(30,10),
 	"UD_NUMBER_12" NUMBER(30,10),
-	"EVALUATION" CLOB,
-	"EVALUATION_J" CLOB,
+	"EVALUATION" varchar(3900),
+	"EVALUATION_J" varchar(3900),
 	"CO_SUSPECT_COUNT" NUMBER(3,0),
 	"EVENT_SYNOPSIS" varchar(5),
 	"EVENT_PRIMARY" varchar(400),
@@ -106,66 +106,6 @@
 	"EFFECTIVE_START_DATE" DATE,
 	"EFFECTIVE_END_DATE" DATE
    ) SEGMENT CREATION IMMEDIATE
-  PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_DATA_01"
- LOB ("BFARM_MANUAL_TEXT") STORE AS BASICFILE "RCA_BFARM_MANUAL_TEXT_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT))
- LOB ("EVALUATION") STORE AS BASICFILE "RCA_EVALUATION_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT))
- LOB ("EVALUATION_J") STORE AS BASICFILE "RCA_EVALUATION_J_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)) ;
---------------------------------------------------------
---  DDL for Index PK_RM_CASE_ASSESS
---------------------------------------------------------
-
-  CREATE UNIQUE INDEX "MART_USER"."PK_RM_CASE_ASSESS" ON "MART_USER"."RM_CASE_ASSESS" ("ENTERPRISE_ID", "CASE_ID", "DLP_REVISION_NUMBER")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  DDL for Index I_RM_CASE_ASSESS
---------------------------------------------------------
-
-  CREATE INDEX "MART_USER"."I_RM_CASE_ASSESS" ON "MART_USER"."RM_CASE_ASSESS" ("ENTERPRISE_ID", "CASE_ID", "EFFECTIVE_END_DATE")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  Constraints for Table RM_CASE_ASSESS
---------------------------------------------------------
-
-  ALTER TABLE "MART_USER"."RM_CASE_ASSESS" ADD CONSTRAINT "PK_RM_CASE_ASSESS" PRIMARY KEY ("ENTERPRISE_ID", "CASE_ID", "DLP_REVISION_NUMBER")
-  USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01"  ENABLE;
-
-  ALTER TABLE "MART_USER"."RM_CASE_ASSESS" MODIFY ("ENTERPRISE_ID" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_ASSESS" MODIFY ("DELETED_FLAG" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_ASSESS" MODIFY ("EFFECTIVE_START_DATE" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_ASSESS" MODIFY ("EFFECTIVE_END_DATE" NOT NULL ENABLE);
---------------------------------------------------------
---  File created - Saturday-April-04-2015
---------------------------------------------------------
---------------------------------------------------------
---  DDL for Table RM_CASE_CLASSIFICATIONS
---------------------------------------------------------

   create table "RM_CASE_CLASSIFICATIONS"
    (	"ENTERPRISE_ID" NUMBER ,
@@ -179,51 +119,6 @@
 	"EFFECTIVE_START_DATE" DATE,
 	"EFFECTIVE_END_DATE" DATE
    ) SEGMENT CREATION IMMEDIATE
-  PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_DATA_01" ;
---------------------------------------------------------
---  DDL for Index PK_RM_CASE_CLASSIFICATIONS
---------------------------------------------------------
-
-  CREATE UNIQUE INDEX "MART_USER"."PK_RM_CASE_CLASSIFICATIONS" ON "MART_USER"."RM_CASE_CLASSIFICATIONS" ("ENTERPRISE_ID", "CASE_ID", "SEQ_NUM", "DLP_REVISION_NUMBER")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  DDL for Index I_RM_CASE_CLASSIFICATIONS
---------------------------------------------------------
-
-  CREATE INDEX "MART_USER"."I_RM_CASE_CLASSIFICATIONS" ON "MART_USER"."RM_CASE_CLASSIFICATIONS" ("ENTERPRISE_ID", "CASE_ID", "EFFECTIVE_END_DATE")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  Constraints for Table RM_CASE_CLASSIFICATIONS
---------------------------------------------------------
-
-  ALTER TABLE "MART_USER"."RM_CASE_CLASSIFICATIONS" ADD CONSTRAINT "PK_RM_CASE_CLASSIFICATIONS" PRIMARY KEY ("ENTERPRISE_ID", "CASE_ID", "SEQ_NUM", "DLP_REVISION_NUMBER")
-  USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01"  ENABLE;
-
-  ALTER TABLE "MART_USER"."RM_CASE_CLASSIFICATIONS" MODIFY ("ENTERPRISE_ID" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_CLASSIFICATIONS" MODIFY ("DELETED_FLAG" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_CLASSIFICATIONS" MODIFY ("EFFECTIVE_START_DATE" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_CLASSIFICATIONS" MODIFY ("EFFECTIVE_END_DATE" NOT NULL ENABLE);
---------------------------------------------------------
---  File created - Saturday-April-04-2015
---------------------------------------------------------
---------------------------------------------------------
---  DDL for Table RM_CASE_EVENT
---------------------------------------------------------

   create table "RM_CASE_EVENT"
    (	"ENTERPRISE_ID" NUMBER ,
@@ -317,8 +212,8 @@
 	"UD_NUMBER_10" NUMBER(30,10),
 	"UD_NUMBER_11" NUMBER(30,10),
 	"UD_NUMBER_12" NUMBER(30,10),
-	"DETAILS" CLOB,
-	"DETAILS_J" CLOB,
+	"DETAILS" varchar(3900),
+	"DETAILS_J" varchar(3900),
 	"SYN_CODE" NUMBER,
 	"DELETED" DATE,
 	"STUDY_RELATED_REPTD" NUMBER(1,0),
@@ -362,61 +257,6 @@
 	"EFFECTIVE_START_DATE" DATE,
 	"EFFECTIVE_END_DATE" DATE
    ) SEGMENT CREATION IMMEDIATE
-  PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_DATA_01"
- LOB ("DETAILS") STORE AS BASICFILE "RCE_DETAILS_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT))
- LOB ("DETAILS_J") STORE AS BASICFILE "RCE_DETAILS_J_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)) ;
---------------------------------------------------------
---  DDL for Index PK_RM_CASE_EVENT
---------------------------------------------------------
-
-  CREATE UNIQUE INDEX "MART_USER"."PK_RM_CASE_EVENT" ON "MART_USER"."RM_CASE_EVENT" ("ENTERPRISE_ID", "CASE_ID", "SEQ_NUM", "DLP_REVISION_NUMBER")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  DDL for Index I_RM_CASE_EVENT
---------------------------------------------------------
-
-  CREATE INDEX "MART_USER"."I_RM_CASE_EVENT" ON "MART_USER"."RM_CASE_EVENT" ("ENTERPRISE_ID", "CASE_ID", "EFFECTIVE_END_DATE")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  Constraints for Table RM_CASE_EVENT
---------------------------------------------------------
-
-  ALTER TABLE "MART_USER"."RM_CASE_EVENT" ADD CONSTRAINT "PK_RM_CASE_EVENT" PRIMARY KEY ("ENTERPRISE_ID", "CASE_ID", "SEQ_NUM", "DLP_REVISION_NUMBER")
-  USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01"  ENABLE;
-
-  ALTER TABLE "MART_USER"."RM_CASE_EVENT" MODIFY ("ENTERPRISE_ID" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_EVENT" MODIFY ("DELETED_FLAG" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_EVENT" MODIFY ("EFFECTIVE_START_DATE" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_EVENT" MODIFY ("EFFECTIVE_END_DATE" NOT NULL ENABLE);
---------------------------------------------------------
---  File created - Saturday-April-04-2015
---------------------------------------------------------
---------------------------------------------------------
---  DDL for Table RM_CASE_EVENT_ASSESS
---------------------------------------------------------

   create table "RM_CASE_EVENT_ASSESS"
    (	"ENTERPRISE_ID" NUMBER ,
@@ -447,51 +287,6 @@
 	"EFFECTIVE_START_DATE" DATE,
 	"EFFECTIVE_END_DATE" DATE
    ) SEGMENT CREATION IMMEDIATE
-  PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_DATA_01" ;
---------------------------------------------------------
---  DDL for Index PK_RM_CASE_EVENT_ASSESS
---------------------------------------------------------
-
-  CREATE UNIQUE INDEX "MART_USER"."PK_RM_CASE_EVENT_ASSESS" ON "MART_USER"."RM_CASE_EVENT_ASSESS" ("ENTERPRISE_ID", "CASE_ID", "EVENT_SEQ_NUM", "PROD_SEQ_NUM", "DATASHEET_ID", "LICENSE_ID", "SEQ_NUM", "DLP_REVISION_NUMBER")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  DDL for Index I_RM_CASE_EVENT_ASSESS
---------------------------------------------------------
-
-  CREATE INDEX "MART_USER"."I_RM_CASE_EVENT_ASSESS" ON "MART_USER"."RM_CASE_EVENT_ASSESS" ("ENTERPRISE_ID", "CASE_ID", "EFFECTIVE_END_DATE")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  Constraints for Table RM_CASE_EVENT_ASSESS
---------------------------------------------------------
-
-  ALTER TABLE "MART_USER"."RM_CASE_EVENT_ASSESS" ADD CONSTRAINT "PK_RM_CASE_EVENT_ASSESS" PRIMARY KEY ("ENTERPRISE_ID", "CASE_ID", "EVENT_SEQ_NUM", "PROD_SEQ_NUM", "DATASHEET_ID", "LICENSE_ID", "SEQ_NUM", "DLP_REVISION_NUMBER")
-  USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01"  ENABLE;
-
-  ALTER TABLE "MART_USER"."RM_CASE_EVENT_ASSESS" MODIFY ("ENTERPRISE_ID" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_EVENT_ASSESS" MODIFY ("DELETED_FLAG" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_EVENT_ASSESS" MODIFY ("EFFECTIVE_START_DATE" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_EVENT_ASSESS" MODIFY ("EFFECTIVE_END_DATE" NOT NULL ENABLE);
---------------------------------------------------------
---  File created - Saturday-April-04-2015
---------------------------------------------------------
---------------------------------------------------------
---  DDL for Table RM_CASE_FOLLOWUP
---------------------------------------------------------

   create table "RM_CASE_FOLLOWUP"
    (	"ENTERPRISE_ID" NUMBER ,
@@ -516,51 +311,6 @@
 	"EFFECTIVE_START_DATE" DATE,
 	"EFFECTIVE_END_DATE" DATE
    ) SEGMENT CREATION IMMEDIATE
-  PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_DATA_01" ;
---------------------------------------------------------
---  DDL for Index PK_RM_CASE_FOLLOWUP
---------------------------------------------------------
-
-  CREATE UNIQUE INDEX "MART_USER"."PK_RM_CASE_FOLLOWUP" ON "MART_USER"."RM_CASE_FOLLOWUP" ("ENTERPRISE_ID", "CASE_ID", "SEQ_NUM", "DLP_REVISION_NUMBER")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  DDL for Index I_RM_CASE_FOLLOWUP
---------------------------------------------------------
-
-  CREATE INDEX "MART_USER"."I_RM_CASE_FOLLOWUP" ON "MART_USER"."RM_CASE_FOLLOWUP" ("ENTERPRISE_ID", "CASE_ID", "EFFECTIVE_END_DATE")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  Constraints for Table RM_CASE_FOLLOWUP
---------------------------------------------------------
-
-  ALTER TABLE "MART_USER"."RM_CASE_FOLLOWUP" ADD CONSTRAINT "PK_RM_CASE_FOLLOWUP" PRIMARY KEY ("ENTERPRISE_ID", "CASE_ID", "SEQ_NUM", "DLP_REVISION_NUMBER")
-  USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01"  ENABLE;
-
-  ALTER TABLE "MART_USER"."RM_CASE_FOLLOWUP" MODIFY ("ENTERPRISE_ID" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_FOLLOWUP" MODIFY ("DELETED_FLAG" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_FOLLOWUP" MODIFY ("EFFECTIVE_START_DATE" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_FOLLOWUP" MODIFY ("EFFECTIVE_END_DATE" NOT NULL ENABLE);
---------------------------------------------------------
---  File created - Saturday-April-04-2015
---------------------------------------------------------
---------------------------------------------------------
---  DDL for Table RM_CASE_MASTER
---------------------------------------------------------

   create table "RM_CASE_MASTER"
    (	"ENTERPRISE_ID" NUMBER ,
@@ -667,59 +417,13 @@
 	"EFFECTIVE_START_DATE" DATE,
 	"EFFECTIVE_END_DATE" DATE
    ) SEGMENT CREATION IMMEDIATE
-  PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_DATA_01" ;
---------------------------------------------------------
---  DDL for Index PK_RM_CASE_MASTER
---------------------------------------------------------
-
-  CREATE UNIQUE INDEX "MART_USER"."PK_RM_CASE_MASTER" ON "MART_USER"."RM_CASE_MASTER" ("ENTERPRISE_ID", "CASE_ID", "DLP_REVISION_NUMBER")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  DDL for Index I_RM_CASE_MASTER
---------------------------------------------------------
-
-  CREATE INDEX "MART_USER"."I_RM_CASE_MASTER" ON "MART_USER"."RM_CASE_MASTER" ("ENTERPRISE_ID", "CASE_ID", "EFFECTIVE_END_DATE")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  Constraints for Table RM_CASE_MASTER
---------------------------------------------------------
-
-  ALTER TABLE "MART_USER"."RM_CASE_MASTER" ADD CONSTRAINT "PK_RM_CASE_MASTER" PRIMARY KEY ("ENTERPRISE_ID", "CASE_ID", "DLP_REVISION_NUMBER")
-  USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01"  ENABLE;
-
-  ALTER TABLE "MART_USER"."RM_CASE_MASTER" MODIFY ("ENTERPRISE_ID" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_MASTER" MODIFY ("DELETED_FLAG" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_MASTER" MODIFY ("EFFECTIVE_START_DATE" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_MASTER" MODIFY ("EFFECTIVE_END_DATE" NOT NULL ENABLE);
---------------------------------------------------------
---  File created - Saturday-April-04-2015
---------------------------------------------------------
---------------------------------------------------------
---  DDL for Table RM_CASE_NARRATIVE
---------------------------------------------------------
-
   create table "RM_CASE_NARRATIVE"
    (	"ENTERPRISE_ID" NUMBER ,
 	"CASE_ID" NUMBER,
-	"ABBREV_NARRATIVE" CLOB DEFAULT EMPTY_CLOB(),
-	"ABBREV_NARRATIVE_J" CLOB,
-	"NARRATIVE" CLOB,
-	"NARRATIVE_J" CLOB,
+	"ABBREV_NARRATIVE" varchar(3900),
+	"ABBREV_NARRATIVE_J" varchar(3900),
+	"NARRATIVE" varchar(3900),
+	"NARRATIVE_J" varchar(3900),
 	"DELETED" DATE,
 	"DLP_REVISION_NUMBER" NUMBER,
 	"REVISION_DELETE_FLAG" NUMBER DEFAULT 0,
@@ -727,71 +431,6 @@
 	"EFFECTIVE_START_DATE" DATE,
 	"EFFECTIVE_END_DATE" DATE
    ) SEGMENT CREATION IMMEDIATE
-  PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_DATA_01"
- LOB ("ABBREV_NARRATIVE") STORE AS BASICFILE "RCN_ABBREV_NARRATIVE_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT))
- LOB ("ABBREV_NARRATIVE_J") STORE AS BASICFILE "RCN_ABBREV_NARRATIVE_J_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT))
- LOB ("NARRATIVE") STORE AS BASICFILE "RCN_NARRATIVE_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT))
- LOB ("NARRATIVE_J") STORE AS BASICFILE "RCN_NARRATIVE_J_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)) ;
---------------------------------------------------------
---  DDL for Index PK_RM_CASE_NARRATIVE
---------------------------------------------------------
-
-  CREATE UNIQUE INDEX "MART_USER"."PK_RM_CASE_NARRATIVE" ON "MART_USER"."RM_CASE_NARRATIVE" ("ENTERPRISE_ID", "CASE_ID", "DLP_REVISION_NUMBER")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  DDL for Index I_RM_CASE_NARRATIVE
---------------------------------------------------------
-
-  CREATE INDEX "MART_USER"."I_RM_CASE_NARRATIVE" ON "MART_USER"."RM_CASE_NARRATIVE" ("ENTERPRISE_ID", "CASE_ID", "EFFECTIVE_END_DATE")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  Constraints for Table RM_CASE_NARRATIVE
---------------------------------------------------------
-
-  ALTER TABLE "MART_USER"."RM_CASE_NARRATIVE" ADD CONSTRAINT "PK_RM_CASE_NARRATIVE" PRIMARY KEY ("ENTERPRISE_ID", "CASE_ID", "DLP_REVISION_NUMBER")
-  USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01"  ENABLE;
-
-  ALTER TABLE "MART_USER"."RM_CASE_NARRATIVE" MODIFY ("ENTERPRISE_ID" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_NARRATIVE" MODIFY ("DELETED_FLAG" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_NARRATIVE" MODIFY ("EFFECTIVE_START_DATE" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_NARRATIVE" MODIFY ("EFFECTIVE_END_DATE" NOT NULL ENABLE);
---------------------------------------------------------
---  File created - Saturday-April-04-2015
---------------------------------------------------------
---------------------------------------------------------
---  DDL for Table RM_CASE_PAT_INFO
---------------------------------------------------------

   create table "RM_CASE_PAT_INFO"
    (	"ENTERPRISE_ID" NUMBER ,
@@ -890,66 +529,11 @@
 	"DELETED_FLAG" NUMBER(1,0),
 	"EFFECTIVE_START_DATE" DATE,
 	"EFFECTIVE_END_DATE" DATE,
-	"NOTES" CLOB,
-	"NOTES_J" CLOB,
+	"NOTES" varchar(3900),
+	"NOTES_J" varchar(3900),
 	"AGE_UNIT_ID_AT_VACC" NUMBER,
 	"PAT_AGE_AT_VACC" NUMBER
    ) SEGMENT CREATION IMMEDIATE
-  PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_DATA_01"
- LOB ("NOTES") STORE AS BASICFILE "RCPI_NOTES_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT))
- LOB ("NOTES_J") STORE AS BASICFILE "RCPI_NOTES_J_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)) ;
---------------------------------------------------------
---  DDL for Index PK_RM_CASE_PAT_INFO
---------------------------------------------------------
-
-  CREATE UNIQUE INDEX "MART_USER"."PK_RM_CASE_PAT_INFO" ON "MART_USER"."RM_CASE_PAT_INFO" ("ENTERPRISE_ID", "CASE_ID", "DLP_REVISION_NUMBER")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  DDL for Index I_RM_CASE_PAT_INFO
---------------------------------------------------------
-
-  CREATE INDEX "MART_USER"."I_RM_CASE_PAT_INFO" ON "MART_USER"."RM_CASE_PAT_INFO" ("ENTERPRISE_ID", "CASE_ID", "EFFECTIVE_END_DATE")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  Constraints for Table RM_CASE_PAT_INFO
---------------------------------------------------------
-
-  ALTER TABLE "MART_USER"."RM_CASE_PAT_INFO" ADD CONSTRAINT "PK_RM_CASE_PAT_INFO" PRIMARY KEY ("ENTERPRISE_ID", "CASE_ID", "DLP_REVISION_NUMBER")
-  USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01"  ENABLE;
-
-  ALTER TABLE "MART_USER"."RM_CASE_PAT_INFO" MODIFY ("ENTERPRISE_ID" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_PAT_INFO" MODIFY ("DELETED_FLAG" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_PAT_INFO" MODIFY ("EFFECTIVE_START_DATE" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_PAT_INFO" MODIFY ("EFFECTIVE_END_DATE" NOT NULL ENABLE);
---------------------------------------------------------
---  File created - Saturday-April-04-2015
---------------------------------------------------------
---------------------------------------------------------
---  DDL for Table RM_CASE_PROD_DRUGS
---------------------------------------------------------

   create table "RM_CASE_PROD_DRUGS"
    (	"ENTERPRISE_ID" NUMBER ,
@@ -1048,51 +632,6 @@
 	"EFFECTIVE_START_DATE" DATE,
 	"EFFECTIVE_END_DATE" DATE
    ) SEGMENT CREATION IMMEDIATE
-  PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_DATA_01" ;
---------------------------------------------------------
---  DDL for Index PK_RM_CASE_PROD_DRUGS
---------------------------------------------------------
-
-  CREATE UNIQUE INDEX "MART_USER"."PK_RM_CASE_PROD_DRUGS" ON "MART_USER"."RM_CASE_PROD_DRUGS" ("ENTERPRISE_ID", "CASE_ID", "SEQ_NUM", "DLP_REVISION_NUMBER")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  DDL for Index I_RM_CASE_PROD_DRUGS
---------------------------------------------------------
-
-  CREATE INDEX "MART_USER"."I_RM_CASE_PROD_DRUGS" ON "MART_USER"."RM_CASE_PROD_DRUGS" ("ENTERPRISE_ID", "CASE_ID", "EFFECTIVE_END_DATE")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  Constraints for Table RM_CASE_PROD_DRUGS
---------------------------------------------------------
-
-  ALTER TABLE "MART_USER"."RM_CASE_PROD_DRUGS" ADD CONSTRAINT "PK_RM_CASE_PROD_DRUGS" PRIMARY KEY ("ENTERPRISE_ID", "CASE_ID", "SEQ_NUM", "DLP_REVISION_NUMBER")
-  USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01"  ENABLE;
-
-  ALTER TABLE "MART_USER"."RM_CASE_PROD_DRUGS" MODIFY ("ENTERPRISE_ID" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_PROD_DRUGS" MODIFY ("DELETED_FLAG" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_PROD_DRUGS" MODIFY ("EFFECTIVE_START_DATE" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_PROD_DRUGS" MODIFY ("EFFECTIVE_END_DATE" NOT NULL ENABLE);
---------------------------------------------------------
---  File created - Saturday-April-04-2015
---------------------------------------------------------
---------------------------------------------------------
---  DDL for Table RM_CASE_PRODUCT
---------------------------------------------------------

   create table "RM_CASE_PRODUCT"
    (	"ENTERPRISE_ID" NUMBER ,
@@ -1115,8 +654,8 @@
 	"WHO_DRUG_CODE" varchar(45),
 	"CO_DRUG_CODE" varchar(20),
 	"PRODUCT_NAME" varchar(70),
-	"GENERIC_NAME" CLOB,
-	"GENERIC_NAME_J" CLOB,
+	"GENERIC_NAME" varchar(3900),
+	"GENERIC_NAME_J" varchar(3900),
 	"UD_TEXT_1" varchar(100),
 	"UD_TEXT_2" varchar(100),
 	"UD_TEXT_3" varchar(100),
@@ -1194,136 +733,21 @@
 	"DELETED_FLAG" NUMBER(1,0),
 	"EFFECTIVE_START_DATE" DATE,
 	"EFFECTIVE_END_DATE" DATE,
-	"NOTES" CLOB,
-	"NOTES_J" CLOB,
-	"QC_ANALYSIS_CAT_TEXT" CLOB,
-	"QC_ANALYSIS_CAT_TEXT_J" CLOB,
-	"QC_ANAL_SUMMARY_TEXT" CLOB,
-	"QC_ANAL_SUMMARY_TEXT_J" CLOB,
-	"QC_RESULT" CLOB,
-	"QC_RESULT_J" CLOB,
-	"QC_COMMENT" CLOB,
-	"QC_COMMENT_J" CLOB,
-	"QC_COMPLAINT_CAT_TEXT" CLOB,
-	"QC_COMPLAINT_CAT_TEXT_J" CLOB,
+	"NOTES" varchar(3900),
+	"NOTES_J" varchar(3900),
+	"QC_ANALYSIS_CAT_TEXT" varchar(3900),
+	"QC_ANALYSIS_CAT_TEXT_J" varchar(3900),
+	"QC_ANAL_SUMMARY_TEXT" varchar(3900),
+	"QC_ANAL_SUMMARY_TEXT_J" varchar(3900),
+	"QC_RESULT" varchar(3900),
+	"QC_RESULT_J" varchar(3900),
+	"QC_COMMENT" varchar(3900),
+	"QC_COMMENT_J" varchar(3900),
+	"QC_COMPLAINT_CAT_TEXT" varchar(3900),
+	"QC_COMPLAINT_CAT_TEXT_J" varchar(3900),
 	"VAERS_BLOCK_ID" NUMBER,
 	"PROD_LIC_ID" NUMBER
    ) SEGMENT CREATION IMMEDIATE
-  PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_DATA_01"
- LOB ("GENERIC_NAME") STORE AS BASICFILE "RCP_GEN_NAME_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT))
- LOB ("GENERIC_NAME_J") STORE AS BASICFILE "RCP_GEN_NAME_J_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT))
- LOB ("NOTES") STORE AS BASICFILE "RCP_NOTES_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT))
- LOB ("NOTES_J") STORE AS BASICFILE "RCP_NOTES_J_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT))
- LOB ("QC_ANALYSIS_CAT_TEXT") STORE AS BASICFILE "RCP_QC_ANAL_CAT_TEXT_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT))
- LOB ("QC_ANALYSIS_CAT_TEXT_J") STORE AS BASICFILE "RCP_QC_ANAL_CAT_TEXT_J_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT))
- LOB ("QC_ANAL_SUMMARY_TEXT") STORE AS BASICFILE "RCP_QC_ANAL_SUM_TEXT_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT))
- LOB ("QC_ANAL_SUMMARY_TEXT_J") STORE AS BASICFILE "RCP_QC_ANAL_SUM_TEXT_J_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT))
- LOB ("QC_RESULT") STORE AS BASICFILE "RCP_QC_RESULT_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT))
- LOB ("QC_RESULT_J") STORE AS BASICFILE "RCP_QC_RESULT_J_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT))
- LOB ("QC_COMMENT") STORE AS BASICFILE "RCP_QC_COMMENT_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT))
- LOB ("QC_COMMENT_J") STORE AS BASICFILE "RCP_QC_COMMENT_J_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT))
- LOB ("QC_COMPLAINT_CAT_TEXT") STORE AS BASICFILE "RCP_QC_COMP_CAT_TEXT_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT))
- LOB ("QC_COMPLAINT_CAT_TEXT_J") STORE AS BASICFILE "RCP_QC_COMP_CAT_TXT_J_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)) ;
---------------------------------------------------------
---  DDL for Index PK_RM_CASE_PRODUCT
---------------------------------------------------------
-
-  CREATE UNIQUE INDEX "MART_USER"."PK_RM_CASE_PRODUCT" ON "MART_USER"."RM_CASE_PRODUCT" ("ENTERPRISE_ID", "CASE_ID", "SEQ_NUM", "DLP_REVISION_NUMBER")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  DDL for Index I_RM_CASE_PRODUCT
---------------------------------------------------------
-
-  CREATE INDEX "MART_USER"."I_RM_CASE_PRODUCT" ON "MART_USER"."RM_CASE_PRODUCT" ("ENTERPRISE_ID", "CASE_ID", "EFFECTIVE_END_DATE")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  Constraints for Table RM_CASE_PRODUCT
---------------------------------------------------------
-
-  ALTER TABLE "MART_USER"."RM_CASE_PRODUCT" ADD CONSTRAINT "PK_RM_CASE_PRODUCT" PRIMARY KEY ("ENTERPRISE_ID", "CASE_ID", "SEQ_NUM", "DLP_REVISION_NUMBER")
-  USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01"  ENABLE;
-
-  ALTER TABLE "MART_USER"."RM_CASE_PRODUCT" MODIFY ("ENTERPRISE_ID" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_PRODUCT" MODIFY ("DELETED_FLAG" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_PRODUCT" MODIFY ("EFFECTIVE_START_DATE" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_PRODUCT" MODIFY ("EFFECTIVE_END_DATE" NOT NULL ENABLE);
---------------------------------------------------------
---  File created - Saturday-April-04-2015
---------------------------------------------------------
---------------------------------------------------------
---  DDL for Table RM_CASE_REPORTERS
---------------------------------------------------------

   create table "RM_CASE_REPORTERS"
    (	"ENTERPRISE_ID" NUMBER ,
@@ -1374,65 +798,10 @@
 	"DELETED_FLAG" NUMBER(1,0),
 	"EFFECTIVE_START_DATE" DATE,
 	"EFFECTIVE_END_DATE" DATE,
-	"NOTES" CLOB,
-	"NOTES_J" CLOB,
+	"NOTES" varchar(3900),
+	"NOTES_J" varchar(3900),
 	"INSTITUTION_ID" varchar(15 CHAR)
    ) SEGMENT CREATION IMMEDIATE
-  PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_DATA_01"
- LOB ("NOTES") STORE AS BASICFILE "RCR_NOTES_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT))
- LOB ("NOTES_J") STORE AS BASICFILE "RCR_NOTES_J_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)) ;
---------------------------------------------------------
---  DDL for Index PK_RM_CASE_REPORTERS
---------------------------------------------------------
-
-  CREATE UNIQUE INDEX "MART_USER"."PK_RM_CASE_REPORTERS" ON "MART_USER"."RM_CASE_REPORTERS" ("ENTERPRISE_ID", "CASE_ID", "SEQ_NUM", "DLP_REVISION_NUMBER")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  DDL for Index I_RM_CASE_REPORTERS
---------------------------------------------------------
-
-  CREATE INDEX "MART_USER"."I_RM_CASE_REPORTERS" ON "MART_USER"."RM_CASE_REPORTERS" ("ENTERPRISE_ID", "CASE_ID", "EFFECTIVE_END_DATE")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  Constraints for Table RM_CASE_REPORTERS
---------------------------------------------------------
-
-  ALTER TABLE "MART_USER"."RM_CASE_REPORTERS" ADD CONSTRAINT "PK_RM_CASE_REPORTERS" PRIMARY KEY ("ENTERPRISE_ID", "CASE_ID", "SEQ_NUM", "DLP_REVISION_NUMBER")
-  USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01"  ENABLE;
-
-  ALTER TABLE "MART_USER"."RM_CASE_REPORTERS" MODIFY ("ENTERPRISE_ID" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_REPORTERS" MODIFY ("DELETED_FLAG" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_REPORTERS" MODIFY ("EFFECTIVE_START_DATE" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_REPORTERS" MODIFY ("EFFECTIVE_END_DATE" NOT NULL ENABLE);
---------------------------------------------------------
---  File created - Saturday-April-04-2015
---------------------------------------------------------
---------------------------------------------------------
---  DDL for Table RM_CASE_STUDY
---------------------------------------------------------

   create table "RM_CASE_STUDY"
    (	"ENTERPRISE_ID" NUMBER ,
@@ -1455,8 +824,8 @@
 	"PRODUCT_COUNT" NUMBER(2,0),
 	"CLASSIFICATION_ID" NUMBER,
 	"BLIND_NAME" varchar(70),
-	"STUDY_DESC" CLOB,
-	"STUDY_DESC_J" CLOB,
+	"STUDY_DESC" varchar(3900),
+	"STUDY_DESC_J" varchar(3900),
 	"BLIND_NAME_J" varchar(70),
 	"CENTER_NAME_J" varchar(40),
 	"CLIN_COMPOUND_NUM_J" varchar(70),
@@ -1470,61 +839,6 @@
 	"EFFECTIVE_END_DATE" DATE,
 	"COHORT_ID" NUMBER
    ) SEGMENT CREATION IMMEDIATE
-  PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_DATA_01"
- LOB ("STUDY_DESC") STORE AS BASICFILE "RCS_STUDY_DESC_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT))
- LOB ("STUDY_DESC_J") STORE AS BASICFILE "RCS_STUDY_DESC_J_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)) ;
---------------------------------------------------------
---  DDL for Index PK_RM_CASE_STUDY
---------------------------------------------------------
-
-  CREATE UNIQUE INDEX "MART_USER"."PK_RM_CASE_STUDY" ON "MART_USER"."RM_CASE_STUDY" ("ENTERPRISE_ID", "CASE_ID", "DLP_REVISION_NUMBER")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  DDL for Index I_RM_CASE_STUDY
---------------------------------------------------------
-
-  CREATE INDEX "MART_USER"."I_RM_CASE_STUDY" ON "MART_USER"."RM_CASE_STUDY" ("ENTERPRISE_ID", "CASE_ID", "EFFECTIVE_END_DATE")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  Constraints for Table RM_CASE_STUDY
---------------------------------------------------------
-
-  ALTER TABLE "MART_USER"."RM_CASE_STUDY" ADD CONSTRAINT "PK_RM_CASE_STUDY" PRIMARY KEY ("ENTERPRISE_ID", "CASE_ID", "DLP_REVISION_NUMBER")
-  USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01"  ENABLE;
-
-  ALTER TABLE "MART_USER"."RM_CASE_STUDY" MODIFY ("ENTERPRISE_ID" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_STUDY" MODIFY ("DELETED_FLAG" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_STUDY" MODIFY ("EFFECTIVE_START_DATE" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_CASE_STUDY" MODIFY ("EFFECTIVE_END_DATE" NOT NULL ENABLE);
---------------------------------------------------------
---  File created - Saturday-April-04-2015
---------------------------------------------------------
---------------------------------------------------------
---  DDL for Table RM_LM_CASE_CLASSIFICATION
---------------------------------------------------------

   create table "RM_LM_CASE_CLASSIFICATION"
    (	"ENTERPRISE_ID" NUMBER ,
@@ -1536,38 +850,6 @@
 	"DELETED" DATE,
 	"E2B_CODE" NUMBER
    ) SEGMENT CREATION IMMEDIATE
-  PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_DATA_01" ;
---------------------------------------------------------
---  DDL for Index PK_RM_LM_CASE_CLASSIFICATION
---------------------------------------------------------
-
-  CREATE UNIQUE INDEX "MART_USER"."PK_RM_LM_CASE_CLASSIFICATION" ON "MART_USER"."RM_LM_CASE_CLASSIFICATION" ("ENTERPRISE_ID", "CLASSIFICATION_ID")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  Constraints for Table RM_LM_CASE_CLASSIFICATION
---------------------------------------------------------
-
-  ALTER TABLE "MART_USER"."RM_LM_CASE_CLASSIFICATION" ADD CONSTRAINT "PK_RM_LM_CASE_CLASSIFICATION" PRIMARY KEY ("ENTERPRISE_ID", "CLASSIFICATION_ID")
-  USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01"  ENABLE;
-
-  ALTER TABLE "MART_USER"."RM_LM_CASE_CLASSIFICATION" MODIFY ("ENTERPRISE_ID" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_LM_CASE_CLASSIFICATION" MODIFY ("DESCRIPTION" NOT NULL ENABLE);
---------------------------------------------------------
---  File created - Saturday-April-04-2015
---------------------------------------------------------
---------------------------------------------------------
---  DDL for Table RM_LM_CAUSALITY
---------------------------------------------------------

   create table "RM_LM_CAUSALITY"
    (	"ENTERPRISE_ID" NUMBER ,
@@ -1579,38 +861,6 @@
 	"CAUSALITY_J" varchar(35),
 	"DELETED" DATE
    ) SEGMENT CREATION IMMEDIATE
-  PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_DATA_01" ;
---------------------------------------------------------
---  DDL for Index PK_RM_LM_CAUSALITY
---------------------------------------------------------
-
-  CREATE UNIQUE INDEX "MART_USER"."PK_RM_LM_CAUSALITY" ON "MART_USER"."RM_LM_CAUSALITY" ("ENTERPRISE_ID", "CAUSALITY_ID")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  Constraints for Table RM_LM_CAUSALITY
---------------------------------------------------------
-
-  ALTER TABLE "MART_USER"."RM_LM_CAUSALITY" ADD CONSTRAINT "PK_RM_LM_CAUSALITY" PRIMARY KEY ("ENTERPRISE_ID", "CAUSALITY_ID")
-  USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01"  ENABLE;
-
-  ALTER TABLE "MART_USER"."RM_LM_CAUSALITY" MODIFY ("ENTERPRISE_ID" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_LM_CAUSALITY" MODIFY ("CAUSALITY" NOT NULL ENABLE);
---------------------------------------------------------
---  File created - Saturday-April-04-2015
---------------------------------------------------------
---------------------------------------------------------
---  DDL for Table RM_LM_COUNTRIES
---------------------------------------------------------

   create table "RM_LM_COUNTRIES"
    (	"ENTERPRISE_ID" NUMBER ,
@@ -1626,38 +876,6 @@
 	"COUNTRY_J" varchar(50),
 	"GROUP_2_COUNTRY" NUMBER
    ) SEGMENT CREATION IMMEDIATE
-  PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_DATA_01" ;
---------------------------------------------------------
---  DDL for Index PK_RM_LM_COUNTRIES
---------------------------------------------------------
-
-  CREATE UNIQUE INDEX "MART_USER"."PK_RM_LM_COUNTRIES" ON "MART_USER"."RM_LM_COUNTRIES" ("ENTERPRISE_ID", "COUNTRY_ID")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  Constraints for Table RM_LM_COUNTRIES
---------------------------------------------------------
-
-  ALTER TABLE "MART_USER"."RM_LM_COUNTRIES" ADD CONSTRAINT "PK_RM_LM_COUNTRIES" PRIMARY KEY ("ENTERPRISE_ID", "COUNTRY_ID")
-  USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01"  ENABLE;
-
-  ALTER TABLE "MART_USER"."RM_LM_COUNTRIES" MODIFY ("ENTERPRISE_ID" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_LM_COUNTRIES" MODIFY ("COUNTRY" NOT NULL ENABLE);
---------------------------------------------------------
---  File created - Saturday-April-04-2015
---------------------------------------------------------
---------------------------------------------------------
---  DDL for Table RM_LM_PRODUCT
---------------------------------------------------------

   create table "RM_LM_PRODUCT"
    (	"ENTERPRISE_ID" NUMBER ,
@@ -1676,8 +894,8 @@
 	"DRL_ID" varchar(45),
 	"DRUG_CODE" varchar(20),
 	"DELETED" DATE,
-	"PROD_GENERIC_NAME" CLOB,
-	"PROD_GENERIC_NAME_J" CLOB,
+	"PROD_GENERIC_NAME" varchar(3900),
+	"PROD_GENERIC_NAME_J" varchar(3900),
 	"IND_LLT_CODE" varchar(50),
 	"IND_LLT" varchar(250),
 	"IND_HLT_CODE" varchar(50),
@@ -1712,46 +930,6 @@
 	"DEV_INTL_BIRTH_DATE" DATE,
 	"COMMENTS_J" varchar(1000 CHAR)
    ) SEGMENT CREATION IMMEDIATE
-  PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_DATA_01"
- LOB ("PROD_GENERIC_NAME") STORE AS BASICFILE "RLP_PROD_GENERIC_NAME_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT))
- LOB ("PROD_GENERIC_NAME_J") STORE AS BASICFILE "RLP_PROD_GEN_NAME_J_CLOB"(
-  TABLESPACE "AM_MART_LOB_01" ENABLE STORAGE IN ROW CHUNK 8192 RETENTION
-  NOCACHE LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)) ;
---------------------------------------------------------
---  DDL for Index PK_RM_LM_PRODUCT
---------------------------------------------------------
-
-  CREATE UNIQUE INDEX "MART_USER"."PK_RM_LM_PRODUCT" ON "MART_USER"."RM_LM_PRODUCT" ("ENTERPRISE_ID", "PRODUCT_ID")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  Constraints for Table RM_LM_PRODUCT
---------------------------------------------------------
-
-  ALTER TABLE "MART_USER"."RM_LM_PRODUCT" ADD CONSTRAINT "PK_RM_LM_PRODUCT" PRIMARY KEY ("ENTERPRISE_ID", "PRODUCT_ID")
-  USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01"  ENABLE;
-
-  ALTER TABLE "MART_USER"."RM_LM_PRODUCT" MODIFY ("ENTERPRISE_ID" NOT NULL ENABLE);
---------------------------------------------------------
---  File created - Saturday-April-04-2015
---------------------------------------------------------
---------------------------------------------------------
---  DDL for Table RM_LM_PRODUCT_FAMILY
---------------------------------------------------------

   create table "RM_LM_PRODUCT_FAMILY"
    (	"ENTERPRISE_ID" NUMBER ,
@@ -1765,36 +943,6 @@
 	"NAME_J" varchar(40),
 	"COMMENTS_J" varchar(1000 CHAR)
    ) SEGMENT CREATION IMMEDIATE
-  PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_DATA_01" ;
---------------------------------------------------------
---  DDL for Index PK_RM_LM_PRODUCT_FAMILY
---------------------------------------------------------
-
-  CREATE UNIQUE INDEX "MART_USER"."PK_RM_LM_PRODUCT_FAMILY" ON "MART_USER"."RM_LM_PRODUCT_FAMILY" ("ENTERPRISE_ID", "FAMILY_ID")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  Constraints for Table RM_LM_PRODUCT_FAMILY
---------------------------------------------------------
-
-  ALTER TABLE "MART_USER"."RM_LM_PRODUCT_FAMILY" ADD CONSTRAINT "PK_RM_LM_PRODUCT_FAMILY" PRIMARY KEY ("ENTERPRISE_ID", "FAMILY_ID")
-  USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01"  ENABLE;
-
-  ALTER TABLE "MART_USER"."RM_LM_PRODUCT_FAMILY" MODIFY ("ENTERPRISE_ID" NOT NULL ENABLE);
---------------------------------------------------------
---  File created - Saturday-April-04-2015
---------------------------------------------------------
---------------------------------------------------------
---  DDL for Table RM_LM_REPORT_TYPE
---------------------------------------------------------

   create table "RM_LM_REPORT_TYPE"
    (	"ENTERPRISE_ID" NUMBER ,
@@ -1811,40 +959,6 @@
 	"DELETED" DATE,
 	"INCL_RESEARCH" NUMBER
    ) SEGMENT CREATION IMMEDIATE
-  PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_DATA_01" ;
---------------------------------------------------------
---  DDL for Index PK_RM_LM_REPORT_TYPE
---------------------------------------------------------
-
-  CREATE UNIQUE INDEX "MART_USER"."PK_RM_LM_REPORT_TYPE" ON "MART_USER"."RM_LM_REPORT_TYPE" ("ENTERPRISE_ID", "RPT_TYPE_ID")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  Constraints for Table RM_LM_REPORT_TYPE
---------------------------------------------------------
-
-  ALTER TABLE "MART_USER"."RM_LM_REPORT_TYPE" ADD CONSTRAINT "PK_RM_LM_REPORT_TYPE" PRIMARY KEY ("ENTERPRISE_ID", "RPT_TYPE_ID")
-  USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01"  ENABLE;
-
-  ALTER TABLE "MART_USER"."RM_LM_REPORT_TYPE" MODIFY ("ENTERPRISE_ID" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_LM_REPORT_TYPE" MODIFY ("REPORT_TYPE" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_LM_REPORT_TYPE" MODIFY ("INCL_RESEARCH" NOT NULL ENABLE);
---------------------------------------------------------
---  File created - Saturday-April-04-2015
---------------------------------------------------------
---------------------------------------------------------
---  DDL for Table RM_MEDDRA_SMQ_CONTENT
---------------------------------------------------------

   create table "RM_MEDDRA_SMQ_CONTENT"
    (	"GLOBAL_DICT_ID" NUMBER ,
@@ -1858,50 +972,6 @@
 	"TERM_ADDITION_VERSION" varchar(5),
 	"TERM_LAST_MODIFIED_VERSION" varchar(5 CHAR)
    ) SEGMENT CREATION IMMEDIATE
-  PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_DATA_01" ;
---------------------------------------------------------
---  DDL for Index PK_RM_MEDDRA_SMQ_CONTENT
---------------------------------------------------------
-
-  CREATE UNIQUE INDEX "MART_USER"."PK_RM_MEDDRA_SMQ_CONTENT" ON "MART_USER"."RM_MEDDRA_SMQ_CONTENT" ("GLOBAL_DICT_ID", "SMQ_CODE", "TERM_CODE")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  Constraints for Table RM_MEDDRA_SMQ_CONTENT
---------------------------------------------------------
-
-  ALTER TABLE "MART_USER"."RM_MEDDRA_SMQ_CONTENT" ADD CONSTRAINT "PK_RM_MEDDRA_SMQ_CONTENT" PRIMARY KEY ("GLOBAL_DICT_ID", "SMQ_CODE", "TERM_CODE")
-  USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01"  ENABLE;
-
-  ALTER TABLE "MART_USER"."RM_MEDDRA_SMQ_CONTENT" MODIFY ("GLOBAL_DICT_ID" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_MEDDRA_SMQ_CONTENT" MODIFY ("TERM_LEVEL" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_MEDDRA_SMQ_CONTENT" MODIFY ("TERM_SCOPE" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_MEDDRA_SMQ_CONTENT" MODIFY ("TERM_CATEGORY" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_MEDDRA_SMQ_CONTENT" MODIFY ("TERM_WEIGHT" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_MEDDRA_SMQ_CONTENT" MODIFY ("TERM_STATUS" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_MEDDRA_SMQ_CONTENT" MODIFY ("TERM_ADDITION_VERSION" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_MEDDRA_SMQ_CONTENT" MODIFY ("TERM_LAST_MODIFIED_VERSION" NOT NULL ENABLE);
---------------------------------------------------------
---  File created - Saturday-April-04-2015
---------------------------------------------------------
---------------------------------------------------------
---  DDL for Table RM_MEDDRA_SMQ_LIST
---------------------------------------------------------

   create table "RM_MEDDRA_SMQ_LIST"
    (	"GLOBAL_DICT_ID" NUMBER ,
@@ -1915,37 +985,3 @@
 	"STATUS" varchar(1),
 	"SMQ_ALGORITHM" varchar(100 CHAR)
    ) SEGMENT CREATION IMMEDIATE
-  PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_DATA_01" ;
---------------------------------------------------------
---  DDL for Index PK_RM_MEDDRA_SMQ_LIST
---------------------------------------------------------
-
-  CREATE UNIQUE INDEX "MART_USER"."PK_RM_MEDDRA_SMQ_LIST" ON "MART_USER"."RM_MEDDRA_SMQ_LIST" ("GLOBAL_DICT_ID", "SMQ_CODE")
-  PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01" ;
---------------------------------------------------------
---  Constraints for Table RM_MEDDRA_SMQ_LIST
---------------------------------------------------------
-
-  ALTER TABLE "MART_USER"."RM_MEDDRA_SMQ_LIST" ADD CONSTRAINT "PK_RM_MEDDRA_SMQ_LIST" PRIMARY KEY ("GLOBAL_DICT_ID", "SMQ_CODE")
-  USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS
-  STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645
-  PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT)
-  TABLESPACE "AM_MART_INDEX_01"  ENABLE;
-
-  ALTER TABLE "MART_USER"."RM_MEDDRA_SMQ_LIST" MODIFY ("GLOBAL_DICT_ID" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_MEDDRA_SMQ_LIST" MODIFY ("SMQ_NAME" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_MEDDRA_SMQ_LIST" MODIFY ("SMQ_LEVEL" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_MEDDRA_SMQ_LIST" MODIFY ("MEDDRA_VERSION" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_MEDDRA_SMQ_LIST" MODIFY ("STATUS" NOT NULL ENABLE);
-
-  ALTER TABLE "MART_USER"."RM_MEDDRA_SMQ_LIST" MODIFY ("SMQ_ALGORITHM" NOT NULL ENABLE);


fix test

fix test

--- test/zookeeper_exp1/test_util.clj
+++ test/zookeeper_exp1/test_util.clj
@@ -1,7 +1,7 @@
 (ns zookeeper-exp1.test-util
   (:require [zookeeper-exp1.util :refer :all]
+            [zookeeper-exp1.run-state-machine :as rsm]
             [clojure.test :refer :all]
-            [zookeeper-exp1.buddy-circle :refer :all]
             [zookeeper :as zk])
   (:import [org.apache.curator.test TestingServer]))

@@ -9,11 +9,11 @@

 (defn create-root-znode
   [client]
-  (zk/create client root-znode-path :persistent? true))
+  (zk/create client rsm/root-znode-path :persistent? true))

 (defn setup-embedded-zk [f]
   (let [server (TestingServer. port)]
-    (reset! client (connect))
+    (reset! client (zk/connect (str "127.0.0.1:" 2181)))
     (create-root-znode @client)
     (f)
     (.close server)))


whitespace

whitespace

--- src/babel/italiano/grammar.cljc
+++ src/babel/italiano/grammar.cljc
@@ -609,7 +609,6 @@
      {})
    (if (get-in tree [:head])
      {:head (morph-walk-tree (get-in tree [:head]))})))
-

 (defn lexicon-for-generation [lexicon]
   (into {}


+(def tenses)

+(def tenses)

--- src/babel/italiano/grammar.cljc
+++ src/babel/italiano/grammar.cljc
@@ -25,6 +25,15 @@
    [:synsem :aux]
    [:synsem :cat]
    [:synsem :sem :pred]])
+
+(def tenses
+  {"present" {:synsem {:sem {:tense :present}}}
+   "conditional" {:synsem {:sem {:tense :conditional}}}
+   "future" {:synsem {:sem {:tense :future}}}
+   "imperfetto" {:synsem {:sem {:aspect :progressive
+                                :tense :past}}}
+   "passato" {:synsem {:sem {:aspect :perfect
+                             :tense :past}}}})

 (defn fo-ps [expr]
   (parse/fo-ps expr fo))


+(defn edn2lexicon)

+(defn edn2lexicon)

--- src/babel/italiano/lexicon.cljc
+++ src/babel/italiano/lexicon.cljc
@@ -50,144 +50,146 @@

 (def analyze-lexemes false)

-(def lexicon-hash-from-edn
-  (read-string (slurp "/Users/ekoontz/babel/src/babel/italiano/lexicon.edn")))
+(defn edn2lexicon [filename]
+  (let [lexicon-hash-from-edn (read-string (slurp filename))
+        lexicon-source
+        (zipmap
+         (sort (keys lexicon-hash-from-edn))
+         (map (fn [k]
+                (let [evaluated (eval (get lexicon-hash-from-edn k))
+                      vals (cond (or (seq? evaluated) (vector? evaluated))
+                                 evaluated
+                                 true [evaluated])]
+                  (map (fn [v]
+                         (reduce unify
+                                 (cons
+                                  (dissoc v :unify)
+                                  (map (fn [each-unify-arg]
+                                         (cond (fn? each-unify-arg)
+                                               (each-unify-arg)
+                                               true each-unify-arg))
+                                 (:unify v)))))
+                       vals)))
+              (sort (keys lexicon-hash-from-edn))))]
+    ;; see TODOs in lexiconfn/compile-lex (should be more of a pipeline as
+    ;; opposed to a argument-position-sensitive function.
+    (-> (compile-lex lexicon-source
+                     exception-generator
+                     ;; TODO: rewrite phonize as (constrain-val-if)(one or more)
+                     phonize
+                     ;; TODO: rewrite italian-specific-rules as (constrain-vals-if)(one or more)
+                     italian-specific-rules)
+
+        ;; filter out entries with no :cat.
+        (filter-vals
+         #(or (and (not (= :none (get-in % [:synsem :cat] :none)))
+                   (or (log/debug (str "lexical entry has a cat - good : " (strip-refs %)))
+                       true))
+              (and (log/warn (str "ignoring lexical entry with no :cat: " (strip-refs %)))
+                   false)))
+
+        (constrain-vals-if
+         (fn [val]
+           (not (nil? (get universals (get-in val [:synsem :sem :pred])))))
+         (fn [val]
+           (get universals (get-in val [:synsem :sem :pred]))))
+
+        ;; TODO: refactor this; it's very monolithic currently:
+        intransitivize
+
+        ;; if verb does specify a [:sem :obj], then fill it in with subcat info.
+        ;; TODO: refactor this; it's very monolithic currently:
+        transitivize

-(def lexicon-source
-  (zipmap
-   (sort (keys lexicon-hash-from-edn))
-   (map (fn [k]
-          (let [evaluated (eval (get lexicon-hash-from-edn k))
-                vals (cond (or (seq? evaluated) (vector? evaluated))
-                           evaluated
-                           true [evaluated])]
-            (map (fn [v]
-                   (reduce unify
-                           (cons
-                            (dissoc v :unify)
-                            (map (fn [each-unify-arg]
-                                   (cond (fn? each-unify-arg)
-                                         (each-unify-arg)
-                                         true each-unify-arg))
-                                 (:unify v)))))
-                 vals)))
-        (sort (keys lexicon-hash-from-edn)))))
+        (constrain-vals-if
+         (fn [val]
+           (and (= :noun (get-in val [:synsem :cat]))
+                (= true (get-in val [:synsem :reflexive]))
+                (= true (get-in val [:synsem :pronoun]))))
+         (fn [val]
+           (unify (let [case (atom :acc)
+                        cat (atom :noun)]
+                    {:synsem {:cat cat
+                              :pronoun true
+                              :subcat '()
+                              :reflexive true
+                              :case case}
+                     :italiano {:cat cat
+                                :case case}}))))
+        (constrain-vals-if
+         (fn [val]
+           (and (= (get-in val [:synsem :cat]) :noun)
+                (or (= (get-in val [:synsem :agr :gender]) :masc)
+                    (= (get-in val [:synsem :agr :gender]) :fem))
+                (= false (get-in val [:synsem :propernoun] false))
+                (= false (get-in val [:synsem :pronoun] false))
+                (not (= '() (get-in val [:synsem :subcat] :top))))) ;; some
+         ;; some nouns e.g. "casa" may have a sense that requires no determiner (subcat = '())
+         ;; in such cases, don't apply agreement-noun.
+
+         (fn [val]
+           (unify val agreement-noun)))
+
+        (constrain-vals-if
+         (fn [val]
+           (= (get-in val [:synsem :cat])
+              :verb))
+         (fn [val]
+           (unify val {:stage1 :ok})))
+
+        ;; If a verb is not specifically marked as reflexive, it
+        ;; is {:reflexive false}, to prevent generation of reflexive
+        ;; sentences using nonreflexive verbs.
+        ;; TODO: consider moving this to within intransitivize and transitivize:
+        ;; that is, within babel.italiano.pos, mark certain parts of speech
+        ;; as reflexive=false to accomplish the same thing as we
+        ;; are doing here.
+        (constrain-vals-if
+         (fn [val]
+           (and (= (get-in val [:synsem :cat])
+                   :verb)
+                (= (get-in val [:synsem :aux] false)
+                   false)
+                (= :none (get-in val [:synsem :sem :reflexive] :none))))
+         (fn [val]
+           (unify val {:synsem {:sem {:reflexive false}}})))
+
+        ;; if object is not specified, then set to :unspec.
+        ;; this prevents translations that may have actual objects - e.g. would allow translations like:
+        ;; "io mangio" => "I eat the bread" whereas a better translation is simply "I eat".
+        (if-then {:top false
+                  :synsem {:cat :verb
+                           :aux false
+                           :sem {:obj :unspec
+                                 :reflexive false}}}
+                 {:synsem {:sem {:obj :unspec}}})
+
+        ;; subject of verbs must have nominative case: prevents wrong things like article-less noun "casa" being the subject of a sentence.
+        (if-then {:synsem {:cat :verb}}
+                 {:synsem {:subcat {:1 {:case :nom}}}})
+
+        (if-then {:synsem {:cat :prep}}
+                 preposition)
+
+        ;; filters out any verbs without an inflection: infinitive verbs should have inflection ':top',
+        ;; rather than not having any inflection.
+        (filter-vals
+         #(or (not (= :verb (get-in % [:synsem :cat])))
+              (not (= :none (get-in % [:synsem :infl] :none)))))
+
+        (rewrite-keys
+         (fn [k]
+           (cond
+             (= false analyze-lexemes)
+             k
+
+             ;; TODO: only an example provided here:
+             ;; if analyze-lexemes is true, replace this example with use of
+             ;; italiano.morphology/preposition-plus-article regexp pairs
+             (= k "alla prossima")
+             "a la prossima"
+
+             true k))))))

-;; see TODOs in lexiconfn/compile-lex (should be more of a pipeline as opposed to a argument-position-sensitive function.
-(def lexicon (-> (compile-lex lexicon-source
-                              exception-generator
-                              ;; TODO: rewrite phonize as (constrain-val-if)(one or more)
-                              phonize
-                              ;; TODO: rewrite italian-specific-rules as (constrain-vals-if)(one or more)
-                              italian-specific-rules)
+(def lexicon (edn2lexicon "/Users/ekoontz/babel/src/babel/italiano/lexicon.edn"))

-                 ;; filter out entries with no :cat.
-                 (filter-vals
-                  #(or (and (not (= :none (get-in % [:synsem :cat] :none)))
-                            (or (log/debug (str "lexical entry has a cat - good : " (strip-refs %)))
-                                true))
-                       (and (log/warn (str "ignoring lexical entry with no :cat: " (strip-refs %)))
-                            false)))
-
-                 (constrain-vals-if
-                  (fn [val]
-                    (not (nil? (get universals (get-in val [:synsem :sem :pred])))))
-                  (fn [val]
-                    (get universals (get-in val [:synsem :sem :pred]))))
-
-                 ;; TODO: refactor this; it's very monolithic currently:
-                 intransitivize
-
-                 ;; if verb does specify a [:sem :obj], then fill it in with subcat info.
-                 ;; TODO: refactor this; it's very monolithic currently:
-                 transitivize
-
-                 (constrain-vals-if
-                  (fn [val]
-                    (and (= :noun (get-in val [:synsem :cat]))
-                         (= true (get-in val [:synsem :reflexive]))
-                         (= true (get-in val [:synsem :pronoun]))))
-                  (fn [val]
-                    (unify (let [case (atom :acc)
-                                 cat (atom :noun)]
-                             {:synsem {:cat cat
-                                       :pronoun true
-                                       :subcat '()
-                                       :reflexive true
-                                       :case case}
-                              :italiano {:cat cat
-                                         :case case}}))))
-                 (constrain-vals-if
-                  (fn [val]
-                    (and (= (get-in val [:synsem :cat]) :noun)
-                         (or (= (get-in val [:synsem :agr :gender]) :masc)
-                             (= (get-in val [:synsem :agr :gender]) :fem))
-                         (= false (get-in val [:synsem :propernoun] false))
-                         (= false (get-in val [:synsem :pronoun] false))
-                         (not (= '() (get-in val [:synsem :subcat] :top))))) ;; some
-                  ;; some nouns e.g. "casa" may have a sense that requires no determiner (subcat = '())
-                  ;; in such cases, don't apply agreement-noun.
-
-                  (fn [val]
-                    (unify val agreement-noun)))
-
-                 (constrain-vals-if
-                  (fn [val]
-                    (= (get-in val [:synsem :cat])
-                       :verb))
-                  (fn [val]
-                    (unify val {:stage1 :ok})))
-
-                 ;; If a verb is not specifically marked as reflexive, it
-                 ;; is {:reflexive false}, to prevent generation of reflexive
-                 ;; sentences using nonreflexive verbs.
-                 ;; TODO: consider moving this to within intransitivize and transitivize:
-                 ;; that is, within babel.italiano.pos, mark certain parts of speech
-                 ;; as reflexive=false to accomplish the same thing as we
-                 ;; are doing here.
-                 (constrain-vals-if
-                  (fn [val]
-                    (and (= (get-in val [:synsem :cat])
-                            :verb)
-                         (= (get-in val [:synsem :aux] false)
-                            false)
-                         (= :none (get-in val [:synsem :sem :reflexive] :none))))
-                  (fn [val]
-                    (unify val {:synsem {:sem {:reflexive false}}})))
-
-                 ;; if object is not specified, then set to :unspec.
-                 ;; this prevents translations that may have actual objects - e.g. would allow translations like:
-                 ;; "io mangio" => "I eat the bread" whereas a better translation is simply "I eat".
-                 (if-then {:top false
-                           :synsem {:cat :verb
-                                    :aux false
-                                    :sem {:obj :unspec
-                                          :reflexive false}}}
-                          {:synsem {:sem {:obj :unspec}}})
-
-                 ;; subject of verbs must have nominative case: prevents wrong things like article-less noun "casa" being the subject of a sentence.
-                 (if-then {:synsem {:cat :verb}}
-                          {:synsem {:subcat {:1 {:case :nom}}}})
-
-                 (if-then {:synsem {:cat :prep}}
-                          preposition)
-
-                 ;; filters out any verbs without an inflection: infinitive verbs should have inflection ':top',
-                 ;; rather than not having any inflection.
-                 (filter-vals
-                  #(or (not (= :verb (get-in % [:synsem :cat])))
-                       (not (= :none (get-in % [:synsem :infl] :none)))))
-
-                 (rewrite-keys
-                  (fn [k]
-                    (cond
-                      (= false analyze-lexemes)
-                      k
-
-                      ;; TODO: only an example provided here:
-                      ;; if analyze-lexemes is true, replace this example with use of
-                      ;; italiano.morphology/preposition-plus-article regexp pairs
-                      (= k "alla prossima")
-                      "a la prossima"
-
-                      true k)))))


Use ring's nrepl port setting if present

--- modules/core/src/main/clojure/immutant/repl.clj
+++ modules/core/src/main/clojure/immutant/repl.clj
@@ -89,7 +89,11 @@
   "Looks for nrepl-port value in the given config, and starts
 the appropriate servers."
   [config]
-  (let [port (:nrepl-port config (if (util/dev-mode?) 0 nil))
+  (let [ring-nrepl-config (-> (registry/get :project) :ring :nrepl)
+        port (or (:nrepl-port config)
+                 (and (:start? ring-nrepl-config)
+                      (:port ring-nrepl-config))
+                 (if (util/dev-mode?) 0 nil))
         interface (:nrepl-interface config)]
     (if (or port interface)
       (if-let [nrepl (start-nrepl interface (or port 0))]


Create a WebServer component

Create a WebServer component

--- src/clj/comic_reader/server.clj
+++ src/clj/comic_reader/server.clj
@@ -2,11 +2,13 @@
   (:gen-class)
   (:require [compojure.core :as c]
             [compojure.route :as route]
+            [com.stuartsierra.component :as component]
             [environ.core :refer [env]]
             [hiccup.page :as page]
             [ring.adapter.jetty :refer [run-jetty]]
             [ring.middleware.edn :refer [wrap-edn-params]]
-            [ring.middleware.params :refer [wrap-params]]))
+            [ring.middleware.params :refer [wrap-params]])
+  (:import org.eclipse.jetty.server.Server))

 (defn edn-response [data & [status]]
   {:status (or status 200)
@@ -53,6 +55,32 @@
              wrap-params
              wrap-edn-params))

+(defrecord WebServer [app port ^Server server site-scraper]
+  component/Lifecycle
+
+  (start [component]
+    (if server
+      component
+      (do
+        (println "Starting web server...")
+        (assoc component
+               :server (run-jetty app {:port port
+                                       :join? false})))))
+
+  (stop [component]
+    (if (not server)
+      component
+      (do
+        (when (or (not (.isStopped server))
+                  (not (.isStopping server)))
+          (println "Shutting down web server...")
+          (.stop server))
+        (assoc component :server nil)))))
+
+(defn new-server [app port]
+  (map->WebServer {:app app
+                   :port port}))
+
 (defn run-web-server [& [port]]
   (let [port (Integer. (or port (env :port) 10555))]
     (print "Starting web server on port" port ".\n")


have LLDS Proc update strength of hosted breakers at turn end

--- src/clj/game/cards-hardware.clj
+++ src/clj/game/cards-hardware.clj
@@ -306,16 +306,17 @@

    "LLDS Processor"
    {:events
-             (let [llds {:effect (req (let [cards (:llds-target card)]
-                                           (update! state side (dissoc card :llds-target))
-                                           (doseq [c cards]
-                                             (update-breaker-strength state side c))))}]
-               {:runner-turn-ends llds :corp-turn-ends llds
-                :runner-install {:req (req (has-subtype? target "Icebreaker"))
-                                 :effect (effect (update! (update-in card [:llds-target] #(conj % target)))
-                                                 (update-breaker-strength target))}
-                :pre-breaker-strength {:req (req (some #(= (:cid target) (:cid %)) (:llds-target card)))
-                                       :effect (effect (breaker-strength-bonus 1))}})}
+     (let [llds {:effect (req (let [cards (:llds-target card)]
+                                (update! state side (dissoc card :llds-target))
+                                (doseq [c cards]
+                                (update-breaker-strength state side
+                                                         (find-cid (:cid c) (all-installed state :runner))))))}]
+       {:runner-turn-ends llds :corp-turn-ends llds
+        :runner-install {:req (req (has-subtype? target "Icebreaker"))
+                         :effect (effect (update! (update-in card [:llds-target] #(conj % target)))
+                                         (update-breaker-strength target))}
+        :pre-breaker-strength {:req (req (some #(= (:cid target) (:cid %)) (:llds-target card)))
+                               :effect (effect (breaker-strength-bonus 1))}})}

    "Lockpick"
    {:recurring 1}


Update Feedback Filter test due to prevention prompt changes.

--- src/clj/test/cards-hardware.clj
+++ src/clj/test/cards-hardware.clj
@@ -122,9 +122,9 @@
         (is (= 4 (:credit (get-runner))))
         (run-successful state)
         (prompt-choice :corp "Yes") ; pay 3 to fire Overwriter
-        (prompt-choice :runner "Yes") ; trash Overwriter for 0 to get to prevention prompt
         (card-ability state :runner ff 1)
         (prompt-choice :runner "Done")
+        (prompt-choice :runner "Yes") ; trash Overwriter for 0
         (is (= 1 (:brain-damage (get-runner))) "2 of the 3 brain damage prevented")
         (is (= 2 (count (:hand (get-runner)))))
         (is (empty? (get-in @state [:runner :rig :hardware])) "Feedback Filter trashed")))))


remove logging in flambo.function

remove logging in flambo.function

--- src/clojure/flambo/function.clj
+++ src/clojure/flambo/function.clj
@@ -1,7 +1,6 @@
 (ns flambo.function
   (:require [serializable.fn :as sfn]
             [flambo.kryo :as kryo]
-            [clojure.tools.logging :as log]
             [flambo.utils :as utils]))

 (set! *warn-on-reflection* true)
@@ -30,9 +29,6 @@
             (binding [sfn/*deserialize* kryo/deserialize]
               (deserialize-fn fn-or-serfn))
             fn-or-serfn)]
-    (log/trace "CLASS" (type this))
-    (log/trace "META" (meta f))
-    (log/trace "XS" xs)
     (apply f xs)))

 ;; ## Functions
@@ -82,9 +78,6 @@
             (binding [sfn/*deserialize* kryo/deserialize]
               (deserialize-fn fn-or-serfn))
             fn-or-serfn)]
-    (log/trace "CLASS" (type this))
-    (log/trace "META" (meta f))
-    (log/trace "XS" xs)
     (apply f xs)))

 (defn Function2-call [^flambo.function.Function2 this & xs]
@@ -93,9 +86,6 @@
             (binding [sfn/*deserialize* kryo/deserialize]
               (deserialize-fn fn-or-serfn))
             fn-or-serfn)]
-    (log/trace "CLASS" (type this))
-    (log/trace "META" (meta f))
-    (log/trace "XS" xs)
     (apply f xs)))

 (defn Function3-call [^flambo.function.Function2 this & xs]
@@ -104,9 +94,6 @@
             (binding [sfn/*deserialize* kryo/deserialize]
               (deserialize-fn fn-or-serfn))
             fn-or-serfn)]
-    (log/trace "CLASS" (type this))
-    (log/trace "META" (meta f))
-    (log/trace "XS" xs)
     (apply f xs)))

 (defn VoidFunction-call [^flambo.function.VoidFunction this & xs]
@@ -115,9 +102,6 @@
             (binding [sfn/*deserialize* kryo/deserialize]
               (deserialize-fn fn-or-serfn))
             fn-or-serfn)]
-    (log/trace "CLASS" (type this))
-    (log/trace "META" (meta f))
-    (log/trace "XS" xs)
     (apply f xs)))

 (defn VoidFunction2-call [^flambo.function.VoidFunction2 this & xs]
@@ -126,9 +110,6 @@
             (binding [sfn/*deserialize* kryo/deserialize]
               (deserialize-fn fn-or-serfn))
             fn-or-serfn)]
-    (log/trace "CLASS" (type this))
-    (log/trace "META" (meta f))
-    (log/trace "XS" xs)
     (apply f xs)))

 (defn FlatMapFunction-call [^flambo.function.FlatMapFunction this & xs]
@@ -137,9 +118,6 @@
             (binding [sfn/*deserialize* kryo/deserialize]
               (deserialize-fn fn-or-serfn))
             fn-or-serfn)]
-    (log/trace "CLASS" (type this))
-    (log/trace "META" (meta f))
-    (log/trace "XS" xs)
     (apply f xs)))

 (defn FlatMapFunction2-call [^flambo.function.FlatMapFunction2 this & xs]
@@ -148,9 +126,6 @@
             (binding [sfn/*deserialize* kryo/deserialize]
               (deserialize-fn fn-or-serfn))
             fn-or-serfn)]
-    (log/trace "CLASS" (type this))
-    (log/trace "META" (meta f))
-    (log/trace "XS" xs)
     (apply f xs)))

 (defn PairFlatMapFunction-call [^flambo.function.PairFlatMapFunction this & xs]
@@ -159,9 +134,6 @@
             (binding [sfn/*deserialize* kryo/deserialize]
               (deserialize-fn fn-or-serfn))
             fn-or-serfn)]
-    (log/trace "CLASS" (type this))
-    (log/trace "META" (meta f))
-    (log/trace "XS" xs)
     (apply f xs)))

 (defn PairFunction-call [^flambo.function.PairFunction this & xs]
@@ -170,9 +142,6 @@
             (binding [sfn/*deserialize* kryo/deserialize]
               (deserialize-fn fn-or-serfn))
             fn-or-serfn)]
-    (log/trace "CLASS" (type this))
-    (log/trace "META" (meta f))
-    (log/trace "XS" xs)
     (apply f xs)))

 (defn DoubleFunction-call [^flambo.function.DoubleFunction this & xs]
@@ -181,9 +150,6 @@
             (binding [sfn/*deserialize* kryo/deserialize]
               (deserialize-fn fn-or-serfn))
             fn-or-serfn)]
-    (log/trace "CLASS" (type this))
-    (log/trace "META" (meta f))
-    (log/trace "XS" xs)
     (apply f xs)))

 (defn DoubleFlatMapFunction-call [^flambo.function.DoubleFlatMapFunction this & xs]
@@ -192,7 +158,4 @@
             (binding [sfn/*deserialize* kryo/deserialize]
               (deserialize-fn fn-or-serfn))
             fn-or-serfn)]
-    (log/trace "CLASS" (type this))
-    (log/trace "META" (meta f))
-    (log/trace "XS" xs)
     (apply f xs)))


Properly check if :inherits was provided to defelement

--- src/clojure/neko/ui/mapping.clj
+++ src/clojure/neko/ui/mapping.clj
@@ -166,7 +166,7 @@
   - :classname, :inherits, :traits, :values, :attributes. "
   [kw-name & {:as args}]
   (swap! keyword-mapping assoc kw-name
-         (if-not (:inherits args)
+         (if-not (contains? args :inherits)
            (assoc args :inherits :view)
            args))
   (if-let [classname (:classname args)]


Mutate on generative parser

Mutate on generative parser

--- src/com/wsscode/pathom/gen.cljc
+++ src/com/wsscode/pathom/gen.cljc
@@ -58,7 +58,8 @@
 (s/def spec-gen-reader ::p/reader-fn)

 (def parser
-  (p/parser {::p/plugins [(p/env-plugin {::p/reader spec-gen-reader})]}))
+  (p/parser {::p/plugins [(p/env-plugin {::p/reader spec-gen-reader})]
+             :mutate     (fn [_ k params] (println "Gen mutation called" k params))}))

 (defn query->props
   "Generates data from a given query using the spec generators for the attributes."


VREPL should make extraction directory if it doesn't exist.

--- vrepl/src/vrepl/main.clj
+++ vrepl/src/vrepl/main.clj
@@ -6,7 +6,10 @@

 (defn extract-assets! [path]
   (println  "Extracting assets to" path)
-
+
+  (when (not (.exists (java.io.File. path)))
+    (.mkdir (java.io.File. path)))
+
   ;;Hardcoded list of sample files in the JAR to extract.
   ;;Pull request if you want to write something more general.
   (doseq [f ["boxplot.clj" "choropleth.clj"]]


Added filtering of com.sun packages for some tests.

--- src/alfresco_technical_validation/binary_validation.clj
+++ src/alfresco_technical_validation/binary_validation.clj
@@ -205,6 +205,7 @@
                            AND NOT(n.package =~ 'org.apache..*')
                            AND NOT(n.package =~ 'com.google..*')
                            AND NOT(n.package =~ 'com.sap..*')
+                           AND NOT(n.package =~ 'com.sun..*')
                            AND HAS(n.`class-version`)
                            AND n.`class-version` < 50
                         RETURN n.name AS ClassName, n.`class-version-str` AS ClassVersion
@@ -264,6 +265,7 @@
                            AND NOT(n.package =~ 'org.apache..*')
                            AND NOT(n.package =~ 'com.google..*')
                            AND NOT(n.package =~ 'com.sap..*')
+                           AND NOT(n.package =~ 'com.sun..*')
                            AND m.name IN [
                                            'java.lang.Process',
                                            'java.lang.ProcessBuilder'
@@ -284,6 +286,7 @@
                            AND NOT(n.package =~ 'org.apache..*')
                            AND NOT(n.package =~ 'com.google..*')
                            AND NOT(n.package =~ 'com.sap..*')
+                           AND NOT(n.package =~ 'com.sun..*')
                            AND HAS(m.package)
                            AND m.package IN [
                                               'javax.servlet',
@@ -304,6 +307,7 @@
                            AND NOT(n.package =~ 'org.apache..*')
                            AND NOT(n.package =~ 'com.google..*')
                            AND NOT(n.package =~ 'com.sap..*')
+                           AND NOT(n.package =~ 'com.sun..*')
                            AND HAS(m.name)
                            AND HAS(m.package)
                            AND m.package IN [
@@ -413,6 +417,7 @@
                            AND NOT(n.package =~ 'org.apache..*')
                            AND NOT(n.package =~ 'com.google..*')
                            AND NOT(n.package =~ 'com.sap..*')
+                           AND NOT(n.package =~ 'com.sun..*')
                            AND HAS(m.name)
                            AND m.name IN [
                                            'java.lang.Throwable',
@@ -434,6 +439,7 @@
                            AND NOT(n.package =~ 'org.apache..*')
                            AND NOT(n.package =~ 'com.google..*')
                            AND NOT(n.package =~ 'com.sap..*')
+                           AND NOT(n.package =~ 'com.sun..*')
                            AND HAS(m.name)
                            AND m.name IN [
                                            'java.net.HttpURLConnection',


Fix type confusion when SPNEGO completes with no response (#1458)

--- waiter/src/waiter/auth/spnego.clj
+++ waiter/src/waiter/auth/spnego.clj
@@ -177,12 +177,10 @@
                     (let [auth-params-map (auth/build-auth-params-map :spnego principal)
                           response (auth/handle-request-auth request-handler request auth-params-map password nil true)]
                       (log/debug "added cookies to response")
-                      (if token
-                        (if (map? response)
-                          (rr/header response "www-authenticate" token)
-                          (let [actual-response (async/<! response)]
-                            (rr/header actual-response "www-authenticate" token)))
-                        response))
+                      (let [actual-response (if (map? response) response (async/<! response))]
+                        (if token
+                          (rr/header actual-response "www-authenticate" token)
+                          actual-response)))
                     (response-http-401-unauthorized-negotiate request))
                   (catch Throwable th
                     (log/error th "error while processing response")


Change test app to redirect / to /hello

Change test app to redirect / to /hello

--- webapp/main.clj
+++ webapp/main.clj
@@ -2,6 +2,7 @@
   (:use compojure.core cascade cascade.asset cascade.import ring.adapter.jetty)
   (:require
     [cascade.request :as cr]
+    [ring.util.response :as response]
     [compojure.route :as route]
     [compojure.handler :as handler]))

@@ -40,6 +41,7 @@
   (cr/initialize "1.0"
     :public-folder "webapp"
     :html-routes html-routes)
+  (ANY "/" [] (response/redirect "/hello"))
   (route/not-found "Cascade Demo: No such resource"))

 (def app


Be more strict about format recognition

Be more strict about format recognition

--- src/catalog/vubis.clj
+++ src/catalog/vubis.clj
@@ -189,13 +189,10 @@
       normalize-name))

 (defn get-format [s]
+  "Find the given format for a string `s`. If the string doesn't
+  correspond to any of BR, DVD, DY, ER, GD, LU, MN or TB return nil"
   (->> s
-   ;; some format entries in the MARC21 file contain garbage after the
-   ;; format, so only look at the start
-   ;; FIXME: tbh shouldn't this be fixed in the original data? Were're
-   ;; only talking about 4 records that have 'LUD' and one that has
-   ;; 'LUn'
-   (re-find #"^(?:BR|DVD|DY|ER|GD|LU|MN|TB)")
+   (re-find #"^(?:BR|DVD|DY|ER|GD|LU|MN|TB)$")
    format-raw-to-format))

 (defn clean-raw-item
@@ -276,7 +273,11 @@
                        :braille-grade (braille-music-grade-raw-to-braille-grade braille-music-grade)
                        :volumes (parse-int volumes)
                        :accompanying-material accompanying-material))
-      :taktilesbuch item)))
+      :taktilesbuch item
+      ; default case that shouldn't really happen. When the MARC21
+      ; entry contains a faulty format then just return the item with
+      ; the faulty format. The validation will filter the item out.
+      (assoc item :format format))))

 (defn select-vals
   "Return a list of the values for the given keys `ks` from `item` if


Make pair-monoid implementation as type constructor instead of static type.

--- src/cats/builtin.cljc
+++ src/cats/builtin.cljc
@@ -334,23 +334,29 @@
   p/Context
   (-get-context [_] string-monoid))

-(def pair-monoid
-  (reify
-    p/ContextClass
-    (-get-level [_] ctx/+level-default+)
+(defn pair-monoid
+  "A pair monoid type constructor."
+  [inner-monoid]
+  (reify
+    p/ContextClass
+    (-get-level [_]
+      (+ (p/-get-level inner-monoid)
+         ctx/+level-default+))

     p/Semigroup
     (-mappend [_ sv sv']
       (d/pair
-       (m/mappend (.fst sv) (.fst sv'))
-       (m/mappend (.snd sv) (.snd sv'))))
+       (p/-mappend inner-monoid (.fst sv) (.fst sv'))
+       (p/-mappend inner-monoid (.snd sv) (.snd sv'))))
+
     p/Monoid
     (-mempty [_]
       (d/pair
-       (p/-mempty (ctx/get-current))
-       (p/-mempty (ctx/get-current))))))
-
+       (p/-mempty inner-monoid)
+       (p/-mempty inner-monoid)))))

 (extend-type cats.data.Pair
   p/Context
-  (-get-context [_] pair-monoid))
+  (-get-context [data]
+    (let [first' (.fst data)]
+      (pair-monoid (p/-get-context first')))))