B2026-025_Unicode_removed_from_RO_menu_titles_in_treeview

good for testing

PROMS/ReferencedObjects/LibSource/RODBInterface/RODBInterface.cs

@@ -2186,6 +2186,20 @@ namespace RODBInterface
 			}
 			string xmlstr = GenerateXmlString(ro, false);
 
+			StringBuilder xmlstrTmp = new StringBuilder(); // B2026-025 prep the info field data so it will be saved correctly.
+			char[] chrAry = xmlstr.ToCharArray();
+			foreach (int chr in chrAry)
+			{
+				if (chr > 160)
+				{
+					xmlstrTmp.Append($"\\u{(int)chr}?");
+				}
+				else
+				{
+					xmlstrTmp.Append((char)chr);
+				}
+			}
+
 			string wraccid = null;
 			if (ro.HasAttribute("AccPageID"))
 			{
@@ -2209,13 +2223,13 @@ namespace RODBInterface
 					//    strInsert = "INSERT INTO " + parent.GetAttribute("Table") + "( RecID, RecType, ParentID, AccPageID, ModDateTime, Info ) ";
 					strInsert = "INSERT INTO " + parent.GetAttribute("Table") + "( RecID, RecType, ParentID, ModDateTime, AccPageID, Info ) ";
 					strInsert = strInsert + " VALUES ('" + ro.GetAttribute("RecID") + "'," + (uint)RecordType.Group + ",'" + ro.GetAttribute("ParentID");
-					strInsert = strInsert + "','" + wraccid + "','" + dt + "','" + xmlstr + "');";
+					strInsert = strInsert + "','" + wraccid + "','" + dt + "','" + xmlstrTmp + "');";
 				}
 				else
 				{
 					strInsert = "INSERT INTO " + parent.GetAttribute("Table") + "( RecID, RecType, ParentID, ModDateTime, Info ) ";
 					strInsert = strInsert + " VALUES ('" + ro.GetAttribute("RecID") + "'," + (uint)RecordType.Group + ",'" + ro.GetAttribute("ParentID");
-					strInsert = strInsert + "','" + dt + "','" + xmlstr + "');";
+					strInsert = strInsert + "','" + dt + "','" + xmlstrTmp + "');";
 				}
 
 			}
@@ -2223,7 +2237,7 @@ namespace RODBInterface
 			{
 				strInsert = "INSERT INTO " + parent.GetAttribute("Table") + "( RecID, RecType, ParentID, AccPageId, ModDateTime, Info ) ";
 				strInsert = strInsert + " VALUES ('" + ro.GetAttribute("RecID") + "'," + (uint)RecordType.RRO + ",'" + ro.GetAttribute("ParentID");
-				strInsert = strInsert + "','" + wraccid + "','" + dt + "','" + xmlstr + "');";
+				strInsert = strInsert + "','" + wraccid + "','" + dt + "','" + xmlstrTmp + "');";
 			}
 
 			try

PROMS/ReferencedObjects/LibSource/RODBInterface/VlnXml.cs

@@ -96,6 +96,7 @@ using System.IO;
 using System.Windows.Forms;
 using ROFields;
 using VlnStatus;
+using System.Text.RegularExpressions;
 //using VlnProfiler; //don't forget to add VlnProfiler to the reference list
 
 namespace RODBInterface
@@ -517,7 +518,9 @@ namespace RODBInterface
 								strtmp.Append(" ");
 								cnt++;
 							}
-							if ((cnt + text.Length) > frmt2) // longer than the field length?
+							// string sym = symbcode < 256 ? ((char)symbcode).ToString() : string.Format(@"\u{0}", symbcode);
+							text = Regex.Replace(text, @"\\u([0-9]{1,4})\?", m => Convert.ToChar(int.Parse(m.Groups[1].Value)).ToString()); //B2026-025 Unicode removed from RO menu titles in treeview.
+							if ((cnt + text.Length) > frmt2) // longer than the field length?								
 								strtmp.Append(text.Substring(0,frmt2-cnt));
 							else
 								strtmp.Append(text);

PROMS/ReferencedObjects/LibSource/ctlXMLEditLib/roRichTextBox.cs

