Hi
First off thank you for this, the tool is great! And for the standard cases this works perfectly but I can't seem to implement the additional SLS cases.
The macro creates all of the cases and I can review the results for the SLS:CHR/FRE/QPR cases and can see them in the Combination Table however the type is blank. The combination interface is also blank so can't change the type manually and the design modules do not recognize them as SLS combinations. Has anyone implemented this successfully?
Thanks
Section of code below in case there are any obvious errors that I have overlooked
If ctn = "uls" Or ctn = "ULS" Then
CT = I_CBT_ULS
ElseIf ctn = "sls" Or ctn = "SLS" Then
CT = I_CBT_SLS
ElseIf ctn = "acc" Or ctn = "ACC" Then
CT = I_CBT_ALS
ElseIf ctn = "sls:chr" Or ctn = "SLS:CHR" Then
CT = I_CBT_SLS_EC_RAR
ElseIf ctn = "sls:fre" Or ctn = "SLS:FRE" Then
CT = I_CBT_SLS_EC_FRE
ElseIf ctn = "sls:qpr" Or ctn = "SLS:QPR" Then
CT = I_CBT_SLS_EC_QPR
End If
Dim cmb As IRobotCaseCombination
If loads.Exist(n) Then
Set cmb = loads.Get(n)
cmb.name = name
cmb.CombinationType = CT
Else
Set cmb = loads.CreateCombination(n, name, CT, I_CN_EXPLOATATION, I_CAT_COMB)
End If