Annotation of embedaddon/php/ext/oci8/tests/drcp_functions.inc, revision 1.1.1.1
1.1 misho 1: <?php
2:
3: /* This file contains functions required by the DRCP tests */
4:
5: function drcp_create_table($conn)
6: {
7: $create_sql = "CREATE TABLE DRCPTEST (id NUMBER, name VARCHAR2(10), dept VARCHAR2(10))";
8: $statement = oci_parse($conn, $create_sql);
9: oci_execute($statement);
10:
11: $id_values = array(100,101,102,103,104,105,106,107,108);
12: $name_values = array("WIILIAMS","JOHN","SMITH","JONES","ADAMS","ROBERT",
13: "BILL","LAWSON","MARY");
14: $dept_values = array("ACCOUNTS","HR","HR","ADMIN","ACCOUNTS","HR",
15: "ACCOUNTS","HR","ACCOUNTS");
16: for($i=0; $i<8; $i++) {
17: $insert = "INSERT INTO DRCPTEST VALUES(".$id_values[$i].",'". $name_values[$i]."','".$dept_values[$i]."')";
18: $s = oci_parse($conn, $insert);
19: oci_execute($s);
20: }
21: }
22:
23: function drcp_drop_table($conn)
24: {
25: $ora_sql = "DROP TABLE DRCPTEST";
26: $statement = oci_parse($conn, $ora_sql);
27: oci_execute($statement);
28: }
29:
30: function drcp_update_table($conn)
31: {
32: $update_stmt ="Update drcptest set dept ='NEWDEPT' where id = 105";
33: $s1 = oci_parse($conn,$update_stmt);
34: oci_execute($s1,OCI_DEFAULT);
35: echo "Update done-- DEPT value has been set to NEWDEPT\n";
36: }
37:
38: function drcp_select_value($conn)
39: {
40: $sel_stmt="select dept from drcptest where id=105";
41: $s2 = oci_parse($conn,$sel_stmt);
42: oci_execute($s2,OCI_DEFAULT);
43: while(oci_fetch($s2)) {
44: echo "The value of DEPT for id 105 is ".oci_result($s2,1)."\n";
45: }
46: }
47:
48: function drcp_select_packagevar($conn)
49: {
50: $sel_stmt="select drcp_test_package.f1 as f1 from dual";
51: $s2 = oci_parse($conn, $sel_stmt);
52: oci_define_by_name($s2,'f1',$ret_num);
53: oci_execute($s2);
54: while(oci_fetch($s2)) {
55: echo " The value of the package variable is ".oci_result($s2,1)."\n";
56: }
57: }
58:
59:
60: function drcp_set_packagevar($conn,$num)
61: {
62: $set_stmt = "begin drcp_test_package.p1($num); end;";
63: $s1 = oci_parse($conn,$set_stmt);
64: oci_execute($s1);
65: echo " Package variable value set to " .$num."\n";
66: }
67:
68: function drcp_create_package($c)
69: {
70: $create_package_stmt = "create or replace package drcp_test_package as
71: var int :=0;
72: procedure p1(var1 int);
73: function f1 return number;
74: end;";
75: $s1 = oci_parse($c, $create_package_stmt);
76: oci_execute($s1);
77:
78: $package_body = "create or replace package body drcp_test_package as
79: procedure p1(var1 int) is
80: begin
81: var :=var1;
82: end;
83: function f1 return number is
84: begin
85: return drcp_test_package.var;
86: end;
87: end;";
88:
89: $s2 = oci_parse($c, $package_body);
90: oci_execute($s2);
91: }
92:
93: ?>
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>