function
StrengVare(VareNummer, VareDescr, Antal, Pris)
  {
  this.VareNummer = VareNummer ;
  this.VareDescr = VareDescr ;
  this.Antal = new Number(Antal) ;
  this.Pris = new Number(Pris) ;
  this.UserDate = new Date() ;
  
  return true ;
  }


function
KundeInfo(KundeId, KundeNavn, KundeAdr, KundePostNr, KundeBy, KundeTlfNrFast, KundeTlfNrMobil, KundeEmail, KundeKom, NyhedsBrevOK, BetalingsForm)
  {
  this.KundeId = KundeId ;
  this.KundeNavn = KundeNavn ;
  this.KundeAdr = KundeAdr ;
  this.KundePostNr = KundePostNr ;
  this.KundeBy = KundeBy ;
  this.KundeTlfNrFast = KundeTlfNrFast ;
  this.KundeTlfNrMobil = KundeTlfNrMobil ;
  this.KundeEmail = KundeEmail ;
  this.KundeKom = KundeKom ;
  this.NyhedsBrevOK = NyhedsBrevOK ;
  this.BetalingsForm = BetalingsForm ;
  
  return true ;
  }

function
CopyKundeInfo(ElKundeInfo)
  {
  var KundeInfoNew = new KundeInfo("", "", "", "", "", "", "", "", "", "1", "") ;

  KundeInfoNew.KundeId = ElKundeInfo.KundeId ;
  KundeInfoNew.KundeNavn = ElKundeInfo.KundeNavn ;
  KundeInfoNew.KundeAdr = ElKundeInfo.KundeAdr ;
  KundeInfoNew.KundePostNr = ElKundeInfo.KundePostNr ;
  KundeInfoNew.KundeBy = ElKundeInfo.KundeBy ;
  KundeInfoNew.KundeTlfNrFast = ElKundeInfo.KundeTlfNrFast ;
  KundeInfoNew.KundeTlfNrMobil = ElKundeInfo.KundeTlfNrMobil ;
  KundeInfoNew.KundeEmail = ElKundeInfo.KundeEmail ;
  KundeInfoNew.KundeKom = ElKundeInfo.KundeKom ;
  KundeInfoNew.NyhedsBrevOK = ElKundeInfo.NyhedsBrevOK ;
  KundeInfoNew.BetalingsForm = ElKundeInfo.BetalingsForm ;
  
  return KundeInfoNew ;
  }

function
EraseKundeInfo()
  {
  KundeInfo.KundeId = "" ;
  KundeInfo.KundeNavn = "" ;
  KundeInfo.KundeAdr = "" ;
  KundeInfo.KundePostNr = "" ;
  KundeInfo.KundeBy = "" ;
  KundeInfo.KundeTlfNrFast = "" ;
  KundeInfo.KundeTlfNrMobil = "" ;
  KundeInfo.KundeEmail = "" ;
  KundeInfo.KundeKom = "" ;
  KundeInfo.NyhedsBrevOK = "1" ;
  KundeInfo.BetalingsForm = "" ;
  }

function
WriteKundeInfo()
  {
  KundeInfo.KundeId = MM_findObj('KundeId').value ;
  KundeInfo.KundeNavn = MM_findObj('KundeNavn').value ;
  KundeInfo.KundeAdr = MM_findObj('KundeAdr').value ;
  KundeInfo.KundePostNr = MM_findObj('KundePostNr').value ;
  KundeInfo.KundeBy = MM_findObj('KundeBy').value ;
  KundeInfo.KundeTlfNrFast = MM_findObj('KundeTlfNrFast').value ;
  KundeInfo.KundeTlfNrMobil = MM_findObj('KundeTlfNrMobil').value ;
  KundeInfo.KundeEmail = MM_findObj('KundeEmail').value ;
  KundeInfo.KundeKom = MM_findObj('KundeKommentarer').value ;
  KundeInfo.NyhedsBrevOK = NyhedsBrevOK ;
  KundeInfo.BetalingsForm = BetalingsForm ;
//alert("WRITE: NyhedsBrevOK : "+NyhedsBrevOK) ;

  return true ;
  }

function
ReadKundeInfo()
  {
  MM_findObj('KundeId').value = KundeInfo.KundeId ;
  MM_findObj('KundeNavn').value = KundeInfo.KundeNavn ;
  MM_findObj('KundeAdr').value = KundeInfo.KundeAdr ;
  MM_findObj('KundePostNr').value = KundeInfo.KundePostNr ;
  MM_findObj('KundeBy').value = KundeInfo.KundeBy ;
  MM_findObj('KundeTlfNrFast').value = KundeInfo.KundeTlfNrFast ;
  MM_findObj('KundeTlfNrMobil').value = KundeInfo.KundeTlfNrMobil ;
  MM_findObj('KundeEmail').value = KundeInfo.KundeEmail ;
  MM_findObj('KundeKommentarer').value = KundeInfo.KundeKom ;

  NyhedsBrevOK = KundeInfo.NyhedsBrevOK ;
//alert("READ: NyhedsBrevOK : "+NyhedsBrevOK) ;

  if (NyhedsBrevOK == "1")
    MM_findObj('NyhedsBrevOKRadio').checked = true ;
  else
    MM_findObj('NyhedsBrevOKRadio').checked = false ;

  BetalingsForm = top.KundeInfo.BetalingsForm ;
  if (BetalingsForm == "Bank")
    MM_findObj('BankRadio')[0].checked = true ;
  if (BetalingsForm == "Post")
    MM_findObj('BankRadio')[1].checked = true ;
  if (BetalingsForm == "Afhentning")
    MM_findObj('BankRadio')[2].checked = true ;

  if (BetalingsForm == "")
    {
    MM_findObj('BankRadio')[0].checked = false ;
    MM_findObj('BankRadio')[1].checked = false ;
    MM_findObj('BankRadio')[2].checked = false ;
	}

  return true ;
  }