VERSION 5.00
Begin VB.Form Form11 
   BackColor       =   &H00C0CEC0&
   BorderStyle     =   4  'Fixed ToolWindow
   Caption         =   " Procesos realizados a la pieza"
   ClientHeight    =   6780
   ClientLeft      =   45
   ClientTop       =   345
   ClientWidth     =   9555
   LinkTopic       =   "Form11"
   MaxButton       =   0   'False
   MDIChild        =   -1  'True
   MinButton       =   0   'False
   ScaleHeight     =   6780
   ScaleWidth      =   9555
   ShowInTaskbar   =   0   'False
   Begin VB.CommandButton Command2 
      BackColor       =   &H008080FF&
      Caption         =   "Cancelar"
      Height          =   375
      Left            =   7440
      TabIndex        =   29
      Top             =   3120
      Width           =   1335
   End
   Begin VB.CommandButton Command1 
      BackColor       =   &H00E0E0E0&
      Caption         =   "Siguiente"
      Height          =   375
      Left            =   7440
      TabIndex        =   28
      Top             =   2160
      Width           =   1335
   End
   Begin VB.TextBox Text12 
      BackColor       =   &H00C0EAFF&
      Height          =   285
      Left            =   4440
      TabIndex        =   27
      Top             =   5760
      Width           =   975
   End
   Begin VB.CheckBox Check12 
      Alignment       =   1  'Right Justify
      BackColor       =   &H00C0EAFF&
      Caption         =   "Embalaje"
      Height          =   255
      Left            =   1680
      TabIndex        =   26
      Top             =   5760
      Width           =   2175
   End
   Begin VB.CheckBox Check11 
      Alignment       =   1  'Right Justify
      BackColor       =   &H00C0EAFF&
      Caption         =   "Pintado"
      Height          =   255
      Left            =   1680
      TabIndex        =   25
      Top             =   5400
      Width           =   2175
   End
   Begin VB.TextBox Text11 
      BackColor       =   &H00C0EAFF&
      Height          =   285
      Left            =   4440
      TabIndex        =   24
      Top             =   5400
      Width           =   975
   End
   Begin VB.CheckBox Check3 
      Alignment       =   1  'Right Justify
      BackColor       =   &H00C0EAFF&
      Caption         =   "Curvado"
      Height          =   255
      Left            =   1680
      TabIndex        =   9
      Top             =   2520
      Width           =   2175
   End
   Begin VB.Frame Frame1 
      BackColor       =   &H00C0CEC0&
      Caption         =   "Frame1"
      Height          =   5775
      Left            =   720
      TabIndex        =   0
      Top             =   480
      Width           =   5775
      Begin VB.TextBox Text10 
         BackColor       =   &H00C0EAFF&
         Height          =   285
         Left            =   3720
         TabIndex        =   23
         Top             =   4560
         Width           =   975
      End
      Begin VB.TextBox Text9 
         BackColor       =   &H00C0EAFF&
         Height          =   285
         Left            =   3720
         TabIndex        =   22
         Top             =   4200
         Width           =   975
      End
      Begin VB.TextBox Text8 
         BackColor       =   &H00C0EAFF&
         Height          =   285
         Left            =   3720
         TabIndex        =   21
         Top             =   3840
         Width           =   975
      End
      Begin VB.TextBox Text7 
         BackColor       =   &H00C0EAFF&
         Height          =   285
         Left            =   3720
         TabIndex        =   20
         Top             =   3480
         Width           =   975
      End
      Begin VB.TextBox Text6 
         BackColor       =   &H00C0EAFF&
         Height          =   285
         Left            =   3720
         TabIndex        =   19
         Top             =   3120
         Width           =   975
      End
      Begin VB.TextBox Text5 
         BackColor       =   &H00C0EAFF&
         Height          =   285
         Left            =   3720
         TabIndex        =   18
         Top             =   2760
         Width           =   975
      End
      Begin VB.TextBox Text4 
         BackColor       =   &H00C0EAFF&
         Height          =   285
         Left            =   3720
         TabIndex        =   17
         Top             =   2400
         Width           =   975
      End
      Begin VB.CheckBox Check10 
         Alignment       =   1  'Right Justify
         BackColor       =   &H00C0EAFF&
         Caption         =   "Cromado"
         Height          =   255
         Left            =   960
         TabIndex        =   16
         Top             =   4560
         Width           =   2175
      End
      Begin VB.CheckBox Check9 
         Alignment       =   1  'Right Justify
         BackColor       =   &H00C0EAFF&
         Caption         =   "Pulido"
         Height          =   255
         Left            =   960
         TabIndex        =   15
         Top             =   4200
         Width           =   2175
      End
      Begin VB.CheckBox Check8 
         Alignment       =   1  'Right Justify
         BackColor       =   &H00C0EAFF&
         Caption         =   "Taladrado"
         Height          =   255
         Left            =   960
         TabIndex        =   14
         Top             =   3840
         Width           =   2175
      End
      Begin VB.CheckBox Check7 
         Alignment       =   1  'Right Justify
         BackColor       =   &H00C0EAFF&
         Caption         =   "Soldadura robots"
         Height          =   255
         Left            =   960
         TabIndex        =   13
         Top             =   3480
         Width           =   2175
      End
      Begin VB.CheckBox Check6 
         Alignment       =   1  'Right Justify
         BackColor       =   &H00C0EAFF&
         Caption         =   "Soldadura manual"
         Height          =   255
         Left            =   960
         TabIndex        =   12
         Top             =   3120
         Width           =   2175
      End
      Begin VB.CheckBox Check5 
         Alignment       =   1  'Right Justify
         BackColor       =   &H00C0EAFF&
         Caption         =   "Prensa mecánica"
         Height          =   255
         Left            =   960
         TabIndex        =   11
         Top             =   2760
         Width           =   2175
      End
      Begin VB.CheckBox Check4 
         Alignment       =   1  'Right Justify
         BackColor       =   &H00C0EAFF&
         Caption         =   "Prensa hidráulica"
         Height          =   255
         Left            =   960
         TabIndex        =   10
         Top             =   2400
         Width           =   2175
      End
      Begin VB.TextBox Text3 
         BackColor       =   &H00C0EAFF&
         Height          =   285
         Left            =   3720
         TabIndex        =   8
         Top             =   2040
         Width           =   975
      End
      Begin VB.TextBox Text2 
         BackColor       =   &H00C0EAFF&
         Height          =   285
         Left            =   3720
         TabIndex        =   7
         Top             =   1680
         Width           =   975
      End
      Begin VB.CheckBox Check2 
         Alignment       =   1  'Right Justify
         BackColor       =   &H00C0EAFF&
         Caption         =   "Corte atutomático"
         Height          =   255
         Left            =   960
         TabIndex        =   6
         Top             =   1680
         Width           =   2175
      End
      Begin VB.TextBox Text1 
         BackColor       =   &H00C0EAFF&
         Height          =   285
         Left            =   3720
         TabIndex        =   5
         Top             =   1320
         Width           =   975
      End
      Begin VB.CheckBox Check1 
         Alignment       =   1  'Right Justify
         BackColor       =   &H00C0EAFF&
         Caption         =   "Corte manual"
         Height          =   255
         Left            =   960
         TabIndex        =   4
         Top             =   1320
         Width           =   2175
      End
      Begin VB.Label Label3 
         BackColor       =   &H00C0EAFF&
         Caption         =   "Tiempo de procesado"
         BeginProperty Font 
            Name            =   "MS Sans Serif"
            Size            =   8.25
            Charset         =   0
            Weight          =   400
            Underline       =   -1  'True
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   255
         Left            =   3360
         TabIndex        =   3
         Top             =   720
         Width           =   1575
      End
      Begin VB.Label Label2 
         BackColor       =   &H00C0EAFF&
         Caption         =   "Tipo de proceso"
         BeginProperty Font 
            Name            =   "MS Sans Serif"
            Size            =   8.25
            Charset         =   0
            Weight          =   400
            Underline       =   -1  'True
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   255
         Left            =   1320
         TabIndex        =   2
         Top             =   720
         Width           =   1215
      End
      Begin VB.Label Label1 
         BackColor       =   &H00C0CEC0&
         Caption         =   "Label1"
         BeginProperty Font 
            Name            =   "MS Sans Serif"
            Size            =   8.25
            Charset         =   0
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   255
         Left            =   240
         TabIndex        =   1
         Top             =   360
         Width           =   3135
      End
   End
