home *** CD-ROM | disk | FTP | other *** search
/ Chip 1999 June / Chip_1999-06_cd.bin / tema / SoWa / OBEC.EXE / 04 / MOD41A5.FXP (.txt) < prev    next >
MS Visual FoxPro App  |  1997-10-09  |  9KB  |  163 lines
  1. pouz_popupf
  2. ident
  3. pouz_popupf
  4. TYP_NAHR
  5. rPOUZ_POPUPVOLBA
  6.     DET_OBR
  7. r(AKTUAL
  8. MOD_SYS
  9.   M1_IDENT
  10. zIDENT
  11.  W_POLE
  12. set color to b/w
  13. set color to bg/n
  14. set color to w+/bg
  15. set color to b/bg,w+/rb
  16. set color to w+/b
  17. set color to w+/w
  18. set color to w/n
  19. &barvaz
  20. hrady polo
  21. ky - 
  22. &barvas
  23. c_nahr
  24. c_nahr
  25. c_nahr
  26. c_nahr.dbf
  27. _NAHR
  28. rZMENA
  29. OPUPKONEC
  30.     POMOC
  31. r(HOR
  32.   POCET
  33. zBARVA
  34.  BARVAS
  35.    BARVAR
  36. PUPBARVAZ
  37.    BARVAU
  38.    BARVAN
  39.  enBARVANS
  40.   BARVAH
  41.  NOVY_Z
  42. konWTEXT4
  43.  TYP_NAHR
  44.  M4_NAHR
  45.   CISLOP
  46. o W_TYP_N
  47.  C_NAHR
  48. IDENT
  49. ndifTYP_N
  50.  case i=HLAVA
  51. .w_aZMENY
  52.    kDBF
  53. &barvan
  54. Pr Identifikace N
  55. zev                Jakostn
  56.  norma  Pozn
  57. Proc.
  58. W_TYP_N
  59. mod_proc
  60. inlist(kod_pol,'M','N','T','U','X','Y','Z')
  61. &barvau
  62. @!S14
  63. it pr
  64. ci beze zm
  65. n? (a/N)
  66. TYP_N
  67. OPUPZ1
  68.     T1
  69. PUPKONEC
  70.    DOL
  71. RVANS
  72.  PROC1
  73. konZMEN1
  74.  W_AKT
  75. _NAHR
  76. o W_IDENT
  77.  W_NAZEV
  78. ndifZOBR_POL
  79. OMOD_PROC
  80. N_IDENT
  81. i=M1_IDENT
  82. aC_NAHR
  83. kNAZEV
  84.  JAK_CSN
  85. aPOZN
  86.    W_TYP_N
  87. endifQ
  88.   endcasPOCET
  89. rNOVY_Z
  90. ***ZMENA
  91. ***IDENT
  92. pCISLOP
  93.  ulTYP_N
  94. ifPOMOC
  95.   OBR
  96. t m4_nMENU1
  97.  seePOM
  98.  ULOZ
  99. c_nahr
  100. ZMENA
  101. rM4_NAHR
  102. UPCISLOP
  103.   IDENT
  104. r(TYP_N
  105. W_TYP_N
  106.   N_IDENT
  107. zC_NAHR
  108. &barvau
  109. @ x,1 &vloz prior pict '99'
  110. @ x,4 &vloz n_ident pict '@!X'
  111. ka neexistuje
  112. @ x,54 &vloz pozn pict '@X' function '@S19'
  113. @ x,74 &vloz proc
  114. _NAHR
  115. UPW_TYP_N
  116.   POCET
  117. zM1_IDENT
  118.  C_NAHR
  119.  N_IDENT
  120. UPTXT
  121.    HLASKA
  122. RVANS
  123.   NAZEV
  124.  JAK_CSN
  125. nZMENA
  126. &barvau
  127. &barva
  128. BARVA
  129. rBARVAZ
  130.   DOL
  131. zIDENT
  132.  CISLOP
  133.  PRIOR
  134. UPN_IDENT
  135.   M1_IDENT
  136.  C_NAHR
  137. nNAZEV
  138.  JAK_CSN
  139.  POZN
  140. nW_TYP_N
  141.  PROC
  142. ny-char.polo
  143.               - 
  144. ,PgDn,PgUp
  145.               - ^PgUp,^PgDn
  146.               - ^Home
  147.               - F10
  148.               - ^End,Esc
  149. Pohyb
  150. Konec
  151. UPAKTUAL
  152. HLAVA
  153. ZMENY
  154. ZMEN1
  155. popup
  156. PROC1
  157.  pouz
  158. MENU1
  159. show q
  160. X:\OBEC\04\
  161. MOD41A5.FXP
  162. X:\OBEC\04\MOD41A5.PRG
  163.