Conference ilbbak::ibi_focus

220.0. "Need help with define field in FEX" by MEMV01::ROGUSKA () Wed Jun 14 1989 11:20

    I have a problem with the following FEX.  The define field, Q1_ACT
    is always zero, even if the FISCAL_QTR is equal to '1' - FISCAL_QTR
    is defined in the master as USAGE of A1, ACTUAL of A1.  The value
    of Q1_ACT in the hold file, TEST3, is zero so it appears that the
    problem is in the define statements and/or the first table file.
    
    This FEX is running against an RDB database, and is only accessing
    on table in the database.  Any suggestions as to what I've done
    wrong?
    
	DEFINE FILE CURRPBU
	Q1_ACT/F8.2 = IF FISCAL_QTR EQ '1' THEN ACT_AMT/1000 ELSE 0;
	END
	TABLE FILE CURRPBU
	PRINT GROUP_CODE PBU_ITEMLINE FISCAL_QTR Q1_ACT COLUMN-TOTAL
	IF PBU_ITEMLINE EQ '1540'
	IF FISCAL_YEAR EQ '1989'
	ON TABLE HOLD AS TEST3
	END
	-RUN
	TABLE FILE TEST3
	SUM GROUP_CODE PBU_ITEMLINE FISCAL_QTR Q1_ACT COLUMN-TOTAL
	BY GROUP_CODE NOPRINT
	BY FISCAL_QTR NOPRINT
	END
	-RUN
 
    I have also tried this without the hold file, defining the field
    before the table file, and it didn't work either.  I have had
    cases where the define would only happen if it was done in conjunction
    with a hold file.
    
    Thanks for any help you may be able to give!
    
    Kathy