End
Attribute VB_Name = "Form11"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Private Sub Command1_Click()
If Check1.Value = Checked And Text1.Text = "" Then
  MsgBox "Por favor, introduzca un tiempo de proceso", vbExclamation
  ElseIf Check2.Value = Checked And Text2.Text = "" Then
  MsgBox "Por favor, introduzca un tiempo de proceso", vbExclamation
  ElseIf Check3.Value = Checked And Text3.Text = "" Then
  MsgBox "Por favor, introduzca un tiempo de proceso", vbExclamation
  ElseIf Check4.Value = Checked And Text4.Text = "" Then
  MsgBox "Por favor, introduzca un tiempo de proceso", vbExclamation
  ElseIf Check5.Value = Checked And Text5.Text = "" Then
  MsgBox "Por favor, introduzca un tiempo de proceso", vbExclamation
  ElseIf Check6.Value = Checked And Text6.Text = "" Then
  MsgBox "Por favor, introduzca un tiempo de proceso", vbExclamation
  ElseIf Check7.Value = Checked And Text7.Text = "" Then
  MsgBox "Por favor, introduzca un tiempo de proceso", vbExclamation
  ElseIf Check8.Value = Checked And Text8.Text = "" Then
  MsgBox "Por favor, introduzca un tiempo de proceso", vbExclamation
  ElseIf Check9.Value = Checked And Text9.Text = "" Then
  MsgBox "Por favor, introduzca un tiempo de proceso", vbExclamation
  ElseIf Check10.Value = Checked And Text10.Text = "" Then
  MsgBox "Por favor, introduzca un tiempo de proceso", vbExclamation
  ElseIf Check11.Value = Checked And Text11.Text = "" Then
  MsgBox "Por favor, introduzca un tiempo de proceso", vbExclamation
  ElseIf Check12.Value = Checked And Text12.Text = "" Then
  MsgBox "Por favor, introduzca un tiempo de proceso", vbExclamation
    ElseIf Check1.Value = Unchecked And Check2.Value = Unchecked And Check3.Value = Unchecked And Check4.Value = Unchecked And Check5.Value = Unchecked And Check6.Value = Unchecked And Check7.Value = Unchecked And Check8.Value = Unchecked And Check9.Value = Unchecked And Check10.Value = Unchecked And Check11.Value = Unchecked And Check12.Value = Unchecked Then
    MsgBox "Por favor, introduzca un tipo de proceso", vbExclamation
 
