extracted objects

docs/functions/MY_INSTR.md

@@ -0,0 +1,36 @@
+# MY_INSTR
+
+## Codice Sorgente
+
+```sql
+function my_instr( p_value   varchar2,
+                                     p_delim   varchar2 )
+return number
+as
+
+  i          number;
+
+  l_length   number;
+
+begin
+
+  if p_value is null then
+    return null;
+  end if;
+
+  i := 1;
+
+  l_length := length(p_value);
+
+  for i in 1..l_length
+  loop
+    if substr(p_value, i, length(p_delim)) = p_delim then
+      return i;
+    end if;
+  end loop;
+
+
+  return 0;
+
+end;
+```