acs::test::auth::registration::Register (private)

 acs::test::auth::registration::Register parameters username \
    authority_id first_names last_name screen_name email url password \
    secret_question secret_answer

Defined in packages/acs-authentication/tcl/test-authority-procs.tcl

Implements the "Register" operation of the auth_registration service contract for the acs testing authority. This is in essence a simplified version of the "local" authority without the notifications and confirmation options.

Parameters:
parameters (required)
username (required)
authority_id (required)
first_names (required)
last_name (required)
screen_name (required)
email (required)
url (required)
password (required)
secret_question (required)
secret_answer (required)

Testcases:
auth_registration_implementations
Source code:
    set result {
        creation_status "ok"
        creation_message {}
        element_messages {}
        account_status "ok"
        account_message {}
        generated_pwd_p 0
    }
    dict set result password $password

    #
    # Set user's password
    #
    set user_id [acs_user::get_by_username -authority_id $authority_id -username $username]
    ad_change_password $user_id $password

    return $result
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: