window.onload = initial;

var f;
var men_ponumber,
    men_libreria,
    men_contacto,
    men_tel,
    men_fax,
    men_email,
    men_direccion,
    men_pueblo,
    men_pais,
    men_postal,
    men_envio,
    men_isbn,
    men_titulo,
    men_cantidad;

function blancos() {
    var inc="";
    if (f.ponumber.value=="")             {inc=inc+men_ponumber+", ";}
    if (f.libreria.value=="" || f.libreria.value==men_libreria)
                                          {f.libreria.value=men_libreria;inc=inc+men_libreria+", ";}
    if (f.bill_contacto.value=="" || f.bill_contacto.value==men_contacto)
                                          {f.bill_contacto.value=men_contacto;inc=inc+men_contacto+", ";}
    if (f.bill_tel.value=="" || f.bill_tel.value==men_tel)
                                          {f.bill_tel.value=men_tel;inc=inc+men_tel+", ";}
    if (f.email.value=="" || f.email.value==men_email)
                                          {f.email.value=men_email;inc=inc+men_email+", ";}
    if (f.bill_direccion.value=="" || f.bill_direccion.value==men_direccion)
                                          {f.bill_direccion.value=men_direccion;inc=inc+men_direccion+", ";}
    if (f.bill_pueblo.value=="" || f.bill_pueblo.value==men_pueblo)
                                          {f.bill_pueblo.value=men_pueblo;inc=inc+men_pueblo+", ";}
    if (f.bill_pais.value=="")            {f.bill_pais.value=men_pais;inc=inc+men_pais+", ";}
    if (f.bill_postal.value=="" || f.bill_postal.value==men_postal)
                                          {f.bill_postal.value=men_postal;inc=inc+men_postal+", ";}
    if (f.metodo.selectedIndex=="0")       {inc=inc+men_envio+", ";}
    if (f.ship_direccion.value=="")       {f.ship_direccion.value=men_direccion;}
    if (f.ship_pueblo.value=="")          {f.ship_pueblo.value=men_pueblo;}
    if (f.ship_pais.value=="")            {f.ship_pais.value=men_pais;}
    if (f.ship_postal.value=="")          {f.ship_postal.value=men_postal;}
    if (f.isbn_i0.selectedIndex=="0" && f.isbn_t0.value=="")
                                          {inc=inc+men_isbn+", ";}
    if (f.titulo_i0.value=="" && f.titulo_t0.selectedIndex=="0")
                                          {inc=inc+men_titulo+", ";}
    if (f.cantidad_i0.value<1 && f.cantidad_t0.value<1)
                                          {inc=inc+men_cantidad;}
    return inc;
}

function ck_libreria(str) {
    var expr1 = str.replace(/([`Ë*+?^${}()|[\]\\!@%&=;])/, "");
    f.libreria.value = expr1;
    blancos();
    if (f.libreria.value==men_libreria) {
        f.libreria.value="";
    }
    else {
    }
}

function ck_bill_contacto(str) {
    var expr1 = str.replace(/([`Ë*+?^${}()|[\]\\!@%&=;])/, "");
    f.bill_contacto.value = expr1;
    blancos();
    if (f.bill_contacto.value==men_contacto) {
        f.bill_contacto.value="";
    }
    else {
    }
}

