CDISP9097E Perl code segments that are delimited by <% and %> cannot be used in non-generic operators. Perl code cannot be used in non-generic operators. Remove the Perl code, or use a generic operator.