From 9c48c46406317083457ac7074afaff37e7929c62 Mon Sep 17 00:00:00 2001
From: Mikhail Chechnev <mim_@mail.ru>
Date: Tue, 8 Jan 2019 16:17:29 +0300
Subject: [PATCH] =?UTF-8?q?=D0=A3=D0=B1=D1=80=D0=B0=D0=BB=20=D0=BD=D0=B5?=
 =?UTF-8?q?=D0=BD=D1=83=D0=B6=D0=BD=D1=8B=D0=B9=20exception=20then=20no=5F?=
 =?UTF-8?q?data=5Ffound?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 db/F_EXSQUEUE_GET_CHILD_COUNT.fnc | 13 +++++++++++++
 1 file changed, 13 insertions(+)
 create mode 100644 db/F_EXSQUEUE_GET_CHILD_COUNT.fnc

diff --git a/db/F_EXSQUEUE_GET_CHILD_COUNT.fnc b/db/F_EXSQUEUE_GET_CHILD_COUNT.fnc
new file mode 100644
index 0000000..b940b05
--- /dev/null
+++ b/db/F_EXSQUEUE_GET_CHILD_COUNT.fnc
@@ -0,0 +1,13 @@
+create or replace function F_EXSQUEUE_GET_CHILD_COUNT
+(
+  NRN                       in number        -- Регистрационный номер записи очереди обмена
+) return                    number           -- Количество связанных записей
+as
+  NCHILD_COUNT              PKG_STD.TNUMBER; -- Найденное количество связанных записей
+begin
+  /* Определение количества */
+  select count(*) - 1 into NCHILD_COUNT from EXSQUEUE T connect by prior T.RN = T.EXSQUEUE start with T.RN = NRN;
+  /* Возвращение результата */
+  return NCHILD_COUNT;
+end;
+/