CREATE FUNCTION "NFTG"."TOTAL_MONTH_CHARGEMENTS_0" (
   "PAYMENT_DATE"            TIMESTAMP,
   "MEMBER_ID"               INTEGER,
   "OPERATION_MONTH_DATE"    TIMESTAMP,
   "TAX_YEAR"                INTEGER)
   RETURNS TABLE ("OPERATION_TOTAL" DOUBLE)
   SPECIFIC "SQL130528130027400"
   LANGUAGE SQL
   NOT DETERMINISTIC
   EXTERNAL ACTION
   MODIFIES SQL DATA
   BEGIN ATOMIC
      DECLARE PAYOUT_DATE       TIMESTAMP;
      DECLARE PAYOUT_SUM        DOUBLE;
      DECLARE OPERATION_TOTAL   DOUBLE;
      SET PAYOUT_SUM = 0;
      SET OPERATION_TOTAL = 0;

      IF (PAYMENT_DATE IS NOT NULL)
      THEN
         SET PAYOUT_SUM = NULL;
         SET PAYOUT_SUM =
                (SELECT D.SUMOPER
                   FROM NFTG.DOLGY3 D
                  WHERE (D.MEMBER_ID = TOTAL_MONTH_CHARGEMENTS_0.MEMBER_ID)
                        AND (D.KOPERATION IN (34, 104, 134))
                        AND (D.DATEOPER =
                                TOTAL_MONTH_CHARGEMENTS_0.PAYMENT_DATE)
                 FETCH FIRST 1 ROWS ONLY);

         IF (PAYOUT_SUM IS NOT NULL)
         THEN
            SET OPERATION_TOTAL =
                   (SELECT SUM (D.SUMOPER)
                      FROM NFTG.DOLGY3 D
                     WHERE (D.MEMBER_ID = TOTAL_MONTH_CHARGEMENTS_0.MEMBER_ID)
                           AND (D.KOPERATION IN (34, 14, 104, 134))
                           AND (D.PAYMENT_DATE =
                                   TOTAL_MONTH_CHARGEMENTS_0.PAYMENT_DATE));
         END IF;
      ELSE
         SET PAYOUT_SUM = NULL;
         SET (PAYOUT_SUM, PAYOUT_DATE) =
                (SELECT D.SUMOPER, D.DATEOPER
                   FROM NFTG.DOLGY3 D
                  WHERE (D.MEMBER_ID = TOTAL_MONTH_CHARGEMENTS_0.MEMBER_ID)
                        AND (D.KOPERATION = 3)
                        AND (D.OPERATION_MONTH_DATE =
                                TOTAL_MONTH_CHARGEMENTS_0.OPERATION_MONTH_DATE)
                 FETCH FIRST 1 ROWS ONLY);

         IF (PAYOUT_SUM IS NOT NULL)
         THEN
            SET OPERATION_TOTAL =
                   (SELECT SUM (D.SUMOPER)
                      FROM NFTG.DOLGY3 D
                     WHERE (D.MEMBER_ID = TOTAL_MONTH_CHARGEMENTS_0.MEMBER_ID)
                           AND (D.KOPERATION IN (34, 14, 104, 134))
                           AND (D.PAYMENT_DATE = PAYOUT_DATE));
         END IF;
      END IF;

      RETURN SELECT OPERATION_TOTAL FROM SYSIBM.SYSDUMMY1;
   END

CREATE OR REPLACE  PROCEDURE "NFTG"."TOTAL_MONTH_CHARGEMENTS_0" (
    IN "PAYMENT_DATE"	TIMESTAMP,
    IN "MEMBER_ID"	INTEGER,
    IN "OPERATION_MONTH_DATE"	TIMESTAMP,
    IN "TAX_YEAR"	INTEGER,
    OUT "OPERATION_TOTAL"	DOUBLE )
  SPECIFIC "SQL130528131759700"
  LANGUAGE SQL
  NOT DETERMINISTIC
  EXTERNAL ACTION
  MODIFIES SQL DATA
  OLD SAVEPOINT LEVEL
begin
  SELECT OPERATION_TOTAL
    INTO OPERATION_TOTAL
    FROM TABLE(NFTG.TOTAL_MONTH_CHARGEMENTS_0(PAYMENT_DATE, MEMBER_ID, OPERATION_MONTH_DATE, TAX_YEAR));
end;

select OPERATION_TOTAL from table(nftg.TOTAL_MONTH_CHARGEMENTS_0(null,46,'01.01.2012',2012))

begin
  declare a integer;
  call nftg.TOTAL_MONTH_CHARGEMENTS_0(null,46,'01.01.2012',2012,a);
end