Por lo que entiendo, devuelves en ppVariable2.Value el 3.01% del Sueldo Bruto, si no pasa de 112700. Si sobrepasa ese valor devuelves el 3.01% de 112700.
Creo que deberías hacerlo así:
Código Delphi
[-]
procedure TFrm_Reporte_de_Nomina.ppVariable2Print(Sender: TObject);
begin
if Qry_Hacer_CalculoSueldo_Bruto_Empleado.value > 112700.00 then
ppVariable2.Value := 112700.00 * 3.01 / 100
else
ppVariable2.Value := Qry_Hacer_CalculoSueldo_Bruto_Empleado.Value * 3.01 /100;
end;