home *** CD-ROM | disk | FTP | other *** search
/ Chip 1999 June / Chip_1999-06_cd.bin / tema / SoWa / OBEC.EXE / 01 / S131B.FXP (.txt) < prev    next >
MS Visual FoxPro App  |  1996-05-31  |  7KB  |  85 lines

  1.                      Tabulka   m z d o v 
  2.  c h   tarif
  3.            
  4. RIIS 6.3
  5.             - 
  6.             - PgDn,PgUp
  7.                - ^PgUp,^PgDn
  8.                - ^Home
  9.       - ^End,Esc
  10. Pohyb
  11. Konec 
  12.   2  
  13.   3  
  14.   4  
  15.   5  
  16.   6  
  17.   7  
  18.   8  
  19.   9  
  20. do chyba with error()
  21. p_tarif
  22. xp_tarif
  23. do moderror with sys(16),error(),lineno(1)
  24. c_tarif
  25. c_tarif
  26. KONEC
  27. MEXIT
  28. P_TARIF
  29. XP_TARIF
  30. C_TARIF
  31. ZMENY
  32. KRIVKA
  33. TARIF1
  34. TARIF2
  35. TARIF3
  36. TARIF4
  37. TARIF5
  38. TARIF6
  39. TARIF7
  40. "TARIF8
  41. TARIF9
  42. 71).and.RDOL
  43. q=poc)
  44. @x,4 &vloz krivka
  45. c_tarif
  46. @x,11 &vloz tarif1
  47. @x,18 &vloz tarif2
  48. @x,25 &vloz tarif3
  49. @x,32 &vloz tarif4
  50. @x,39 &vloz tarif5
  51. @x,46 &vloz tarif6
  52. @x,53 &vloz tarif7
  53. @x,60 &vloz tarif8
  54. @x,67 &vloz tarif9
  55. POCET
  56. KRIVKA
  57. C_TARIF
  58. c_tarif
  59. c_tarif
  60. POCET
  61. TARIF
  62. "KONEC
  63. ).and.PROC1
  64. =pocZMEN1
  65. j=1.RDOL
  66. dol)C_TARIF
  67. Nelze aktualizovat tarify, se souborem se pracuje !
  68. do moderror with sys(16),error(),lineno(1)
  69. HLASKA
  70. MEXIT
  71. MODERROR
  72. S131B
  73. exit %
  74. PROC1
  75. ZMEN1
  76. rror 
  77. ZMENY
  78. 6),er
  79. CHYBA
  80. no(1)
  81. HLASKA
  82. L:\OBEC\01\
  83. S131B.FXP
  84. L:\OBEC\01\S131B.PRG
  85.