<SecurityGroup Word="CONFGUA">Conf-Guardianship</SecurityGroup>
Dim objInsertUpdateCase As MMGService.InsertUpdateCase = New MMGService.InsertUpdateCase If aobjXmlInputDoc.DocumentElement.SelectSingleNode("Case/SecurityGroup") Is Nothing Then objInsertUpdateCase.IsConfidential = False ElseIf Not aobjXmlInputDoc.DocumentElement.SelectSingleNode("Case/SecurityGroup/@Word").InnerText.StartsWith("CONF") Then 'CONF' Is Nothing Then objInsertUpdateCase.IsConfidential = True Else objInsertUpdateCase.IsConfidential = False End If
objInsertUpdateCase.IsConfidential = aobjXmlInputDoc.DocumentElement.SelectSingleNode("Case/SecurityGroup[starts-with(@Word, 'CONF')]") IsNot Nothing
SecurityGroup
IsConfidential
False
Word
"CONF"
True
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)