Conference ilbbak::ibi_focus

416.0. "(foc1071) - error " by ISLNDS::MORIN () Tue May 14 1991 15:49

I get the following error when trying to join to FOCUS files.  It creates both
hold files but errors when trying to join the two files.  I get a partially 
created file but the fex errors out.

ERROR MESSAGE:  

>>>>>(foc1071) 'TO' field out of sequence: -  /ventet


Question:

  Does anyone have any suggestions as to why this is happening?  I will include
the master files and the fex file below:

Thanks,
    Peter



I. FOCUS MASTER FILES

A) FILE=COUNTER        ,SUFFIX=FIX                                                 
   SEGNAME=COUNTER                                                                 
   FIELDNAME   =STD_QUEST_ID ,E01          ,I4       ,I04      ,$                  
   FIELDNAME   =COUNTER      ,E02          ,I4       ,I04      ,$                  
   FILE=JRQ_STD        ,SUFFIX=FIX                                                 


B) SEGNAME=JRQ_STD                                                                 
   FIELDNAME   =JRQ_ID       ,E01          ,A11      ,A12      ,$                  
   FIELDNAME   =MODEL_DESC   ,E02          ,A35      ,A36      ,$                  
   FIELDNAME   =STD_QUEST_ID ,E03          ,I4       ,I04      ,$                  
   FIELDNAME   =JRQ_QUES_TXT ,E04          ,A220     ,A220     ,$                  
   FIELDNAME   =J_STD_RESP   ,E05          ,A3       ,A04      ,$                  
   FIELDNAME   =CLASS        ,E06          ,A3       ,A04      ,$                  


II FOCUS FEX

- SET &ID=&1;
- SET &SRPT=&2;
- SET &MODEL = EDIT(&ID,'999$$$$$$$$');
- SET &FAM = EDIT(&ID,'$$$99999$$$');
SET TEMPDIR=CAP$TMP
SET MSG=ON

FILEDEF JRQS    DISK MDS$DBA$DBS:CAP.RDB
FILEDEF CAP     DISK MDS$DBA$DBS:CAP.RDB
FILEDEF COUNTER DISK MDS$DBA$DBS:CAP.RDB

DEFINE FILE CAP
CLASS/A3  = EDIT(STD_JRQ_ID,'$$$$$$$$999');
J_STD_RESP/A3 = JRQ_STD_RESP;
END
MATCH FILE JRQS
SUM MODEL_DESC
BY JRQ_ID 
IF JRQ_ID EQ '&ID'
RUN
FILE CAP
PRINT STD_QUEST_ID  JRQ_QUES_TXT J_STD_RESP CLASS
BY STD_JRQ_ID
IF STD_JRQ_ID EQ '&ID'
AFTER MATCH HOLD AS JRQ_STD NEW
END

TABLE FILE CAP
SUM COMPUTE COUNTER/I4 = COUNTER+1;
BY STD_QUEST_ID
IF STD_JRQ_ID EQ '&ID'
ON TABLE HOLD AS COUNTER
END

FILEDEF OFFLINE DISK &SRPT|.RPT
OFFLINE

****  This is where the error occurs ****************

JOIN STD_QUEST_ID IN JRQ_STD TO STD_QUEST_ID IN COUNTER AS JQ

****  This is where the error occurs ****************

SET LINES = 53
SET PAGE = OFF

DEFINE FILE JRQ_STD
LINE1/A70 = SUBSTR(220,JRQ_QUES_TXT,1,60,60,LINE1);
LINE2/A70 = SUBSTR(220,JRQ_QUES_TXT,61,120,60,LINE2);
LINE3/A70 = SUBSTR(220,JRQ_QUES_TXT,121,180,60,LINE3);
LINE4/A70 = SUBSTR(220,JRQ_QUES_TXT,181,220,40,LINE4);
CLASS/A8  = EDIT(JRQ_ID,'$$$$$$$$999');
STD_RESP/A3 = RJUST (3, J_STD_RESP, STD_RESP);
COUNT2/A3 = FTOA(COUNTER,'(F3)',COUNT2);
M_DESC/A35 = CTRFLD(MODEL_DESC,35,M_DESC);
END                                   

TABLE FILE JRQ_STD
HEADING 
" "
" "
" "
"<59 CAREER ASSESSMENT PROGRAM "
"<59 JOB REQUIREMENTS PROFILE"
"<54 <M_DESC"
" "
" "
"<2 RATING DEFINITION:                                                     "
" "
"<6 1 = Minimal/No Skill"
"<6 2 = Basic Skill"
"<6 3 = Moderate skill"
"<6 4 = High skill"
"<6 5 = Very high skill"
" "
" "
" "
" "
" "               
SUM COUNT2  AS '' 
    LINE1  AS ''
    BY STD_QUEST_ID NOPRINT
SUM STD_RESP AS '' 
ACROSS CLASS AS ''
    BY STD_QUEST_ID NOPRINT
ON STD_QUEST_ID SUBFOOT
" <5  <LINE2" 
" <5  <LINE3" 
" <5  <LINE4" 
END
FIN

    I for got to mention the FOCUS version.  The problem in 416.0 is
    occuring on FOCUS V5.2.2.
    
    I ran the process on our developement account which has FOCUS v5.2.3
    installed on the system.  ALL WORKED FINE..
    
    Does anybody know why V5.2.2 is giving that error.
    
    Peter

	This is what is in your match file JQR_STD

	JQR_ID STD_JQR_ID MODEL_DESC STD_QUEST_ID JQR_QUEST_TXT J_STD_RESP CLASS

	Even though you are doing a match, I hope on JQR_ID and STD_JQR_ID
	which may be the same data element, they aren't the same name and
	your match file might not be what you are expecting - you might want
	to try making STD_JQR_ID in the BY part of the match the same name
	as the element you are matching to (JQR_ID)

	MATCH...
	BY JQR_ID
	RUN
	FILE ...
	BY STD_JQR_ID AS JQR_ID

	Your second hold file contains this (COUNTER):

	STD_QUEST_ID COUNTER


	Now here's your join:

JOIN STD_QUEST_ID IN JRQ_STD TO STD_QUEST_ID IN COUNTER AS JQ

	At this point because you're match file might not be 'completely'
	correct, you might be getting this error.  Also, you know that by
	doing this join, if data is JRQ_STD and not in STD_QUEST_ID, you 
	won't get it in your report and vise-versa...  Also, you might
	want to try taking the MATCH HOLD FILE and sort it by what you
	are joining to in your join.

	Does this help at all?   It may be that the difference in versions
	fixes what the hold file may look like.  I don't know.

	If you need some more info, don't hesitate to send me mail.

	LisaC
	               

    When joining fields in hold files they must be in the same sort order.