Issue

Code backup
2026-05-10 16:59:01 +02:00
commit 368d6fafea
796 changed files with 315310 additions and 0 deletions
@@ -0,0 +1,27 @@
+static void PALDC_PGS_CreaSpecificheBugSubProj(Args _args)
+{
+    ProjTable                           projTable;
+    PALDC_PGS_SpecificationsRevisions   PALDC_PGS_SpecsRevs;
+    PALDC_PGS_SpecificationsRevisions   PALDC_PGS_SpecsRevs_new;
+
+        while select projTable
+            where projTable.ProjId like "C2025-0756*"
+        {
+            info("Creo le specifiche per il sottoprogetto: " + projTable.ProjId);
+
+                select firstOnly PALDC_PGS_SpecsRevs
+                    where PALDC_PGS_SpecsRevs.ProjId == projTable.ProjId
+                    && PALDC_PGS_SpecsRevs.fromDate
+                    && !PALDC_PGS_SpecsRevs.toDate;
+
+                if(!PALDC_PGS_SpecsRevs.RecId)
+                {
+                    PALDC_PGS_SpecsRevs_new.clear();
+                    PALDC_PGS_SpecsRevs_new.ProjId          = ProjTable.ProjId;
+                    PALDC_PGS_SpecsRevs_new.Description     = "Emissione";
+                    PALDC_PGS_SpecsRevs_new.fromDate        = DateTimeUtil::getSystemDateTime();
+                    info(PALDC_PGS_SpecsRevs_new.ProjId);
+                    PALDC_PGS_SpecsRevs_new.insert();
+                }
+        }
+}
@@ -0,0 +1,35 @@
+    PALEBI_ServiceOperationCost soc;
+    
+    ttsBegin;
+    while select forUpdate soc
+        where soc.PALEBI_ServiceOperationId == 'SO25-00012'
+        && soc.TransDate >= mkDate(30, 7, 2025)
+    {
+        info(soc.PALEBI_ServiceOperationId);
+        
+        soc.PALEBI_ServiceOperationId = 'SO25-00508';
+        soc.doUpdate();
+    }
+    ttsCommit;
+
+    PALEBI_ServiceOperationJournalDay       sojd;
+    PALEBI_ServiceOperationJournalActivity  soja;
+    
+    ttsBegin;
+    while select forUpdate sojd
+        where sojd.PALEBI_ServiceOperationId == 'SO25-00012'
+        && sojd.ServiceOperationJournalWeekRefRecId == 5637506838
+    {
+        while select forUpdate soja
+            where soja.ServiceOperationJournalDayRefRecId == sojd.RecId
+        {
+            soja.PALEBI_ServiceOperationId = 'SO25-00508';
+            soja.doUpdate();                
+        }
+        
+        sojd.PALEBI_ServiceOperationId = 'SO25-00508';
+        sojd.ServiceOperationJournalWeekRefRecId = 5637511336;
+        
+        sojd.doUpdate();
+    }
+    ttsCommit;