[roman]

Bueno, al parecer está haciendo justamente lo que le estás diciendo que haga, esto es, estás creando un nuevo documento en cada vuelta del ciclo:

Código Delphi [-]
  while not dmMntPlan.ibqLRetenc.Eof do
   begin
    if dmMntPlan.ibqLRetenc.FieldValues['ESTADO'] = 'S' then
     begin
      (* Añades un documento basado en la plantilla *)
      Word.Documents.Add('c:\sistemas\sisplani\RENTEC_27605.dot'); //Esto abre un documento por cada archivo |<---------- ESTO
      Documento := Word.Documents.Item(1);  // |<---------- ESTO

Supongo que esas dos líneas deben ir antes de comenzar el ciclo.

// Saludos