Add length validation for custom properties in GenerateProxyClass and update MySettingOperation with a long string variable for testing

Author: grongierisc

src/iop/cls/IOP/Utils.cls

@@ -300,6 +300,10 @@ ClassMethod GenerateProxyClass(
 			Set tDefault = tPropInfo."__getitem__"(2)
 			If ""'=tDefault {
 				Set tCustomProp.InitialExpression = $$$quote(tDefault)
+				if $LENGTH(tDefault)>255 {
+					Set tSC = tCustomProp.Parameters.SetAt("","MAXLEN")
+					Quit:$$$ISERR(tSC)
+				}
 			}
 			Set tCustomProp.Required = tPropInfo."__getitem__"(3)
 

src/tests/registerFilesIop/bo.py

@@ -139,6 +139,7 @@ class MySettingOperation(BusinessOperation):
     my_float_var : float = 0.0
     my_untyped_var = 0
     my_str_var = "foo"
+    my_very_long_var = "a" * 1000  # Long string for testing
 
     def OnMessage(self, request):
         attr = request.StringValue