ElseIf 0 = 0 Then
  
'paso de valores a variables globales

 gproceso.corteman = Check1.Value
 gproceso.corteauto = Check2.Value
 gproceso.curvado = Check3.Value
 gproceso.prensahidra = Check4.Value
 gproceso.prensameca = Check5.Value
 gproceso.soldaduramanual = Check6.Value
 gproceso.soldadurarobots = Check7.Value
 gproceso.taladrado = Check8.Value
 gproceso.pulido = Check9.Value
 gproceso.cromado = Check10.Value
 gproceso.pintado = Check11.Value
 gproceso.embalaje = Check12.Value
        
        If Check1.Value = Checked Then
        gproceso.t_corteman = CDbl(Text1.Text)
        End If
        If Check2.Value = Checked Then
        gproceso.t_corteauto = CDbl(Text2.Text)
        End If
        If Check3.Value = Checked Then
        gproceso.t_curvado = CDbl(Text3.Text)
        End If
        If Check4.Value = Checked Then
        gproceso.t_prensahidra = CDbl(Text4.Text)
        End If
        If Check5.Value = Checked Then
        gproceso.t_prensameca = CDbl(Text5.Text)
        End If
        If Check6.Value = Checked Then
        gproceso.t_soldaduramanual = CDbl(Text6.Text)
        End If
        If Check7.Value = Checked Then
        gproceso.t_soldadurarobots = CDbl(Text7.Text)
        End If
        If Check8.Value = Checked Then
        gproceso.t_taladrado = CDbl(Text8.Text)
        End If
        If Check9.Value = Checked Then
        gproceso.t_pulido = CDbl(Text9.Text)
        End If
        If Check10.Value = Checked Then
        gproceso.t_cromado = CDbl(Text10.Text)
        End If
        If Check11.Value = Checked Then
        gproceso.t_pintado = CDbl(Text11.Text)
        End If
        If Check12.Value = Checked Then
        gproceso.t_embalaje = CDbl(Text12.Text)
        End If


