home *** CD-ROM | disk | FTP | other *** search
/ Chip 2000 May / Chip_2000-05_cd1.bin / internet / Cybex / scripts / kosik.js < prev    next >
Text File  |  1999-10-12  |  928b  |  39 lines
  1.  
  2. function setfocus(line)
  3. {
  4. if (document.frmKosik == null) return
  5. else {
  6.     eval("document.frmKosik.k" + document.frmKosik.tot.value).focus()
  7.     eval("document.frmKosik.k" + document.frmKosik.tot.value).select()
  8.     }
  9. }
  10.  
  11. function chkKosik(thisform)
  12. {
  13. for (i=1;i<=thisform.tot.value;i++) {
  14.     ks = eval("thisform.k"+i+".value")
  15.     if (!isIntegerInRange(ks,0,maxks)) {
  16.         eval("thisform.k" + i).focus()
  17.         eval("thisform.k" + i).select()
  18.         if (!isInteger(ks)) {
  19.             alert ("PoΦet kus∙ " +i+ ". polo₧ky nenφ zadan² sprßvn∞.\nZadßvejte prosφm pouze celoΦφslnΘ hodnoty.\n\nK vymazßnφ polo₧ky zadejte 0 ks.")
  20.             return false
  21.             }
  22.         if (ks > 30000) {
  23.             alert ("PoΦet kus∙ " +i+ ". polo₧ky je p°φliÜ velk².\nNejvφce lze objednat " +maxks+ " kus∙.")
  24.             return false
  25.             }
  26.         
  27.         }
  28.     }
  29. return true
  30. }
  31.  
  32. prepblik = new Image()
  33. prepblik.src = "images/prepblik.gif"
  34.  
  35. function fzmena()
  36. {
  37. document.zmena.src = prepblik.src
  38. }
  39.