From 6982337837db3443d05ada70c0afbf331032cf15 Mon Sep 17 00:00:00 2001 From: yanweiyuan3 <yanweiyuan3@gmail.com> Date: 星期五, 15 九月 2023 17:43:59 +0800 Subject: [PATCH] Add Release & Copy(Save) button --- _Main/BL/Type_VersionControl/StaticMethod_CreateNewSceneVersion.qbl | 4 +++- 1 files changed, 3 insertions(+), 1 deletions(-) diff --git a/_Main/BL/Type_VersionControl/StaticMethod_CreateNewSceneVersion.qbl b/_Main/BL/Type_VersionControl/StaticMethod_CreateNewSceneVersion.qbl index 7030997..450646d 100644 --- a/_Main/BL/Type_VersionControl/StaticMethod_CreateNewSceneVersion.qbl +++ b/_Main/BL/Type_VersionControl/StaticMethod_CreateNewSceneVersion.qbl @@ -24,11 +24,13 @@ 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" ) + ")"; + newsingleversionname := newcaltype + "(" + createtime.Format( "Y/M2/D2 H:m:s" ) + ")"; newversionname := oldversion_name + newsingleversionname; // Create new version newversion := VersionControl::Create( owner, businesstype, newcaltype, createtime, newversionid, newversionname, newsingleversionname, user ); + newversion.IsReleased( true ); + newversion.ReleaseTime( createtime ); return newversion; *] -- Gitblit v1.9.3