4D (PDO)
PHP Manual

PDO_4D の例

(バージョン情報なし。おそらく SVN 版にしか存在しないでしょう)

PDO_4D の例 — PDO_4D の例

この例は、4D SQL サーバーへの接続からクエリの実行、 データの読み込み、そしてサーバーからの切断までの方法を示したものです。

例1 PDO_4D の基本例

<?php
$dsn = '4D:host=localhost;charset=UTF-8';
$user = 'test';
$pass = 'test';

// 4D SQL サーバーに接続します
$db = new PDO($dsn, $user, $pass);

try {
    $db->exec('CREATE TABLE test(id varCHAR(1) NOT NULL, val VARCHAR(10))');
} catch (PDOException $e) {
    die("Erreur 4D : " . $e->getMessage());
}
        
$db->exec("INSERT INTO test VALUES('A', 'B')");
$db->exec("INSERT INTO test VALUES('C', 'D')");
$db->exec("INSERT INTO test VALUES('E', 'F')");

$stmt = $db->prepare('SELECT id, val from test');

$stmt->execute();
print_r($stmt->fetchAll());

unset($stmt);
unset($db);
?>

上の例の出力は以下となります。

    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
        )

)

この例は、4D 言語でクエリを実行してその結果を PDO_4D で読み込む方法を示すものです。

例2 pdo_4d からの 4D 言語へのアクセス

method という 4D メソッドを準備します。 メソッドのプロパティで、オプション Available via SQL をチェックしておくことを忘れないようにしましょう。 4D のコードは次のようになります。 

C_TEXTE($0)
$0:=Version application(*);

この 4D メソッドを使うための PHP のコードは以下のとおりです。

<?php
$dsn = '4D:host=localhost;charset=UTF-8';
$user = 'test';
$pass = 'test';

// 4D SQL サーバーに接続します
$db = new PDO($dsn, $user, $pass);

$stmt = $db->prepare('SELECT {FN method() AS VARCHAR } FROM _USER_SCHEMAS LIMIT 1');

$stmt->execute();
print_r($stmt->fetchAll());

unset($stmt);
unset($db);
?>

上の例の出力は以下となります。

(
    [0] => Array
        (
            [<expression>] => F0011140
            [0] => F0011140
        )

)

例3 4D テーブル名のエスケープ

この例では、4D SQL クエリ内の文字をエスケープする方法を示します。

<?php
$dsn = '4D:host=localhost;charset=UTF-8';
$user = 'test';
$pass = 'test';

// 4D SQL サーバーに接続します
$db = new PDO($dsn, $user, $pass);

$objects = array('[',']','[]','][','[[',']]','[[[',']]]','TBL ]]32[23');

foreach($objects as $id => $object) {
    $object = str_replace(']',']]', $object);
    print "$object\n";
    
    $db->exec('CREATE TABLE IF NOT EXISTS ['.$object.'](['.$object.'] FLOAT)');

    $req = "INSERT INTO [$object] ([$object]) VALUES ($id);";
    $db->query($req);

    $q = $db->prepare("SELECT [$object] FROM [$object]");
    $q->execute();
    $x[] = $q->fetch(PDO::FETCH_NUM);

    $db->exec('DROP TABLE ['.$object.'];');
}

?>

上の例の出力は以下となります。

[
]]
[]]
]][
[[
]]]]
[[[
]]]]]]
TBL ]]]]32[23

4D (PDO)
PHP Manual