Hi
I tried to convert an integer field(I11) (201501) to an alpha or a date. I need to get the format of January 2015. I tried different functions and nothing seems to work. Can anyone help me. Below is the functions I used to get the date.

COMPUTE PCPYear3 /A4 = EDIT(PGIP_PHYSCIANSLIST,'9999');
COMPUTE PGIP_MONTH/I2 = DTPART(PGIP_PHYSCIANSLIST, MONTH);
COMPUTE PGIP_YEAR/I4 = DTPART(PGIP_PHYSCIANSLIST, YEAR);
COMPUTE PGIPYear1/YYM =PGIP_PHYSCIANSLIST;
COMPUTE PGIPYear = SUBSTR(6,PGIP_PHYSCIANSLIST,1,4,4,'A4');

Thanks,
Sherly
The version I am using is 8.1.05
Windows 7 Enterprise

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

DEFINE FILE CAR
MY_INT_FIELD/I11 WITH COUNTRY = 201501;

MY_YYMI/I6YYM = MY_INT_FIELD;
MY_YYM/YYM = MY_YYMI;
END

TABLE FILE CAR
SUM
SALES
MY_INT_FIELD
MY_YYMI
MY_YYM
BY COUNTRY
END

Hi Francis,
Do I need to hardcode the value of the date?
I tried the code below and the code failed

CStart_DT/I11 WITH PGIP_PHYSCIANSLIST = 201507;
My value should come from the table.

Sherly

Hi Sherly,

You might find answers to all those pesky date questions in Almost 1001 Ways to Work with Dates in WebFOCUS -- a handy book filled with examples! Available at www.aviter.com.

Hi Sherly,
Welcome to the WebFOCUS Forum.

Try this:

COMPUTE DATE0/I6YYM = PGIP_PHYSCIANSLIST;
COMPUTE DATE1/A6YYM = EDIT(DATE0);
COMPUTE MONTH_YR/A17 = LCWORD(17, CHGDAT('YYMD','MXYY',DATE1,'A17') ,'A17');

it is working. Thank you so much for your help
Sherly

Hi Sherly,

Can you update the title of your first port in this thread to add [CLOSED] or [SOLVED] if you are happy with the answer.

"Do I need to hardcode the value of the date"

Sherly, since the CAR file doesn't have a date column, I had to concoct one. Of course the data can come from an existing column.