<? php;
if ($_GET['PHPSESSID']) session_id($_GET['PHPSESSID']);
else session_id(md5(uniqid(rand())));
session_start();
/*if (!$_SESSION['operador'] or !$_SESSION['nivel'])
{ echo "<script>";
echo "window.alert('Operador no Ingresado');";
echo "location.href='../index_02.php?';</script>";
return; }
if ($_SESSION['nivel']<7)
{ echo "<script>";
echo "window.alert('Operador no Habilitado');";
echo "location.href='../index_02.php?';</script>";
return;
}
*/
//----------- CONSULTA POR FECHAS: DATOS ENCONTRADOS --------------- //
include_once('../clases/class.TemplatePower.inc.php');include_once('../clases/adodb.inc.php');include_once('../rutinas.php');include_once("../../php/bases.php");
$ADODB_FETCH_MODE = ADODB_FETCH_ASSOC;
$db = NewADOConnection('postgres');$db->Connect(basex("profe_carga","hostname"),basex("profe_carga","username"),basex("profe_carga","password"),basex("profe_carga","database"));
# conversion por Latin1
$sql="SET CLIENT_ENCODING TO LATIN1" ;
$rs = $db->Execute($sql); if ($rs == false) { echo $sql; die();}
global $db_lista;
basex("lista_carga","username"),basex("lista_carga","password"),basex("lista_carga","database")); $db_lista = NewADOConnection('postgres'); $db_lista->Connect("linjus4:6666", basex("lista1_carga","username"),basex("lista1_carga","password"),basex("lista1_carga","database")); $rs2 = $db_lista->Execute("set client_encoding to LATIN1");
$f_dia=mktime(0,0,0);
$fechahoy= date('Y-m-d',$f_dia);
function desc($arr1,$arr2,$cod)
{$n=0; while (true)
{ $n++; if($arr1[$n] == $cod)
{$desc=$arr2[$n]; break;} if($n==1000)
{$desc="Sin Datos"; break;} }
return $desc;
}
function destino($nomen)
{global $db_lista; $dest=" --- ";
$sql="select desclarga from parametros.nomen_nroficin where nomenclador='".$nomen."';";
$rs2 = $db_lista->Execute($sql);
if ($rs2 == true)
$dest=substr($rs2->fields[desclarga],0,50);
$dest=$rs2->fields[desclarga];
return $dest;
}
function observa($texto)
{ if ($texto=='') $texto=' ';
return $texto;
}
$xfecha1 = $_GET['xfecha1'];
$xfecha2 = $_GET['xfecha2'];
$idexpte = $_GET['id_expte'];
$nexpte = $_GET['n_expte'];
$fecing = $_GET['fingreso'];
$nexpte_full = $_GET['nro_expte'];
$caratula = $_GET['caratula'];
$usu=$_GET['pusuario'];
$usuario = $_SESSION['operador']; //aca el valor ya desaparecio y no se por que-?
echo $usu.'- '.$usuario.' '.$caratula;
# Invierte las fechas para el query
$xfecha = substr($fecing,8,2).'-'.substr($fecing,5,2).'-'.substr($fecing,0,4);
$fecha1 = "'".substr($xfecha1,6,4).'-'.substr($xfecha1,3,2).'-'.substr($xfecha1,0,2)."'";
$fecha2 = "'".substr($xfecha2,6,4).'-'.substr($xfecha2,3,2).'-'.substr($xfecha2,0,2)."'";
$plant= new TemplatePower("cons_mov.htm"); $plant->prepare();
# Lee las novedades y motivos
$sql="select * from parametros where c_param >='5000' and c_param < '5999' order by c_param";
$rs_p = $db->Execute($sql);
$n=0;
while (!$rs_p->EOF) { $n++;
$c_mot[$n]=$rs_p->fields[c_param];
$motivo[$n]= trim($rs_p->fields[d_param]);
$rs_p->MoveNext(); }
$sql="select * from parametros where c_param >='4900' and c_param < '4999' order by c_param";
$rs_p = $db->Execute($sql);
$n=0;
while (!$rs_p->EOF)
{ $n++;
$c_nov[$n]=$rs_p->fields[c_param];
$novedad[$n]= trim($rs_p->fields[d_param]);
$rs_p->MoveNext();
}
# ampliaciones de codigos de motivos
// listas hasta 20 novedades
$n++;
$c_nov[$n]='4906';
$novedad[$n]= 'Lista';
$sql="select * from novedades where id_expte = $idexpte order by fec_novedad";
$rs = $db->Execute($sql);
if ($rs == false) { echo $rs->ErrorMsg()." sql-> ".$sql;
die(); }
if ($rs->EOF)
{echo "<script>window.resizeTo(1,1); window.alert('No se encuentraron datos');
window.close();
</script>"; }
$plant->assign("_ROOT.xfecha", $xfecha); $plant->assign("_ROOT.expediente",$nexpte); $plant->assign("_ROOT.caratula",$caratula);
$n=0;
while (!$rs->EOF) { $plant->newBlock("DATOS"); $plant->assign("DATOS.fecha_nov",format_fec($rs->fields[fec_novedad]));
$mov=desc($c_nov,$novedad,"49".substr($rs->fields[cd_mov],1,2))." - ".desc($c_mot,$motivo,$rs->fields[cd_mov]);
$plant->assign("DATOS.movimiento",$mov); $plant->assign("DATOS.destino",destino($rs->fields[n_destino])); $plant->assign("DATOS.observa",observa($rs->fields[t_texto])); // para borrar mov del día
if ($fechahoy <= $rs->fields[fec_novedad])
{$plant->assign("DATOS.borrar","Eliminar"); $plant->assign("DATOS.id_novedad",$rs->fields[id_novedad]); $plant->assign("DATOS.phpsid_oper",$_SESSION['operador']); }
//siladri
if(substr($rs->fields[cd_mov],0, 4) == '5121')
{$plant->assign("DATOS.borrar","Eliminar"); $plant->assign("DATOS.id_novedad",$rs->fields[id_novedad]); $plant->assign("DATOS.phpsid_oper",$_SESSION['operador']); }
//siladri
// para ver el texto
if ( substr($rs->fields[cd_mov],0,3) == '505' || substr($rs->fields[cd_mov],0,3) == '506')
{//$plant->assign("DATOS.tribunal","012122");
$nexpte=substr($nexpte_full,6,7);
///echo($nexpte_full);
//die();
$plant->assign("DATOS.nexpte",ltrim($nexpte,"0")); $foja=trim($rs->fields[n_foja]);
$plant->assign("DATOS.nfoja",ltrim($foja,"0")); //$sqlexe="select * from textos where tribunal='012122' and nro_expte = '$nexpte'";
// replazar sql cuando
/* $sqlexe="select * from listas.textos where tribunal='012122' and nro_expte like '$nexpte%'";
$sqlexe.=" and foja='$foja';";
$rs_lista = $db_lista->Execute($sqlexe);
if ($rs_lista == false ) { echo $sqlexe; die(); }*/
$sqlexe="select * from expediente where id_expte=$idexpte and n_foja='$foja';";
$rs_lista = $db->Execute($sqlexe);
if ($rs_lista == false ) { echo $sqlexe; die(); } if (!$rs_lista->EOF) $plant->assign("DATOS.texto",'Ver texto' ) ; // else
// $plant->assign("DATOS.texto",$idexpte."-".$foja ) ;
}
$n++;
$rs->MoveNext();
}
$plant->printToScreen();
?>
<?PHP
