to strip _trailing_ field markers KEY.LIST := '~~' ; * some arb char set that wont be evident in the data LOOP CHANGE(KEY.LIST, @FM:'~~', '~~') UNTIL KEY.LIST[LEN(KEY.LIST)-2,1] NE @FM REPEAT CHANGE(KEY.LIST, '~~', "")
to force unique list (with REMOVE you don't have to know how many attributes are in FM.ARRAY) UNIQ.LIST = '' LOOP REMOVE NEXT.ID FROM FM.ARRAY SETTING MORE LOCATE(NEXT.ID,UNIQ.LIST,1;POS) ELSE UNIQ.LIST<-1> = NEXT.ID WHILE MORE REPEAT _______________________________________________ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users