Unterstützung für PostgreSQL 12 Teil 3

Sortierung der Erzeugnisse nach der dafür vorgesehenen
Positionsspalte, nicht ID.

diff --git a/SL/DO.pm b/SL/DO.pm
index f32e097dc282065775abd81cf77a89e9b5e3d9be..034189fc347e1dd5c5d8afa559f5357876a781b5 100644 (file)
--- a/SL/DO.pm
+++ b/SL/DO.pm
@@ -1030,9 +1030,9 @@ sub order_details {
       my $sortorder = "";
       if ($form->{groupitems}) {
         $sortorder =
-          qq|ORDER BY pg.partsgroup, a.id|;
+          qq|ORDER BY pg.partsgroup, a.position|;
       } else {
-        $sortorder = qq|ORDER BY a.id|;
+        $sortorder = qq|ORDER BY a.position|;
       }
 
       do_statement($form, $h_pg, $q_pg, conv_i($form->{"id_$i"}));

diff --git a/SL/IS.pm b/SL/IS.pm
index 894a8aea7ea3cb2cfad3a75574cd36edd6bbec92..f79952ec94098ce98cd9aa5ccc1f938b64140f93 100644 (file)
--- a/SL/IS.pm
+++ b/SL/IS.pm
@@ -442,9 +442,9 @@ sub invoice_details {
         my $sortorder = "";
         if ($form->{groupitems}) {
           $sortorder =
-            qq|ORDER BY pg.partsgroup, a.id|;
+            qq|ORDER BY pg.partsgroup, a.position|;
         } else {
-          $sortorder = qq|ORDER BY a.id|;
+          $sortorder = qq|ORDER BY a.position|;
         }
 
         my $query =

diff --git a/SL/OE.pm b/SL/OE.pm
index a94e9c2b10bad171e685bf6562e897fbb9b916a9..d86b6c0ec55a28c686203fd61a8bd63f2f8126a0 100644 (file)
--- a/SL/OE.pm
+++ b/SL/OE.pm
@@ -1528,9 +1528,9 @@ sub order_details {
         # get parts and push them onto the stack
         my $sortorder = "";
         if ($form->{groupitems}) {
-          $sortorder = qq|ORDER BY pg.partsgroup, a.id|;
+          $sortorder = qq|ORDER BY pg.partsgroup, a.position|;
         } else {
-          $sortorder = qq|ORDER BY a.id|;
+          $sortorder = qq|ORDER BY a.position|;
         }
 
         $query = qq|SELECT p.partnumber, p.description, p.unit, a.qty, | .