(No version information available, might only be in Git)
Ejemplos con PDO_4D — Ejemplos con PDO_4D
Este ejemplo básico muestra cómo conectarse, ejecutar una consulta, leer datos y desconectarse de un servidor de 4D SQL.
Ejemplo #1 Ejemplo básico con PDO_4D
<?php
$dsn = '4D:host=localhost;charset=UTF-8';
$usuario = 'test';
$contraseña = 'test';
// Conexión al servidor de 4D SQL
$bd = new PDO($dsn, $usuario, $contraseña);
try {
$bd->exec('CREATE TABLE test(id varCHAR(1) NOT NULL, val VARCHAR(10))');
} catch (PDOException $e) {
die("Error 4D : " . $e->getMessage());
}
$bd->exec("INSERT INTO test VALUES('A', 'B')");
$bd->exec("INSERT INTO test VALUES('C', 'D')");
$bd->exec("INSERT INTO test VALUES('E', 'F')");
$sentencia = $bd->prepare('SELECT id, val from test');
$sentencia->execute();
print_r($sentencia->fetchAll());
unset($sentencia);
unset($bd);
?>
El resultado del ejemplo sería:
Array ( [0] => Array ( [ID] => A [0] => A [VAL] => B [1] => B ) [1] => Array ( [ID] => C [0] => C [VAL] => D [1] => D ) [2] => Array ( [ID] => E [0] => E [VAL] => F [1] => F ) )
Este ejemplo muestra cómo ejecutar una consulta en el lenguaje de 4D, y cómo leer el resultado a través de PDO_4D.
Ejemplo #2 Acceder al lenguaje de 4D desde pdo_4d
Configurar un método de 4D, llamado method. Asegurarse que en las propiedades del método, la opción Disponbile mediante SQL es comprobada. El código de 4D es el siguiente.
C_TEXTE($0) $0:=Version application(*);
El código de PHP para utilizar el método de 4D de arriba es:
<?php
$dsn = '4D:host=localhost;charset=UTF-8';
$usuario = 'test';
$contraseña = 'test';
// Conexión al servidor de 4D
$bd = new PDO($dsn, $usuario, $contraseña);
$sentencia = $bd->prepare('SELECT {FN method() AS VARCHAR } FROM _USER_SCHEMAS LIMIT 1');
$sentencia->execute();
print_r($sentencia->fetchAll());
unset($sentencia);
unset($bd);
?>
El resultado del ejemplo sería:
( [0] => Array ( [<expression>] => F0011140 [0] => F0011140 ) )
Ejemplo #3 Escapar nombres de tablas de 4D
Este ejemplo ilustra cómo escapar caracteres en una consulta SQL de 4D.
<?php
$dsn = '4D:host=localhost;charset=UTF-8';
$usuario = 'test';
$contraseña = 'test';
// Conexión al servidor de 4D
$bd = new PDO($dsn, $usuario, $contraseña);
$objetos = array('[',']','[]','][','[[',']]','[[[',']]]','TBL ]]32[23');
foreach($objetos as $id => $objeto) {
$objeto = str_replace(']',']]', $objeto);
print "$objeto\n";
$bd->exec('CREATE TABLE IF NOT EXISTS ['.$objeto.'](['.$objeto.'] FLOAT)');
$req = "INSERT INTO [$objeto] ([$objeto]) VALUES ($id);";
$bd->query($req);
$q = $bd->prepare("SELECT [$objeto] FROM [$objeto]");
$q->execute();
$x[] = $q->fetch(PDO::FETCH_NUM);
$bd->exec('DROP TABLE ['.$objeto.'];');
}
?>
El resultado del ejemplo sería:
[ ]] []] ]][ [[ ]]]] [[[ ]]]]]] TBL ]]]]32[23