From 4b60afbb9fe35115958a3560c55b2ae08e267d71 Mon Sep 17 00:00:00 2001
From: yanweiyuan3 <yanweiyuan3@gmail.com>
Date: 星期四, 14 九月 2023 20:25:16 +0800
Subject: [PATCH] Data input & output add

---
 _Main/BL/Type_VersionControl/StaticMethod_CreateNewVersion.qbl |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/_Main/BL/Type_VersionControl/StaticMethod_CreateNewVersion.qbl b/_Main/BL/Type_VersionControl/StaticMethod_CreateNewVersion.qbl
index c5d5ef1..9c93bdf 100644
--- a/_Main/BL/Type_VersionControl/StaticMethod_CreateNewVersion.qbl
+++ b/_Main/BL/Type_VersionControl/StaticMethod_CreateNewVersion.qbl
@@ -33,8 +33,8 @@
     
     
     // Calculate new version info
-    additionversionid := [Number]( createtime.MinutesAsReal( starttime ) * 60 );
-    newversionid := oldversion_id + additionversionid.AsQUILL();
+    additionversionid := ( createtime.MinutesAsReal( starttime ) * 60 * 10 + createtime.SecondOfMinute() ).Round( 0 );
+    newversionid := oldversion_id + [String]additionversionid;
     newcaltype := GlobalOTDTable::GetNextCalType( oldcaltype, businesstype );
     newsingleversionname := newcaltype + "(" + createtime.Format( "Y-M2-D2 H:m:s" ) + ")";
     newversionname := oldversion_name + newsingleversionname;

--
Gitblit v1.9.3