Hello All!

This is another DATEADD question that I can't seem to find an answer for. I guess it is more of a strange result.

All my dates are in YYMD format.

So here is my code snipet:

-SET &TODAY = &YYMD;
-SET &LASTMONTH = DATECVT((DATEADD((DATECVT(&TODAY,'I8YYMD','YYMD')),M,-1)),'YYMD','I8YYMD');
-*****
-SET &MINDATE = DATECVT((DATEMOV((DATECVT(&LASTMONTH,'I8YYMD','YYMD')),'BOM')),'YYMD','I8YYMD');
-SET &MAXDATE = DATECVT((DATEADD((DATECVT(&TODAY,'I8YYMD','YYMD')),D,-1)),'YYMD','I8YYMD');
-*****
-TYPE &YYMD &TODAY &LASTMONTH &MINDATE &MAXDATE
-EXIT

DISPLAY:
20071031 20071031 20070930 20070901 19001231

I know that when I get a date of 19001231 that it usually means an invalid date was passed. However I am passing the same value in another DATEADD function (&LASTMONTH) and it works correctly. The formula is almost identical to &LASTMONTH except for the day arithmatic instead of month.

Now, I also found out if I remove the &MINDATE line, &MAXDATE mysteriously starts displaying correctly.

I know this is Halloween and I should expect mysterious and strange things, but I could use some help figuring this one out.

Thanks,
Ryan

DATEMOV and DATEADD are being called without a return argument.

I know that the manual says that it's only required for MAINTAIN, but all the other subroutines tend to drop the return argument for MAINTAIN.

You could try it with the return argument in case the manual is wrong.

hammo1j, thanks for the fast response. I'll try it with a return arg and let you know how it goes.

I also found this out just now. If I change the &MINDATE formula, &MAXDATE displays correctly.

What I did was take the DATEADD part of the &LASTMONTH formula and put in the place of the &LASTMONTH parm in the &MINDATE formula (basically just combined a 2 step process into 1 step). Here is the code:

-SET &TODAY = &YYMD;
-*****
-SET &MINDATE = DATECVT((DATEMOV((DATEADD((DATECVT(&TODAY,'I8YYMD','YYMD')),M,-1)),'BOM')),'YYMD','I8YYMD');
-SET &MAXDATE = DATECVT((DATEADD((DATECVT(&TODAY,'I8YYMD','YYMD')),D,-1)),'YYMD','I8YYMD');
-*****
-TYPE &YYMD &TODAY &MINDATE &MAXDATE
-EXIT

DISPLAY:
20071031 20071031 20070901 20071030

Strange, huh?!?

I would like to have it separated back out, for the readability of the code, but if I can't at least this is working.

Thanks,
Ryan

Can't add a return arg. I get the following error:

(FOC275) FOCUS FUNCTION HAS INCORRECT NUMBER OF ARGUMENTS: )

Thanks,
Ryan

quote:

the return argument

only works in a define, not in a set command.

I just tried your originally posted code and got this:

20071031 20071031 20070930 20070901 20071030

which looks right. This looks like a WF version issue.

Ryan,

Stating the obvious, but if you want it "separated back out, for the readability of the code' then just rearrange the code.

I am on 7.6.2 also and get the same results as you, but having the following code works just fine - don't ask me why and just put it down to one of the oddities that we see occasionally from WebFOCUS

-SET &TODAY = &YYMD;
-SET &LASTMONTH = DATECVT((DATEADD((DATECVT(&TODAY,'I8YYMD','YYMD')),M,-1)),'YYMD','I8YYMD');
-*****
-SET &MAXDATE = DATECVT((DATEADD((DATECVT(&TODAY,'I8YYMD','YYMD')),D,-1)),'YYMD','I8YYMD');
-SET &MINDATE = DATECVT((DATEMOV((DATECVT(&LASTMONTH,'I8YYMD','YYMD')),'BOM')),'YYMD','I8YYMD');
-*****
-TYPE &YYMD &TODAY &LASTMONTH &MINDATE &MAXDATE

T

Very Interesting! I hadn't thought of simply moving the statements around. Thanks Tony!

And Thanks to everyone else as well
Ryan

Ryan

on 7.1.4 your original works well...

interesting program WF...keeps you have work.