How to Add New Collum in Content Center Itens by Code?

[welinton.zanotto]

Hello everyone,

I have a question about the possibility of programmatically adding new columns to existing items within the Content Center. I need to add these 2 new columns to all items, and I would like to do it via an API, is that possible?

I am trying with the code below, but when executing cf.TableColumns.Add it returns an unhandled error. Please, is the code correct, or is there another way to do this? Thank you in advance!

[TestMethod]
public void AddCollums()
{

string id = "Inventor User Defined Properties";

// Content center itens
ContentTreeViewNode treeViewTopNode = InvApp.App.ContentCenter.TreeViewTopNode;

var fm = treeViewTopNode.ChildNodes["Recursos"].ChildNodes["Bicos pulverizadores"];

foreach (ContentFamily cf in fm.Families)
{
Console.WriteLine("\t" + cf.DisplayName);

cf.TableColumns.Add("ModelCode", "", ValueTypeEnum.kStringType,false,false, id, "ModelCode");
cf.TableColumns.Add("ModelName", "Nome", ValueTypeEnum.kStringType,false, "{PARTNUMBER}", id, "ModelName");
cf.Save();
}
}

[bradeneuropeArthur]

First you need a read/write family.

Do you have that?

[welinton.zanotto]

Hello Arthur, thank you for your response.

Yes, the library is set for read/write, and I'am able to manually add and remove items or columns using the CC Editor.

[bradeneuropeArthur]

Ok!
Could you give me the complete familyname?

[welinton.zanotto]

yes, the names are in my code, commented alongside the methods
is this what you asked for?

[TestMethod]
public void AddCollums()
{
string id = "Inventor User Defined Properties";

// Contentcenter itens
ContentTreeViewNode treeViewTopNode = InvApp.App.ContentCenter.TreeViewTopNode;

var fm = treeViewTopNode.ChildNodes["Recursos"].ChildNodes["Bicos pulverizadores"];

Console.WriteLine(fm.FullTreeViewPath); // Recursos:Bicos pulverizadores
Console.WriteLine(fm.DisplayName); // Bicos pulverizadores

foreach (ContentFamily cf in fm.Families)
{
Console.WriteLine("\t" + cf.LibraryName); // MCL VALE
Console.WriteLine("\t" + cf.DisplayName); // BICO INOX 304 UMICONTROL MOD. UM-4-10 CM Ø2,8MM
Console.WriteLine("\t" + cf.MemberDirectory); // BICO INOX 304 UMICONTROL MOD. UM-4-10 CM Ø2,8MM ANGULO 60° 1-8 MACHO BSP

//// **** this CODE below fails *****
cf.TableColumns.Add("ModelCode", "", ValueTypeEnum.kStringType, false, false, id, "ModelCode");
cf.TableColumns.Add("ModelName", "Nome", ValueTypeEnum.kStringType,false, "{PARTNUMBER}", id, "ModelName");
cf.Save();
}
}

[bradeneuropeArthur]

So this is the FamilyName, correct?:

BICO INOX 304 UMICONTROL MOD. UM-4-10 CM Ø2,8MM

And this the columns to be added?:

ModelCode

ModelName

[bradeneuropeArthur]

@welinton.zanotto 

This will work:

Sub main
Dim oContentCenter As ContentCenter= ThisApplication.ContentCenter
Dim a As ContentTreeViewNode = oContentCenter.TreeViewTopNode

loopCC(a)

	End Sub		
		
	Public Sub loopCC(c As ContentTreeViewNode)
		Dim f1 As ContentFamily
		Dim  id As String = "Inventor User Defined Properties"
		For Each c In c.ChildNodes
			If c.Families.Count > 0 Then
				For Each f As ContentFamily In c.Families

					If f.DisplayName = "BICO INOX 304 UMICONTROL MOD. UM-4-10 CM Ø2,8MM"
						f1 =f
						MsgBox(f1.DisplayName & " " & f1.IsModifiable)
						f1.TableColumns.Add("ModelCode", "", ValueTypeEnum.kStringType,False, ,id , "ModelCode")
						f1.TableColumns.Add("ModelName", "Nome", ValueTypeEnum.kStringType,False, "{PARTNUMBER}", id, "ModelName")
						f1.Save()
					Exit For
					End If
				Next
			Else
				loopCC(c)
		End If
			Next
	End Sub

[tgregory3G7FA]

bradeneuropeArthur wrote:

@welinton.zanotto 

This will work:

Sub main
Dim oContentCenter As ContentCenter= ThisApplication.ContentCenter
Dim a As ContentTreeViewNode = oContentCenter.TreeViewTopNode

loopCC(a)

	End Sub		
		
	Public Sub loopCC(c As ContentTreeViewNode)
		Dim f1 As ContentFamily
		Dim  id As String = "Inventor User Defined Properties"
		For Each c In c.ChildNodes
			If c.Families.Count > 0 Then
				For Each f As ContentFamily In c.Families

					If f.DisplayName = "BICO INOX 304 UMICONTROL MOD. UM-4-10 CM Ø2,8MM"
						f1 =f
						MsgBox(f1.DisplayName & " " & f1.IsModifiable)
						f1.TableColumns.Add("ModelCode", "", ValueTypeEnum.kStringType,False, ,id , "ModelCode")
						f1.TableColumns.Add("ModelName", "Nome", ValueTypeEnum.kStringType,False, "{PARTNUMBER}", id, "ModelName")
						f1.Save()
					Exit For
					End If
				Next
			Else
				loopCC(c)
		End If
			Next
	End Sub

---

This code does exactly what I'm looking for.  Only issue I have is it takes a long while to iterate through all sub categories.  Is it possible to target it directly to a sub category?