IBM DB2 SQL code example to pull Quantus GL balances.

CREATE FUNCTION TEST_GL_ACCOUNT_BALANCE(
    @BRANCH VARCHAR(8),
    @DATEUNTIL DATE,
    @GLACCOUNT VARCHAR(20) )
    RETURNS DOUBLE
    LANGUAGE SQL
    READS SQL DATA
    NO EXTERNAL ACTION
    RETURN
       SELECT SUM(QUANTUS.GL_TRANSDAY_SUMM.DEBITAMT) - SUM(QUANTUS.GL_TRANSDAY_SUMM.CREDITAMT) AS BALANCE
     FROM QUANTUS.GL_TRANSDAY_SUMM
       WHERE QUANTUS.GL_TRANSDAY_SUMM.HISTORY <> 'Y'
           AND QUANTUS.GL_TRANSDAY_SUMM.DTTRANSACTION BETWEEN '1940-01-01' AND @DATEUNTIL
           AND QUANTUS.GL_TRANSDAY_SUMM.BRANCH = @BRANCH

AND QUANTUS.GL_TRANSDAY_SUMM.GLACCOUNT = @GLACCOUNT