次の例では、myField1 フィールドを DICTIONARY 型に変更して、PERFORM 文でkey キーワードを使用できるようにしています。
class-id myClass. 01 myField1 list[string]. 01 myField2 string. method-id myMethod. perform varying key myField2 through myField1 ... end-perform. end method. end class.