Index: openacs-4/packages/ams/catalog/ams.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ams/catalog/ams.en_US.ISO-8859-1.xml,v diff -u -r1.8 -r1.9 --- openacs-4/packages/ams/catalog/ams.en_US.ISO-8859-1.xml 7 Jun 2005 10:59:58 -0000 1.8 +++ openacs-4/packages/ams/catalog/ams.en_US.ISO-8859-1.xml 9 Jun 2005 20:20:39 -0000 1.9 @@ -1,5 +1,5 @@ - + Action Add an AMS Attribute @@ -9,41 +9,297 @@ AMS Attributes Answer Optional Answer Required + Application Fee Recieved + Application Fees Recieved + Applicatoin Date + Application Dates Application Recieved Applications Recieved Application Visa Application Visas Attribute Name Birthday Birthdays + asdf + Test + Tests Category Categories Checkbox - Multiple Options Allowed Citizenship Citizenships - Copy Country + Andorra + United Arab Emirates + Afghanistan + Antigua and Barbuda + Anguilla + Albania + Armenia + Netherlands Antilles + Angola + Antarctica + Argentina + American Samoa + Austria + Australia + Aruba + Azerbaijan + Bosnia and Herzegovina + Barbados + Bangladesh + Belgium + Burkina Faso + Bulgaria + Bahrain + Burundi + Benin + Bermuda + Brunei Darussalam + Bolivia + Brazil + Bahamas + Bhutan + Bouvet Island + Botswana + Belarus + Belize + Canada + Cocos (Keeling) Islands + Congo, The Democratic Republic of the + Central African Republic + Congo + Switzerland + Cote D'ivoire + Cook Islands + Chile + Cameroon + China + Colombia + Costa Rica + Cuba + Cape Verde + Christmas Island + Cyprus + Czech Republic + Germany + Djibouti + Denmark + Dominica + Dominican Republic + Algeria + Ecuador + Estonia + Egypt + Western Sahara + Eritrea + Spain + Ethiopia + Finland + Fiji + Falkland Islands (Malvinas) + Micronesia, Federated States of + Faroe Islands + France + Gabon + United Kingdom + Grenada + Georgia + French Guiana + Ghana + Gibraltar + Greenland + Gambia + Guinea + Guadeloupe + Equatorial Guinea + Greece + South Georgia and the South Sandwich Islands + Guatemala + Guam + Guinea-Bissau + Guyana + Hong Kong + Heard Island and Mcdonald Islands + Honduras + Croatia + Haiti + Hungary + Indonesia + Ireland + Israel + India + British Indian Ocean Territory + Iraq + Iran, Islamic Republic of + Iceland + Italy + Jamaica + Jordan + Japan + Kenya + Kyrgyzstan + Cambodia + Kiribati + Comoros + Saint Kitts and Nevis + Korea, Democratic People's Republic of + Korea, Republic of + Kuwait + Cayman Islands + Kazakstan + Lao People's Democratic Republic + Lebanon + Saint Lucia + Liechtenstein + Sri Lanka + Liberia + Lesotho + Lithuania + Luxembourg + Latvia + Libyan Arab Jamahiriya + Morocco + Monaco + Moldova, Republic of + Madagascar + Marshall Islands + Macedonia, The Former Yugoslav Republic of + Mali + Myanmar + Mongolia + Macau + Northern Mariana Islands + Martinique + Mauritania + Montserrat + Malta + Mauritius + Maldives + Malawi + Mexico + Malaysia + Mozambique + Namibia + New Caledonia + Niger + Norfolk Island + Nigeria + Nicaragua + Netherlands + Norway + Nepal + Nauru + Niue + New Zealand + Oman + Panama + Peru + French Polynesia + Papua New Guinea + Philippines + Pakistan + Poland + Saint Pierre and Miquelon + Pitcairn + Puerto Rico + Palestinian Territory, Occupied + Portugal + Palau + Paraguay + Qatar + Reunion + Romania + Russian Federation + Rwanda + Saudi Arabia + Solomon Islands + Seychelles + Sudan + Sweden + Singapore + Saint Helena + Slovenia + Svalbard and Jan Mayen + Slovakia + Sierra Leone + San Marino + Senegal + Somalia + Suriname + Sao Tome and Principe + El Salvador + Syrian Arab Republic + Swaziland + Turks and Caicos Islands + Chad + French Southern Territories + Togo + Thailand + Tajikistan + Tokelau + Turkmenistan + Tunisia + Tonga + East Timor + Turkey + Trinidad And Tobago + Tuvalu + Taiwan, Province of China + Tanzania, United Republic of + Ukraine + Uganda + United States Minor Outlying Islands + United States + Uruguay + Uzbekistan + Holy See (Vatican City State) + Saint Vincent and the Grenadines + Venezuela + Virgin Islands, British + Virgin Islands, U.S. + Viet Nam + Vanuatu + Wallis And Futuna + Samoa + Yemen + Mayotte + Yugoslavia + South Africa + Zambia + Zimbabwe Date Date of Inquiry Dates of Inquiry Applicatoin Recieved Date Application Recieved Dates Define Widget - Degree - Degrees + Degree From Previous School + Degree From Previous Schools Street - Division - Divisions + Denomination + Denominations + App Division + App Divisions Edit/Delete Heading Email Enrollment Interest Level Enrollment Interest Levels + Admissions Entry Date + Admissions Entry Dates + Fax + Faxes + Application Fee Recieved + Application Fees Recieved Form Preview Gender Genders + has been added as an attribute to Heading Bachelor's Graduation Year Bachelor's Graduation Years + Incomplete Application + Incomplete Applications Inquiry Type Inquiry Types int Country @@ -53,20 +309,24 @@ Internation Student Internation Students Integer + 011 is not a valid Canadian postal code is not a valid U.S. State is not a valid U.S. zip code List Name - An answer from the user is optional + AMS Lists associated with this Object + An answer is required from the checked attributes Create and map a new attribute Export code to recreate this list - Require an answer from the user - Unmap checked attributes - Update ordering - Map + If you need to add more you will be able to + Require an answer from the checked attributes + Unmap the checked attributes + Update ordering from numbers in the ordering column Mapped Attributes Marriage Status Marriage Statuses + Matriculation Fee Recieved + Matriculation Fees Recieved Middle Initial Middle Initials Move to Applicant @@ -78,6 +338,8 @@ No Mail No Mails Object Type + Object Type + Objects Option Optional Ordering @@ -97,15 +359,16 @@ First Names First Names Zip/Postal Code + Predefined Options Prefix Prefixes - Pretty Name Pretty Name - Pretty Name Plural Pretty Plural Preview the Input Form - Program - Programs + Applied Previously + Applied Previously + Application Program + Application Programs Radio Buttons - One Option Allowed Referred By Referred By @@ -122,7 +385,8 @@ School Types Drop Down List - One Option Allowed Select One - Sort Order + Transferred to Student Management System + Transferred to Student Management System Suffix Suffixes Phone Number @@ -131,11 +395,14 @@ Textbox Transcript Visa Transcript Visas + Transfer to Student Management Date + Transfer to Student Management Dates + Transfer Complete + Transfers Completed Term of Interest Terms of Interest Unmap Unmapped Attributes - Update Options Update Ordering Website Url Visa Country @@ -146,7 +413,6 @@ Visa Types Visa Transferred from School Visas Transferred from School - Widget Widget Work Permit Work Permits Index: openacs-4/packages/ams/tcl/address-widget-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ams/tcl/address-widget-procs.tcl,v diff -u -r1.6 -r1.7 --- openacs-4/packages/ams/tcl/address-widget-procs.tcl 7 Jun 2005 10:59:58 -0000 1.6 +++ openacs-4/packages/ams/tcl/address-widget-procs.tcl 9 Jun 2005 20:20:39 -0000 1.7 @@ -98,8 +98,8 @@ # There is no HTTP connection - resort to system locale set locale [lang::system::locale] } -# return [util_memoize [list template::util::address::country_options_not_cached -locale $locale]] - return [template::util::address::country_options_not_cached] + return [util_memoize [list template::util::address::country_options_not_cached -locale $locale]] +# return [template::util::address::country_options_not_cached] } ad_proc -public template::util::address::country_options_not_cached { @@ -113,17 +113,16 @@ foreach country $country_code_list { if { [lsearch $reserved_country_codes $country] < 0 } { - lappend return_country_list [list [lang::util::localize "#ref-countries.${country}#"] $country] + lappend return_country_list [list [lang::message::lookup $locale "ref-countries.${country}"] $country] } } set country_code [list] if { [exists_and_not_null reserved_country_codes] } { - foreach code $reserved_country_codes { - set code [string toupper $code] - lappend country_code [list [lang::message::lookup $this_locale "ams.country_${code}"] $code] + foreach country $reserved_country_codes { + set country [string toupper $country] + lappend country_code [list [lang::message::lookup $locale "ref-countries.${country}"] $country] } - lappend country_code [list "--" ""] - append country_code " [lsort $return_country_list]" + set country_code [concat $country_code [list "--" ""] [lsort $return_country_list]] } else { set country_code [lsort $return_country_list] } Index: openacs-4/packages/ams/tcl/ams-widget-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ams/tcl/ams-widget-procs.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/ams/tcl/ams-widget-procs.tcl 8 Jun 2005 06:13:28 -0000 1.3 +++ openacs-4/packages/ams/tcl/ams-widget-procs.tcl 9 Jun 2005 20:20:39 -0000 1.4 @@ -75,8 +75,8 @@ set options {} } } + ns_log notice "MGEDDERT DEBUG: return ::ams::widget::${widget} -request $request -attribute_name $attribute_name -pretty_name $pretty_name -value $value -optional_p $optional_p -form_name $form_name -options $options" return [::ams::widget::${widget} -request $request -attribute_name $attribute_name -pretty_name $pretty_name -value $value -optional_p $optional_p -form_name $form_name -options $options] - } else { # the widget requested did not exist ns_log notice "AMS: the ams widget \"${widget}\" was requested and the associated ::ams::widget::${widget} procedure does not exist" Index: openacs-4/packages/ams/www/attribute-add.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ams/www/attribute-add.tcl,v diff -u -r1.6 -r1.7 --- openacs-4/packages/ams/www/attribute-add.tcl 7 Jun 2005 06:50:47 -0000 1.6 +++ openacs-4/packages/ams/www/attribute-add.tcl 9 Jun 2005 20:20:40 -0000 1.7 @@ -44,7 +44,7 @@ lappend elements [list option_fields_count:integer(hidden) [list value $option_fields_count]] # lappend elements [list options_on_last_screen:integer(hidden),optional] while { $i <= $option_fields_count } { - set element [list option${i}:text(text),optional [list label "[_ ams.Option_i]"] [list html [list size 50]]] + set element [list option${i}:text(text),optional [list label "[_ ams.Option] $i"] [list html [list size 50]]] if { $i == $option_fields_count } { lappend element [list help_text "[_ ams.lt_If_you_need_to_add_mo]"] } @@ -190,7 +190,7 @@ } else { set return_url [export_vars -base "object" -url {object_type return_url return_url_label}] } - ad_returnredirect -message "$pretty_name has been added as an attribute to $object_type#>" $return_url + ad_returnredirect -message "$pretty_name [_ ams.has_been_added_as_an_attribute_to] $object_type" $return_url ad_script_abort }