diff --git a/db/ddlutils/oracle/views/AD_SESSIONINFO_V.sql b/db/ddlutils/oracle/views/AD_SESSIONINFO_V.sql
index 2a93630efb..178092942e 100644
--- a/db/ddlutils/oracle/views/AD_SESSIONINFO_V.sql
+++ b/db/ddlutils/oracle/views/AD_SESSIONINFO_V.sql
@@ -1,12 +1,12 @@
 CREATE OR REPLACE VIEW ad_sessioninfo_v AS 
- SELECT s.ad_session_id,0 as ad_client_id,0 as ad_org_id, s.isactive, 
-		s.created, s.createdby, s.updated, s.updatedby, s.websession, 
-		s.remote_addr, s.remote_host, r.name as roleName, s.logindate, s.ad_session_uu, 
-		s.servername,  c.name AS ClientName,o.name as orgName,s.ad_session_id as ad_sessioninfo_v_id,
-		s.ad_session_uu as ad_sessioninfo_v_uu,u.name as LoginName,u.email as email
+ SELECT s.ad_session_id,0 as ad_client_id,0 as ad_org_id, s.isactive,
+                s.created, s.createdby, s.updated, s.updatedby,  substr(s.websession,1,40) as websession,
+                substr(s.remote_addr,1,60) as remote_addr, substr(s.remote_host,1,120) as remote_host, substr(r.name,1,60) as roleName, s.logindate, s.ad_session_uu,
+                substr(s.servername,1,80) as servername, substr(c.name,1,60) AS ClientName,substr(o.name,1,60) as orgName,s.ad_session_id as ad_sessioninfo_v_id,
+                s.ad_session_uu as ad_sessioninfo_v_uu,substr(u.name,1,60) as LoginName,substr(u.email,1,60) as email
    FROM ad_session s
    inner join AD_User u on (s.createdby = u.AD_User_ID)
    left join AD_Role r on (s.ad_role_id=r.ad_role_id)
    inner join AD_Client c on (s.ad_client_id=c.ad_client_id)
    left join AD_Org o on (s.ad_org_id=o.ad_org_id)
-  WHERE s.processed = 'N';
\ No newline at end of file
+  WHERE s.processed = 'N';
diff --git a/db/ddlutils/postgresql/views/AD_SESSIONINFO_V.sql b/db/ddlutils/postgresql/views/AD_SESSIONINFO_V.sql
index 3d8f6557d6..4c938be25d 100644
--- a/db/ddlutils/postgresql/views/AD_SESSIONINFO_V.sql
+++ b/db/ddlutils/postgresql/views/AD_SESSIONINFO_V.sql
@@ -1,13 +1,13 @@
 drop view ad_sessioninfo_v;
 CREATE OR REPLACE VIEW ad_sessioninfo_v AS  
- SELECT s.ad_session_id, 0::numeric(10,0) AS ad_client_id, 0::numeric(10,0) AS  ad_org_id, s.isactive, 
-		s.created, s.createdby, s.updated, s.updatedby, s.websession, 
-		s.remote_addr, s.remote_host, r.name as roleName, s.logindate, s.ad_session_uu, 
-		s.servername, c.name AS ClientName,o.name as orgName,s.ad_session_id as ad_sessioninfo_v_id,
-		s.ad_session_uu as ad_sessioninfo_v_uu,u.name as LoginName,u.email as email
+ SELECT s.ad_session_id, 0::numeric(10,0) AS ad_client_id, 0::numeric(10,0) AS  ad_org_id, s.isactive,
+                s.created, s.createdby, s.updated, s.updatedby, substr(s.websession,1,40) as websession,
+                substr(s.remote_addr,1,60) as remote_addr, substr(s.remote_host,1,120) as remote_host, substr(r.name,1,60) as roleName, s.logindate, s.ad_session_uu,
+                substr(s.servername,1,80) as servername, substr(c.name,1,60) AS ClientName,substr(o.name,1,60) as orgName,s.ad_session_id as ad_sessioninfo_v_id,
+                s.ad_session_uu as ad_sessioninfo_v_uu,substr(u.name,1,60) as LoginName,substr(u.email,1,60) as email
    FROM ad_session s
    inner join AD_User u on (s.createdby = u.AD_User_ID)
    left join AD_Role r on (s.ad_role_id=r.ad_role_id)
    inner join AD_Client c on (s.ad_client_id=c.ad_client_id)
    left join AD_Org o on (s.ad_org_id=o.ad_org_id)
