function save_clon()
 {
     $this->series = new tab_series();
     $tseries = new tab_series();
     $tseries->setRequest2Object($_REQUEST);
     $id_serie = 0;
     $tseries->setSer_id($_REQUEST['ser_id']);
     $tseries->setUni_id($_REQUEST['uni_id']);
     $tseries->setTco_id($_REQUEST['tco_id']);
     $tseries->setRed_id($_REQUEST['red_id']);
     if ($_REQUEST['ser_par']) {
         $codigo = $this->generaCodigo($_REQUEST['ser_par']);
         $ser_nivel = $this->generaNivel($codigo);
         $tseries->setSer_codigo($codigo);
         $tseries->setSer_nivel($ser_nivel);
         $tseries->setSer_par($_REQUEST['ser_par']);
         $tseries->setSer_contador('0');
         $tseries->setSer_categoria($_REQUEST['ser_categoria']);
         $tseries->setSer_corr($_REQUEST['ser_corr']);
         $tseries->setSer_exp($_REQUEST['ser_exp']);
         $tseries->setSer_estado(1);
         $id_serie = $tseries->insert2();
         // Actualizar Código Seccion
         $row2 = $this->series->dbselectByField("ser_id", $_REQUEST['ser_par']);
         $row2 = $row2[0];
         $this->series->setSer_id($row2->ser_id);
         $this->series->setUni_id($row2->uni_id);
         $this->series->setTco_id($row2->tco_id);
         $this->series->setRed_id($row2->red_id);
         $this->series->setSer_codigo($row2->ser_codigo);
         $this->series->setSer_par($row2->ser_par);
         $this->series->setSer_categoria($row2->ser_categoria);
         $ser_contador = $row2->ser_contador + 1;
         $this->series->setSer_contador($ser_contador);
         $this->series->setSer_estado(1);
         $this->series->update();
     } else {
         $codigo = $this->getCodigoPadre();
         if ($_REQUEST['ser_tipo'] == 'R') {
             $tseries->setSer_codigo('');
         } else {
             $tseries->setSer_codigo($codigo . DELIMITER . "0");
         }
         $ser_nivel = 0;
         $tseries->setSer_nivel($ser_nivel);
         $tseries->setSer_par(-1);
         $tseries->setSer_contador('0');
         $tseries->setSer_categoria($_REQUEST['ser_categoria']);
         $tseries->setSer_corr($_REQUEST['ser_corr']);
         $tseries->setSer_exp($_REQUEST['ser_exp']);
         $tseries->setSer_estado(1);
         $id_serie = $tseries->insert2();
     }
     // CLON serie
     $serclon_id = $_REQUEST['serclon_id'];
     // Seleccionar descripcion de tramite de serietramite
     $sql = "SELECT\r\n                tab_series.ser_id,\r\n                tab_tramite.tra_id,\r\n                tab_tramite.tra_orden,\r\n                tab_tramite.tra_descripcion,\r\n                tab_tramite.tra_estado\r\n                FROM\r\n                tab_series\r\n                INNER JOIN tab_serietramite ON tab_series.ser_id = tab_serietramite.ser_id\r\n                INNER JOIN tab_tramite ON tab_tramite.tra_id = tab_serietramite.tra_id\r\n                WHERE tab_tramite.tra_estado = 1\r\n                AND tab_series.ser_id = '{$serclon_id}'\r\n                ORDER BY tab_series.ser_id, tab_tramite.tra_id, tra_orden";
     $result = $this->series->dbselectBySQL($sql);
     foreach ($result as $un) {
         // Recorre el conjunto de registros
         // Insertar
         // insert tramite
         $tramite = new tab_tramite();
         $tramite->setRequest2Object($_REQUEST);
         $tramite->setTra_orden($un->tra_orden);
         $tramite->setTra_codigo($un->tra_orden);
         $tramite->setTra_descripcion($un->tra_descripcion);
         $tramite->setTra_fecha_crea(date("Y-m-d"));
         $tramite->setTra_usuario_crea($_SESSION['USU_ID']);
         $tramite->setTra_estado(1);
         $tra_id = $tramite->insert();
         // insert serie tramite
         $seriet = new Tab_serietramite();
         $seriet->setSer_id($id_serie);
         $seriet->setTra_id($tra_id);
         $seriet->setSts_estado(1);
         $seriet->insert();
         // Seleccionar descripcion de codigo de tramitecuerpos
         $sql = "SELECT\r\n                    tab_tramite.tra_id,\r\n                    tab_cuerpos.cue_id,\r\n                    tab_cuerpos.cue_orden,\r\n                    tab_cuerpos.cue_descripcion\r\n                    FROM\r\n                    tab_tramite\r\n                    INNER JOIN tab_tramitecuerpos ON tab_tramite.tra_id = tab_tramitecuerpos.tra_id\r\n                    INNER JOIN tab_cuerpos ON tab_cuerpos.cue_id = tab_tramitecuerpos.cue_id\r\n                    WHERE\r\n                    tab_tramite.tra_estado = 1\r\n                    AND tab_cuerpos.cue_estado = 1\r\n                    AND tab_tramite.tra_id = '{$un->tra_id}'\r\n                    ORDER BY\r\n                    tab_tramite.tra_id, tab_cuerpos.cue_orden";
         $result2 = $this->series->dbselectBySQL($sql);
         foreach ($result2 as $un2) {
             // Recorre el conjunto de registros
             // Insertar
             // insert cuerpos
             $tcuerpos = new tab_cuerpos();
             $tcuerpos->setRequest2Object($_REQUEST);
             //                $tcuerpos->setCue_id($un2->cue_id);
             $tcuerpos->setCue_orden($un2->cue_orden);
             $tcuerpos->setCue_codigo($un2->cue_orden);
             $tcuerpos->setCue_descripcion($un2->cue_descripcion);
             $tcuerpos->setCue_estado(1);
             $cue_id = $tcuerpos->insert();
             // insert tramite cuerpos
             $tramitecc = new tab_tramitecuerpos();
             $tramitecc->setCue_id($cue_id);
             $tramitecc->setTra_id($tra_id);
             $tramitecc->setTrc_estado(1);
             $tramitecc->insert();
         }
     }
     Header("Location: " . PATH_DOMAIN . "/series/");
 }