Looks great, but as I have said, these selects are made on the fly. The user has almost total control over them. This could be anything.
I like Sergery's suggestion of taking the paths out. I can probable get away with that, but redesign of the select maybe too hard.
I keep saying we need to redesign this report app, build in 3.0 and upgraded a little in 5.0, but not touched since, except for minor fixes.

>Could you do this that way:
>

>LOCAL lcOldPath
>
>**** To remove full path to tables
>lcOldPath = SET("PATH")
>SET PATH TO ("C:\DATA\WORK\VFP8WORK\CODE\INHOUSEPROJECTS\CLIENTDB\TABLES\")
>
>************************* date period
>ldDateFrom = DATE(2005,1,1)
>ldDateTo   = DATE(2006,1,1)
>*** I see it is for One Year, can you change the condition to be YEAR(CR_ACT.DTE_NXTACT) == 2005 ????
>
>Select CR_ACT.NXTACT_ST,ALIASES.NAME_ALIAS,ADDRES.STATE,CR_ACT.INITING_AC, ;
>       ALLTRIM(CR_ACT.ACTION_NOT),CR_ACT.DTE_NXTACT,CR_ACT.NXT_ACT, ;
>       ALLTRIM(CR_ACT.NEXT_ACT),CONTACT.FIRST_NAME,CONTACT.LAST_NAME, ;
>       TITLE_.DESCRIP,CONTACT.PHONE,CLIENTNM.CLIENT_ID ;
>from CR_ACT, ALIASES, ADDRES, CONTACT, TITLE_,CLIENTNM ;
>where (CR_ACT.DTE_NXTACT BETWEEN m.ldDateFrom AND m.ldDateTo) .AND. ;
>       .NOT. "CAN" $ RTRIM(UPPER(CLIENTNM.ACCT_STAT))         .AND. ;
>       UPPER(ALIASES.ALIAS_TYPE) = "MAIN"                     .AND. ;
>       CONTACT.CLIENT_ID = CLIENTNM.CLIENT_ID .AND. ;
>       CONTACT.CLIENT_ID = ALIASES.CLIENT_ID .AND. ;
>       CONTACT.CLIENT_ID = ADDRES.CLIENT_ID .AND. ;
>       CONTACT.ADDRES_TYP = ADDRES.ADDRESS_TY .AND. ;
>       CONTACT.CLIENT_ID = CR_ACT.CLIENT_ID .AND. ;
>       CONTACT.CONTACT_ID = CR_ACT.CONTACT_ID .AND. ;
>       CONTACT.TITLE = TITLE_.TITLE_ ;
>ORDER BY 2, 1;
>INTO CURSOR ctemp
>
>SET PATH TO (m.lcOldPath)
>

>That is just first tought, I will try to invent something else :o)