Hi,
I am facing issues in QY date format while doing -READFILE <>.

DEFINE FILE EMPLOYEE
METRI1/QY=DATECVT(HIRE_DATE,'I6YMD','QY');
END

TABLE FILE EMPLOYEE
PRINT SALARY
HIRE_DATE
METRI1
ON TABLE HOLD AS HLD1
END

TABLE FILE HLD1
SUM SALARY
BY METRI1
-*ON TABLE HOLD AS DATE_FO
END

The above is giving me the output like,
Q1 80
Q2 82
But When I create a hold file for the same data and try to read it is showing in different format.
Please refer below

-DEFAULTH &METRI1='';
-DEFAULTH &COLUMN_ORD='';
DEFINE FILE EMPLOYEE
METRI1/QY=DATECVT(HIRE_DATE,'I6YMD','QY');
END

TABLE FILE EMPLOYEE
PRINT SALARY
HIRE_DATE
METRI1
ON TABLE HOLD AS HLD1
END

TABLE FILE HLD1
SUM SALARY
BY METRI1
ON TABLE HOLD AS DATE_FO
END

-SET &LNS=&LINES;
-REPEAT :BUILD_COL &LNS TIMES
-RUN
-READFILE DATE_FO
-SET &COLUMN_ORD=&COLUMN_ORD | ' AND ' | &METRI1;
-:BUILD_COL
-TYPE &COLUMN_ORD

Please help me to get Q YY format while doing -READFILE from holdfile.


Thanks & Regards
Padmavathy Soorian

This message has been edited. Last edited by: <Kathryn Henning>,

With the below code I was able to obtain the correct result. I could not get it to work with READFILE.

-DEFAULTH &METRI1=''
-DEFAULTH &COLUMN_ORD=''
DEFINE FILE EMPLOYEE
METRI1/QY=DATECVT(HIRE_DATE,'I6YMD','QY');
END

TABLE FILE EMPLOYEE
PRINT SALARY
HIRE_DATE
METRI1
ON TABLE HOLD AS HLD1
END

TABLE FILE HLD1
SUM SALARY
BY METRI1
ON TABLE HOLD AS DATE_FO FORMAT ALPHA
END

-SET &LNS=&LINES;
-REPEAT :BUILD_COL &LNS TIMES
-READ DATE_FO &METRI1.3. &SALARY.12.
-SET &COLUMN_ORD=&COLUMN_ORD | ' AND ' | &METRI1;
-:BUILD_COL
-TYPE &COLUMN_ORD

So I had to do a hold format alpha, and then read the lines one by one, using &'s to split the data.
But the result is ok now, I guess. it now shows:

AND 280 AND 381 AND 481 AND 182 AND 282 AND 382

Stop and think about what you are doing - in your first section you specify a format of QY in the format but you say that you want QYY.

Any ideas of what you need to do yet for this one?

The second point is closely related in that what you are seeing is a month followed by the 2 digit year. This represents the first month within the quarter (the third one actually should be 1082 I believe). Again, changing the format to QYY will give you month century and year - with the same comment on 01982.

If you wish to have the actual alpha representation then go to one of the most useful functions, FPRINT.

METRI2/A8 = FPRINT(METRI1, 'QYY', 'A8');

T

quote:

&METRI1.3. &SALARY.12.

GamP,

Long time no see!

For info. the syntax is being tightened. So for -READ the syntax should have both a leading and trailing period (as you have) but also it should have the format of which only Alpha and Integer are valid. The formats should relate to how the variable is being subsequently used.

When you get to 8.0.something, then you'll be able to use -READFILE which uses the synonym to determine the variable names and formats.

T

7.7 does have -READFILE as well. 7.6 probably doesn't though.

quote:

7.7 does have -READFILE as well

Thanks Wep, I couldn't remember so stuck with at least 8.0.something

T

Syntax on -READ - here
T

If you are going to use -READ, then make sure you use ON TABLE SAVE

Thank you all for your response and I used the FPRINT which Tony had mentioned and achieved the requirement.

Regards
Padmavathy Soorian