function Nomina_AnnoAnteriorData($idrelevamiento)
{
/* --Para ver si es con nómina con o sin riesgo: */
$params = array(":IDRELEVAMIENTO" => $idrelevamiento);
$sql = " SELECT FECHA, IDRELEV, TABLA\n\t\t\t FROM (SELECT r.sr_fecha fecha, r.sr_id idrelev, 'ART.PSR_SINRIESGO' tabla\n\t\t\t\t\t\tFROM art.psr_sinriesgo r\n\t\t\t\t\t WHERE TO_CHAR (r.sr_fecha, 'yyyy') = TO_CHAR (SYSDATE, 'yyyy') - 1\n\t\t\t\t\t\t AND NOT EXISTS (SELECT cn_fecharelevamiento fecha, cn_id idrelev\n\t\t\t\t\t\t\t\t\t\t\t FROM hys.hcn_cabeceranomina\n\t\t\t\t\t\t\t\t\t\t\tWHERE cn_id = :IDRELEVAMIENTO \n\t\t\t\t\t\t\t\t\t\t\t\tAND cn_idestado NOT IN (3, 6)\n\t\t\t\t\t\t\t\t\t\t\t\tAND TO_CHAR (cn_fecharelevamiento, 'yyyy') = TO_CHAR (SYSDATE, 'yyyy') - 1\n\t\t\t\t\t\t\t\t\t\t\t\tAND sr_fecha < cn_fecharelevamiento)\n\t\t\t\t\t UNION\n\t\t\t\t\t --con riesgo\n\t\t\t\t\t SELECT c.cn_fecharelevamiento fecha, c.cn_id idrelev, 'HYS.HCN_CABECERANOMINA' tabla\n\t\t\t\t\t\tFROM hys.hcn_cabeceranomina c\n\t\t\t\t\t WHERE c.cn_idestado NOT IN (3, 6)\n\t\t\t\t\t\t AND TO_CHAR (c.cn_fecharelevamiento, 'yyyy') = TO_CHAR (SYSDATE, 'yyyy') - 1\n\t\t\t\t\t\t AND NOT EXISTS (SELECT sr_fecha fecha, sr_id idrelev\n\t\t\t\t\t\t\t\t\t\t\t FROM art.psr_sinriesgo\n\t\t\t\t\t\t\t\t\t\t\tWHERE sr_id = :IDRELEVAMIENTO \n\t\t\t\t\t\t\t\t\t\t\t\tAND TO_CHAR (sr_fecha, 'yyyy') = TO_CHAR (SYSDATE, 'yyyy') - 1\n\t\t\t\t\t\t\t\t\t\t\t\tAND sr_fecha > cn_fecharelevamiento))\n\t\t\t WHERE idrelev = :IDRELEVAMIENTO; ";
try {
global $conn;
$stmt = DBExecSql($conn, $sql, $params);
while ($row = DBGetQuery($stmt)) {
return $row;
}
$row = array("FECHA" => '', "IDRELEV" => '0', "TABLA" => '');
return $row;
} catch (Exception $e) {
RetronaXML($e->getMessage());
}
}
function BuscarDetalleEstableci($idEstablecimiento, $cuit)
{
/* BUSCA DATOS DE UN ESTABLECIMIENTO */
$params = array(":IDESTABLECIMIENTO" => $idEstablecimiento, ":CUIT" => $cuit);
$sql = " SELECT ES_NOMBRE, ES_IDACTIVIDAD, AC_DESCRIPCION\n\t\t\t FROM afi.aes_establecimiento\n\t\t\t INNER JOIN afi.aco_contrato ON es_contrato = co_contrato\n\t\t\t INNER JOIN afi.aem_empresa ON em_id = co_idempresa\n\t\t\t INNER JOIN cac_actividad cac ON cac.ac_id = ES_IDACTIVIDAD\n\t\t\t WHERE em_cuit = :CUIT\n\t\t\t\t AND es_nroestableci = :IDESTABLECIMIENTO ";
try {
global $conn;
$stmt = DBExecSql($conn, $sql, $params);
while ($row = DBGetQuery($stmt)) {
return $row;
}
$row = array("ES_NOMBRE" => '0', "ES_IDACTIVIDAD" => '', "AC_DESCRIPCION" => '');
return $row;
} catch (Exception $e) {
RetronaXML($e->getMessage());
}
}
} catch (Exception $e) {
RetronaXML($e->getMessage());
}
}
if ($_REQUEST['FUNCION'] == "UpdateInstanciaAbmMod") {
$JuicioEnTramite = utf8_decode(ValorParametroRequest('NroJuicio'));
$Jurisdiccion = utf8_decode(ValorParametroRequest('cmbJurisdiccion'));
$Fuero = utf8_decode(ValorParametroRequest('cmbFuero'));
$Juzgado = utf8_decode(ValorParametroRequest('cmbJuzgadoNro'));
$Secretaria = utf8_decode(ValorParametroRequest('cmbSecretaria'));
$Instancia = '';
$NroExpediente = utf8_decode(ValorParametroRequest('txtNroExp'));
$AnioExpediente = utf8_decode(ValorParametroRequest('txtAnioExp'));
$Motivo = utf8_decode(ValorParametroRequest('cmbMotivo'));
$Detalle = utf8_decode(ValorParametroRequest('txtDetalle'));
$LoginName = utf8_decode(ValorParametroRequest('usuario'));
$nroInstancia = utf8_decode(ValorParametroRequest('nroInstancia'));
$EstadoMediacion = '';
$FechaIngreso = utf8_decode(ValorParametroRequest('txtFecha'));
try {
$resultado = UpdateInstanciaAbmMod($JuicioEnTramite, $Jurisdiccion, $Fuero, $Juzgado, $Secretaria, $Instancia, $NroExpediente, $AnioExpediente, $Motivo, $Detalle, $LoginName, $nroInstancia, $EstadoMediacion, $FechaIngreso);
if ($resultado) {
RetronaXML("OK");
} else {
RetronaXML("FALLO");
}
} catch (Exception $e) {
RetronaXML($e->getMessage());
}
}
}