alpha sort packages in new package order SELECT (ticket 1446)

diff --git a/FS/FS/ClientAPI/Signup.pm b/FS/FS/ClientAPI/Signup.pm
index 5a8f8e1..ac211ec 100644 (file)
--- a/FS/FS/ClientAPI/Signup.pm
+++ b/FS/FS/ClientAPI/Signup.pm
@@ -201,6 +201,10 @@ sub signup_info {
   # delete $signup_info->{'part_pkg'};
   #}
 
+  $signup_info->{'part_pkg'} = [ sort { $a->{pkg} cmp $b->{pkg} }  # case?
+                                      @{ $signup_info->{'part_pkg'} }
+                               ];
+
   if ( exists $packet->{'session_id'} ) {
     my $agent_signup_info = { %$signup_info };
     delete $agent_signup_info->{agentnum2part_pkg};

diff --git a/httemplate/view/cust_main/order_pkg.html b/httemplate/view/cust_main/order_pkg.html
index 6edd18c..f48bf09 100644 (file)
--- a/httemplate/view/cust_main/order_pkg.html
+++ b/httemplate/view/cust_main/order_pkg.html
@@ -23,7 +23,8 @@ function enable_order_pkg () {
 %  qsearch( 'part_pkg', { 'disabled' => '' }, '',
 %           ' AND 0 < ( SELECT COUNT(*) FROM type_pkgs '.
 %           '             WHERE typenum = '. $cust_main->agent->typenum.
-%           '             AND type_pkgs.pkgpart = part_pkg.pkgpart )'
+%           '             AND type_pkgs.pkgpart = part_pkg.pkgpart )'.
+%           ' ORDER BY pkg'   # case ?
 %         )
 %) {
 %