function WriteRangeTab($Range, $Sender) {
echo Wrap(
Anchor(
Capitalize($Range),
'settings?'
.http_build_query(array('Range' => $Range))
),
'li',
$Range == $Sender->Range ? array('class' => 'Active') : ''
)."\n";
}
function generate_GETOBJECT($tableName)
{
$input = "function &%{NAME}_get_object(\$%{ID_FIELD},\$data=false) {\n" . "\tglobal \$%{OBJECT};\n" . "\tif (!isset(\$%{OBJECT}[\"_\".\$%{ID_FIELD}.\"_\"])) {\n" . "\t\tif (\$data) {\n" . "\t\t\t//the db result handle was passed in\n" . "\t\t} else {\n" . "\t\t\t\$res=db_query(\"SELECT * FROM %{TABLE_NAME}\n" . "\t\t\t\tWHERE %{ID_FIELD}='\$%{ID_FIELD}'\");\n\n" . "\t\t\tif (db_numrows(\$res) <1 ) {\n" . "\t\t\t\t\$%{OBJECT}[\"_\".\$%{ID_FIELD}.\"_\"]=false;\n" . "\t\t\t\treturn false;\n" . "\t\t\t}\n" . "\t\t\t\$data =& db_fetch_array(\$res);\n\n" . "\t\t}\n" . "\t\t//\$ProjectGroup =& projectgroup_get_object(\$data[\"group_project_id\"]);\n" . "\t\t//\$%{OBJECT}[\"_\".\$%{ID_FIELD}.\"_\"]= new %{CLASS_NAME}(\$ProjectGroup,\$%{ID_FIELD},\$data);\n" . "\t\t\$%{OBJECT}[\"_\".\$%{ID_FIELD}.\"_\"]= new %{CLASS_NAME}(\$%{ID_FIELD},\$data);\n\n" . "\t}\n\n" . "\treturn \$%{OBJECT}[\"_\".\$%{ID_FIELD}.\"_\"];\n}\n\n";
$variables = array("%{NAME}", "%{OBJECT}", "%{TABLE_NAME}", "%{ID_FIELD}", "%{CLASS_NAME}");
$reducedName = strtolower($tableName);
$reducedName = str_replace("_", "", $reducedName);
$objName = strtoupper($reducedName) . "_OBJ";
$substitutions = array($reducedName, $objName, $tableName, $tableName . "_id", Capitalize($tableName));
$output = str_replace($variables, $substitutions, $input);
return $output;
}
