Este sería el código del archivo PHP donde llamarias a la funcion RFC de SAP …en mi caso:
<html>
<body>
<h1>CONEXIÓN SAP_PHP</h1>
<?PHP
// aqui en esta parte incluyes el archivo donde tendras las librerias que pondré más aabajo
require_once("saprfc.php");
// Create saprfc-instance
$sap = new saprfc(array(
"logindata"=>array(
"ASHOST"=>"10.10.10.10" // application server
,"SYSNR"=>"Numero de sistema" / system number
,"CLIENT"=>"Cliente" // client
,"USER"=>"USUARIO DE ACCESO A SAP" // user
,"PASSWD"=>"Password" // password
)
,"show_errors"=>false // let class printout errors
,"debug"=>false)) ; // detailed debugging information
// Call-Function
$result=$sap->callFunction("NOMBRE_DE_TU_FUNCION",
array( array("IMPORT","EL_NOMBRE_DEL_IMPORT_DE_TU_FUNCION","*"),
array("TABLE","TABLE_DE_TU_FUNCION",array())
));
// Si se realizo el llamado a la funcion correctamente
if ($sap->getStatus() == SAPRFC_OK)
{
// Entonces imprimes tus resultados....
?><table>
<tr>
<td>Nombre</td>
<td>Numero De Usuario</td>
</tr>
<?PHP
foreach ($result["USER_DISPLAY_TAB"] as $user)
{
echo "<tr>
<td>", $user["SAPNAM"],"</td><td>",$user["USRNO"],"</td> //Elementos o Campos de tu estructura o tabla
</tr>";
}
?></table><?PHP
}
else
{
// Si no se realizo la conexión a la funcion RFC
$sap->printStatus();
// Imprimes el mensaje de error
// $sap->getStatusText() or $sap->getStatusTextLong()
}
// Logoff/Cerrar SAP RFC
$sap->logoff();
?>
</body>
</html>
Y este seria tu archivo saprfc.php donde contendrías las librerias…y lo incluirás en el codigo anterior que te pase…
<?PHP
// For easy checking of BAPI-type values
if (!defined("SAPRFC_OK")) define("SAPRFC_OK",0);
if (!defined("SAPRFC_ERROR")) define("SAPRFC_ERROR",1);
if (!defined("SAPRFC_APPL_ERROR")) define ("SAPRFC_APPL_ERROR",2);
class saprfc {
var $logindata;
var $rfc_conn;
var $func_id;
var $show_status_flag;
var $check_bapi_errors;
var $status;
var $status_infos;
var $debug;
var $call_function_result;
function saprfc($config=array()) {
$this->rfc_conn=false;
$this->func_id=false;
$this->show_status_flag=isset($config["show_errors"]) ? $config["show_errors"] : true;
$this->check_bapi_errors=isset($config["check_bapi_errors"]) ? $config["check_bapi_errors"] : false;
$this->status="";
$this->status_infos="";
$this->debug=isset($config["debug"]) ? $config["debug"] : false;
$this->logindata=isset($config["logindata"])?$config["logindata"]:array();
$this->call_function_result=false; // Result of the last executed sapaccess-call_function()
}
function setLoginData($logindata) {
$this->logindata=$logindata;
}
// TODO: currently only login with logindata allowed
// that means you have to set logindata for the class on creation
// maybe we can use setcookie ("SAPRFC_LOGON", urlencode(serialize($this->logindata)),time()+7200);
function login() {
if (!$this->rfc_conn)
{
$this->rfc_conn=@saprfc_open($this->logindata);
if (!$this->rfc_conn) {
return $this->setStatus(SAPRFC_ERROR,"saprfc::login()\nOpen RFC connection with saprfc_open() failed with error:\n".@saprfc_error());
}
}
return SAPRFC_OK;
}
// Close RFC_Connection
function logoff() {
if ($this->rfc_conn)
{
@saprfc_close($this->rfc_conn);
}
}
// set Status and optionally show Errors
function setStatus($status,$status_infos) {
$this->status=$status;
$this->status_infos=$status_infos;
if ($this->show_status_flag &&
$this->status!=SAPRFC_OK ) {
$this->printStatus();
}
return $this->status;
}
// Checks if last Call succeded
function getStatus() {
return $this->status;
}
// Returns actual Status/Error
function getStatusText() {
$statustext="";
switch ($this->status) {
case SAPRFC_OK:
$statustext=$this->status_infos;
break;
case SAPRFC_APPL_ERROR:
$statustext=$this->status_infos["TYPE"]." ".$this->status_infos["ID"]."-".$this->status_infos["NUMBER"].": ".$this->status_infos["MESSAGE"];
break;
case SAPRFC_ERROR:
$statustext=$this->status_infos;
break;
}
return $statustext;
}
// Returns actual Status/Error
function getStatusTextLong() {
$statustext="";
switch ($this->status) {
case SAPRFC_OK:
$statustext.="<br><font size=4 color=green><pre>";
$statustext.="No errors detected.";
$statustext.="</font><br><font size=3 color=green><pre>";
$statustext.="<br><b>".$this->getStatusText()."</b>";
$statustext.="</pre></font>";
break;
case SAPRFC_APPL_ERROR:
$statustext.="<br><font size=4 color=red><pre>";
$statustext.="Application-Errors found during BAPI-Calls:";
$statustext.="</font><br><font size=3 color=red><pre>";
$statustext.="<br><b>".$this->getStatusText()."</b>";
$statustext.="</pre></font>";
break;
case SAPRFC_ERROR:
$statustext.="<br><font size=4 color=red><pre>";
$statustext.="Errors found during saprfc-Calls:";
$statustext.="</font><br><font size=3 color=red><pre>";
$statustext.="<br><b>".$this->getStatusText()."</b>";
$statustext.="</pre></font>";
break;
}
return $statustext;
}
function printStatus() {
echo $this->getStatusTextLong();
}
// Call RFC-Function in SAP
function callFunction($func_name="",$parameters) {
/* typical call:
$result=$saprfc->call_function("RFC_SYSTEM_INFO",
array( array("EXPORT","SYSTEM","MBS")
array("IMPORT","CODEPAGE")
array("IMPORT","DBNAME")
array("TABLE","APPLLIST",array())
)
);
*/
// Initialize Variables
$result_data=array();
$this->call_function_result=false;
// Check SAPRFC-Installation
if (! extension_loaded ("saprfc")) {
return $this->setStatus(SAPRFC_ERROR,"saprfc::callFunction()\n SAPRFC-Extension.dll not loaded.");
}
// Validate given data
if (empty($func_name)) {
return $this->setStatus(SAPRFC_ERROR,"saprfc::callFunction():\n No Function-Name given");
}
// Move Parameters to local Arrays
$func_params_import=array();
$func_params_tables=array();
$func_params_export=array();
foreach ($parameters as $key => $param) {
$type=$param[0];
$name=$param[1];
$value=isset($param[2])?$param[2]:"";
switch ($type) {
case "IMPORT":
$func_params_import[$name]=$value;
break;
case "EXPORT":
$func_params_export[$name]="";
break;
case "TABLE":
$func_params_tables[$name]=$value;
if (!is_array($value)) {
return $this->setStatus(SAPRFC_ERROR,"saprfc::callFunction()\n Wrong Parameter-Value for Table-Parameter ".$name.". We expected an Array.");
}
break;
default:
return $this->setStatus(SAPRFC_ERROR,"saprfc::callFunction()\n Wrong Parameter-Type '".$type."'. Must be IMPORT, EXPORT or TABLE.");
}
}
// Do Login (only done in method login(), if necessary)
if ($this->login()==SAPRFC_ERROR) {
return $this->getStatus();
}
// Discover Function in SAP
$this->func_id=@saprfc_function_discover($this->rfc_conn,$func_name);
if (!$this->func_id) {
return $this->setStatus(SAPRFC_ERROR,"saprfc::callFunction()\n Function module '".$func_name."' seems not to exist. function saprfc_function_discover() failed.");
}
// Set Import-Parameters
foreach ($func_params_import as $name => $value) {
$rc=@saprfc_import($this->func_id,$name,$value);
if (empty($rc)) {
return $this->setStatus(SAPRFC_ERROR,"saprfc::callFunction('".$func_name."')\n Import-Parameter=".$name. " could not be set. (Does it exist?)");
}
}
// Set Table-Parameters (importing-values)
foreach ($func_params_tables as $name => $value) {
$rc=@saprfc_table_init($this->func_id,$name);
if (empty($rc)) {
return $this->setStatus(SAPRFC_ERROR,"saprfc::callFunction('".$func_name."')\n Table-Parameter=".$name. " could not be set. (Does it exist?)");
}
foreach ($value as $key => $data) {
@saprfc_table_append($this->func_id,$name,$data);
}
}
// Execute Function
$result = @saprfc_call_and_receive ($this->func_id);
if ($result != SAPRFC_OK)
{
if ($result == SAPRFC_EXCEPTION ) {
return $this->setStatus(SAPRFC_ERROR,"saprfc::callFunction('".$func_name."')\n saprfc_call_and_receive(): Exception raised: ".@saprfc_exception($this->func_id));
} else {
return $this->setStatus(SAPRFC_ERROR,"saprfc::callFunction('".$func_name."')\n saprfc_call_and_receive(): Call error: ".@saprfc_error($this->func_id));
}
}
// Get Exporting-Parameters
foreach ($func_params_export as $name =>$value) {
$rc=@saprfc_export($this->func_id,$name);
// if (empty($rc)) { // llaegner removed (Reason: when export returns the -good- value "0", then empty also evaluates to true (thanks Alexander Gouriev)
if (!isset($rc)) {
return $this->setStatus(SAPRFC_ERROR,"saprfc::callFunction('".$func_name."')\n Export-Parameter=".$name. " could not be set (Does it exist?)".@saprfc_error($this->func_id));
} else {
$result_data[$name]=$rc;
}
}
// Get Table-Parameters
foreach ($func_params_tables as $name => $content) {
// Ausgabe-Tabelle initialisieren
$result_data[$name]=array();
$rows=@saprfc_table_rows($this->func_id,$name);
for ($i=1; $i<=$rows; $i++)
{
$result_data[$name][$i]=@saprfc_table_read ($this->func_id,$name,$i);
}
}
// Save function-call result for later analysis
$this->call_function_result=$result_data;
// Echo Debug-Information, if flagged
if ($this->debug)
@saprfc_function_debug_info($this->func_id);
// Falls es ein BAPI-Aufruf ist, Fehler raussuchen
if ($this->check_bapi_errors) {
$bapi_return=@saprfc_export($this->func_id,"RETURN");
if (isset($bapi_return) &&
is_array($bapi_return) &&
isset($bapi_return["MESSAGE"]) &&
$bapi_return["NUMBER"] != 0) {
// FINISH FUNCTION-CALL
$this->setStatus(SAPRFC_APPL_ERROR,$bapi_return);
return $result_data;
}
}
// Close Function-Execution and free results removed because it sometimes stops completly executing PHP!!
//@saprfc_function_free($this->func_id);
// FINISH FUNCTION-CALL
$this->setStatus(SAPRFC_OK,"call function '".$func_name."' successfull.");
return $result_data;
}
}
?>
, en que estaré fallando
y pegan aquí directamente la URL del GIST, y queda compartida en el tema