Form11.Visible = False
Form12.Visible = True

End If


End Sub

Private Sub Check1_Click()
If Check1.Value = Checked Then
    Text1.Visible = True
ElseIf Check1.Value = Unchecked Then
    Text1.Visible = False
End If
End Sub

Private Sub Check10_Click()
If Check10.Value = Checked Then
    Text10.Visible = True
ElseIf Check10.Value = Unchecked Then
    Text10.Visible = False
End If
End Sub

Private Sub Check11_Click()
If Check11.Value = Checked Then
    Text11.Visible = True
ElseIf Check11.Value = Unchecked Then
    Text11.Visible = False
End If
End Sub

Private Sub Check12_Click()
If Check12.Value = Checked Then
    Text12.Visible = True
ElseIf Check12.Value = Unchecked Then
    Text12.Visible = False
End If
End Sub

Private Sub Check2_Click()
If Check2.Value = Checked Then
    Text2.Visible = True
ElseIf Check2.Value = Unchecked Then
    Text2.Visible = False
End If
End Sub

Private Sub Check3_Click()
If Check3.Value = Checked Then
    Text3.Visible = True
ElseIf Check3.Value = Unchecked Then
    Text3.Visible = False
End If
End Sub

Private Sub Check4_Click()
If Check4.Value = Checked Then
    Text4.Visible = True
ElseIf Check4.Value = Unchecked Then
    Text4.Visible = False
End If
End Sub

Private Sub Check5_Click()
If Check5.Value = Checked Then
    Text5.Visible = True
ElseIf Check5.Value = Unchecked Then
    Text5.Visible = False
End If
End Sub

Private Sub Check6_Click()
If Check6.Value = Checked Then
    Text6.Visible = True
ElseIf Check6.Value = Unchecked Then
    Text6.Visible = False
End If
End Sub

Private Sub Check7_Click()
If Check7.Value = Checked Then
    Text7.Visible = True
ElseIf Check7.Value = Unchecked Then
    Text7.Visible = False
End If
End Sub

Private Sub Check8_Click()
If Check8.Value = Checked Then
    Text8.Visible = True
ElseIf Check8.Value = Unchecked Then
    Text8.Visible = False
End If
End Sub

Private Sub Check9_Click()
If Check9.Value = Checked Then
    Text9.Visible = True
ElseIf Check9.Value = Unchecked Then
    Text9.Visible = False
End If
End Sub

Private Sub Command2_Click()
Form11.Visible = False

End Sub

Private Sub Form_Load()
Frame1.Caption = " Producto " & gproducto.referencia & " " & gproducto.descripcion
Label1.Caption = " Pieza: " & gpieza.descripcion
' centrar el formulario en la parte superior
    Move (Screen.Width - Width) \ 2, 1500

Text1.Visible = False
Text2.Visible = False
Text3.Visible = False
Text4.Visible = False
Text5.Visible = False
Text6.Visible = False
Text7.Visible = False
Text8.Visible = False
Text9.Visible = False
Text10.Visible = False
Text11.Visible = False
Text12.Visible = False

End Sub


Private Sub Text1_Validate(Cancel As Boolean)
    If Not IsNumeric(Text1.Text) Then
        Cancel = True
    ElseIf CDbl(Text1.Text) < 0 Then
        Cancel = True
    End If
    If Cancel Then
        MsgBox "Por favor, introduzca un tiempo de proceso correcto", vbExclamation
    End If

        
End Sub

