Conference ilbbak::ibi_focus

550.0. "RDB with-READ" by BUMP::GCLIFFORD () Tue May 18 1993 14:44

    Has anyone tried to use the command -READ to go against a
    RDB database to read the first record into Focus variables,
    with success?
    
    TRACEV2.RDB is the name of the RDB Database
    Current is the name of the MAS, ACX file that accesses
    a relation called Current_Fiscal_Period
    
    If I do a TABLE FILE CURRENT
              PRINT SEG.*
              END
    
    It works fine.
    
    here is my to go against the RDB relation that does not work
    code (shorten).  It complains that the filedef is not known
    FOC (336)
    
    Thanks
    
-**********************************************************************
-*   
FILEDEF TRACEV2 DISK FMR_DATA:TRACEV2.RDB
-RUN
-*
-**********************************************************************
-READ CURRENT &PD_START.A6., &PD_END.A6., &FMO_START.A6.,
-, &FMO_END.A6., &FMM.A2., &FYY.A2., &FQTR.A1., &FWK.A2
-*
-IF &IORETURN EQ 0 GOTO OKDATE;

    
    	You did do a TABLE FILE TRACEV2
    		     PRINT x y z
    		     IF RECORDLIMIT EQ 1
    		     ON TABLE SAVE AS CURRENT
    		     END
    
    	before reading from CURRENT which is the save file from the first
    	record, right?
    
    		You need to read the first record into a save file and then
    		put your variables into & variables from the save file. 
    
    	LisaC

    
    	Oops....meant to say TABLE FILE CURRENT
    				
    
    	Save file can be whatever name you want....like FIRSTREC.
    	Then your read line would be -READ FIRSTREC followed by the amper
    	vars...
    
    	LisaC