/** * Agrega un registro a la persistencia. * * @param \TSLIDataTransferObj $dto EL DATA TRANSFER OBJECT contendra todos los * datos requeridos del registro a agregar, se espera como parte de los parametros * los datos a usarse para crear el modelo a actualizar. * * Ya sea en caso de error o no , la respuesta estara contenida en el DTO. * * @see \TSLIBasicRecordDAO * @see \TSLBasicRecordDAO */ private function add(\TSLIDataTransferObj $dto) { // Obtengo referencia a los constraints $constraints =& $dto->getConstraints(); // el modelo $model =& $this->getModelToAdd($dto); /* @var $outMessage TSLOutMessage */ $outMessage =& $dto->getOutMessage(); $tmg = NULL; try { $tmg = \TSLTrxFactoryManager::instance()->getTrxManager(); $tmg->init(); /* @var $dao \TSLIBasicRecordDAO */ $dao = \TSLDAOLoaderHelper::loadDAO($this->IdDAOName); /* @var $ret string */ $ret = $dao->add($model, $constraints); $CI =& get_instance(); if ($ret === DB_ERR_ALLOK) { $outMessage->setSuccess(true); // El resultado es el modelo mismo con los datos pero el campo de version modificado. $outMessage->setResultData($model); } else { if ($ret == DB_ERR_RECORDEXIST) { $outMessage->setSuccess(false); // El resultado es el modelo mismo con los datos del registro modificados $outMessage->setResultData($model); $CI->lang->load($this->IdMSGLanguage); $outMessage->setAnswerMessage($CI->lang->line($this->msgPrefix . '_rec_alreadyexist'), $ret); } else { if ($ret == DB_ERR_FOREIGNKEY) { $outMessage->setSuccess(false); $CI->lang->load($this->IdMSGLanguage); $outMessage->setAnswerMessage($CI->lang->line($this->msgPrefix . '_rec_foreignkey_add'), $ret); } else { $CI->lang->load($this->IdMSGLanguage); $outMessage->setSuccess(false); // Si es iactivo enviamos el mensaje respectivo if ($ret == DB_ERR_RECORDINACTIVE) { $outMessage->setAnswerMessage($CI->lang->line($this->msgPrefix . '_rec_inactivo'), $ret); } else { $outMessage->setAnswerMessage($CI->lang->line($this->msgPrefix . '_servererror'), $ret); } } } } } catch (\Exception $ex) { // Coloco la excepcion en el DTO. // TODO: Internacionalizar. $processError = new \TSLProcessErrorMessage($ex->getCode(), 'Error Interno', $ex); $outMessage->addProcessError($processError); } if ($tmg !== NULL) { $tmg->end(); } }
/** * Genera la salida en JSON. * * @param TSLIDataTransferObj con el Data Transfer Object a procesar * @return un String con el DTO en formato JSON */ public function &process(TSLIDataTransferObj &$DTO) { $out = NULL; if (isset($DTO)) { /* @var $outMessage TSLOutMessage */ $outMessage =& $DTO->getOutMessage(); if (strlen($outMessage->getAnswerMesage()) > 0) { // STATUS_OK = 0 $out = 'status:-1'; $out .= ',data:"' . $outMessage->getAnswerMesage() . '- Cod.Error: ' . $outMessage->getErrorCode() . '"'; } if ($outMessage->isSuccess() == FALSE) { if ($outMessage->hasFieldErrors()) { // VALIDATION ERRORS $out = 'status:"-4"'; $fldErrors =& $outMessage->getFieldErrors(); // Si ya tiene longitud , ponemos una coma para indicar // un nuevo elemento. if (isset($out) and strlen($out) > 0) { $out .= ','; } // la lista de field errors. $out .= '"errors":{'; $count = count($fldErrors); for ($i = 0; $i < $count; $i++) { $out .= $fldErrors[$i]->getField() . ':"' . $fldErrors[$i]->getErrorMessage() . '"'; if ($i < $count - 1) { $out .= ','; } } $out .= '}'; } else { if ($outMessage->hasProcessErrors()) { // STATUS_FAILURE = -1 $out = 'status:-1'; $processErrors =& $outMessage->getProcessErrors(); // Si ya tiene longitud , ponemos una coma para indicar // un nuevo elemento. if (isset($out) and strlen($out) > 0) { $out .= ','; } // la lista de process errors. $out .= 'data:'; $count = count($processErrors); for ($i = 0; $i < $count; $i++) { if ($i > 0) { $out .= '\\n'; } $out .= '"'; $perr = str_replace(array("\"", "\r", "\n", "\r\n"), ' ', $processErrors[$i]->getErrorMessage()); // Si tiene excepcion procesamos. $ex = $processErrors[$i]->getException(); if (isset($ex)) { if (isset($perr)) { $out .= $perr . ' - ' . str_replace(array("\"", "\r", "\n", "\r\n"), ' ', $ex->getMessage()) . ' ** CodError = ' . $processErrors[$i]->getErrorCode(); } else { $out .= str_replace(array("\"", "\r", "\n", "\r\n"), ' ', $ex->getMessage()) . ' ** CodError =' . $processErrors[$i]->getErrorCode(); } } else { $out .= $perr . ' ** CodError =' . $processErrors[$i]->getErrorCode(); } $out .= '"'; if ($i < $count - 1) { $out .= ','; } } $out .= ''; } } } else { // STATUS_OK = 0 $out = 'status:0'; } // Si tiene parametros de salida los agregamos antres de la data. $outParams =& $outMessage->getOutputparameters(); if (is_array($outParams)) { foreach ($outParams as $i => $value) { $out .= ',' . $i . ':' . $value; } } // Si no hay errores de proceso evaluamos la data if ($outMessage->hasProcessErrors() == FALSE && strlen($outMessage->getAnswerMesage()) == 0) { $oneRecord = false; // Procesamos la data $data = $outMessage->getResultData(); if (isset($data)) { // Si no es un arreglo solo posee un registro if (!is_array($data)) { $oneRecord = true; } $out .= ',data:'; $this->_processExtraData($outMessage->getResultData()); $dataResults = TSLUtilsHelper::array_ut8_encode_recursive($outMessage->getResultData()); $out .= json_encode($dataResults); // Numero de registros = al numero de registros leidos + la posicion inicial en el set // siempre que haya mas de una respuesta $constraints =& $DTO->getConstraints(); if ($oneRecord === FALSE) { $numRecords = $constraints->getStartRow() + count($dataResults); } else { $numRecords = 1; } // SE hace de tal forma que si no es el ultimo registro osea numRecords es menor a la ultima fila solicitada // Ponemos como el total de registros una pagina mas (esto para evitar hacer un count) $out .= ',endRow : "' . $numRecords . '"'; $out .= ',totalRows: "' . ($numRecords < $constraints->getEndRow() || $constraints->getEndRow() == 0 ? $numRecords : $constraints->getEndRow() + ($constraints->getEndRow() - $constraints->getStartRow())) . '"'; // $out .= ',totalRows: "'. ( $numRecords < 1000 ? ($numRecords) : 1000 + (1000 - $constraints->getStartRow())) .'"'; } else { if ($out == NULL) { // STATUS_OK = 0 $out = 'status:-1'; $out .= ',data:"Error Desconocido"'; } } } $out = '{response:{' . $out . '}}'; return $out; } else { $out = '?????????????????'; return $out; } }