1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80
|
Create Function CDATE (@Madate varchar(10))
RETURNS varchar(8)
AS
BEGIN
Declare @HH varchar(2),
@MM char(2),
@SS char(2)
--On enlève les ".0"
--SET @Madate=left(@Madate,len(@Madate)-2)
--Recuperation des secondes
IF len(@Madate)>2
Begin
--secondes, et il reste les hh et mm
set @ss=Right(@Madate,2)
set @Madate=left(@Madate,len(@Madate)- 2)
IF len(@Madate)>2
--Minutes et il reste les secondes
begin
set @mm=Right(@Madate,2)
set @hh=left(@Madate,len(@Madate)- 2)
end
else
begin
set @mm=@Madate
set @hh='00'
end
End
Else
Begin
set @ss=@Madate
set @mm='00'
set @hh='00'
End
if len(@hh)=1 SET @hh= '0' + @hh
if len(@mm)=1 SET @mm= '0' + @mm
if len(@ss)=1 SET @ss= '0' + @ss
Return (@hh + '-' + @mm + '-' + @ss)
END
Create Function CTIME (@Madate varchar(10))
RETURNS varchar(8)
AS
BEGIN
Declare @HH varchar(2),
@MM char(2),
@SS char(2)
--On enlève les ".0"
--SET @Madate=left(@Madate,len(@Madate)-2)
--Recuperation des secondes
IF len(@Madate)>2
Begin
--secondes, et il reste les hh et mm
set @ss=Right(@Madate,2)
set @Madate=left(@Madate,len(@Madate)- 2)
IF len(@Madate)>2
--Minutes et il reste les secondes
begin
set @mm=Right(@Madate,2)
set @hh=left(@Madate,len(@Madate)- 2)
end
else
begin
set @mm=@Madate
set @hh='00'
end
End
Else
Begin
set @ss=@Madate
set @mm='00'
set @hh='00'
End
if len(@hh)=1 SET @hh= '0' + @hh
if len(@mm)=1 SET @mm= '0' + @mm
if len(@ss)=1 SET @ss= '0' + @ss
Return (@hh + ':' + @mm + ':' + @ss)
END |
Partager