Catálogo de Incorporaciones

uf_obtenervalor_get("coddestino",""); $ls_tipo=$io_fact->uf_obtenervalor_get("tipo",""); } ?> Catálogo de Incorporaciones

Rango de Fechas
Desde
Hasta

Comprobante

Causa de Movimiento

Buscar

uf_conectar(); require_once("../shared/class_folder/class_datastore.php"); $ds=new class_datastore(); require_once("../shared/class_folder/class_sql.php"); $io_sql=new class_sql($con); require_once("../shared/class_folder/class_mensajes.php"); $io_msg=new class_mensajes(); require_once("../shared/class_folder/class_funciones.php"); $io_fun= new class_funciones(); $arre=$_SESSION["la_empresa"]; $ls_codemp=$arre["codemp"]; $ls_gestor = $_SESSION["ls_gestor"]; require_once("sigesp_saf_c_activo.php"); $io_saf = new sigesp_saf_c_activo(); if(array_key_exists("operacion",$_POST)) { $ls_operacion=$_POST["operacion"]; $ls_cmpmov="%".$_POST["txtcmpmov"]."%"; $ls_codcau="%".$_POST["txtcodcau"]."%"; $ld_fecdes="%".$_POST["txtdesde"]."%"; $ld_fechas="%".$_POST["txthasta"]."%"; if(($ld_fecdes=="%%")||($ld_fechas=="%%")) { $ld_fecdes=""; $ld_fechas=""; } else { $ld_fecdes=substr($ld_fecdes,1,10); $ld_fechas=substr($ld_fechas,1,10); $ld_fecdes=$io_fun->uf_convertirdatetobd($ld_fecdes); $ld_fechas=$io_fun->uf_convertirdatetobd($ld_fechas); } } else { $ls_operacion=""; } print ""; print ""; print ""; print ""; print ""; print ""; if($ls_operacion=="BUSCAR") { switch ($_SESSION["ls_gestor"]) { case "MYSQLT": $ls_cadena_personal="CONCAT(sno_personal.nomper,' ',sno_personal.apeper)"; break; case "POSTGRES": $ls_cadena_personal="(sno_personal.nomper||' '||sno_personal.apeper)"; break; case "INFORMIX": $ls_cadena_personal="(sno_personal.nomper||' '||sno_personal.apeper)"; break; } switch ($_SESSION["ls_gestor"]) { case "MYSQLT": $ls_cadena_beneficiario="CONCAT(rpc_beneficiario.nombene,' ',rpc_beneficiario.apebene)"; break; case "POSTGRES": $ls_cadena_beneficiario="(rpc_beneficiario.nombene||' '||rpc_beneficiario.apebene)"; break; case "INFORMIX": $ls_cadena_beneficiario="(rpc_beneficiario.nombene||' '||rpc_beneficiario.apebene)"; break; } $ls_estcat=$io_saf->uf_select_valor_config($ls_codemp); if(($ld_fecdes!="")&&($ld_fechas!="")) { $ls_sqlint=" AND saf_movimiento.feccmp >= '". $ld_fecdes ."'". " AND saf_movimiento.feccmp <= '". $ld_fechas ."' "; } else { $ls_sqlint=""; } $ls_sql="SELECT saf_movimiento.*,saf_causas.dencau, ". " (CASE tiprespri WHEN 'P' THEN (SELECT ".$ls_cadena_personal." ". " FROM sno_personal ". " WHERE sno_personal.codemp=saf_movimiento.codemp AND ". " sno_personal.codper=saf_movimiento.codrespri) ". " WHEN 'B' THEN (SELECT ".$ls_cadena_beneficiario." ". " FROM rpc_beneficiario ". " WHERE rpc_beneficiario.codemp=saf_movimiento.codemp AND ". " rpc_beneficiario.ced_bene=saf_movimiento.codrespri) ". " END) AS nomrespri, ". " (CASE tipresuso WHEN 'P' THEN (SELECT ".$ls_cadena_personal." ". " FROM sno_personal ". " WHERE sno_personal.codemp=saf_movimiento.codemp AND ". " sno_personal.codper=saf_movimiento.codresuso) ". " WHEN 'B' THEN (SELECT ".$ls_cadena_beneficiario." ". " FROM rpc_beneficiario ". " WHERE rpc_beneficiario.codemp=saf_movimiento.codemp AND ". " rpc_beneficiario.ced_bene=saf_movimiento.codresuso) ". " END) AS nomresuso, ". " (SELECT desorg ". " FROM srh_organigrama ". " WHERE srh_organigrama.codorg=saf_movimiento.coduniadm) as denuniadm". " FROM saf_movimiento,saf_causas ". " WHERE saf_movimiento.codcau=saf_causas.codcau ". " AND saf_causas.estcat='".$ls_estcat."' ". " AND saf_causas.tipcau='I' ". " AND saf_movimiento.codemp='".$ls_codemp."'".$ls_sqlint. " AND saf_movimiento.cmpmov like '".$ls_cmpmov."' ". " AND saf_movimiento.codcau like '".$ls_codcau."' ORDER BY saf_movimiento.cmpmov "; //echo $ls_sql; $rs_cta=$io_sql->select($ls_sql); $li_row=$io_sql->num_rows($rs_cta); if($li_row>0) { while($row=$io_sql->fetch_row($rs_cta)) { print ""; $ls_cmpmov = $row["cmpmov"]; $ls_numcmp = $row["numcmp"]; $ls_codcau=$row["codcau"]; $ls_dencau=$row["dencau"]; $ld_feccmp=$io_fun->uf_formatovalidofecha($row["feccmp"]); $ls_descmp=$row["descmp"]; $ls_estpromov=$row["estpromov"]; $ld_feccmp=$io_fun->uf_convertirfecmostrar($ld_feccmp); $ls_codrespri = $row["codrespri"]; $ls_denrespri = $row["nomrespri"]; $ls_codresuso = $row["codresuso"]; $ls_denresuso = $row["nomresuso"]; $ls_coduniadm = $row["coduniadm"]; $ls_denuniadm = $row["denuniadm"]; $ls_ubigeo = $row["ubigeoact"]; $ls_tiprespri = $row["tiprespri"]; $ls_tipresuso = $row["tipresuso"]; $ld_fecent=$io_fun->uf_formatovalidofecha($row["fecentact"]); $ld_fecent=$io_fun->uf_convertirfecmostrar($ld_fecent); print ""; print ""; print ""; print ""; } } else { $io_msg->message("No hay registros"); } } print "

Comprobante	Causa	Fecha
".$ls_cmpmov."	".$ls_dencau."	".$ld_feccmp."

"; ?>