Catálogo de Entregas

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

Rango de Fechas
Desde
Hasta

Comprobante

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_cmpent="%".$_POST["txtcmpent"]."%"; $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") { if(strtoupper($ls_gestor)=="MYSQL") { $ls_cadena_personal="CONCAT(sno_personal.nomper,' ',sno_personal.apeper)"; } else { $ls_cadena_personal="sno_personal.nomper||' '||sno_personal.apeper"; } if(strtoupper($ls_gestor)=="MYSQL") { $ls_cadena_beneficiario="CONCAT(rpc_beneficiario.nombene,' ',rpc_beneficiario.apebene)"; } else { $ls_cadena_beneficiario="rpc_beneficiario.nombene||' '||rpc_beneficiario.apebene"; } $ls_estcat=$io_saf->uf_select_valor_config($ls_codemp); if(($ld_fecdes!="")&&($ld_fechas!="")) { $ls_sqlint=" AND ent.feccmp >= '". $ld_fecdes ." 00:00:00'". " AND ent.feccmp <= '". $ld_fechas ." 23:59:59' "; } else { $ls_sqlint=""; } $ls_sql="SELECT ent.*, ". " (CASE tipres WHEN 'P' THEN (SELECT ".$ls_cadena_personal." ". " FROM sno_personal ". " WHERE sno_personal.codemp=ent.codemp AND ". " sno_personal.codper=ent.codres) ". " WHEN 'B' THEN (SELECT ".$ls_cadena_beneficiario." ". " FROM rpc_beneficiario ". " WHERE rpc_beneficiario.codemp=ent.codemp AND ". " rpc_beneficiario.ced_bene=ent.codres) ". " END) AS nomres, ". " (CASE tiprec WHEN 'P' THEN (SELECT ".$ls_cadena_personal." ". " FROM sno_personal ". " WHERE sno_personal.codemp=ent.codemp AND ". " sno_personal.codper=ent.codrec) ". " WHEN 'B' THEN (SELECT ".$ls_cadena_beneficiario." ". " FROM rpc_beneficiario ". " WHERE rpc_beneficiario.codemp=ent.codemp AND ". " rpc_beneficiario.ced_bene=ent.codrec) ". " END) AS nomrec, ". " (CASE tipdes WHEN 'P' THEN (SELECT ".$ls_cadena_personal." ". " FROM sno_personal ". " WHERE sno_personal.codemp=ent.codemp AND ". " sno_personal.codper=ent.coddes) ". " WHEN 'B' THEN (SELECT ".$ls_cadena_beneficiario." ". " FROM rpc_beneficiario ". " WHERE rpc_beneficiario.codemp=ent.codemp AND ". " rpc_beneficiario.ced_bene=ent.coddes) ". " END) AS nomdes, ". " oe.desorg as denuniadm,os.desorg as denunisol ". " FROM saf_entrega ent LEFT JOIN srh_organigrama oe ON ent.codemp=oe.codemp AND ent.coduniadm=oe.codorg LEFT JOIN srh_organigrama os ON ent.codemp=os.codemp AND ent.codunisol=os.codorg ". " WHERE ent.codemp='".$ls_codemp."'".$ls_sqlint. " AND ent.cmpent like '".$ls_cmpent."' "; $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_cmpent=$row["cmpent"]; $ld_feccmp=$row["feccmp"]; $ld_fecent=$row["fecent"]; $ls_descmp=$row["obsent"]; $ls_estproent=$row["estproent"]; $ld_feccmp=$io_fun->uf_convertirfecmostrar($ld_feccmp); $ld_fecent=$io_fun->uf_convertirfecmostrar($ld_fecent); $ls_codres = $row["codres"]; $ls_denres = $row["nomres"]; $ls_codrec = $row["codrec"]; $ls_denrec = $row["nomrec"]; $ls_coddes = $row["coddes"]; $ls_dendes = $row["nomdes"]; $ls_coduniadm = $row["coduniadm"]; $ls_denuniadm = $row["denuniadm"]; $ls_codunisol = $row["codunisol"]; $ls_denunisol = $row["denunisol"]; $ls_tipres = $row["tipres"]; $ls_tiprec = $row["tiprec"]; $ls_tipdes = $row["tipdes"]; print ""; print ""; print ""; print ""; } } else { $io_msg->message("No hay registros"); } } print "

Comprobante	Fecha de Comprobante	Fecha de Entrega
".$ls_cmpent."	".$ld_feccmp."	".$ld_fecent."

"; ?>