Private Sub Text10_Validate(Cancel As Boolean)
    If Not IsNumeric(Text10.Text) Then
        Cancel = True
    ElseIf CDbl(Text10.Text) < 0 Then
        Cancel = True
    End If
    If Cancel Then
        MsgBox "Por favor, introduzca un tiempo de proceso correcto", vbExclamation
    End If
        
End Sub

Private Sub Text11_Validate(Cancel As Boolean)
    If Not IsNumeric(Text11.Text) Then
        Cancel = True
    ElseIf CDbl(Text11.Text) < 0 Then
        Cancel = True
    End If
    If Cancel Then
        MsgBox "Por favor, introduzca un tiempo de proceso correcto", vbExclamation
    End If
        
End Sub

Private Sub Text12_Validate(Cancel As Boolean)
    If Not IsNumeric(Text12.Text) Then
        Cancel = True
    ElseIf CDbl(Text12.Text) < 0 Then
        Cancel = True
    End If
    If Cancel Then
        MsgBox "Por favor, introduzca un tiempo de proceso correcto", vbExclamation
    End If
        
End Sub

Private Sub Text2_Validate(Cancel As Boolean)
    If Not IsNumeric(Text2.Text) Then
        Cancel = True
    ElseIf CDbl(Text2.Text) < 0 Then
        Cancel = True
    End If
    If Cancel Then
        MsgBox "Por favor, introduzca un tiempo de proceso correcto", vbExclamation
    End If
        
End Sub


Private Sub Text3_Validate(Cancel As Boolean)
    If Not IsNumeric(Text3.Text) Then
        Cancel = True
    ElseIf CDbl(Text3.Text) < 0 Then
        Cancel = True
    End If
    If Cancel Then
        MsgBox "Por favor, introduzca un tiempo de proceso correcto", vbExclamation
    End If
End Sub


Private Sub Text4_Validate(Cancel As Boolean)
    If Not IsNumeric(Text4.Text) Then
        Cancel = True
    ElseIf CDbl(Text4.Text) < 0 Then
        Cancel = True
    End If
    If Cancel Then
        MsgBox "Por favor, introduzca un tiempo de proceso correcto", vbExclamation
    End If
        
End Sub

Private Sub Text5_Validate(Cancel As Boolean)
    If Not IsNumeric(Text5.Text) Then
        Cancel = True
    ElseIf CDbl(Text5.Text) < 0 Then
        Cancel = True
    End If
    If Cancel Then
        MsgBox "Por favor, introduzca un tiempo de proceso correcto", vbExclamation
    End If
        
End Sub

Private Sub Text6_Validate(Cancel As Boolean)
    If Not IsNumeric(Text6.Text) Then
        Cancel = True
    ElseIf CDbl(Text6.Text) < 0 Then
        Cancel = True
    End If
    If Cancel Then
        MsgBox "Por favor, introduzca un tiempo de proceso correcto", vbExclamation
    End If
        
End Sub

Private Sub Text7_Validate(Cancel As Boolean)
    If Not IsNumeric(Text7.Text) Then
        Cancel = True
    ElseIf CDbl(Text7.Text) < 0 Then
        Cancel = True
    End If
    If Cancel Then
        MsgBox "Por favor, introduzca un tiempo de proceso correcto", vbExclamation
    End If
        
End Sub

Private Sub Text8_Validate(Cancel As Boolean)
    If Not IsNumeric(Text8.Text) Then
        Cancel = True
    ElseIf CDbl(Text8.Text) < 0 Then
        Cancel = True
    End If
    If Cancel Then
        MsgBox "Por favor, introduzca un tiempo de proceso correcto", vbExclamation
    End If
        
End Sub

Private Sub Text9_Validate(Cancel As Boolean)
    If Not IsNumeric(Text9.Text) Then
        Cancel = True
    ElseIf CDbl(Text9.Text) < 0 Then
        Cancel = True
    End If
    If Cancel Then
        MsgBox "Por favor, introduzca un tiempo de proceso correcto", vbExclamation
    End If
        
