Index: openacs-4/packages/acs-tcl/tcl/community-core-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/community-core-procs-oracle.xql,v
diff -u -r1.19 -r1.20
--- openacs-4/packages/acs-tcl/tcl/community-core-procs-oracle.xql 7 Aug 2017 23:47:59 -0000 1.19
+++ openacs-4/packages/acs-tcl/tcl/community-core-procs-oracle.xql 20 Nov 2017 15:52:23 -0000 1.20
@@ -22,78 +22,5 @@
end;
-
-
-
-
- select user_id,
- username,
- authority_id,
- first_names,
- last_name,
- first_names || ' ' || last_name as name,
- email,
- url,
- screen_name,
- priv_name,
- priv_email,
- email_verified_p,
- email_bouncing_p,
- no_alerts_until,
- last_visit,
- to_char(last_visit, 'YYYY-MM-DD HH24:MI:SS') as last_visit_ansi,
- second_to_last_visit,
- to_char(second_to_last_visit, 'YYYY-MM-DD HH24:MI:SS') as second_to_last_visit_ansi,
- n_sessions,
- password_question,
- password_answer,
- password_changed_date,
- member_state,
- rel_id,
- trunc(sysdate - password_changed_date) as password_age_days,
- creation_date,
- creation_ip
- from cc_users
- where user_id = :user_id
-
-
-
-
-
-
- select user_id,
- username,
- authority_id,
- first_names,
- last_name,
- first_names || ' ' || last_name as name,
- email,
- url,
- screen_name,
- priv_name,
- priv_email,
- email_verified_p,
- email_bouncing_p,
- no_alerts_until,
- last_visit,
- to_char(last_visit, 'YYYY-MM-DD HH24:MI:SS') as last_visit_ansi,
- second_to_last_visit,
- to_char(second_to_last_visit, 'YYYY-MM-DD HH24:MI:SS') as second_to_last_visit_ansi,
- n_sessions,
- password_question,
- password_answer,
- password_changed_date,
- member_state,
- rel_id,
- trunc(sysdate - password_changed_date) as password_age_days,
- creation_date,
- creation_ip
- from cc_users
- where authority_id = :authority_id
- and lower(username) = lower(:username)
-
-
-
-
Index: openacs-4/packages/acs-tcl/tcl/community-core-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/community-core-procs-postgresql.xql,v
diff -u -r1.20 -r1.21
--- openacs-4/packages/acs-tcl/tcl/community-core-procs-postgresql.xql 7 Aug 2017 23:47:59 -0000 1.20
+++ openacs-4/packages/acs-tcl/tcl/community-core-procs-postgresql.xql 20 Nov 2017 15:52:23 -0000 1.21
@@ -16,78 +16,5 @@
-
-
-
-
- select user_id,
- username,
- authority_id,
- first_names,
- last_name,
- first_names || ' ' || last_name as name,
- email,
- url,
- screen_name,
- priv_name,
- priv_email,
- email_verified_p,
- email_bouncing_p,
- no_alerts_until,
- last_visit,
- to_char(last_visit, 'YYYY-MM-DD HH24:MI:SS') as last_visit_ansi,
- second_to_last_visit,
- to_char(second_to_last_visit, 'YYYY-MM-DD HH24:MI:SS') as second_to_last_visit_ansi,
- n_sessions,
- password_question,
- password_answer,
- password_changed_date,
- member_state,
- rel_id,
- trunc(date_part('epoch', age(password_changed_date))/(60*60*24)) as password_age_days,
- creation_date,
- creation_ip
- from cc_users
- where user_id = :user_id
-
-
-
-
-
-
- select user_id,
- username,
- authority_id,
- first_names,
- last_name,
- first_names || ' ' || last_name as name,
- email,
- url,
- screen_name,
- priv_name,
- priv_email,
- email_verified_p,
- email_bouncing_p,
- no_alerts_until,
- last_visit,
- to_char(last_visit, 'YYYY-MM-DD HH24:MI:SS') as last_visit_ansi,
- second_to_last_visit,
- to_char(second_to_last_visit, 'YYYY-MM-DD HH24:MI:SS') as second_to_last_visit_ansi,
- n_sessions,
- password_question,
- password_answer,
- password_changed_date,
- member_state,
- rel_id,
- trunc(date_part('epoch', age(password_changed_date))/(60*60*24)) as password_age_days,
- creation_date,
- creation_ip
- from cc_users
- where authority_id = :authority_id
- and lower(username) = lower(:username)
-
-
-
-
Index: openacs-4/packages/acs-tcl/tcl/community-core-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/community-core-procs.xql,v
diff -u -r1.26 -r1.27
--- openacs-4/packages/acs-tcl/tcl/community-core-procs.xql 27 Oct 2014 16:40:06 -0000 1.26
+++ openacs-4/packages/acs-tcl/tcl/community-core-procs.xql 20 Nov 2017 15:52:23 -0000 1.27
@@ -197,5 +197,77 @@
+
+
+ select user_id,
+ username,
+ authority_id,
+ first_names,
+ last_name,
+ first_names || ' ' || last_name as name,
+ email,
+ url,
+ screen_name,
+ priv_name,
+ priv_email,
+ email_verified_p,
+ email_bouncing_p,
+ no_alerts_until,
+ last_visit,
+ to_char(last_visit, 'YYYY-MM-DD HH24:MI:SS') as last_visit_ansi,
+ second_to_last_visit,
+ to_char(second_to_last_visit, 'YYYY-MM-DD HH24:MI:SS') as second_to_last_visit_ansi,
+ n_sessions,
+ password_question,
+ password_answer,
+ password_changed_date,
+ member_state,
+ rel_id,
+ extract(day from current_timestamp - password_changed_date) as password_age_days,
+ creation_date,
+ creation_ip
+ from cc_users
+ where user_id = :user_id
+
+
+
+
+
+
+
+ select user_id,
+ username,
+ authority_id,
+ first_names,
+ last_name,
+ first_names || ' ' || last_name as name,
+ email,
+ url,
+ screen_name,
+ priv_name,
+ priv_email,
+ email_verified_p,
+ email_bouncing_p,
+ no_alerts_until,
+ last_visit,
+ to_char(last_visit, 'YYYY-MM-DD HH24:MI:SS') as last_visit_ansi,
+ second_to_last_visit,
+ to_char(second_to_last_visit, 'YYYY-MM-DD HH24:MI:SS') as second_to_last_visit_ansi,
+ n_sessions,
+ password_question,
+ password_answer,
+ password_changed_date,
+ member_state,
+ rel_id,
+ extract(day from current_date - password_changed_date) as password_age_days,
+ creation_date,
+ creation_ip
+ from cc_users
+ where authority_id = :authority_id
+ and lower(username) = lower(:username)
+
+
+
+