SELECT MAX(limit) INTO lnLimitDoc
        FROM PPF_FUPLIMIT
        WHERE iddocument = inIdDocument
          AND Valid = 'Y'
          AND ROWNUM < 2
          AND SYSDATE BETWEEN ValidFrom AND ValidTo
        ORDER BY createdat;
      SELECT MAX(limit) INTO lnLimitDoc
        FROM PPF_FUPLIMIT
        WHERE TYPE = 'DEFAULT'
          AND Valid = 'Y'
          AND ROWNUM < 2
          AND SYSDATE BETWEEN ValidFrom AND ValidTo
        ORDER BY createdat;
      IF lnLimitDoc IS NOT NULL THEN
        lnLimit := lnLimitDoc + lnSysPar;
      ELSIF lnLimitSys IS NOT NULL THEN
        lnLimit := lnLimitSys + lnSysPar;
      ELSE
        lnLimit := lnSysPar;
      END IF;