Convert Access dates to Oracle format

[carl.barrett]

Hi,

I am writing to a text file the records in an access table that is to
be loaded into an Oracle system.

However, I have been told that the date fields in the records I have
exported to the text file that are not compatible with oracle. The
format looks like: 01/01/2006 and I need it to look like 01-JAN-2006.

I have tried using the format function and the variable still shows it
as 01/01/2006.

The text file is generated by clicking from a button on a form which
contains the string/date variables and a loop with the write lines. I
am not on my work PC at the minute so can't show what I've created, but
can post it later if needed.

Can anyone give me an idea of how to get this sorted.

Cheers.

[Gox]

Try this function:

Function ToAmDate(dDatum As Variant) As Variant
If IsNull(dDatum) Then
ToAmDate = Null
Exit Function
End If
ToAmDate = LTrim(str(Day(dDatum))) & "-" &
LTrim(str(Month(dDatum))) & "-" & LTrim(str(Year(dDatum)))
End Function
ca**********@newcastle.gov.uk wrote:

Hi,

I am writing to a text file the records in an access table that is to
be loaded into an Oracle system.

However, I have been told that the date fields in the records I have
exported to the text file that are not compatible with oracle. The
format looks like: 01/01/2006 and I need it to look like 01-JAN-2006.

I have tried using the format function and the variable still shows it
as 01/01/2006.

The text file is generated by clicking from a button on a form which
contains the string/date variables and a loop with the write lines. I
am not on my work PC at the minute so can't show what I've created, but
can post it later if needed.

Can anyone give me an idea of how to get this sorted.

Cheers.

[carl.barrett]

Thanks for the response. However it still returns the month as a
number and not in character form e.g. 24-11-2004 instead of 24-NOV-2004

Can you help again?

Cheers.
Gox wrote:

Try this function:

Function ToAmDate(dDatum As Variant) As Variant
If IsNull(dDatum) Then
ToAmDate = Null
Exit Function
End If
ToAmDate = LTrim(str(Day(dDatum))) & "-" &
LTrim(str(Month(dDatum))) & "-" & LTrim(str(Year(dDatum)))
End Function
ca**********@newcastle.gov.uk wrote:

Hi,

I am writing to a text file the records in an access table that is to
be loaded into an Oracle system.

However, I have been told that the date fields in the records I have
exported to the text file that are not compatible with oracle. The
format looks like: 01/01/2006 and I need it to look like 01-JAN-2006.

I have tried using the format function and the variable still shows it
as 01/01/2006.

The text file is generated by clicking from a button on a form which
contains the string/date variables and a loop with the write lines. I
am not on my work PC at the minute so can't show what I've created, but
can post it later if needed.

Can anyone give me an idea of how to get this sorted.

Cheers.

[Gox]

Try this:

Function ToAmDate(dDatum As Variant) As Variant
If IsNull(dDatum) Then
ToAmDate = Null
Exit Function
End If
ToAmDate = Format(CDate(dDatum), "dd-mmm-yyyy")
End Function

ca**********@newcastle.gov.uk wrote:

Thanks for the response. However it still returns the month as a
number and not in character form e.g. 24-11-2004 instead of 24-NOV-2004

Can you help again?

Cheers.

[carl.barrett]

Works a treat.

Cheers.

[Tim Marshall]

ca**********@newcastle.gov.uk wrote:

Thanks for the response. However it still returns the month as a
number and not in character form e.g. 24-11-2004 instead of 24-NOV-2004

I'm curious as to why your Oracle admin isn't using that most basic of
Oracle concepts, the date picture.

Gox is giving you good functions, but in reality, you DON'T NEED THEM!!!!

to_date('column_with_access_date', 'dd/mm/yyyy')

To illustrate this, execute the following in SQL Plus (the Oracle guys
will know what this is):

SQL> select to_date('24/11/2004', 'dd/mm/yyyy') from dual;

TO_DATE('
---------
24-NOV-04

SQL>

A good Oracle admin should know how to use SQLLDR and a control file to
take your text file into Oracle. Part of the control file will use a
proper date picture to deal with any kind of date.
--
Tim http://www.ucs.mun.ca/~tmarshal/
^o<
/#) "Burp-beep, burp-beep, burp-beep?" - Quaker Jake
/^^ "Whatcha doin?" - Ditto "TIM-MAY!!" - Me