How do I convert (i.e. functions to use) the following Datetime field formats
2011/09/07 11:48:22.000
TO
09/07/2011 11:48:22 AM.
It seems to reason there has to be a easy way to do this?? Any assistance is GREATLY APPRECIATED. I'm using WebFocus version 7.1.4 currently.

This message has been edited. Last edited by: Kerry,

DEFINE FILE CAR
NEWDATE/HMDYYSA = DT(2011/09/07 11:48:22.0000;
END
TABLE FILE CAR
PRINT CAR NEWDATE
END

Well Tom - we hit that at the same time...

LOL, you have a syntax error.

Denny99, as you can see, it is a simple case of setting a DEFINE or COMPUTE field to the format needed, then applying the datetime field.

This is because the format of the field indicated that its format is datetime, and what format to show it in.

You should have a look at the documentation on datetime fields, and the edit options for it.

Describe a Date-Time Field

Thanks for all your replies but unfortunately none of these worked. First, our version of Webfocus is 7.1.4 and it didn't recognize the function HMDYYIA or HHIA. I can get the date portion to the format I want but when I try putting it all together with the time (minus the micro seconds 000) it doesn't work. It's important to get the AM or PM depending on the time of the day. The master file defines this field as partcular field as HYYMDs. Unfortunately, our environment is so locked down I'm unable to change this format. Thanks again for all those that replied.

What did you try ?

All you should have to do is a DEFINE or COMPUTE
e.g.

DEFINE FILE ???
NEW_FIELD/HMDYYS = OLDFIELD ;
END

or

TABLE FILE ???
.
.
COMPUTE NEW_FIELD/HMDYYS = OLDFIELD ;
.
.
END

Thanks for the recent reply WAZ. I tried just redefining the field and my results are close but I still can't get the "AM" or "PM" at the end of the date. Instead it's giving me 24hour time. I could write code to evaluate the time and manually adjust but I wouldn't think that would be necessary. Again, thanks so much for responding to my scream for help. Have a great day.

Hi,

Here's an example using CAR.

-*
DEFINE FILE CAR
CNT/I3 WITH COUNTRY = CNT + 1;
A_DTS/A14 = DECODE CNT (
1 '20110907114822'
2 '20110907120505'
ELSE '???');
END
-*
TABLE FILE CAR
PRINT
CNT
A_DTS
WHERE RECORDLIMIT EQ 2
ON TABLE HOLD
END
-*
DEFINE FILE HOLD
SD_DTS/HYYMDS = HINPUT(14, A_DTS, 8, 'HYYMDS');
-*
SD_DTS1/HYYMDs = SD_DTS;
SD_DTS2/HMDYYSA = SD_DTS;
END
-*
TABLE FILE HOLD
PRINT
CNT
A_DT
SD_DTS
SD_DTS1
SD_DTS2
END

Does this help?

Jim