курсовая Отдел кадров

[Seva2011]

а как это сделать? там же нужно от даты приема до настоящей даты подсчитать количество лет и как то сделать сравнение. вот этого не знаю как сделать.
alexiz, мой запрос должен выглядеть так?
'SELECT * FROM Отдел_кадров WHERE :ADATE-Дата_приема>'+strtoint(edit3.text);

[KoliyR]

Посмотри в первом примере реализовано нахождение возраста
Ошибка заключается в том, что нет полной даты ... и соответственно мы можем дать на 1 больше, хотя скоро день рождения - а если он в декабре (то не скоро)

Тут нужно разницу дат найти нужно

Я попозже домой вернусь напишу ..., как я считаю

[KoliyR]

проще будет по скайпу показать
Как таблицы подключить,
Как фильтрацию по ним делать
Как с запросами работать по другому (хотя они не нужны здесь)
Как calkulate подя делать - вот что тебе сейчас нужно

[Seva2011]

попробовал сделать так

ADOQuery2.Active:=true;
ADOQuery2.Close;
ADOQuery2.sql.Clear;  
ADOQuery2.SQL.Add('SELECT *');
ADOQuery2.SQL.Add('FROM Отдел_кадров'); 
ADOQuery2.SQL.Add('WHERE'+'year>IntToStr(StrToInt(Edit3.Text))');
year:=yearof(now)-ADOQuery2.FieldByName('Дата_приема').AsInteger;
ADOQuery2.Open;

выходит ошибка Cannot access field 'Дата_приема' as type Integer;
в каком типе ее можно представить если не integer?

[Seva2011]

Сообщение от KoliyR

проще будет по скайпу показать
Как таблицы подключить,
Как фильтрацию по ним делать
Как с запросами работать по другому (хотя они не нужны здесь)
Как calkulate подя делать - вот что тебе сейчас нужно

тогда проще видеоурок записать).

[alexiz]

Сообщение от Seva2011

а как это сделать? там же нужно от даты приема до настоящей даты подсчитать количество лет и как то сделать сравнение. вот этого не знаю как сделать.
alexiz, мой запрос должен выглядеть так?
'SELECT * FROM Отдел_кадров WHERE :ADATE-Дата_приема>'+strtoint(edit3.text);

Прошу прощения, малость соврал. Простое вычитание дает разницу в днях, а не годы.

SELECT * FROM Отдел_кадров 
WHERE extract(year from 'Дата_приема')>:NYEAR

а в Access есть еще такой вариант:

SELECT * FROM Отдел_кадров WHERE DateAdd("yyyy", 25, 'Дата_приема')<:ADAte

анализируется 'Дата_приема' + 25 лет, а параметр ADATE надо соответственно рассчитать.

[KoliyR]

Seva2011

1. Дата - это число, но не совсем что ты себе представляешь ...,
AsInteger - не правильно
2. Предлагаю запросы сделать в мастере запросов Access
в нем проще работать ...,
SQL код сможешь скопировать по просмотру SQL



Еще
1. функция yearof это функция библиотеки dateutils (она должна присутствовать в Unit - проверь)
2. Поле в запросе должно быть добавлено я не уверен что так будет работать
у тебя запрос добавляет все поля т.е. *
лучше может использовать ADOQuery2.Fields[номер - нужно посмотреть какой он в таблице].AsDatetime
year:=yearof(now-ADOQuery2.FieldByName('Дата_приема' ).AsDatetime);

[Seva2011]

переделал в это

procedure TForm1.Button4Click(Sender: TObject);
var year,year1:tDatetime;
i:Integer;
begin
if Edit3.Text<>'' then 
begin
ADOQuery2.Active:=true;
ADOQuery2.Close;
ADOQuery2.sql.Clear;  
ADOQuery2.SQL.Add('SELECT *');
ADOQuery2.SQL.Add('FROM Отдел_кадров'); 
ADOQuery2.SQL.Add('WHERE'+'year>IntToStr(StrToInt(Edit3.Text))');
year:=ADOQuery2.FieldByName('Дата_приема').AsDateTime;
year1:=yearof(now) - year;
DateToStr(year1);
ADOQuery2.Open;

и все я запутался) после того как я вычислил сколько лет стаж, мне нужно получить число которое должно сравниваться с edit3.text. в строку перевести получается а в интежер нет. ведь в year1 теперь количество лет как теперь цифру от туда вытащить?

[alexiz]

Сообщение от alexiz

..анализируется 'Дата_приема' + 25 лет, а параметр ADATE надо соответственно рассчитать.

продолжение - вот такой запрос прекрасно отделяет старичков от новичков. Проверил сейчас.

SELECT [Дата_приема]
FROM Отдел_кадров
WHERE DateAdd("yyyy",25,[Дата_приема])<"2012-01-28";

и в Дельфи:

ADOQuery2.Close;
ADOQuery2.sql.Clear;  
ADOQuery2.sql.Text:='SELECT [Дата_приема] FROM [Отдел_кадров] WHERE DateAdd("yyyy",25,[Дата_приема])<:ADATE';
ADOQuery2.Parameters.Parambyname('ADATE').Value:=Date; //сегодняшняя дата
ADOQuery2.Open;

[KoliyR]

Все я дома
подключайся в скайп, - так проще будет - а ты посмотришь
скайп KoliyR