Merge branch 'dev'

renhao

2023-10-18 ff1d40a1a235da7c3bdfa26070af267f19c7a3d3

 _Main/BL/Type_VersionControl/StaticMethod_FindReleasedVersions.qbl

@@ -1,7 +1,7 @@
Quintiq file version 2.0
#parent: #root
StaticMethod FindReleasedVersions (
  GlobalOTDTable globalotdtable,
  GlobalOTDSOP globalotdsop,
  String businesstype,
  String versionid
) as owning VersionControls
@@ -12,7 +12,10 @@
    // Administrator Sep-13-2023 (created)
    
    // Get the latest version data 
    latestversion := selectset( globalotdtable, VersionControl, version, version.BusinessType()=businesstype and version.IsReleased()=true and version.VersionID().FindString( versionid, 0 ) = 0 );
    latestversion := selectset( globalotdsop, 
                                VersionControl, 
                                version, 
                                version.BusinessType()=businesstype and version.IsReleased()=true and version.VersionID().FindString( versionid, 0 ) = 0 );
    
    return &latestversion;
  *]