function Main()
 {
     switch ($this->formArray["formAction"]) {
         case "edit":
             $this->tpl->set_var("MessageBlock", "");
             $MachineriesActualUsesDetails = new SoapObject(NCCBIZ . "MachineriesActualUsesDetails.php", "urn:Object");
             if (!($xmlStr = $MachineriesActualUsesDetails->getMachineriesActualUsesDetails($this->formArray["machineriesActualUsesID"]))) {
                 $this->tpl->set_block("rptsTemplate", "Table", "TableBlock");
                 $this->tpl->set_var("TableBlock", "record not found");
             } else {
                 if (!($domDoc = domxml_open_mem($xmlStr))) {
                     $this->tpl->set_block("rptsTemplate", "Table", "TableBlock");
                     $this->tpl->set_var("TableBlock", "error xmlDoc");
                 } else {
                     $machineriesActualUses = new MachineriesActualUses();
                     $machineriesActualUses->parseDomDocument($domDoc);
                     $this->formArray["machineriesActualUsesID"] = $machineriesActualUses->getMachineriesActualUsesID();
                     $this->formArray["code"] = $machineriesActualUses->getCode();
                     $this->formArray["reportCode"] = $machineriesActualUses->getReportCode();
                     $this->formArray["description"] = $machineriesActualUses->getDescription();
                     $this->formArray["value"] = $machineriesActualUses->getValue();
                     $this->formArray["status"] = $machineriesActualUses->getStatus();
                 }
             }
             break;
         case "save":
             if ($this->codeAlreadyExists() == true) {
                 $this->message = "Error. Cannot Save. Code already exists.";
                 $this->tpl->set_var("message", $this->message);
                 $this->tpl->parse("MessageBlock", "Message", true);
                 break;
             } else {
                 $this->tpl->set_var("MessageBlock", "");
             }
             $MachineriesActualUsesEncode = new SoapObject(NCCBIZ . "MachineriesActualUsesEncode.php", "urn:Object");
             if ($this->formArray["machineriesActualUsesID"] != "") {
                 $MachineriesActualUsesDetails = new SoapObject(NCCBIZ . "MachineriesActualUsesDetails.php", "urn:Object");
                 if (!($xmlStr = $MachineriesActualUsesDetails->getMachineriesActualUsesDetails($this->formArray["machineriesActualUsesID"]))) {
                     exit("record not found");
                 } else {
                     if (!($domDoc = domxml_open_mem($xmlStr))) {
                         $this->tpl->set_block("rptsTemplate", "Table", "TableBlock");
                         $this->tpl->set_var("TableBlock", "error xmlDoc");
                     } else {
                         $machineriesActualUses = new MachineriesActualUses();
                         $machineriesActualUses->parseDomDocument($domDoc);
                         $machineriesActualUses->setMachineriesActualUsesID($this->formArray["machineriesActualUsesID"]);
                         $machineriesActualUses->setCode($this->formArray["code"]);
                         $machineriesActualUses->setReportCode($this->formArray["reportCode"]);
                         $machineriesActualUses->setDescription($this->formArray["description"]);
                         $machineriesActualUses->setValue($this->formArray["value"]);
                         $machineriesActualUses->setStatus($this->formArray["status"]);
                         $machineriesActualUses->setDomDocument();
                         $doc = $machineriesActualUses->getDomDocument();
                         $xmlStr = $doc->dump_mem(true);
                         if (!($ret = $MachineriesActualUsesEncode->updateMachineriesActualUses($xmlStr))) {
                             exit("error update");
                         }
                     }
                 }
             } else {
                 $machineriesActualUses = new MachineriesActualUses();
                 $machineriesActualUses->setMachineriesActualUsesID($this->formArray["machineriesActualUsesID"]);
                 $machineriesActualUses->setCode($this->formArray["code"]);
                 $machineriesActualUses->setReportCode($this->formArray["reportCode"]);
                 $machineriesActualUses->setDescription($this->formArray["description"]);
                 $machineriesActualUses->setValue($this->formArray["value"]);
                 $machineriesActualUses->setStatus($this->formArray["status"]);
                 $machineriesActualUses->setDomDocument();
                 $doc = $machineriesActualUses->getDomDocument();
                 $xmlStr = $doc->dump_mem(true);
                 if (!($ret = $MachineriesActualUsesEncode->saveMachineriesActualUses($xmlStr))) {
                     exit("error save");
                 }
             }
             $this->formArray["machineriesActualUsesID"] = $ret;
             header("location: MachineriesActualUsesClose.php" . $this->sess->url("") . $this->sess->add_query(array("machineriesActualUsesID" => $ret)));
             //header("location: MachineriesActualUsesEncode.php");
             exit;
             break;
         case "cancel":
             header("location: MachineriesActualUsesClose.php" . $this->sess->url("") . $this->sess->add_query(array("machineriesActualUsesID" => $ret)));
             //header("location: MachineriesActualUsesList.php");
             exit;
             break;
         default:
             $this->tpl->set_block("rptsTemplate", "MachineriesActualUsesID", "MachineriesActualUsesIDBlock");
             $this->tpl->set_var("MachineriesActualUsesIDBlock", "");
             $this->tpl->set_block("rptsTemplate", "ACK", "ACKBlock");
             $this->tpl->set_var("ACKBlock", "");
             $this->tpl->set_var("MessageBlock", "");
     }
     $this->setForm();
     $this->tpl->parse("templatePage", "rptsTemplate");
     $this->tpl->finish("templatePage");
     $this->tpl->p("templatePage");
 }