End Sub
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="es">
	<head>
            <title>e-REdING. Biblioteca de la Escuela Superior de Ingenieros de Sevilla.</title>

                <meta http-equiv="Content-Type" content="text/html; charset=utf-8"/>
<meta name="description" content="Buscador de proyectos ETSI" />
<meta name="author" content="Daniel Callejo"/>
<meta name="author" content="Federico L&oacute;pez"/>
<meta name="author" content="Juli&aacute;n P&eacute;rez"/>
<meta name="author" content="Jos&eacute; Mar&iacute;a Vidal Vidal"/>
<base href="https://biblus.us.es/bibing/proyectos/" /><link rel="shortcut icon" href="./favicon.ico" />
<link rel="stylesheet" href="./publico/css/estructura.css" type="text/css" />
<link rel="stylesheet" href="./publico/css/bootstrap.css" type="text/css" media="screen"/>
<link rel="stylesheet" href="./publico/css/enlaces-capas.css" type="text/css"  />
<link rel="stylesheet" href="./publico/css/pestanas.css" type="text/css"  /> 
<link rel="stylesheet" href="./publico/css/formularios.css" type="text/css" />
<link rel="stylesheet" href="./publico/css/lightbox.css" type="text/css"  />
<link rel="stylesheet" href="./publico/css/autocompleter.css" type="text/css"  />
<link rel="stylesheet" href="./publico/css/resultados.css" type="text/css"  />
<link rel="stylesheet" href="./publico/css/milista.css" type="text/css"  />
<link rel="stylesheet" href="./publico/css/explorador.css" type="text/css"  />
<link rel="stylesheet" href="./publico/css/ultimos.css" type="text/css"  />
<link rel="stylesheet" href="./publico/css/contactar.css" type="text/css"  />
<!-- <link rel="stylesheet" href="./css/print.css" type="text/css" media="print" /> -->
<script src="./publico/javascript/jquery-1.9.1.min.js" type="text/javascript"></script>
<script src="./publico/javascript/bootstrap.js" type="text/javascript"></script>

<script src="./publico/javascript/mootools-1.2.4-core.js" type="text/javascript"></script>
<script src="./publico/javascript/mootools-1-1.2.4.2-more.js" type="text/javascript"></script>
<script src="./publico/javascript/targetbl.js" type="text/javascript"></script>
<script src="./publico/javascript/mensajes.js" type="text/javascript"></script>
<script src="./publico/javascript/form.js" type="text/javascript"></script>
<script src="./publico/javascript/autocompleter/Observer.js" type="text/javascript"></script>
<script src="./publico/javascript/autocompleter/Autocompleter.js" type="text/javascript"></script>
<script src="./publico/javascript/autocompleter/Autocompleter.Request.js" type="text/javascript"></script>
<script src="./publico/javascript/domready.js" type="text/javascript"></script>

<!-- Google tag (gtag.js) -->
<script async src="https://www.googletagmanager.com/gtag/js?id=G-2HP38G406P"></script>
<script>
  window.dataLayer = window.dataLayer || [];
  function gtag(){dataLayer.push(arguments);}
  gtag('js', new Date());

  gtag('config', 'G-2HP38G406P');
</script>



<script type="text/javascript">
function seleccionar_todo(){
   for (i=0;i<document.formulario_marcados.elements.length;i++)
      if(document.formulario_marcados.elements[i].type == "checkbox")
         document.formulario_marcados.elements[i].checked=1
}
function deseleccionar_todo(){
   for (i=0;i<document.formulario_marcados.elements.length;i++)
      if(document.formulario_marcados.elements[i].type == "checkbox")
         document.formulario_marcados.elements[i].checked=0
} 
</script>
	</head>
    <body style="min-width: 960px; background-color: #e2e2e2; height: 100%">	
		<a name="arriba"></a>
