<?
//在oracle中执行存储过程示例
//供大家参考
$gconn=ocilogon("test","test");
/* ocidefinebypos example thies@digicol.de (980219) */
//discrate与necode是out parameter,其余均是 in parameter.
//存储过程get_discrate存放于package ebiz_pg中。
$stmt = ociparse($gconn,"begin ebiz_pg.get_discrate(:discrate,505,402,1,56,:necode);end;");
ocibindbyname($stmt,":discrate",&$discrate,32);
ocibindbyname($stmt,":necode",&$necode,32);
ociexecute($stmt);
echo($discrate);
echo("<br>");
echo($necode);
//echo($discrate*0.09);
ocifreestatement($stmt);
ocilogoff($gconn);
?>
