anchor.diff:          |> separated "\r\n"
           |> failwithf "Error occured during ModifyVersionTags:%s"
   
  +/// Checks a Dynamics NAV object for missing required and invalid tags and raises this as errors.
  +/// It also changes the given tag, resets the modified flag and time stamp.
   let setVersionTags requiredTags acceptPreTagged invalidTags versionTag newVersion removeModifiedFlag newDateTime fileNames =
       trace "Setting VersionTags."
       tracefn "  - Required: %A" requiredTags
  
positive.code:     else
          tagList + Colon.ToString() + versionTag + newVersion        
  
  let replaceVersionTagList (text:string) (newTags:string) =
      VersionRegex.Replace(text, String.Format("\n    Version List={0};", newTags))
  
  let replaceVersionTag versionTag (newVersion:string) sourceCode =
      let tagList = getVersionTagList sourceCode
  
  
negative.code: let getVersionTagList text =
      if VersionRegex.IsMatch text then VersionRegex.Match(text).Groups.["VersionList"].Value else ""
  
  /// Splits a version tag list from Dynamics NAV object into single tags
  let splitVersionTags (tagList:string) = tagList.ToUpper().Split Colon
  
  /// Replaces a version tag in a version tag list from Dynamics NAV object
  let replaceInVersionTag (versionTag:string) (newVersion:string) (tagList:string) =
      let versionTag = versionTag.ToUpper()
      if tagList.ToUpper().Contains versionTag then
  