if QryListaAcredit.IsEmpty then exit; qryTemp.Active:=false;
qryTemp.SQL.Clear;
qryTemp.SQL.Add('Update Acreditados set registrado=''T'', ');
qryTemp.SQL.Add('fechregistrado=''TODAY'' ');
qryTemp.SQL.Add('where clave=:clave and cve_evento=:cve_evento');
qryTemp.ParamByName('clave').AsString:=QryListaAcredit.fieldbyname('clave').AsString;
qryTemp.ParamByName('cve_evento').AsInteger:=cve_evento;
if (even_distrital1>0) and (num_evento1>0) then begin; distritofederal:=QryListaAcredit.fieldbyname('distritofederal').AsInteger; if (disfed=3) or (disfed=4) then begin
qryTemp.SQL.Clear;
qryTemp.SQL.Add('Update Acreditados set registrado=''T'', ');
qryTemp.SQL.Add('fechregistrado=''TODAY'' ');
qryTemp.SQL.Add('where clave=:clave and cve_evento=:cve_evento');
qryTemp.ParamByName('clave').AsString:=QryListaAcredit.FieldByName('clave').AsString;
qryTemp.ParamByName('cve_evento').AsInteger:=cve_evento;
end;
end;
qryTemp.ExecSQL;