Limit solution domain in Solve

If you are looking for integer p,q,r, you should just use FrobeniusSolve[] instead:

FrobeniusSolve[{7, 17, 27}, 100]
   {{7, 3, 0}, {8, 1, 1}}

Check:

%.{7, 17, 27}
   {100, 100}