gracias LuisGutierrezd nuevamente, estuve probando la modificacion de la rutina que me hiciste y le hice alguna modificaciones proque me daba un erro y quedo asi.
Código:
procedure TFrm_Reporte_de_Nomina.ppVariable2Print(Sender: TObject);
var Sueldo_Bruto_Empleado : Double;
begin
if Qry_Hacer_CalculoSueldo_Bruto_Empleado.value > 112700.00 then begin
Qry_Hacer_Calculosueldo_Bruto_Empleado.Value := 112700.00;
ppVariable2.Value := Qry_Hacer_CalculoSueldo_Bruto_Empleado.Value * 3.01 /100;
end;
end;
me esta arrojando esto
Código:
[Hint] Un_Reporte_de_Nomina.pas(118): Variable 'Sueldo_Bruto_Empleado' is declared but never used in 'TFrm_Reporte_de_Nomina.ppVariable2Print'
y no tengo idea de que se trata, pero tampoco me hace los calculos que quiero.