分享一下我老师大神的人工智能教程!零基础,通俗易懂!http://blog.csdn.net/jiangjunshow
也欢迎大家转载本篇文章。分享知识,造福人民,实现我们中华民族伟大复兴!
http://www.oschina.net/code/snippet_1162040_48289
[1].[代码] ty_tbl_str_split 跳至 [1] [2] [3] [4] [5]
1
|
CREATE OR REPLACE TYPE ty_tbl_str_split IS TABLE OF ty_row_str_split
|
[2].[代码] ty_row_str_split 跳至 [1] [2] [3] [4] [5]
1
|
CREATE
OR
REPLACE
TYPE ty_row_str_split
as
object (strValue VARCHAR2 (4000))
|
[3].[代码] fn_split函数 跳至 [1] [2] [3] [4] [5]
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
|
CREATE
OR
REPLACE
FUNCTION
fn_split(p_str
IN
VARCHAR2,
p_delimiter
IN
VARCHAR2)
RETURN
ty_tbl_str_split
IS
j
INT
:= 0;
i
INT
:= 1;
len
INT
:= 0;
len1
INT
:= 0;
str VARCHAR2(4000);
str_split ty_tbl_str_split := ty_tbl_str_split();
BEGIN
len := LENGTH(p_str);
len1 := LENGTH(p_delimiter);
WHILE j < len LOOP
j := INSTR(p_str, p_delimiter, i);
IF j = 0
THEN
j := len;
|