function ck_bill_tel(str) {
    var expr1 = str.replace(/([`Ë*+?^${}()|[\]\/\\!@#%&=,;])|([a-zA-Z])/, "");
    f.bill_tel.value = expr1;
    blancos();
    if (f.bill_tel.value==men_tel) {
        f.bill_tel.value="";
    }
    else {
    }
}

function ck_bill_fax(str) {
    var expr1 = str.replace(/([`Ë*+?^${}()|[\]\/\\!@#%&=,;])|([a-zA-Z])/, "");
    f.bill_fax.value = expr1;
    blancos();
}

function ck_email(str) {
    var expr1 = str.replace(/([`Ë*+?^${}()|[\]\/\\!#%&=,;])/, "");
    var expr1 = expr1.toLowerCase();
    f.email.value = expr1;
    blancos();
    if (f.email.value==men_email) {
        f.email.value="";
    }
    else {
    }
}

function ck_bill_direccion(str) {
    var expr1 = str.replace(/([`Ë*+?^${}()|[\]\\!@%&=;])/, "");
    f.bill_direccion.value = expr1;
    blancos();
    if (f.bill_direccion.value==men_direccion) {
        f.bill_direccion.value="";
    }
    else {
    }
}

function ck_bill_pueblo(str) {
    var expr1 = str.replace(/([-`Ë.*+?^${}()|[\]\\!@#%&=,;])|([0-9])/, "");
    f.bill_pueblo.value = expr1;
    blancos();
    if (f.bill_pueblo.value==men_pueblo) {
        f.bill_pueblo.value="";
    }
    else {
    }
}

function ck_bill_pais(str) {
    var expr1 = str.replace(/([`Ë*+?^${}()|[\]\/\\!#%&=,;])|([0-9])/, "");
    var expr1 = expr1.toUpperCase();
    f.bill_pais.value = expr1;
    blancos();
    if (f.bill_pais.value==men_pais) {
        f.bill_pais.value="";
    }
    else {
    }
}

function ck_bill_postal(str) {
    var expr1 = str.replace(/([-`Ë.*+?^${}()|[\]\/\\!@#%&=,;])|([a-zA-Z])/, "");
    f.bill_postal.value = expr1;
    blancos();
    if (f.bill_postal.value==men_postal) {
        f.bill_postal.value="";
    }
    else {
    }
}

function ck_misma() {
    if (f.misma.checked) {
        f.ship_direccion.value=f.bill_direccion.value;
        f.ship_pueblo.value=f.bill_pueblo.value;
        f.ship_pais.value=f.bill_pais.value;
        f.ship_postal.value=f.bill_postal.value;
    }
    else {
        f.ship_direccion.value=men_direccion;
        f.ship_pueblo.value=men_pueblo;
        f.ship_pais.value=men_pais;
        f.ship_postal.value=men_postal;
    }
}

function ck_ship_direccion(str) {
    var expr1 = str.replace(/([`Ë*+?^${}()|[\]\\!@%&=;])/, "");
    f.ship_direccion.value = expr1;
    blancos();
    if (f.ship_direccion.value==men_direccion) {
        f.ship_direccion.value="";
    }
    else {
    }
}

function ck_ship_pueblo(str) {
    var expr1 = str.replace(/([-`Ë.*+?^${}()|[\]\\!@#%&=,;])|([0-9])/, "");
    f.ship_pueblo.value = expr1;
    blancos();
    if (f.ship_pueblo.value==men_pueblo) {
        f.ship_pueblo.value="";
    }
    else {
    }
}

function ck_ship_pais(str) {
    var expr1 = str.replace(/([`Ë*+?^${}()|[\]\/\\!#%&=,;])|([0-9])/, "");
    var expr1 = expr1.toUpperCase();
    f.ship_pais.value = expr1;
    blancos();
    if (f.ship_pais.value==men_pais) {
        f.ship_pais.value="";
    }
    else {
    }
}

function ck_ship_postal(str) {
    var expr1 = str.replace(/([-`Ë.*+?^${}()|[\]\/\\!@#%&=,;])|([a-zA-Z])/, "");
    f.ship_postal.value = expr1;
    blancos();
    if (f.ship_postal.value==men_postal) {
        f.ship_postal.value="";
    }
    else {
    }
}

function ck_instrucciones() {
    blancos();
}

function ck_metodo() {
    if (f.metodo.value=="por correo/by mail") {
        document.getElementById('div_envio').style.display='block';
    }
    else {
        document.getElementById('div_envio').style.display='none';
    }
}

function ck_select_isbn(field,v,str) {
    blancos();
    var all_titulos = f.titulos.value;
    var arr_titulos = new Array();
    arr_titulos = all_titulos.split("| ");
    if (field==0)f.titulo_i0.value=arr_titulos[(v-1)];
    if (field==1)f.titulo_i1.value=arr_titulos[(v-1)];
    if (field==2)f.titulo_i2.value=arr_titulos[(v-1)];
    if (field==3)f.titulo_i3.value=arr_titulos[(v-1)];
    if (field==4)f.titulo_i4.value=arr_titulos[(v-1)];
    if (field==5)f.titulo_i5.value=arr_titulos[(v-1)];
    if (field==6)f.titulo_i6.value=arr_titulos[(v-1)];
    if (field==7)f.titulo_i7.value=arr_titulos[(v-1)];
    if (field==8)f.titulo_i8.value=arr_titulos[(v-1)];
    if (field==9)f.titulo_i9.value=arr_titulos[(v-1)];
    if (field==10)f.titulo_i10.value=arr_titulos[(v-1)];
    if (field==11)f.titulo_i11.value=arr_titulos[(v-1)];
    if (field==12)f.titulo_i12.value=arr_titulos[(v-1)];
    if (field==13)f.titulo_i13.value=arr_titulos[(v-1)];
    if (field==14)f.titulo_i14.value=arr_titulos[(v-1)];
}

function ck_select_titulo(field,v,str) {
    blancos();
    var all_isbns = f.isbns.value;
    var arr_isbns = new Array();
    arr_isbns = all_isbns.split("| ");
    if (field==0)f.isbn_t0.value=arr_isbns[(v-1)];
    if (field==1)f.isbn_t1.value=arr_isbns[(v-1)];
    if (field==2)f.isbn_t2.value=arr_isbns[(v-1)];
    if (field==3)f.isbn_t3.value=arr_isbns[(v-1)];
    if (field==4)f.isbn_t4.value=arr_isbns[(v-1)];
    if (field==5)f.isbn_t5.value=arr_isbns[(v-1)];
    if (field==6)f.isbn_t6.value=arr_isbns[(v-1)];
    if (field==7)f.isbn_t7.value=arr_isbns[(v-1)];
    if (field==8)f.isbn_t8.value=arr_isbns[(v-1)];
    if (field==9)f.isbn_t9.value=arr_isbns[(v-1)];
    if (field==10)f.isbn_t10.value=arr_isbns[(v-1)];
    if (field==11)f.isbn_t11.value=arr_isbns[(v-1)];
    if (field==12)f.isbn_t12.value=arr_isbns[(v-1)];
    if (field==13)f.isbn_t13.value=arr_isbns[(v-1)];
    if (field==14)f.isbn_t14.value=arr_isbns[(v-1)];
}

function ck_cantidad(str) {
    var expr1 = str.replace(/([-`Ë.*+?^${}()|[\]\/\\!@#%&=,;])|([a-zA-Z])/, "");
    f.cantidad.value = expr1;
    blancos();
}

function ordenar_por() {
    if (f.ordenar[0].checked) {
        document.getElementById('div_porTITULO').style.display='none';
        document.getElementById('div_porISBN').style.display='block';
        f.ordenar[1].checked=false;
    }
    else {
        document.getElementById('div_porISBN').style.display='none';
        document.getElementById('div_porTITULO').style.display='block';
        f.ordenar[0].checked=false;
    }
    if (!(f.ordenar[0].checked) && !(f.ordenar[1].checked)) {
        document.getElementById('div_porISBN').style.display='none';
        document.getElementById('div_porTITULO').style.display='none';
        f.ordenar[0].checked=false;
        f.ordenar[1].checked=false;
    }
}

function getsubmit() {
    var flag = blancos();
    if (flag=="") {
        submit();
    }
    else {
        alert("Error: "+flag);
    }
}

function submit() {
    if (f.ponumber.value==''){
        alert("error -no PO Number-");
        f.ponumber.focus();
    }
    else if (f.libreria.value==''){
        alert("error -Libreria-");
        f.libreria.focus();
    }
    else if (f.bill_contacto.value==''){
        alert("error -Contacto-");
        f.contacto.focus();
    }
    else if (f.bill_tel.value==''){
        alert("error -Telefono-");
        f.tel.focus();
    }
    else if (f.email.value==''){
        alert("error -Email-");
        f.email.focus();
    }
    else if (f.bill_direccion.value=='' || f.bill_direccion.value==men_direccion){
        alert("error -Cobrar Direccion/Bill Address-");
        f.bill_direccion.focus();
    }
    else if (f.bill_pueblo.value=='' || f.bill_pueblo.value==men_pueblo){
        alert("error -Cobrar Pueblo/Bill Town-");
        f.bill_pueblo.focus();
    }
    else if (f.bill_pais.value==''){
        alert("error -Cobrar Estado/Bill State-");
        f.bill_pais.focus();
    }
    else if (f.bill_postal.value=='' || f.bill_postal.value==men_postal){
        alert("error -Cobrar Zip/Bill Zip-");
        f.bill_postal.focus();
    }
    else if (f.ship_direccion.value==men_direccion && f.metodo.options[f.metodo.selectedIndex].text==f.metodo.options[1].text){
        alert("error -Enviar Direccion/Ship Address-");
        f.ship_direccion.focus();
    }
    else if (f.ship_pueblo.value==men_pueblo && f.metodo.options[f.metodo.selectedIndex].text==f.metodo.options[1].text){
        alert("error -Enviar Pueblo/Ship Town-");
        f.ship_pueblo.focus();
    }
    else if (f.ship_pais.value=='' && f.metodo.options[f.metodo.selectedIndex].text==f.metodo.options[1].text){
        alert("error -Enviar Estado/Ship State-");
        f.ship_pais.focus();
    }
    else if (f.ship_postal.value==men_postal && f.metodo.options[f.metodo.selectedIndex].text==f.metodo.options[1].text){
        alert("error -Enviar Zip/Ship Zip-");
        f.ship_postal.focus();
    }
    else if (f.cantidad_i0.value=='' && f.ordenar[0].checked){
        alert("error -Cantidad/Quantity-");
        f.cantidad_i0.focus();
    }
    else if (f.cantidad_t0.value=='' && f.ordenar[1].checked){
        alert("error -Cantidad/Quantity-");
        f.cantidad_t0.focus();
    }
    else {f.submit();}
}

function initial() {
    men_ponumber = "Numero PO/PO Number";
    men_libreria = "Libreria/Book Store";
    men_contacto = "Persona Contacto/Contact Person";
    men_tel = "999-999-9999";
    men_fax = "000-000-0000";
    men_email = "email@email.com";
    men_direccion = "Direccion/Address";
    men_pueblo = "Pueblo/Town";
    men_pais = "PR";
    men_postal = "00000";
    men_envio = "Entrega/Handing";
    men_isbn = "ISBN";
    men_titulo = "Titulo/Title";
    men_cantidad = "Cantidad/Quantity";
    f = document.form;
}