Title: | FOCUS, from INFORMATION BUILDERS |
Moderator: | ZAYIUS::BROUILLETTE |
Created: | Thu Feb 19 1987 |
Last Modified: | Mon May 05 1997 |
Last Successful Update: | Fri Jun 06 1997 |
Number of topics: | 615 |
Total number of notes: | 1779 |
When I execute the following stream in FOCUS, I get an error (FOC062) and don't understand why? Can so shed some light... FOCUS tells me line 14 in my stream needs a USE WITH command, but I took the command right out of the Subroutine Library Users Manual (p.4-3)/(4.1.1) Or is there a there a better way to do this? Keith ********************************* FILEDEF USERS DISK ITS$DB: FILEDEF USREL DISK ITS$DB: FILEDEF INCIDENT DISK ITS$DB: JOIN A_ID IN INCIDENT TO ALL USERID IN USREL AS JR JOIN A_ID IN INCIDENT TO USERID IN USERS AS JI -* DEFINE FILE INCIDENT ADD CUR/I6MDY = &MDY; CURR/I6YMD = &YMD; INC_TIME/I6MDY = I_TIME; RES_TIME/I6MDY = R_TIME; AGE/I4 = MDY(INC_TIME,RES_TIME); ELAP/I4 = MDY(INC_TIME,CUR); LAST_WEEK/I6YMD = AYMD (CURR,-7,LAST_WEEK); DATE_FLG/I1 = IF INC_TIME GT LAST_WEEK THEN 0 ELSE 1; RES_FLG/I1 = IF RES_TIME GT LAST_WEEK THEN 0 ELSE 1; END TABLE FILE INCIDENT PRINT CUR INC_TIME RES_TIME AGE LAST_WEEK DATE_FLG RES_FLG ITN IF RECORDLIMIT EQ 30 ON TABLE SAVE AS TES FORMAT WP END ****************** error returned by FOCUS (FOC062) POINT TO CALCULATE FIELDS NOT SUPPLIED..'USER WITH' BYPASSING TO END OF COMMAND
T.R | Title | User | Personal Name | Date | Lines |
---|---|---|---|---|---|
366.1 | USE WITH - pg 2-75 | PLOP::COYLE | Tue Sep 18 1990 11:07 | 14 | |
If you look on page 2-75 of the FOCUS User's manual you will see an explanation of what causes the FOC062 error. A "DEFINED" field has a logical location in the master file just like "real" fields. It's logical placement is on the lowest record segment which has to be accessed in order to be able to evaluate the expression defining the field. But if a defined field is based on other temporary fields, it's time of execution is UNKNOWN, therefore a WITH statement is needed containing any real field in the master file. KC |