Re: Reduce large amount of logicals in SUBFL pgm, take in another direction

Sharon,

The process that builds your SQL statement can have parameters passed to
it.  One of these parameters can be a list of selections.  Something
like this.

pgmToBuildSQL  PR
 nbrFieldsForWhereClause
 arrayOfFieldsForWhereClause
 arrayOfValuesForWhereClause


 SQLStringBegin = 'Select * From yourfile ';

 X = 1;
 startPos = 1;

 doW (X < = nbrFieldsForWhereClause);

   whereValue = arrayOfFieldsForWhereClause(X) +
arrayOfValuesForWhereClause(X);  //ValueFor can be = value, like value,
etc
   valueLen = %len(%trimr(whereValue));
   %subst(whereClause:startPos:valueLen) = whereValue;
   startpos = startPos + valueLen + 1;
   X = X + 1;

enddo;

Return;