Conference ilbbak::ibi_focus

252.0. "(FOC243) COMPUTATIONAL STATEMENT ..." by INBAL::OFER_A () Thu Aug 17 1989 11:11

         Hello everybody,
         
         We have an ugly FOCUS problem and we'll be very grateful for any 
         possible help (this note is posted in FOCUS and IBI_FOCUS).
         
         The problem is the FOCUS error message
         FOC243 Computational statement recognized and not yet supported
         
         Our software environment is VMS 5.1 and FOCUS 5.2 (received from 
         Release Management in Ferney-Voltaire).
         We requested support from our local FOCUS distributor, but we 
         didn't have any answer yet.
         
         I work in the local ADG of IS Israel.
         FOCUS is used here as a programmer's report generator, for most of 
         our "production" reports. Some of the procedures (as this one) are 
         rather complex -- they are long, they have many DEFINEs and JOINs 
         and they deal with detailed formatting.
         This procedure is 360 lines long, and I will describe only what I 
         believe to be the central parts.
         
         JOIN A + B AS C
         TABLE FILE C
         PRINT...
         ON TABLE HOLD AS D
         JOIN D + E AS F
         JOIN F + G AS H
         TABLE FILE H
         PRINT... (generation of report 1)
         TABLE FILE H
         PRINT... (generation of report 2)
         
         The error message appears during the generation of both reports, 
         pointing to the END line in each request.
         
         We have the following work-around:
         
         Enter FOCUS first time
         JOIN A + B AS C
         TABLE FILE C
         PRINT...
         ON TABLE HOLD AS D
         Exit to DCL
         
         Enter FOCUS second time
         FILEDEF D DISK X:Y.Z
         JOIN D + E AS F
         JOIN F + G AS H
         DEFINE FILE H
         ...
         TABLE FILE H
         PRINT... (generation of report 1)
         TABLE FILE H
         PRINT... (generation of report 2)
         
         It seems to me that the creation of a second FOCUS session 
         performs some memory clean-up, the error message
         does not appear and both reports are generated OK.
         
         Nevertheless, this "solution" is right only for me.
         Our users work from a menu system and they can't exit to DCL.
         
         Ofer 
         

    You say JOIN A + B AS C 
            TABLE FILE C
            PRINT .......
    Is this a new FOCUS feature??  C is the join name.  A is the host file.
    Shouldn't it be TABLE FILE A

	Sorry for that - it is merely a spelling mistake. If you are
    interested and wish to get more information please read the FOCUS 
    conference topic no. 176 where I included the entire original FEX 
    + explanations.
    
    	Thanks for your attention,
    						Ofer.