<div>
<div id="header">
    <table id="Tabla_01" height="105" border="0" cellpadding="0" cellspacing="0">
    <tr>
        <td>
            <img src="./publico/imagenes/cabecera/banner_new2_01.jpg" width="3" height="105" alt="">
        </td>
        <td>
            <img src="./publico/imagenes/cabecera/banner_new2_02.jpg" width="100" height="105" alt="">
        </td>
        <td width="100%" align="right"  style="min-width: 613px; background-repeat: no-repeat; background-position: top right; font-size: medium; font-weight: bold; color: white;">
            <table width="100%" height="105" border="0">
                <tr>
                    <td style=" vertical-align: top; width: 547px">
                        <!-- <a style="text-decoration: none" href="./"><img src="./publico/imagenes/cabecera/banner_new2_03.jpg"alt=""></a> -->
                        <a style="text-decoration: none" href="https://biblus.us.es/bibing/proyectos/"><img src="./publico/imagenes/cabecera/banner_new2_03.jpg"alt=""></a>
                     </td>
                     <td  background="./publico/imagenes/cabecera/banner_new2_04.jpg" style="background-repeat: no-repeat; background-color: #c6d4e8;"><br><br><br>
                         &nbsp;
                        </td>
                    </tr>
             </table>
        </td>
    </tr>
    <tr style="border-top: 1px solid #ffffff;">
        <td colspan="3" id="menu_sup" style="font-size: small; text-align: right; background-color: #9c1f2f; vertical-align: bottom">
                                     

                                <a href="https://biblus.us.es/bibing/proyectos/" class="enlace " style=" color: #ffffff">Inicio&nbsp;&nbsp;|</a>
                                <a href="https://biblus.us.es/bibing/proyectos/acerca/" style=" color: #ffffff" class="enlace ">&nbsp;&nbsp;Acerca de&nbsp;&nbsp;|</a>
                                
                                <a href="https://biblus.us.es/bibing/proyectos/contactar/" style=" color: #ffffff" class="enlace ">&nbsp;&nbsp;Contactar&nbsp;&nbsp;</a>
                         <!--       <a href="https://biblus.us.es/bibing/proyectos/ayuda/" style=" color: #ffffff" class="enlace  ">&nbsp;&nbsp;Ayuda&nbsp;&nbsp;|</a> -->
                                <!-- <form id="idioma" class=""  method="post" action="">
                                <div class="inline" style="color: white">
                                <input type="submit" class="tipo_letra " style=" color: #ffffff"name="idioma" value="Castellanossss" />&nbsp;&nbsp;
                                </div>	
                                </form> -->

                                </td>

    </tr>
    </table>
</div>
<br><br>
<div class="colmask rightmenu">
<div class="panel panel-default" style="margin:20px">
            <div class="panel-heading"><h4>GESTIÓN Y OPTIMIZACIÓN DE LA PRODUCCIÓN EN UNA F�BRICA DE ESTRUCTURAS MET�LICAS DE SILLER�A</h4><h5 style="color:grey"><span class="glyphicon glyphicon-user""></span> : <b>Narbona Fernández, Jesús</b><br><span class="glyphicon glyphicon-book""></span>  :<b> Ingenier&iacute;a Organización</b></h5></div><div class="panel-body"><div class="contenido_proyecto"><div class="titulo2_explorador">Contenido del proyecto:</div><div class="ruta"><a href="abreproy/30104">Directorio ra&iacute;z</a>&nbsp;&nbsp;>&nbsp;&nbsp;<a href="abreproy/30104/direccion/C%C3%B3digo+y+formularios%252F">Código y formularios</a>&nbsp;&nbsp;>&nbsp;&nbsp;<a href="abreproy/30104/direccion/C%C3%B3digo+y+formularios%252FAPFprocesopieza.frm%252F">APFprocesopieza.frm</a></div><div class="listing"></div></div></div></div>
</div>
</div>

        
	</body>
 
 
<!-- Inicio Google Analytics -->
<!--
	<script type="text/javascript">
		var gaJsHost = (("https:" == document.location.protocol) ? "https://ssl." : "http://www.");
		document.write(unescape("%3Cscript src='" + gaJsHost + "google-analytics.com/ga.js' type='text/javascript'%3E%3C/script%3E"));
	</script>
	
	<script type="text/javascript">
		try {
		var pageTracker = _gat._getTracker("UA-7789620-1");
		pageTracker._trackPageview();
	} 
		catch(err) {}
	</script>
-->
<!-- Fin Google Analytics -->

</html>