@@ -32,7 +32,7 @@ namespace ctlXMLEditLib
 		public void InsertSymbol( int symbcode)
 		{
 			int position = this.SelectionStart;
-			string sym = string.Format(symbcode < 256 ? "\'{0:X2}" : @"\u{0}", symbcode);
+			string sym = symbcode < 256 ? ((char)symbcode).ToString() : string.Format(@"\u{0}", symbcode);
 			this.SelectedRtf = RtfPrefixForSymbols + sym + @"}";
 			Select(position, -1);
 			Select(position + 1, 0);

PROMS/VEPROMS User Interface/dlgApproveProcedure.cs

@@ -1312,7 +1312,15 @@ namespace VEPROMS
 				pi.MyDocVersion.DocVersionConfig.SelectedSlave = 0;
 				if (si.IsApproved == 1)
 				{
-					dlgExportImport dlg = new dlgExportImport("Export", pi, MyFrmVEPROMS, (selectedSlave)); // "true tell export to convert ROs and Transitions to text
+
+                    //B2026-016 - Fix error pulling Reference Object info into Export
+                    if (pi.MyDocVersion.DocVersionAssociationCount == 0)
+                    {
+                        MessageBox.Show("Prior to Approval you must set the Referenced Object Database", "No RO Database set", MessageBoxButtons.OK, MessageBoxIcon.Exclamation);
+                        return false;
+                    }
+
+                    dlgExportImport dlg = new dlgExportImport("Export", pi, MyFrmVEPROMS, (selectedSlave)); // "true tell export to convert ROs and Transitions to text
 					dlg.DocReplace = frm.DocReplace;  // this tells approval to prepare an export file with resolved transitions and ROs, word sections are saved with resolved ROs during approval PDF creation and saved in DocReplace
 					System.Xml.XmlDocument xd = new System.Xml.XmlDocument();
 					dlg.ExportItem(xd, pi, "procedure");
@@ -1329,24 +1337,37 @@ namespace VEPROMS
                     pi.ClearChangeBarOverrides();
 
 					//B2019-140 Change bars do not get refreshed when approval is run.
-					ProcedureInfo newproc = ItemInfo.ResetProcedure(pi.ItemID);
+					ProcedureInfo newproc;
 
-					//// Refresh the StepPanel for the current Procedure
-					//// so change bars update
-					//// on any open StepPanel
-					DisplayTabItem dti = MyFrmVEPROMS.GetTabContainingProcedure(pi.ItemID);
+                    //// Refresh the StepPanel for the current Procedure
+                    //// so change bars update
+                    //// on any open StepPanel
+
+                    //B2026-019 Attempt to prevent an Access Error by utilizing a different Refresh if a Procedure is Open
+                    DisplayTabItem dti = MyFrmVEPROMS.GetTabContainingProcedure(pi.ItemID);
 					if (dti != null)
 					{
 						if (!dti.MyStepTabPanel.MyStepPanel.ContainsFocus)
 							dti.MyStepTabPanel.MyStepPanel.Focus();
 
 						foreach (EditItem eitm in dti.MyStepTabPanel.MyStepPanel.Controls.OfType<EditItem>())
-							eitm.ChangeBar = eitm.MyItemInfo.HasChangeBar;
-					}
+                        {
+                            eitm.ChangeBar = eitm.MyItemInfo.HasChangeBar;
+                        }
 
-					//since in a separate form, need to update the tree view
-					//so "Showing Change Bars" Content Menu Item is correct
-					MyFrmVEPROMS.RefreshProcedureNode(newproc);
+                        dti.MyStepTabPanel.MyStepTabRibbon.RefreshProcedure();
+                        Application.DoEvents();
+                        newproc = ProcedureInfo.Get(pi.ItemID);
+
+                    }
+					else
+					{
+                        newproc = ItemInfo.ResetProcedure(pi.ItemID);
+                    }
+
+						//since in a separate form, need to update the tree view
+						//so "Showing Change Bars" Content Menu Item is correct
+						MyFrmVEPROMS.RefreshProcedureNode(newproc);
 				}
 				else
 					UpdateProcedureConfig(pi, ap.RevNumber, ap.RevDate, myDTS, selectedSlave);

