Catálogo de Transferencias

   
Numero
Fecha
 

uf_conectar(); $ds= new class_datastore(); $io_sql= new class_sql($con); $io_func=new class_funciones(); $io_msg= new class_mensajes(); $ls_gestor= $_SESSION["ls_gestor"]; $ls_codemp=$_SESSION["la_empresa"]["codemp"]; $ls_codusu=$_SESSION["la_logusr"]; if(array_key_exists("operacion",$_POST)) { $ls_operacion=$_POST["operacion"]; $ls_numtra="%".$_POST["txtnumtra"]."%"; $ld_fecemi=$_POST["txtfecemi"]; if ($ld_fecemi!="%%") { $porc="%"; $ld_fecemi=str_replace($porc,"",$ld_fecemi); $ld_fecemi=$io_func->uf_convertirdatetobd($ld_fecemi); } $ls_status="%".$_POST["hidstatus"]."%"; } else { $ls_operacion=""; } print ""; print ""; print ""; print ""; print ""; print ""; print ""; $criteriofec=""; if($ld_fecemi){$criteriofec=" AND fecemi = '".$ld_fecemi." '";} if($ls_operacion=="BUSCAR") { $ls_sql="SELECT siv_transferencia.*, ". " (SELECT nomfisalm FROM siv_almacen". " WHERE siv_almacen.codalm = siv_transferencia.codalmori) AS nomfisori,". " (SELECT nomfisalm FROM siv_almacen". " WHERE siv_almacen.codalm = siv_transferencia.codalmdes) AS nomfisdes". " FROM siv_transferencia". " WHERE codemp = '".$ls_codemp."'". " AND numtra like '".$ls_numtra."'". $criteriofec. " AND codalmori IN". " (SELECT codintper FROM sss_permisos_internos". " WHERE sss_permisos_internos.codemp =siv_transferencia.codemp". " AND codsis='SIV'". " AND codusu ='".$ls_codusu."' AND enabled=1) ". " AND codalmdes IN". " (SELECT codintper FROM sss_permisos_internos". " WHERE sss_permisos_internos.codemp =siv_transferencia.codemp". " AND codsis='SIV'". " AND codusu ='".$ls_codusu."' AND enabled=1) "; $rs_cta=$io_sql->select($ls_sql); $data=$rs_cta; if($data===false) { print $io_sql->message; } if($row=$io_sql->fetch_row($rs_cta)) { $data=$io_sql->obtener_datos($rs_cta); $arrcols=array_keys($data); $totcol=count($arrcols); $ds->data=$data; $totrow=$ds->getRowCount("numtra"); for($z=1;$z<=$totrow;$z++) { print ""; $ls_numtra= $data["numtra"][$z]; $ld_fecemi= $data["fecemi"][$z]; $ld_fecemi= $io_func->uf_convertirfecmostrar($ld_fecemi); $ls_obstra= $data["obstra"][$z]; $ls_codusu= $data["codusu"][$z]; $ls_codalmori= $data["codalmori"][$z]; $ls_codalmdes= $data["codalmdes"][$z]; $ls_nomfisori= $data["nomfisori"][$z]; $ls_nomfisdes= $data["nomfisdes"][$z]; print ""; print ""; print ""; print ""; print ""; } } else { $io_msg->message("No hay registros"); } } print "
NúmeroFechaOrigenDestino
".$ls_numtra."".$ld_fecemi."".$data["nomfisori"][$z]."".$data["nomfisdes"][$z]."
"; ?>