Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Подскажите пож. как получить дату начала месяца? [D5, IB6.x]


tria ©   (2003-08-11 10:39:00) 

Подскажите пож. как получить дату начала месяца для заданной даты (Интербейз)?


tria   (2003-08-11 11:05:00) [1]

Всем большое спасиоб. Разобрался.


Hawk2   (2003-08-11 11:02:00) [2]

Дата конца месяца - это я понимаю, может быть 28,29,30 или 31, а вот начала, разве месяц не начинается с 1-го числа?


Reindeer Moss Eater   (2003-08-11 11:02:00) [3]

CAST(ДАТА AS VARCHAR(10)
Замена двух символов в строке на "01"
CAST(Строка AS DATE)


Zacho   (2003-08-11 11:01:00) [4]

Ну вот, например:
CREATE PROCEDURE MONTH_BEGIN (
ON_DATE DATE)
RETURNS (
FIRST_DAY DATE)
AS
DECLARE VARIABLE AMONTH CHAR(2);
DECLARE VARIABLE AYEAR CHAR(4);
DECLARE VARIABLE DATE_STR CHAR(9);
begin
AMONTH=CAST(EXTRACT (MONTH FROM ON_DATE) AS CHAR(2));
AYEAR=CAST(EXTRACT (YEAR FROM ON_DATE) AS CHAR(4));
DATE_STR="1."||AMONTH||"."||AYEAR;
FIRST_DAY=CAST (DATE_STR AS DATE);
suspend;
end

Хотя все это можно и без переменных, и вообще в одну строку :)


stud   (2003-08-11 10:58:00) [5]

и что значти дату начала месяца???


Hawk2   (2003-08-11 10:56:00) [6]

А входные параметры с проги посылаешь?


stud   (2003-08-11 10:54:00) [7]

тоесть тебе нужно в процедуру передать дату и использовать ее?
тогда в дельфи формируй эту дату:
и какой месяц тебя интересует: текущий, следующий или предыдущий?


tria   (2003-08-11 10:51:00) [8]

Мне это надо делать в хранимой процедуре. Входной парметр - заданная дата.
Если можно, кусочек кода...


stud   (2003-08-11 10:44:00) [9]

если месяц известен, то 1.месц.год


Наверх

Титульная страница Поиск, карта сайта Написать письмо