Форум программистов, компьютерный форум, киберфорум
Delphi: Базы данных
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
 
Рейтинг 4.76/25: Рейтинг темы: голосов - 25, средняя оценка - 4.76
0 / 0 / 1
Регистрация: 15.04.2015
Сообщений: 75

Расчет стажа работы

28.02.2017, 12:45. Показов 5148. Ответов 32
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Здравствуйте!

Есть таблица job с полем start_year в который записывается год начала работы в компании. Необходимо вычислить стаж работы.

Delphi
1
2
3
4
5
6
7
with fdm.Query do
  begin
    close;
    sql.Clear;
    sql.Add('select today - start_year as staj from job')
  end;
finfo.label31.Caption := fdm.Query.fieldbyname('staj').AsString;
делаю так и в ответ получаю ошибку, что поле staj не найдено в наборе данных adoquery.
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
28.02.2017, 12:45
Ответы с готовыми решениями:

Расчет стажа
Помогите как сделать подсчет. Необходима следующая таблица. Столбцы: лет, месяцев, дней, всего в днях. При заполнении первых трех,...

Расчет стажа - Не корректный
Здравствуйте и Всем Доброго дня! Тут у меня при заполнении БД скоропостижно вскочил вопрос, типа вылезла ошибочка. :( При вычислении...

Расчет трудового стажа сотрудников
Всем доброго времени суток. Нужна помощь!!! Есть база расчета стажа сотрудников. В поле период службы, есть 3 строки с...

32
Модератор
 Аватар для D1973
9923 / 6459 / 2457
Регистрация: 21.01.2014
Сообщений: 27,409
Записей в блоге: 3
28.02.2017, 13:30
Цитата Сообщение от Mihter Посмотреть сообщение
select today - start_year as staj from job
Так не делается...
Какого типа поле start_year? Судя по тому, что туда записывается только год - поле целочисленное. Или таки туда дата приема на работу записана и поле типа DateTime?
1
0 / 0 / 1
Регистрация: 15.04.2015
Сообщений: 75
28.02.2017, 14:24  [ТС]
D1973, поле типа datetime.

Нашел пример вот такой
SQL
1
2
3
4
5
SELECT first_name, last_name, hire_date
 
FROM employee
 
WHERE 'today' - hire_date > 365 * 7 + 1
вот здесь http://bourabai.kz/einf/Delphi/LES30.htm
0
1040 / 856 / 335
Регистрация: 08.12.2016
Сообщений: 3,283
28.02.2017, 14:43
Цитата Сообщение от Mihter Посмотреть сообщение
with fdm.Query do
* begin
* * close;
* * sql.Clear;
* * sql.Add('select today - start_year as staj from job')
* end;
finfo.label31.Caption := fdm.Query.fieldbyname('staj').AsString;
а где, собственно, выполнение запроса? Только формирование и попытка использования результата невыполненного запроса.
0
0 / 0 / 1
Регистрация: 15.04.2015
Сообщений: 75
28.02.2017, 14:46  [ТС]
YuryK, не совсем понял вопроса.
0
1040 / 856 / 335
Регистрация: 08.12.2016
Сообщений: 3,283
28.02.2017, 14:47
Где Open ?
0
0 / 0 / 1
Регистрация: 15.04.2015
Сообщений: 75
28.02.2017, 14:49  [ТС]
Пардон Добавил. Теперь говорит "Параметр today не имеет значения по умолчанию"
0
1040 / 856 / 335
Регистрация: 08.12.2016
Сообщений: 3,283
28.02.2017, 14:55
я не стал спрашивать, что такое today, надеясь, что БД спросит сама. Так и случилось. Какая БД ?
0
0 / 0 / 1
Регистрация: 15.04.2015
Сообщений: 75
28.02.2017, 14:59  [ТС]
MS Access
0
Модератор
 Аватар для D1973
9923 / 6459 / 2457
Регистрация: 21.01.2014
Сообщений: 27,409
Записей в блоге: 3
28.02.2017, 15:02
Цитата Сообщение от Mihter Посмотреть сообщение
Нашел пример вот такой
А база у тебя какая? Для разных СУБД реализация SQL разная
Цитата Сообщение от Mihter Посмотреть сообщение
поле типа datetime
Почему тогда только год?
и вообще, в запросе должно присутствовать условие WHERE, чтобы выбрать конкретную запись, относящуюся к конкретному сотруднику...
можно сделать так:
1. объявить переменную
Delphi
1
var dt : TDateTime;
2. объявить переменную
Delphi
1
yCount : integer; //Количество отработанных лет
3. Выполнить запрос, чтобы получить значение поля start_year (которое DateTime) для конкретного сотрудника и записать это значение в переменную dt
4. добавить в секцию uses модуль DateUtils
5. Получить количество отработанных полных лет
Delphi
1
yCount := YearsBetween(Now, dt);
6. Записать полученное значение куда надо
Delphi
1
finfo.label31.Caption := IntToStr(yCount);
1
1040 / 856 / 335
Регистрация: 08.12.2016
Сообщений: 3,283
28.02.2017, 15:02
SQL
1
SELECT YEAR(DATE())- start_year AS staj FROM job WHERE ...
вы что, считаете, что первый попавшийся стаж подойдет всем?
1
0 / 0 / 1
Регистрация: 15.04.2015
Сообщений: 75
28.02.2017, 16:43  [ТС]
YuryK, Конечно же нет, условием будет соответствие значений в столбцах id_sotr и id из другой таблицы, а именно fio.
Т.е.
SQL
1
SELECT YEAR(DATE())- start_year AS staj FROM job WHERE id_sotr = fio.id
но опять же не работает.
0
1040 / 856 / 335
Регистрация: 08.12.2016
Сообщений: 3,283
28.02.2017, 16:50
Цитата Сообщение от Mihter Посмотреть сообщение
но опять же не работает.
что значит не работает?
Как может работать синтаксически неверный запрос? откуда кому-то знать про fio.id?

Delphi
1
2
3
4
sql.Add(
  'SELECT YEAR(DATE())- start_year AS staj FROM job WHERE id_sotr =' + 
  <здесь дополните запрос числом, взятым х.з. откуда>
);
1
0 / 0 / 1
Регистрация: 15.04.2015
Сообщений: 75
28.02.2017, 17:48  [ТС]
Даже если в запрос подставляю просто число вручную, не рассчитывает и ошибку не выдает.
0
1040 / 856 / 335
Регистрация: 08.12.2016
Сообщений: 3,283
28.02.2017, 17:53
Шаг 1.
SELECT id_sotr AS staj FROM job WHERE id_sotr =
если и в этом случае не выдаст id_sotr в качеств стажа, значит значение условие составлен неправильно и запрос не возвращает записи вообще
1
0 / 0 / 1
Регистрация: 15.04.2015
Сообщений: 75
28.02.2017, 17:58  [ТС]
Цитата Сообщение от YuryK Посмотреть сообщение
Шаг 1.
SELECT id_sotr AS staj FROM job WHERE id_sotr =
если и в этом случае не выдаст id_sotr в качеств стажа, значит значение условие составлен неправильно и запрос не возвращает записи вообще
ввел sql.Add('select id_sotr as staj from job where id_sotr = 3')

в label вывелась 3.
0
1040 / 856 / 335
Регистрация: 08.12.2016
Сообщений: 3,283
28.02.2017, 18:01
Шаг 2.
SELECT start_year AS staj FROM job WHERE id_sotr =
если и в этом случае не выдаст start_year в качестве стажа, значит не указан год начала работы. Поэтому и стаж не считается
1
0 / 0 / 1
Регистрация: 15.04.2015
Сообщений: 75
28.02.2017, 18:04  [ТС]
Цитата Сообщение от YuryK Посмотреть сообщение
Шаг 2.
SELECT start_year AS staj FROM job WHERE id_sotr =
если и в этом случае не выдаст start_year в качестве стажа, значит не указан год начала работы. Поэтому и стаж не считается
вывел в label 26.02.2017 20:25:59
0
1040 / 856 / 335
Регистрация: 08.12.2016
Сообщений: 3,283
28.02.2017, 18:06
Цитата Сообщение от Mihter Посмотреть сообщение
26.02.2017 20:25:59
ну и какой же это год, если это дата, (да ещё и со временем )
0
0 / 0 / 1
Регистрация: 15.04.2015
Сообщений: 75
28.02.2017, 18:10  [ТС]
Цитата Сообщение от D1973 Посмотреть сообщение
Так не делается...
Какого типа поле start_year? Судя по тому, что туда записывается только год - поле целочисленное. Или таки туда дата приема на работу записана и поле типа DateTime?
Цитата Сообщение от Mihter Посмотреть сообщение
D1973, поле типа datetime.
Уже поднимался этот вопрос и был ответ)) вот и я понять не мог почему вы берете только год
Цитата Сообщение от YuryK Посмотреть сообщение
'SELECT YEAR(DATE())
прошу прощения за некорректную постановку вопроса.

