17: curs integer;
18: sqlbuf varchar2(2000);
19: rows integer;
20: BEGIN
21: curs := dbms_sql.open_cursor;
22: sqlbuf := 'select substr(RawToHex(sys_op_guid()),0,32) from dual';
23: dbms_sql.parse(curs, sqlbuf, dbms_sql.v7);
24: dbms_sql.define_column(curs, 1, guid, 32);
25: rows := dbms_sql.execute(curs);
19: rows integer;
20: BEGIN
21: curs := dbms_sql.open_cursor;
22: sqlbuf := 'select substr(RawToHex(sys_op_guid()),0,32) from dual';
23: dbms_sql.parse(curs, sqlbuf, dbms_sql.v7);
24: dbms_sql.define_column(curs, 1, guid, 32);
25: rows := dbms_sql.execute(curs);
26: rows := dbms_sql.fetch_rows(curs);
27: dbms_sql.column_value(curs, 1, guid);
20: BEGIN
21: curs := dbms_sql.open_cursor;
22: sqlbuf := 'select substr(RawToHex(sys_op_guid()),0,32) from dual';
23: dbms_sql.parse(curs, sqlbuf, dbms_sql.v7);
24: dbms_sql.define_column(curs, 1, guid, 32);
25: rows := dbms_sql.execute(curs);
26: rows := dbms_sql.fetch_rows(curs);
27: dbms_sql.column_value(curs, 1, guid);
28: dbms_sql.close_cursor(curs);
21: curs := dbms_sql.open_cursor;
22: sqlbuf := 'select substr(RawToHex(sys_op_guid()),0,32) from dual';
23: dbms_sql.parse(curs, sqlbuf, dbms_sql.v7);
24: dbms_sql.define_column(curs, 1, guid, 32);
25: rows := dbms_sql.execute(curs);
26: rows := dbms_sql.fetch_rows(curs);
27: dbms_sql.column_value(curs, 1, guid);
28: dbms_sql.close_cursor(curs);
29:
22: sqlbuf := 'select substr(RawToHex(sys_op_guid()),0,32) from dual';
23: dbms_sql.parse(curs, sqlbuf, dbms_sql.v7);
24: dbms_sql.define_column(curs, 1, guid, 32);
25: rows := dbms_sql.execute(curs);
26: rows := dbms_sql.fetch_rows(curs);
27: dbms_sql.column_value(curs, 1, guid);
28: dbms_sql.close_cursor(curs);
29:
30: fnd_random_pkg.init(7);
23: dbms_sql.parse(curs, sqlbuf, dbms_sql.v7);
24: dbms_sql.define_column(curs, 1, guid, 32);
25: rows := dbms_sql.execute(curs);
26: rows := dbms_sql.fetch_rows(curs);
27: dbms_sql.column_value(curs, 1, guid);
28: dbms_sql.close_cursor(curs);
29:
30: fnd_random_pkg.init(7);
31: fnd_random_pkg.seed(to_number(to_char(sysdate, 'JSSSSS')), 10, FALSE);
24: dbms_sql.define_column(curs, 1, guid, 32);
25: rows := dbms_sql.execute(curs);
26: rows := dbms_sql.fetch_rows(curs);
27: dbms_sql.column_value(curs, 1, guid);
28: dbms_sql.close_cursor(curs);
29:
30: fnd_random_pkg.init(7);
31: fnd_random_pkg.seed(to_number(to_char(sysdate, 'JSSSSS')), 10, FALSE);
32: rnd_dt:=Substr((To_char(fnd_random_pkg.get_next)||To_char(fnd_random_pkg.get_next)||To_char(fnd_random_pkg.get_next)||To_char(fnd_random_pkg.get_next)),0,32);