PROMS/VEPROMS User Interface/dlgExportImport.cs

@@ -1618,8 +1618,15 @@ namespace VEPROMS
 
 		public void ExportItem(XmlDocument xd, ItemInfo ii, string nodename)
 		{
-			XmlElement xe = xd.CreateElement(nodename);
-			if (ii.IsProcedure)
+            //B2026-016 - Fix error pulling Reference Object info into Export
+            if (ii.MyDocVersion.DocVersionAssociationCount == 0)
+            {
+                MessageBox.Show("Prior to Exporting Procedures you must set the Referenced Object Database", "No RO Database set", MessageBoxButtons.OK, MessageBoxIcon.Exclamation);
+                return;
+            }
+
+            XmlElement xe = xd.CreateElement(nodename);
+            if (ii.IsProcedure)
 			{
 				xe.Attributes.SetNamedItem(AddAttribute(xe.OwnerDocument, "rodbid", ii.MyDocVersion.DocVersionAssociations[0].MyROFst.MyRODb.RODbID.ToString()));
 				xe.Attributes.SetNamedItem(AddAttribute(xe.OwnerDocument, "rofolderpath", ii.MyDocVersion.DocVersionAssociations[0].MyROFst.MyRODb.FolderPath));

PROMS/VEPROMS User Interface/frmVEPROMS.cs

@@ -626,21 +626,26 @@ namespace VEPROMS
 					itm.UserID = Volian.Base.Library.VlnSettings.UserID;
 					itm.Save();
 
-					//B2019-140 Change bars do not get refreshed when approval is run.
-					// Reset a Procedure and sub items in the cache
-					ProcedureInfo newproc = ItemInfo.ResetProcedure(pi.ItemID);
+                    //B2019-140 Change bars do not get refreshed when approval is run.
+                    // Reset a Procedure and sub items in the cache
+                    ProcedureInfo newproc = ItemInfo.ResetProcedure(pi.ItemID);
+
+                    //// Refresh the StepPanel for the current Procedure
+                    //// so change bars update
+                    //// on any open StepPanel
+
+                    //B2026-019 Attempt to prevent an Access Error by utilizing a different Refresh if a Procedure is Open
+                    DisplayTabItem dti = GetTabContainingProcedure(pi.ItemID);
+					if (dti != null)
+					{
 
-					//// Refresh the StepPanel for the current Procedure
-					//// so change bars update
-					//// on any open StepPanel
-					DisplayTabItem dti = GetTabContainingProcedure(pi.ItemID);
-                    if (dti != null)
-                    {
                         if (!dti.MyStepTabPanel.MyStepPanel.ContainsFocus)
-                            dti.MyStepTabPanel.MyStepPanel.Focus();
+							dti.MyStepTabPanel.MyStepPanel.Focus();
 
 						foreach (EditItem eitm in dti.MyStepTabPanel.MyStepPanel.Controls.OfType<EditItem>())
+						{
 							eitm.ChangeBar = eitm.MyItemInfo.HasChangeBar;
+						}
 					}
 				}
 			}

PROMS/VEPROMS User Interface/frmVersionsProperties.cs

@@ -1113,13 +1113,34 @@ namespace VEPROMS
 			if (_Apples == null)
 			{
 				_Apples = new List<MiniConfig>();
-			}
-			_Apples.Add(cfg);
+            }
+
+            //B2026-017 Use Pre-typed in information when adding New Applicability
+            if (_Apples.Count == 0)
+            {
+                cfg.ID = textBox1.Text;
+                if (!string.IsNullOrEmpty(textBox2.Text))
+                {
+                    cfg.Name = textBox2.Text;
+                }
+                cfg.Number = textBox3.Text;
+                cfg.Text = textBox4.Text;
+                cfg.OtherID = textBox8.Text;
+                cfg.OtherName = textBox9.Text;
+                cfg.OtherNumber = textBox10.Text;
+                cfg.OtherText = textBox11.Text;
+                cfg.ProcedureNumber = textBox5.Text;
+                cfg.SetID = textBox6.Text;
+                cfg.SetName = textBox7.Text;
+            }
+            _Apples.Add(cfg);
 
 			bsApples.DataSource = null;
 			bsApples.DataSource = _Apples;