поле start_year типа дата/время. Как убрать время пока не разобрался. и вот используя дату из этого поля и текущую дату необходимо вычслить стаж работы сотрудника, делать это нужно принципиально sql запросом.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
28.02.2017, 18:10
Помогаю со студенческими работами здесь

Расчет стажа для сотрудников
Помогите, пожалуйста рассчитать стаж в аксесс для сотрудников, у которых входит в стаж и служба в вооруженных силах и гражданский стаж и...

Расчет рабочего стажа в отдельной конфигурации
Здравствуйте. Помогите пожалуйста с созданием конфигурации. Я в 1С практически вообще ничего не знаю, но так получилось, что мне дали...

Подробный расчет стажа в access 2003
Подробный расчет стажа в access 2003, подскажите пожалуйста. Есть форма в access 2003, нужно, что бы в это форме считался стаж сотрудников...

Высчитывание стажа работы
1. Добрый вечер. В таблице добавил &quot;Дату начала работы&quot;. Какую формулу надо ввести , чтобы высчитывала стаж работы в днях в отчете? MS...

Подсчет среднего стажа работы
Всем привет! Просьба помочь в решении такой задачи: Необходимо выбрать из справочника персонала предприятия подразделения, средний стаж...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
20
Ответ Создать тему
Новые блоги и статьи
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
Модульный подход на примере F#
DevAlt 06.03.2026
В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .
Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование
8Observer8 05.03.2026
Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D
8Observer8 04.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .
SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий
8Observer8 02.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru