2014-12-16 23:11:51 -05:00

125 lines
4.6 KiB
PHP

<?php
use Objectify\Objects\DataType;
use Objectify\Objects\MultipleInstanceProperty;
use Objectify\Objects\SingleInstanceProperty;
use Objectify\Objects\TenantObjectProperty;
use Objectify\Objects\TenantObjectInstanceProperty;
use Objectify\Objects\TenantObjectInstancePropertyValue;
use Objectify\Objects\TenantObjectMethodParameter;
use Objectify\Objects\TenantStringTableEntry;
use Objectify\Objects\TenantEnumerationChoice;
$objScriptLanguage = $tenant->CreateObject("ScriptLanguage",
array
(
new TenantStringTableEntry($langEnglish, "Script Language")
),
array
(
new TenantStringTableEntry($langEnglish, "A programming language used to write scripts.")
),
array
(
new TenantObjectInstanceProperty("Name", DataType::GetByName("Text")),
new TenantObjectInstanceProperty("ContentType", DataType::GetByName("Text"))
));
$objClientScriptLanguage = $tenant->CreateObject("ClientScriptLanguage",
array
(
new TenantStringTableEntry($langEnglish, "Client Script Language")
),
array
(
new TenantStringTableEntry($langEnglish, "A programming language used to write scripts to be run on the client.")
),
array
(
// property name, data type, default value, value required?, enumeration, require choice from enumeration?
new TenantObjectInstanceProperty("Name", DataType::GetByName("Text")),
new TenantObjectInstanceProperty("ContentType", DataType::GetByName("Text"))
), $objScriptLanguage,
array
(
array
(
new TenantObjectInstancePropertyValue("Name", "JavaScript"),
new TenantObjectInstancePropertyValue("ContentType", "text/javascript")
),
array
(
new TenantObjectInstancePropertyValue("Name", "VBScript"),
new TenantObjectInstancePropertyValue("ContentType", "text/vbscript")
)
));
$objServerScriptLanguage = $tenant->CreateObject("ServerScriptLanguage",
array
(
new TenantStringTableEntry($langEnglish, "Server Script Language")
),
array
(
new TenantStringTableEntry($langEnglish, "A programming language used to write scripts to be run on the server.")
),
array
(
// property name, data type, default value, value required?, enumeration, require choice from enumeration?
new TenantObjectInstanceProperty("Name", DataType::GetByName("Text")),
new TenantObjectInstanceProperty("ContentType", DataType::GetByName("Text"))
), $objScriptLanguage, array
(
array
(
new TenantObjectInstancePropertyValue("Name", "PHP"),
new TenantObjectInstancePropertyValue("ContentType", "application/x-php")
)
));
$objScript = $tenant->CreateObject("Script",
array
(
new TenantStringTableEntry($langEnglish, "Script")
),
array
(
new TenantStringTableEntry($langEnglish, "A code blob that can be used in various scriptable areas.")
),
array
(
// property name, data type, default value, value required?, enumeration, require choice from enumeration?
new TenantObjectInstanceProperty("Name", DataType::GetByName("Text")),
new TenantObjectInstanceProperty("Description", DataType::GetByName("Text")),
new TenantObjectInstanceProperty("Language", DataType::GetByName("SingleInstance"), new SingleInstanceProperty(null, array($objScriptLanguage))),
new TenantObjectInstanceProperty("Content", DataType::GetByName("CodeBlob"))
));
$objClientScript = $tenant->CreateObject("ClientScript",
array
(
new TenantStringTableEntry($langEnglish, "Client Script")
),
array
(
new TenantStringTableEntry($langEnglish, "A code blob that can be used in various scriptable areas on the client.")
),
array
(
// property name, data type, default value, value required?, enumeration, require choice from enumeration?
new TenantObjectInstanceProperty("Name", DataType::GetByName("Text")),
new TenantObjectInstanceProperty("Description", DataType::GetByName("Text")),
new TenantObjectInstanceProperty("Language", DataType::GetByName("SingleInstance"), new SingleInstanceProperty(null, array($objClientScriptLanguage))),
new TenantObjectInstanceProperty("Content", DataType::GetByName("CodeBlob"))
), $objScript);
$objServerScript = $tenant->CreateObject("ServerScript", "A code blob that can be used in various scriptable areas on the server.", array
(
// property name, data type, default value, value required?, enumeration, require choice from enumeration?
new TenantObjectInstanceProperty("Name", DataType::GetByName("Text")),
new TenantObjectInstanceProperty("Description", DataType::GetByName("Text")),
new TenantObjectInstanceProperty("Language", DataType::GetByName("SingleInstance"), new SingleInstanceProperty(null, array($objServerScriptLanguage))),
new TenantObjectInstanceProperty("Content", DataType::GetByName("CodeBlob"))
), $objScript);
?>