Hola Delphineros, estoy ya bastante tiempo tratando de resolver este proble y no encontrado la solución, espero que alguien me pueda ayudar gracias.
me manda el siguiente error cuando ejecuto "Missing DataSet Property"
Código Delphi
[-]
procedure TFStatusReqCom.bRefreshClick(Sender: TObject);
var
SQLExpr : String;
begin
qTemp.Active := False;
TStatus.Active := False;
With qTemp do
begin
Inicialize_Var();
Close;
SQL.Clear;
SQLExpr := 'SELECT Folio,NomProv,Fecha,';
SQLExpr := SQLExpr + 'CASE WHEN TipReq = 0 THEN "Materia Prima" ELSE "Material e Insumos" END As TipReq,';
SQLExpr := SQLExpr + 'Prioridad,';
SQLExpr := SQLExpr + 'CASE WHEN Status = "P" THEN "Pendiente" ELSE "Autorizado" End As Status,';
SQLExpr := SQLExpr + 'Obs ';
SQLExpr := SQLExpr + 'FROM ReqComEnc ';
SQLExpr := SQLExpr + 'WHERE (Status = "P" OR Status = "A" ) ';
SQLExpr := SQLExpr + 'ORDER BY Fecha';
SQL.Text:= SQLExpr;
try
Open;
except
MessageDlg('No se pudo realizar la consulta de Requisición',mtWarning,[mbOK],0);
end;
qTemp.Active := True;
TStatus.Active := True;
end;
end;