Fixed an issue with the key loop expansion token <KEY_ISAMC_SPEC> which was incrooectly processing duplicate key definitions.

Author: SteveIves

CodeGenEngine/TokenExpanders/TokenExpanderKeyLoop.dbl

@@ -303,7 +303,7 @@ namespace CodeGen.Engine
 
                 ;;Duplicates?
                 using k.Duplicates select
-                (RpsKeyDuplicates.NoDuplicates),
+                (RpsKeyDuplicates.Duplicates),
                 begin
                     sb.Append(",DUPS")
                     ;TODO: This needs suppressing if we're generating this for OpenVMS
@@ -314,7 +314,7 @@ namespace CodeGen.Engine
                         sb.Append(",ATEND")
                     endusing
                 end
-                (RpsKeyDuplicates.Duplicates),
+                (RpsKeyDuplicates.NoDuplicates),
                     sb.Append(",NODUPS")
                 endusing