| 
<?
/*    =======================================
 Copyright 1998 - 2010 - E Net Arch
 This program is distributed under the terms of the GNU
 General Public License (or the Lesser GPL).
 ======================================= */
 
 function dirPath() { return ("../../"); }
 
 Include_Once (dirPath() . "Shared/_app.inc");
 
 Function php_Main ()
 {
 $aryRoots = gblLadder()->getRoots();
 $fldrRoot= gblLadder()->getItem ($aryRoots [1]);
 
 $clsCommon_People = gblLadder()->getClass ("Common_People")->ID();
 $clsCommon_ContactTypes = gblLadder()->getClass ("Common_ContactTypes")->ID();
 $clsCommon_ContactTypes_Ref = gblLadder()->getClass ("Common_ContactTypes_Ref")->ID();
 
 $fldrContactTypes = $fldrRoot->Create_Folder ("Contact Types", "Contact Types are stored here", $clsCommon_ContactTypes);
 $fldrContactTypes->Store();
 
 $fldrPeople = $fldrRoot->Create_Folder ("People", "People are stored here", $clsCommon_People);
 $fldrPeople->Store();
 
 $refContactTypes = $fldrPeople->Create_Reference ("ContactTypes", "Reference tot he folder that contains the Task Types", $clsCommon_ContactTypes_Ref, $fldrContactTypes);
 $refContactTypes->Store();
 
 print ("The People Folder ID is " . $fldrPeople->ID() . "<BR>");
 }
 ?>
 |