Index: openacs-4/packages/simple-survey/www/admin/description-edit-2.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/simple-survey/www/admin/description-edit-2.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/simple-survey/www/admin/description-edit-2.adp 25 Feb 2002 20:28:14 -0000 1.1 @@ -0,0 +1,21 @@ + +Edit Description Confirmation +@context_bar@ + +Here is how your survey description will appear: +

+@description@ +

+<%= [export_form_vars description desc_html survey_id] %> + +
+
+
+ + +Note: if the text above has a bunch of visible HTML tags then you probably +should have selected "HTML" rather than "Plain Text". If it is all smashed together +and you want the original line breaks saved then choose "Preformatted Text". +Use your browser's Back button to return to the submission form. + + Index: openacs-4/packages/simple-survey/www/admin/description-edit.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/simple-survey/www/admin/description-edit.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/simple-survey/www/admin/description-edit.adp 25 Feb 2002 20:28:14 -0000 1.1 @@ -0,0 +1,21 @@ + +@survey_name@: Edit Description +@context_bar@ + +
+Edit and submit to change the description for this survey: +
+<%= [export_form_vars survey_id] %> + +
+The description above is: +Preformatted text +<%= [survsimp_bt_mergepiece "Plain text +" $html_p_set] %> HTML +

+ +

+ +
+ +
Index: openacs-4/packages/simple-survey/www/admin/name-edit-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/simple-survey/www/admin/name-edit-2.tcl,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/simple-survey/www/admin/name-edit-2.tcl 25 Feb 2002 20:28:14 -0000 1.1 @@ -0,0 +1,31 @@ +# /www/survsimp/admin/description-edit-2.tcl +ad_page_contract { + Updates database with the new name + information and return user to the main survey page. + + @param survey_id survey which description we're updating + @param desc_html is the description html or plain text + @param description text of survey description + @param checked_p confirmation flag + + @author jsc@arsdigita.com + @author nstrug@arsdigita.com + @date February 16, 2000 + @cvs-id $Id: name-edit-2.tcl,v 1.1 2002/02/25 20:28:14 ben Exp $ +} { + survey_id:integer + name:trim,notnull +} + +ad_require_permission $survey_id survsimp_modify_survey + +set exception_count 0 +set exception_text "" + +db_dml survsimp_update_name "update survsimp_surveys +set name= :name, short_name= :name +where survey_id = :survey_id" + +ad_returnredirect "one?[export_url_vars survey_id]" + + Index: openacs-4/packages/simple-survey/www/admin/name-edit.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/simple-survey/www/admin/name-edit.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/simple-survey/www/admin/name-edit.adp 25 Feb 2002 20:28:14 -0000 1.1 @@ -0,0 +1,16 @@ + +@survey_name@: Edit Name +@context_bar@ + +
+Edit and submit to change the name for this survey: + +<%= [export_form_vars survey_id] %> + +
+ +
+ +
+ +
Index: openacs-4/packages/simple-survey/www/admin/name-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/simple-survey/www/admin/name-edit.tcl,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/simple-survey/www/admin/name-edit.tcl 25 Feb 2002 20:28:14 -0000 1.1 @@ -0,0 +1,31 @@ +ad_page_contract { + + Edit the name of the survey + + @param survey_id integer denoting survey whose description we're changing + + @author Jin Choi (jsc@arsdigita.com) + @author nstrug@arsdigita.com + @date February 16, 2000 + @cvs-id $Id: name-edit.tcl,v 1.1 2002/02/25 20:28:14 ben Exp $ +} { + + survey_id:integer + +} + +ad_require_permission $survey_id survsimp_modify_survey + +db_1row survey_properties "select name as survey_name, description, description_html_p as desc_html +from survsimp_surveys +where survey_id = :survey_id" + +set html_p_set [ns_set create] +ns_set put $html_p_set desc_html $desc_html + +set context_bar [ad_context_bar_ws_or_index [list "./" "Simple Survey Admin"] [list "one?[export_url_vars survey_id]" "Administer Survey"] "Edit Name"] + + +ad_return_template + + Index: openacs-4/packages/simple-survey/www/admin/one.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/simple-survey/www/admin/one.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/simple-survey/www/admin/one.adp 25 Feb 2002 20:28:14 -0000 1.1 @@ -0,0 +1,18 @@ + +One Survey: @survey_name@ +@context_bar@ + +
    +
  • Created by: @creator_name@ +
  • Name: @survey_name@ [ edit ] +
  • Created: <%= [util_AnsiDatetoPrettyDate $creation_date] %> +
  • Status: @survey_status@ @toggle_enabled_link@ +
  • Responses per user: @survey_response_limit@ [ @response_limit_toggle@ @response_editable_link@ ] +
  • Description: @survey_description@ [ edit ] +
  • Type: @type@ +
  • View responses: by user | summary +<%= [survey_specific_html $type] %> +
+

+ +@questions_summary@ Index: openacs-4/packages/simple-survey/www/admin/question-add.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/simple-survey/www/admin/question-add.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/simple-survey/www/admin/question-add.adp 25 Feb 2002 20:28:14 -0000 1.1 @@ -0,0 +1,27 @@ + +@name@: New Question +@context_bar@ + + +<%= [export_form_vars survey_id after] %> + +Question: +

+ +
+<%= [survey_specific_html $type] %> +

+ +Active? +Yes +No +
+Required? +Yes +No + +

+ +
+ + Index: openacs-4/packages/simple-survey/www/admin/question-modify-text.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/simple-survey/www/admin/question-modify-text.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/simple-survey/www/admin/question-modify-text.adp 25 Feb 2002 20:28:14 -0000 1.1 @@ -0,0 +1,19 @@ + +@survey_name@: Modify Question Text +@context_bar@ + +
+<%= [export_form_vars question_id survey_id] %> +Question: +
+ +
+ +

+ +

+ +
+ + +
Index: openacs-4/packages/simple-survey/www/admin/respondents.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/simple-survey/www/admin/respondents.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/simple-survey/www/admin/respondents.adp 25 Feb 2002 20:28:14 -0000 1.1 @@ -0,0 +1,7 @@ + +@survey_name@: Respondents +@context_bar@ + +
    +@respondents@ +
Index: openacs-4/packages/simple-survey/www/admin/responses.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/simple-survey/www/admin/responses.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/simple-survey/www/admin/responses.adp 25 Feb 2002 20:28:14 -0000 1.1 @@ -0,0 +1,12 @@ + +@survey_name@: Responses +@context_bar@ + +@unique_users_toggle@ +<%= [survey_specific_html $type] %> +

+@response_sentence@ + +

    +@results@ +