source/bizobjects/AyaLib/GZTW.AyaNova.BLL/DBManager.cs

@@ -2620,6 +2620,49 @@ No message for error code 336397208 found.
                                     }
                                     #endregion
 
+                                    #region Firebird Version 136 Case 3740
+                                    if (nSchemaLevel < 136)
+                                    {
+                                        //-- Reset all ON ORDER to zero
+                                        DDL(@"update APARTBYWAREHOUSEINVENTORY set AQUANTITYONORDER=0;");
+                                        
+                                        //-- Update on order to actual values in PO Items
+                                        DDL(
+@"MERGE INTO APARTBYWAREHOUSEINVENTORY AS B 
+USING APURCHASEORDERITEM AS A
+ON A.APARTWAREHOUSEID=B.APARTWAREHOUSEID AND A.APARTID = B.APARTID
+WHEN MATCHED THEN
+UPDATE SET B.AQUANTITYONORDER=A.AQUANTITYORDERED-A.AQUANTITYRECEIVED
+                                        ");
+
+                                        //-- Reset all on order committed to zero
+                                        DDL("update APARTBYWAREHOUSEINVENTORY set AQTYONORDERCOMMITTED = 0;");
+
+                                        //-- Update on order committed to actual values in PO Items
+                                        DDL(
+@"MERGE INTO APARTBYWAREHOUSEINVENTORY AS B 
+USING APURCHASEORDERITEM AS A
+ON A.APARTWAREHOUSEID=B.APARTWAREHOUSEID AND A.APARTID = B.APARTID AND A.ACLOSED=0 AND A.AWORKORDERITEMPARTREQUESTID IS NOT NULL
+WHEN MATCHED THEN
+UPDATE SET B.AQTYONORDERCOMMITTED=A.AQUANTITYORDERED-A.AQUANTITYRECEIVED
+                                        ");
+
+                                        //-- Delete 'closed none received' orphan poitems
+                                        DDL(@"DELETE FROM APURCHASEORDERITEM POI WHERE EXISTS (SELECT AID FROM APURCHASEORDER PO WHERE PO.AID=POI.APURCHASEORDERID AND PO.ASTATUS=4);");
+
+                                        //-- Fix 'Closed - partially received' po items with mismatching quantities
+                                        DDL(
+@"MERGE INTO APURCHASEORDERITEM AS POI 
+USING APURCHASEORDER AS PO
+ON PO.AID=POI.APURCHASEORDERID AND PO.ASTATUS=4
+WHEN MATCHED THEN
+UPDATE SET POI.AQUANTITYORDERED=POI.AQUANTITYRECEIVED, POI.ACLOSED=1;
+                                        ");
+
+                                        nSchemaLevel = 136;
+                                    }
+                                    #endregion
+
                                     #endregion fb v 7.5