-			lbApplicabilities.SelectedItem = cfg;
-		}
+            lbApplicabilities.SelectedItem = cfg;
+			lbApplicabilities_SelectedIndexChanged(sender, e);
+
+        }
 		
 		private bool ApplicIsUsed(MiniConfig cfg) // B2017-230 - don't allow user to remove an applicability that is being used (specified)
 		{

PROMS/VEPROMS.CSLA.Library/Config/DocVersionConfig.cs

@@ -2291,7 +2291,7 @@ OnPropertyChanged("Default_BkColor");
 		public void RemoveSlave(int index)
 		{
 			XmlNode dd = _Xp.XmlContents.SelectSingleNode("//Slave[@index='" + index.ToString() + "']");
-			dd.ParentNode.RemoveChild(dd);
+			dd?.ParentNode?.RemoveChild(dd);
 		}
 		public int MaxSlaveIndex
 		{

PROMS/VEPROMS.CSLA.Library/Extension/ItemExt.cs

@@ -3839,9 +3839,17 @@ namespace VEPROMS.CSLA.Library
 			_SupInfos = null;
 		}
 
-		//B2019-140 Change bars do not get refreshed when approval is run.
-		// Reset a Procedure and sub items in the cache
-		public static ProcedureInfo ResetProcedure(int procID)
+        //B2019-140 Change bars do not get refreshed when approval is run.
+        // Reset a Procedure and sub items in the cache
+        // **********************
+        // Be carefull calling this when the Procedure is Open
+        // When the Procedure is Open - use StepTabRibbon.RefreshProcedure(); instead
+        // When a Procedure is open and you try to refresh it,
+        // events can fire behind the scenes - causing data to try to be accessed while you are trying to refresh it
+        // When This occurs, it will cause a 
+        // "ThreadException ... Collection was modified; enumeration operation may not execute.”
+        // **********************
+        public static ProcedureInfo ResetProcedure(int procID)
 		{
 			// The following lines reload the procedure info cache
 			ProcedureInfo newproc = ProcedureInfo.Get(procID, true);
@@ -3859,26 +3867,27 @@ namespace VEPROMS.CSLA.Library
 			ItemInfo newprocitem = Get(procID, true);
 			newprocitem.RefreshConfig();
 
-			//Reload all the child/sub items
+            //Reload all the child/sub items
 #pragma warning disable S2971 // LINQ expressions should be simplified - need initial ToList to force enumeration
-			//otherwise will get a "Collection was modified; enumeration operation may not execute" error
-			List<int> itemIDs = _CacheByPrimaryKey.Values.ToList().SelectMany(y => y).Where(t => t?.ActiveParent != null && (t.ActiveParent is ItemInfo) && t.MyProcedure.ItemID == procID).Select(x => (x.ActiveParent as ItemInfo).ItemID).Distinct().ToList();
+            //otherwise will get a "Collection was modified; enumeration operation may not execute" error
+            List<int> itemIDs = _CacheByPrimaryKey.SelectMany(kvp => kvp.Value).ToList().Where(t => t?.ActiveParent != null && (t.ActiveParent is ItemInfo) && t.MyProcedure.ItemID == procID).Select(x => (x.ActiveParent as ItemInfo).ItemID).Distinct().ToList();
 #pragma warning restore S2971 // LINQ expressions should be simplified
             for (int index = 0; index < itemIDs.Count; index++)
-			{
-				ResetParts(itemIDs[index]);
-			}
-
-			//reset the procedure config for all items attached to current procedure
-#pragma warning disable S2971 // LINQ expressions should be simplified - need initial ToList to force enumeration
-			//otherwise will get a "Collection was modified; enumeration operation may not execute" error
-			List<ItemInfo> pconfigrefresh_items = _CacheByPrimaryKey.Values.ToList().SelectMany(y => y).Where(t => t?.MyProcedure?.ItemID == procID).Distinct().ToList();
-#pragma warning restore S2971 // LINQ expressions should be simplified
-			for (int index = 0; index < pconfigrefresh_items.Count; index++)
             {
-				pconfigrefresh_items[index].MyProcedure = newproc;
+                ResetParts(itemIDs[index]);
             }
 
+            //reset the procedure config for all items attached to current procedure
+#pragma warning disable S2971 // LINQ expressions should be simplified - need initial ToList to force enumeration
+            //otherwise will get a "Collection was modified; enumeration operation may not execute" error
+            List<ItemInfo> pconfigrefresh_items = _CacheByPrimaryKey.SelectMany(kvp => kvp.Value).ToList().Where(t => t?.MyProcedure?.ItemID == procID).Distinct().ToList();
+#pragma warning restore S2971 // LINQ expressions should be simplified
+            for (int index = 0; index < pconfigrefresh_items.Count; index++)
+            {
+                pconfigrefresh_items[index].MyProcedure = newproc;
+            }
+
+
             //return the changed procedure info
             return newproc;
 		}

PROMS/Volian.Controls.Library/DisplayApplicability.cs

@@ -5,6 +5,7 @@ using System.Collections.Generic;
 using System.ComponentModel;
 using System.Data;
 using System.Drawing;
+using System.Linq;
 using System.Text;
 using System.Windows.Forms;
 using VEPROMS.CSLA.Library;
@@ -225,8 +226,8 @@ namespace Volian.Controls.Library
 			//	return internal and external for the procedure level)
 			if ((!MyItemInfo.IsProcedure && invalidTrans.Count == 0) || IsProcWithNoExternalTrans(MyItemInfo, invalidTrans))
 			{
-				// C2021 - 027: Procedure level PC/PC
-				if (MyItemInfo.IsProcedure && MyItemInfo.ActiveFormat.PlantFormat.FormatData.ProcData.ProcAppl)
+                // C2021 - 027: Procedure level PC/PC
+                if (MyItemInfo.IsProcedure && MyItemInfo.ActiveFormat.PlantFormat.FormatData.ProcData.ProcAppl)
 				{
 					ProcedureConfig sc = MyItemInfo.MyConfig as ProcedureConfig;
 					sc.MasterSlave_Applicability = Volian.Base.Library.BigNum.MakeBigNum(MyApplicability);
@@ -284,26 +285,56 @@ namespace Volian.Controls.Library
 			Volian.Base.Library.BigNum MasterSlave_ApplicabilityTmp;
 			StepConfig sc = MyItemInfo.MyConfig as StepConfig;
 			MasterSlave_ApplicabilityTmp = sc.MasterSlave_Applicability;
+            StringBuilder sb = new StringBuilder();
 
-			ItemInfo startitm = MyItemInfo.FirstSibling;
+
+            ItemInfo startitm = MyItemInfo.FirstSibling;
 			while (startitm != null)
 			{
-				StepConfig sc2 = startitm.MyConfig as StepConfig;
-				using (Content cnt = Content.Get(startitm.MyContent.ContentID))
-				{
-					sc2.MasterSlave_Applicability = (MasterSlave_ApplicabilityTmp);
-					cnt.Config = sc2.ToString();
-					cnt.Save();
+
+                // C2026-023: Check for Transitions when setting Applicability to all for a level
+                List<InvalidTransition> invalidTrans = WillTransitionsBeValidCommand.Execute(startitm.ItemID, MasterSlave_ApplicabilityTmp.ToString());
+                if (IsProcWithNoExternalTrans(startitm, invalidTrans))
+                {
+                    StepConfig sc2 = startitm.MyConfig as StepConfig;
+                    using (Content cnt = Content.Get(startitm.MyContent.ContentID))
+                    {
+                        sc2.MasterSlave_Applicability = (MasterSlave_ApplicabilityTmp);
+                        cnt.Config = sc2.ToString();
+                        cnt.Save();
+                    }
 				}
+                else
+                {
+					if (sb.Length == 0)
+					{
+                        sb.AppendLine("The applicability for some Step(s) cannot be changed due to transition links.");
+                        sb.AppendLine("Applicability settings for these steps will return to original settings when OK is selected.");
+                        sb.AppendLine("Changing the applicability for would invalidate a transition in the following steps:");
+                        sb.AppendLine();
+                    }
+
+                    foreach (InvalidTransition inv in invalidTrans.Where(x => !x.TgtStep.StartsWith(x.SrcStep)))
+                    {
+                        sb.AppendLine(string.Format("{0} : From {1} to {2}.", startitm.MyTab.CleanTextNoSymbols.Trim(), inv.TgtStep, inv.SrcStep));
+                    }
+
+                    invalidTrans.Clear();
+                }
+
 				startitm = startitm.GetNext();
 			}
 
 			_MyDisplayTabItem.MyStepTabPanel.MyStepTabRibbon.RefreshProcedure();
 
-		}
+            if (sb.Length > 0)
+				FlexibleMessageBox.Show(sb.ToString(), "Transitions Affected By Applicability Change");
 
-		// B2021-149: for procedure, only consider external transitions as invalid
-		private bool IsProcWithNoExternalTrans(ItemInfo ii, List<InvalidTransition> invalidTrans)
+
+        }
+
+        // B2021-149: for procedure, only consider external transitions as invalid
+        private bool IsProcWithNoExternalTrans(ItemInfo ii, List<InvalidTransition> invalidTrans)
 		{
 			if (invalidTrans.Count == 0) return true;
 			foreach (InvalidTransition iT in invalidTrans)

PROMS/Volian.Controls.Library/DisplayRO.cs

@@ -374,6 +374,7 @@ namespace Volian.Controls.Library
 			// B2022-098: [JPR] ROs not being resolved in Word Sections
 			if (e.Node.Tag is ROFSTLookup.rochild){
 				ROFSTLookup.rochild chld = (ROFSTLookup.rochild)e.Node.Tag;
+				chld.value = Regex.Replace(chld.value, @"\\u([0-9]{1,4})\?", m => Convert.ToChar(int.Parse(m.Groups[1].Value)).ToString());
 				selectedChld = chld;
 
 				if (chld.value != null)

PROMS/Volian.Controls.Library/EditItem.cs

@@ -4162,8 +4162,11 @@ namespace Volian.Controls.Library
 		}
 		void MyConfig_PropertyChanged(object sender, PropertyChangedEventArgs e)
 		{
-			SaveConfig();
-		}
+            //B2026-024 Change bars should not show when updating Applicability.
+            if (e.PropertyName == "MasterSlave_Applicability") ChangeBarForConfigItemChange = false;
+            SaveConfig();
+            if (e.PropertyName == "MasterSlave_Applicability") ChangeBarForConfigItemChange = true;
+        }
 		public void SaveConfig()
 		{
 			if (!MyItemInfo.MyConfig.IsDirty) return;

PROMS/Volian.Controls.Library/StepRTB.cs

@@ -1404,7 +1404,7 @@ namespace Volian.Controls.Library
 			var pattern = @"\\u([0-9]{1,4})\?"; // RO Editor add symbols C2022 - 003
 			foreach (Match match in Regex.Matches(linkValue, pattern, RegexOptions.IgnoreCase))
 			{
-				linkValue = linkValue.Replace(match.Value, "\\f1 " + match.Value + " \\f0");
+				linkValue = linkValue.Replace(match.Value, "\\f1 " + match.Value + "\\f0");
 			}
 
 			linkValue = linkValue.Replace(@"{", @"\{");

PROMS/Volian.Controls.Library/StepTabRibbon.cs

@@ -1668,7 +1668,17 @@ namespace Volian.Controls.Library
 						}
 						Clipboard.Clear();
 
-						Clipboard.SetDataObject(myDO); // this saves the cleaned up information to the Windows clipboard
+						//Try to update the data object to persist beyond PROMS life
+						//if can't, log it and use old method of scoping clipboard to PROMS life
+						try
+						{
+							Clipboard.SetDataObject(myDO, true); // this saves the cleaned up information to the Windows clipboard		
+						}
+						catch (Exception ex)
+						{
+                            _MyLog.Warn($"Error Setting Clipboard Object to Persist beyond PROMS. Clipboard will be scoped to PROMS. Error:{ex.Message}");
+							Clipboard.SetDataObject(myDO); // this saves the cleaned up information to the Windows clipboard
+						}
 					}
 					iData = Clipboard.GetDataObject();
 					bool noEquationData = true;