Index: openacs-4/packages/acs-subsite/www/register/awaiting-approval.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/register/Attic/awaiting-approval.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/register/awaiting-approval.xql 1 May 2001 21:20:18 -0000 1.1 @@ -0,0 +1,20 @@ + + + + + + select member_state, email, email_verified_p, rel_id +from cc_users where user_id = :user_id +and (member_state is null or member_state = 'rejected') + + + + + + + update membership_rels set member_state = 'approved' where rel_id = :rel_id + + + + + Index: openacs-4/packages/acs-subsite/www/register/awaiting-email-verification-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/register/Attic/awaiting-email-verification-oracle.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/register/awaiting-email-verification-oracle.xql 1 May 2001 21:20:18 -0000 1.1 @@ -0,0 +1,17 @@ + + + + oracle8.1.6 + + + + + select member_state, email, rowid + from cc_users + where user_id = :user_id and + email_verified_p = 'f' + + + + + Index: openacs-4/packages/acs-subsite/www/register/awaiting-email-verification-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/register/Attic/awaiting-email-verification-postgresql.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/register/awaiting-email-verification-postgresql.xql 1 May 2001 21:20:18 -0000 1.1 @@ -0,0 +1,17 @@ + + + + postgresql7.1 + + + + + select member_state, email, rowid + from cc_users + where user_id = :user_id and + email_verified_p = 'f' + + + + + Index: openacs-4/packages/acs-subsite/www/register/awaiting-email-verification.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/register/Attic/awaiting-email-verification.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/register/awaiting-email-verification.xql 1 May 2001 21:20:18 -0000 1.1 @@ -0,0 +1,13 @@ + + + + + + update users set +email_verified_p = 't' +where user_id = :user_id + + + + + Index: openacs-4/packages/acs-subsite/www/register/banned-user.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/register/Attic/banned-user.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/register/banned-user.xql 1 May 2001 21:20:18 -0000 1.1 @@ -0,0 +1,13 @@ + + + + + + + select member_state from cc_users + where user_id = :user_id + + + + + Index: openacs-4/packages/acs-subsite/www/register/deleted-user.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/register/Attic/deleted-user.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/register/deleted-user.xql 1 May 2001 21:20:18 -0000 1.1 @@ -0,0 +1,13 @@ + + + + + + + select member_state from cc_users where user_id = :user_id + + + + + + Index: openacs-4/packages/acs-subsite/www/register/email-confirm.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/register/Attic/email-confirm.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/register/email-confirm.xql 1 May 2001 21:20:18 -0000 1.1 @@ -0,0 +1,22 @@ + + + + + + update users + set email_verified_p = 't' + where user_id = :user_id + + + + + + + update users + set email_verified_p = 't' + where user_id = :user_id + + + + + Index: openacs-4/packages/acs-subsite/www/register/email-password-2.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/register/Attic/email-password-2.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/register/email-password-2.xql 1 May 2001 21:20:18 -0000 1.1 @@ -0,0 +1,27 @@ + + + + + + select +email from cc_users where user_id=:user_id +-- and user_state in ('authorized','deleted') + + + + + + + select password_answer from users where user_id = :user_id + + + + + + + select first_names db_first_names, last_name db_last_name from cc_users where user_id = $user_id + + + + + Index: openacs-4/packages/acs-subsite/www/register/email-password-3.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/register/Attic/email-password-3.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/register/email-password-3.xql 1 May 2001 21:20:18 -0000 1.1 @@ -0,0 +1,18 @@ + + + + + + select first_names db_first_names, last_name db_last_name, password_question from cc_users where user_id = :user_id + + + + + + + update users set password_question = :question, password_answer = :answer where user_id = :user_id + + + + + Index: openacs-4/packages/acs-subsite/www/register/email-password.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/register/Attic/email-password.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/register/email-password.xql 1 May 2001 21:20:18 -0000 1.1 @@ -0,0 +1,11 @@ + + + + + + select password_question from users where user_id = :user_id + + + + + Index: openacs-4/packages/acs-subsite/www/register/restore-user.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/register/Attic/restore-user.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/register/restore-user.xql 1 May 2001 21:20:18 -0000 1.1 @@ -0,0 +1,24 @@ + + + + + + + select member_state, email, rel_id from cc_users where user_id = :user_id + + + + + + + + + update membership_rels + set member_state = 'approved' + where rel_id = :rel_id + + + + + + Index: openacs-4/packages/acs-subsite/www/register/user-join.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/register/Attic/user-join.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/register/user-join.xql 1 May 2001 21:20:18 -0000 1.1 @@ -0,0 +1,15 @@ + + + + + + + select group_name, join_policy + from groups + where group_id = :group_id + + + + + + Index: openacs-4/packages/acs-subsite/www/register/user-login.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/register/Attic/user-login.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/register/user-login.xql 1 May 2001 21:20:18 -0000 1.1 @@ -0,0 +1,14 @@ + + + + + + + select user_id, member_state, email_verified_p + from cc_users + where email = :email + + + + + Index: openacs-4/packages/acs-subsite/www/register/user-new-2.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/register/Attic/user-new-2.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/register/user-new-2.xql 1 May 2001 21:20:18 -0000 1.1 @@ -0,0 +1,18 @@ + + + + + + select count(*) from registered_users where user_id = :user_id + + + + + + + select rowid from users where user_id = :user_id + + + + + Index: openacs-4/packages/acs-subsite/www/user/basic-info-update-2.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/user/Attic/basic-info-update-2.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/user/basic-info-update-2.xql 1 May 2001 21:21:15 -0000 1.1 @@ -0,0 +1,89 @@ + + + + + + + select count(*) from users where screen_name = :screen_name and user_id != :user_id + + + + + + + select count(party_id) from parties where upper(email) = upper(:email) and party_id <> :user_id + + + + + + + select attr_value as bio_old + from acs_attribute_values + where object_id = :user_id + and attribute_id = + (select attribute_id + from acs_attributes + where object_type = 'person' + and attribute_name = 'bio') + + + + + + + update parties + set email = :email, + url = :url + where party_id = :user_id + + + + + + + update persons + set first_names = :first_names, + last_name = :last_name + where person_id = :user_id + + + + + + + update users + set screen_name=:screen_name + where user_id = :user_id + + + + + + + insert into acs_attribute_values + (object_id, attribute_id, attr_value) + values + (:user_id, (select attribute_id + from acs_attributes + where object_type = 'person' + and attribute_name = 'bio'), :bio) + + + + + + + update acs_attribute_values + set attr_value = :bio + where object_id = :user_id + and attribute_id = + (select attribute_id + from acs_attributes + where object_type = 'person' + and attribute_name = 'bio') + + + + + Index: openacs-4/packages/acs-subsite/www/user/basic-info-update.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/user/Attic/basic-info-update.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/user/basic-info-update.xql 1 May 2001 21:21:15 -0000 1.1 @@ -0,0 +1,28 @@ + + + + + + select first_names, last_name, email, url, screen_name + from cc_users + where user_id=:user_id + + + + + + + +select attr_value +from acs_attribute_values +where object_id = :user_id +and attribute_id = + (select attribute_id + from acs_attributes + where object_type = 'person' + and attribute_name = 'bio') + + + + + Index: openacs-4/packages/acs-subsite/www/user/password-update.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/user/Attic/password-update.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-subsite/www/user/password-update.xql 1 May 2001 21:21:15 -0000 1.1 @@ -0,0 +1,12 @@ + + + + + + select first_names, +last_name, email, url from cc_users where user_id=:user_id + + + + +