/* Copyright 2002-2010, Apprise Consulting @ Versão 2010.07 @ */  function iniciaListaDePreferencias(wcdimbimv, wvndloc, wmod) {     if  (wvndloc == 'Vnd') {         if  (wmod == 'Lst') {             wlst = opener.parent.document.all.fieldListaDePreferenciasDeVendas.value;         } else {             wlst = parent.document.all.fieldListaDePreferenciasDeVendas.value;         }     } else {         if  (wmod == 'Lst') {             wlst = opener.parent.document.all.fieldListaDePreferenciasDeLocacao.value;         } else {             wlst = parent.document.all.fieldListaDePreferenciasDeLocacao.value;         }     }     waux = 'Inclui na lista de preferências';     for (var widx = 0;  widx < wlst.length;  widx++) {         if  (wlst.substring(widx, widx + 10) == wcdimbimv) {             waux = 'Remove da lista de preferências';             break;         }     }     document.all.buttonListaDePreferencias.value = waux; }  function trataListaDePreferencias(wcdimbimv, wvndloc, wmod) {     if  (wvndloc == 'Vnd') {          wcpo = parent.document.all.fieldListaDePreferenciasDeVendas;     } else {          wcpo = parent.document.all.fieldListaDePreferenciasDeLocacao;     }     if  (wvndloc == 'Vnd') {          if  (wmod == 'Lst') {              wcpo = opener.parent.document.all.fieldListaDePreferenciasDeVendas;          } else {              wcpo = parent.document.all.fieldListaDePreferenciasDeVendas;          }     } else {          if  (wmod == 'Lst') {              wcpo = opener.parent.document.all.fieldListaDePreferenciasDeLocacao;          } else {              wcpo = parent.document.all.fieldListaDePreferenciasDeLocacao;          }     }     wimv = "'" + wcdimbimv + "'";     if  (document.all.buttonListaDePreferencias.value == 'Inclui na lista de preferências') {         document.all.buttonListaDePreferencias.value = 'Remove da lista de preferências';         if  (wcpo.value.length > 0) {             wcpo.value = wcpo.value + ", ";         }         wcpo.value = wcpo.value + wimv;     } else {         document.all.buttonListaDePreferencias.value = 'Inclui na lista de preferências';         removeImovel(wcdimbimv, wvndloc, wmod);     } }  function removeImovel(wcdimbimv, wvndloc, wmod) {     if  (wvndloc == 'Vnd') {         wcpo = parent.document.all.fieldListaDePreferenciasDeVendas;     } else {         wcpo = parent.document.all.fieldListaDePreferenciasDeLocacao;     }     if  (wvndloc == 'Vnd') {         if  (wmod == 'Lst') {             wcpo = opener.parent.document.all.fieldListaDePreferenciasDeVendas;         } else {              wcpo = parent.document.all.fieldListaDePreferenciasDeVendas;         }     } else {         if  (wmod == 'Lst') {             wcpo = opener.parent.document.all.fieldListaDePreferenciasDeLocacao;         } else {             wcpo = parent.document.all.fieldListaDePreferenciasDeLocacao;         }     }     wimv = "'" + wcdimbimv + "'";     wlst = wcpo.value; for (var widx = 0;  widx < wlst.length;  widx++) {         if  (wlst.substring(widx, widx + 12) == wimv)         {             if  (widx == 0)             {                if  (wlst.length == 12)                 {                    waux = '';                }             else                 {                    waux = wlst.substring(14, (wlst.length));                }             }         else             {             if  ((widx + 12) == (wlst.length))                 {                 waux = wlst.substring(0, (widx - 2));             }             else                 {                 waux = wlst.substring(0, (widx - 2)) + wlst.substring((widx + 12), (wlst.length));             }         }         wcpo.value = waux;         break;         }     } }  function trataVoltarDeListaDePreferencias(wvndloc) {     if  (document.all.buttonListaDePreferencias.value == 'Remove da lista de preferências') {         history.go(-1);     } else {         if  (wvndloc == 'Vnd') {             wlstimv = opener.parent.document.all.fieldListaDePreferenciasDeVendas.value;         } else {             wlstimv = opener.parent.document.all.fieldListaDePreferenciasDeLocacao.value;         }         window.open('RtyPsqImvPreferencias.asp?vndloc='+wvndloc+'&lstimv='+wlstimv, '_self');     } }