The following example shows how to delete an authorization tag and the associated user-defined role, using the DeleteAuthTag() method:
USING OpenEdge.DataAdmin.*.
USING OpenEdge.DataAdmin.Lang.Collections.*.

VAR DataAdminService oDAS. VAR IAuthTagSet oTags.
VAR IAuthTag oTag.
VAR IIterator iter.
VAR LOGICAL lResult.

ASSIGN oDAS = NEW DataAdminService(LDBNAME("DICTDB")).
// This obtains all tags using a filter against the role name. 
ASSIGN oTags = oDAS:GetAuthTags("where RoleName eq 'TestRole'").

iter = oTags:Iterator(). 
DO WHILE iter:HasNext():
	ASSIGN oTag = CAST(iter:NEXT(), IAuthTag).
	lResult = oDAS:DeleteAuthTag(oTag:RoleName, oTag:Name).
END.

DELETE OBJECT oDAS.