-  WHERE s.processed = 'N'::bpchar;
\ No newline at end of file
+  WHERE s.processed = 'N'::bpchar;
diff --git a/migration/i2.1/oracle/201503110943_IDEMPIERE-2440.sql b/migration/i2.1/oracle/201503110943_IDEMPIERE-2440.sql
new file mode 100644
index 0000000000..ae8f1a58ed
--- /dev/null
+++ b/migration/i2.1/oracle/201503110943_IDEMPIERE-2440.sql
@@ -0,0 +1,25 @@
+SET SQLBLANKLINES ON
+SET DEFINE OFF
+
+-- IDEMPIERE-2440
+-- Mar 11, 2015 9:43:16 AM COT
+UPDATE AD_Column SET FieldLength=60,Updated=TO_DATE('2015-03-11 09:43:16','YYYY-MM-DD HH24:MI:SS'),UpdatedBy=100 WHERE AD_Column_ID=200702
+;
+
+CREATE OR REPLACE VIEW ad_sessioninfo_v AS 
+ SELECT s.ad_session_id,0 as ad_client_id,0 as ad_org_id, s.isactive,
+                s.created, s.createdby, s.updated, s.updatedby,  substr(s.websession,1,40) as websession,
+                substr(s.remote_addr,1,60) as remote_addr, substr(s.remote_host,1,120) as remote_host, substr(r.name,1,60) as roleName, s.logindate, s.ad_session_uu,
+                substr(s.servername,1,80) as servername, substr(c.name,1,60) AS ClientName,substr(o.name,1,60) as orgName,s.ad_session_id as ad_sessioninfo_v_id,
+                s.ad_session_uu as ad_sessioninfo_v_uu,substr(u.name,1,60) as LoginName,substr(u.email,1,60) as email
+   FROM ad_session s
+   inner join AD_User u on (s.createdby = u.AD_User_ID)
+   left join AD_Role r on (s.ad_role_id=r.ad_role_id)
+   inner join AD_Client c on (s.ad_client_id=c.ad_client_id)
+   left join AD_Org o on (s.ad_org_id=o.ad_org_id)
+  WHERE s.processed = 'N'
+;
+
+SELECT register_migration_script('201503110943_IDEMPIERE-2440.sql') FROM dual
+;
+
diff --git a/migration/i2.1/postgresql/201503110943_IDEMPIERE-2440.sql b/migration/i2.1/postgresql/201503110943_IDEMPIERE-2440.sql
new file mode 100644
index 0000000000..33d1a93b5f
--- /dev/null
+++ b/migration/i2.1/postgresql/201503110943_IDEMPIERE-2440.sql
@@ -0,0 +1,22 @@
+-- IDEMPIERE-2440
+-- Mar 11, 2015 9:43:16 AM COT
+UPDATE AD_Column SET FieldLength=60,Updated=TO_TIMESTAMP('2015-03-11 09:43:16','YYYY-MM-DD HH24:MI:SS'),UpdatedBy=100 WHERE AD_Column_ID=200702
+;
+
+CREATE OR REPLACE VIEW ad_sessioninfo_v AS  
+ SELECT s.ad_session_id, 0::numeric(10,0) AS ad_client_id, 0::numeric(10,0) AS  ad_org_id, s.isactive,
+                s.created, s.createdby, s.updated, s.updatedby, substr(s.websession,1,40) as websession,
+                substr(s.remote_addr,1,60) as remote_addr, substr(s.remote_host,1,120) as remote_host, substr(r.name,1,60) as roleName, s.logindate, s.ad_session_uu,
+                substr(s.servername,1,80) as servername, substr(c.name,1,60) AS ClientName,substr(o.name,1,60) as orgName,s.ad_session_id as ad_sessioninfo_v_id,
+                s.ad_session_uu as ad_sessioninfo_v_uu,substr(u.name,1,60) as LoginName,substr(u.email,1,60) as email
+   FROM ad_session s
+   inner join AD_User u on (s.createdby = u.AD_User_ID)
+   left join AD_Role r on (s.ad_role_id=r.ad_role_id)
+   inner join AD_Client c on (s.ad_client_id=c.ad_client_id)
+   left join AD_Org o on (s.ad_org_id=o.ad_org_id)
+  WHERE s.processed = 'N'::bpchar
+;
+
+SELECT register_migration_script('201503110943_IDEMPIERE-2440.sql') FROM dual
+;
+