var
Titulo = '';
NAparatos = 0;
Fecha = '';
NPres = 0;
function bDatos(Num, FEnt, Tipo, Marca, Modelo, Serie, sRef, Estado, Telefono, Presupuesto, Notas) {
this.Numero = Num;
this.FEntrada = FEnt;
this.Tipo = Tipo;
this.Marca = Marca;
this.Modelo = Modelo;
this.Serie = Serie;
this.sRef = sRef;
this.Estado = Estado;
this.Telefono = Telefono;
this.Presupuesto = Presupuesto;
this.Nota = Notas;
this.ImprimeItem = ImprimeItem;
}
function ImprimeItem(linea) {
if ((Form1.Tel.value == this.Telefono) ||
((Form1.Tel.value == this.sRef) && (this.sRef !=''))) {
NAparatos +=1;
with (parent.body.document) {
if (NAparatos % 2 == 0)
writeln('') ;
else
writeln('
');
if (this.Nota != '')
writeln(' | ');
else
writeln(' | ');
if (this.Presupuesto == 'S')
writeln(''+this.Numero+' | ');
else
writeln(''+this.Numero+' | ');
writeln(''+this.FEntrada+' | ');
writeln(''+this.Tipo+' | ');
writeln(''+this.Marca+' | ');
writeln(''+this.Modelo+' | ');
writeln(''+this.Serie+' | ');
writeln(''+this.sRef+' | ');
writeln(''+this.Estado+' | ');
writeln('
');
}
}
}
function ImprimeCabecera() {
with (parent.body.document) {
open();
writeln('');
writeln('');
writeln('');
writeln('');
writeln('');
writeln('INFORME DE APARATOS');
writeln('');
writeln('INFORME DE APARATOS');
writeln('');
writeln('' + Fecha + '
');
writeln('');
writeln('
' + Titulo + '
');
writeln('');
writeln('');
writeln('| * | ');
writeln('Numero | ');
writeln('F.Entrada | ');
writeln('Tipo | ');
writeln('Marca | ');
writeln('Modelo | ');
writeln('Serie | ');
writeln('S/Ref | ');
writeln('Estado | ');
writeln('
');
}
}
function PorNumero(a,b){
return (a.Numero >= b.Numero) ? 1 : -1;
}
function PorTipo(a,b){
return (a.Tipo >= b.Tipo) ? 1 : -1;
}
function PorMarca(a,b){
return (a.Marca >= b.Marca) ? 1 : -1;
}
function PorModelo(a,b){
return (a.Modelo >= b.Modelo) ? 1 : -1;
}
function PorSerie(a,b){
return (a.Serie >= b.Serie) ? 1 : -1;
}
function PorSerie(a,b){
return (a.Serie >= b.Serie) ? 1 : -1;
}
function PorsRef(a,b){
return (a.sRef >= b.sRef) ? 1 : -1;
}
function PorEstado(a,b){
return (a.Estado >= b.Estado) ? 1 : -1;
}
function OrdenaPorNumero() {
bDtotal.sort(PorNumero);
Titulo = 'Aparatos ordenados por número';
ListaTodos();
}
function OrdenaPorTipo() {
bDtotal.sort(PorTipo);
Titulo = 'Aparatos ordenados por tipo';
ListaTodos();
}
function OrdenaPorMarca() {
bDtotal.sort(PorMarca);
Titulo = 'Aparatos ordenados por marca';
ListaTodos();
}
function OrdenaPorModelo() {
bDtotal.sort(PorModelo);
Titulo = 'Aparatos ordenados por modelo';
ListaTodos();
}
function OrdenaPorSerie() {
bDtotal.sort(PorSerie);
Titulo = 'Aparatos ordenados por nº serie';
ListaTodos();
}
function OrdenaPorsRef() {
bDtotal.sort(PorsRef);
Titulo = 'Aparatos ordenados por su referencia';
ListaTodos();
}
function OrdenaPorEstado() {
bDtotal.sort(PorEstado);
Titulo = 'Aparatos ordenados por estado';
ListaTodos();
}
function ListaTodos() {
ImprimeCabecera();
NAparatos = 0;
for (i=0;i');
writeln('');
writeln('
' + NAparatos + ' aparatos listados.
');
writeln('');
writeln('');
writeln('');
close();
}
}
function consulta() {
location='mailto:'+email+'?subject=Consulta reparación';
}