$oDirectory->close();
          }
          $sNewProUid = $sProUid;
        }

        //Disable current Process and create a new version of the Process
        if ( $option == 2 ) {
          $oProcess->disablePreviousProcesses( $sProUid );
          $sNewProUid = $oProcess->getUnusedProcessGUID() ;
          $oProcess->setProcessGuid ( $oData, $sNewProUid );
          $oProcess->setProcessParent( $oData, $sProUid );
          $oData->process['PRO_TITLE'] = "New - " . $oData->process['PRO_TITLE'] . ' - ' . date ( 'M d, H:i' );
          $oProcess->renewAll ( $oData );

          if ($processFileType == "pm") {
            $oProcess->createProcessFromData ($oData, $path . $filename );
          }
          else {
            if ( !isset( $oData->tasks) ) {
              $oData->tasks = array();
            }
            $tasks =  $oData->tasks;
            $oProcess->createProcessFromDataXpdl ($oData,$tasks);                   
          }
        }

        //Create a completely new Process without change the current Process
        if ( $option == 3 ) {
          //krumo ($oData); die;
          $sNewProUid = $oProcess->getUnusedProcessGUID() ;
          $oProcess->setProcessGuid ( $oData, $sNewProUid );