IBM DB2 SQL code example to pull Quantus chunked text data.

CREATE FUNCTION CHAD_TEST_TEXT_DATA( C_BRANCH VARCHAR(8), C_OBJECTNO BIGINT )
    RETURNS VARCHAR(2048)
    SPECIFIC TEST_TEXT_DATA
    LANGUAGE SQL
    READS SQL DATA
    NO EXTERNAL ACTION
BEGIN ATOMIC
    DECLARE tmpString VARCHAR(2048) DEFAULT '';
    SET tmpString = (SELECT QUANTUS.TEXTDATA.DATA
    FROM QUANTUS.TEXTDATA
    WHERE QUANTUS.TEXTDATA.BRANCH = C_BRANCH
       AND QUANTUS.TEXTDATA.OBJECTNO = C_OBJECTNO FETCH FIRST 1 ROW ONLY);
    RETURN tmpString;

END