Limit solution domain in Solve


How should you write the Solve command or another to give me solutions to this equation for example

  1. integers
  2. rationals

Here are the equations:

Solve[
  x + y + z == 100 && 
  x == 7*p && 
  y == 17*q && 
  z == 27*r,
  {x, y, z}
]