home *** CD-ROM | disk | FTP | other *** search
/ Chip 1999 June / Chip_1999-06_cd.bin / tema / SoWa / OBEC.EXE / 05 / MOD55C.FXP (.txt) < prev    next >
MS Visual FoxPro App  |  1999-01-22  |  17KB  |  434 lines
  1. FFF$m
  2. .01.01
  3. RIIS 5.1
  4. jmenoW_DAT
  5. r(poW_TT
  6. dane,W_PODNIK
  7. iPODNIK
  8. _doANSI
  9. iMOD55CX
  10. m5_plan1.dbf2
  11. create dbf &f_adr\data\m5_plan1 (skupina c(1),  objednavka c(10), rok_obj c(2), poradi n(3), hod0 c(10), hod1 c(10), hod2 c(10), hod3 c(12), hod4 c(10), hod5 c(10), hod6 c(10),  hod7 c(10), hod8 c(10), hod9 c(10), hod10 c(10), hod11 c(10), hod12 c(10),  ident c(12), nazev c(25), ter_ov_tt c(6), ter_poz_tt c(6),  ident_odb c(20))
  12. RIIS 5.2
  13.  Kontrola pln
  14. mod55c
  15. f4_prg
  16. Zadejte 
  17. slo objedn
  18. hl_objed
  19. Aktual
  20. akt_pl
  21. m1_ident
  22. ident
  23. m2_por
  24. objednavka
  25. m5_plan1
  26. objednavka
  27. m1_kusov
  28. vykres
  29.  aktualizace pl
  30. nu ...
  31.       
  32.       
  33. STATOR NAVF
  34. ROTOR NAVF
  35. MOTORF
  36. JULIF
  37. m5_plan1
  38. objednavka
  39. plan1
  40. skupina+'  '
  41. skupina
  42. Objedn.
  43. left(objednavka,7)
  44. objednavka
  45. str(poradi,3)
  46. poradi
  47. po.typ_por
  48. po.typ_por
  49. po.stav_por
  50. po.stav_por
  51. id.stav
  52. id.stav
  53. Identifikace
  54. po.ident
  55. po.ident
  56. ' ' + id.kod_pol + ' '
  57. id.kod_pol
  58. id.nazev
  59. id.nazev
  60. id.typ
  61. id.typ
  62. Exter.id.
  63. left(id.ident_odb,12)
  64. id.ident_odb
  65. Ks-po
  66. str(po.ks_pozad,6)
  67. po.ks_pozad
  68. RT-po
  69. po.ter_poz_tt
  70. po.ter_poz_tt
  71. Ks-pot
  72. str(po.ks_potvrz,6)
  73. po.ks_potvrz
  74. RT-pot
  75. ter_ov_tt
  76. ter_ov_tt
  77. Ks-dod
  78. str(po.ks_dodane,6)
  79. po.ks_dodane
  80. str(po.ks_potvrz- po.ks_dodane,4)
  81. po.ks_potvrz- po.ks_dodane
  82.   Stav zak.
  83. hod0+'|'
  84. Odlitek
  85. hod1+'|'
  86. hod2+'|'
  87. Plechy
  88. hod3+'|'
  89.  HP,R
  90. hod4+'|'
  91. hod12+'|'
  92. hod12
  93. Komut
  94. hod5+'|'
  95. hod6+'|'
  96. hod7+'|'
  97. Kostra
  98. hod8+'|'
  99. Rotorpaket
  100. hod9+'|'
  101. hod10+'|'
  102. hod10
  103. Hotovo
  104. hod11+'|'
  105. hod11
  106. Term.po
  107. tran(po.ter_poz,'@E')
  108. po.ter_poz
  109. Term.pot
  110. tran(po.ter_ov,'@E')
  111. po.ter_ov
  112. po.ico_urceni
  113. po.ico_urceni
  114. po.zav_urceni
  115. po.zav_urceni
  116. po.zprac_tpv
  117. po.zprac_tpv
  118. OBJEDNAVKAROK_OBJ
  119. poPORADI
  120. ne,TER_POZ_TTIDENT_ODB
  121. VKASKUPINA
  122. ahTER_OV_TT
  123. PLAN1
  124. VKAPOLEX
  125. (i)= FREEZE
  126. ks_RAMECEK
  127. o.RTOP
  128. ane,4RBOT
  129. dn(i)CLEFT
  130. s_poCRIGHT
  131. .ksNAZEVT
  132. PROCX
  133. (i)= ' F2
  134. v zak.'F3
  135. eno(i)=F4
  136. d0+'|'"F4PRG
  137. i)= F6
  138. zahF9KEY
  139. OdliF9PRG
  140. menoDETAIL
  141. d1+DET_JM
  142. dn(ENTER
  143. M1_IDENT
  144. IDENT
  145. )= 'ID
  146. jmM2_POR
  147. "hoPO
  148. EDNAVKAM5_PLAN1
  149. dM1_KUSOV
  150. AVYKRES
  151. (i)OBR_P
  152. MOD_SYS
  153. = MESS
  154. STAV_POR
  155. "KS_DODANE
  156. KS_POZAD
  157. lW_KOMP
  158. jmeC_VYKRESU
  159. NAZEV
  160. hodW_SKUP
  161. od4TYP
  162.  i+HOD3
  163. KAJMENO
  164. (i)=HODN
  165. +'|'I
  166. (i)=MOD_PSV
  167. PS_RETURN
  168. DNAVKAOBR
  169. colora
  170. set color to &color
  171. DNAVKACOLOR
  172. znam aktualizuje n
  173. kdo jin
  174.  !  Po
  175. kejte, pros
  176. m ...
  177. set color to b/w
  178. set color to bg/n
  179. set color to w+/bg
  180. set color to b/bg,w+/rb
  181. set color to w+/b
  182. set color to w/n
  183. &barvau
  184. HLASKA
  185. VKAPS_RETURN
  186. CISELNIK
  187. POZ_TTDOL
  188. T_ODB
  189. POCET
  190. VKADOP1
  191. ahDOP2
  192. VKACOUNT
  193. ZAKAZNIK
  194.  POMOC
  195. MECEK
  196. o.RAD
  197. ane,4SL
  198. dn(i)POC
  199. s_poKONTROLA
  200. sBARVA
  201. KONEC
  202. (i)= ' X
  203. v zak.'R
  204. eno(i)=A
  205. d0+'|'"Z
  206. i)= U
  207. OdliOK_C
  208. menoANSI
  209. d1+W_H0
  210. dn(W_H1
  211. )= 'W_H4
  212. jmW_H5
  213. "hoW_H6
  214. NAVKAW_H7
  215. dW_H8
  216. AW_H9
  217. (i)W_H10
  218. W_H11
  219. = HOD0
  220. "HOD2
  221. lHOD4
  222. jmeHOD6
  223. hodHOD8
  224. od4HOD9
  225.  i+HOD10
  226. HOD11
  227. KAW_H12
  228. (i)=HOD12
  229. +'|'BARVAS
  230. =BARVAR
  231. BARVAZ
  232. BARVAU
  233. 'KoBARVAN
  234. jBARVAH
  235.  "hKS
  236. hMENU_P
  237. "hoPORADI
  238.  = ZMENY_P
  239. &barva
  240.  Aktualizace pl
  241. roby 
  242. Objedn
  243. Ext. identifikace
  244. no KS
  245. Potvrzeno KS
  246. no KS
  247. Stav zak
  248. Odlitek
  249. Plechy
  250.  HP,R
  251. Komut
  252. Kostra
  253. Rotor paket
  254. Hotovo
  255.             - 
  256.       - ^End,Esc
  257. Pohyb
  258. Konec - 
  259. 999999
  260. 999999
  261. 999999
  262. OBJEDNAVKAPORADI
  263. ELNIK
  264. ,IDENT
  265. Z_TTNAZEV
  266. VKAIDENT_ODB
  267. KS_POZAD
  268. ATER_POZ_TTKS_POTVRZ
  269. TER_OV_TT
  270. KS_DODANE
  271. ane,4W_H1
  272. dn(i)W_H2
  273. s_poW_H3
  274. sW_H4
  275. W_H12
  276. )= ' W_H6
  277. zak.'W_H7
  278. o(i)=W_H8
  279. +'|'"W_H9
  280. i)= W_H10
  281. iW_H11
  282. @  8,64 &vloz w_h0 pict '@!X'
  283. @  9,64 &vloz w_h1 pict '@!X'
  284. @ 10,64 &vloz w_h2 pict '@!X'
  285. @ 11,64 &vloz w_h3 pict '@!X'
  286. @ 12,64 &vloz w_h4 pict '@!X'
  287. @ 13,64 &vloz w_h12 pict '@!X'
  288. @ 14,64 &vloz w_h5 pict '@!X'
  289. @ 15,64 &vloz w_h6 pict '@!X'
  290. @ 16,64 &vloz w_h7 pict '@!X'
  291. @ 17,64 &vloz w_h8 pict '@!X'
  292. @ 18,64 &vloz w_h9 pict '@!X'
  293. @ 19,64 &vloz w_h10 pict '@!X'
  294. @ 20,64 &vloz w_h11 pict '@!X'
  295. NAVKAQ
  296. ELNIK
  297. Z_TTQ3
  298. VKAQ5
  299. NT_ODB
  300. POZAD
  301. _POZ_TTQ9
  302. POTVRZ
  303. OV_TT
  304. ODANE
  305. ane,4Q13
  306. dn(i)
  307. it pr
  308. ci beze zm
  309. n? (a/N)
  310. KONEC
  311. AVKAPOCET
  312. ELNIK
  313. Z_TTQ3
  314. VKAQ5
  315. NT_ODB
  316. POZAD
  317. _POZ_TTQ9
  318. POTVRZ
  319. OV_TT
  320. ODANE
  321. ane,4Q13
  322. dn(i)I
  323. s_poA
  324. )= ' HOR
  325. zak.'U
  326. o(i)=R
  327. +'|'"Z
  328. i)= J
  329. iPROC_P
  330. zahZMEN_P
  331. enoPOM
  332. d1+K_UDAJU
  333. n(OK_C
  334. AVKAHOD0
  335. ,HOD1
  336. Z_TTW_H1
  337. VKAW_H2
  338. AHOD4
  339. OZ_TTW_H4
  340. ane,4W_H6
  341. dn(i)HOD7
  342. s_poW_H7
  343. sHOD8
  344. )= ' W_H9
  345. zak.'HOD10
  346. (i)=W_H10
  347. '|'"HOD11
  348. i)= W_H11
  349. iHOD12
  350. zahW_H12
  351.  Tisk pl
  352. roby 
  353.  Tisk p
  354. ehledu 
  355.  Konec 
  356. mod_psv
  357. mod_lib
  358. mod_lib
  359. ordera
  360.  Prob
  361.  tisk  ... 
  362. mod55c
  363. set order to &st_order
  364. AVKAW_TISK
  365. ,MOD_PSV
  366. TTP_SETUP
  367. P_RESET
  368. KAP_6LPI
  369. P_8LPI
  370. P_10CPI
  371. AP_12CPI
  372. TTP_16CPI
  373. P_20CPI
  374. P_BOLDON
  375. P_BOLDOFF
  376. P_ULINEON
  377. P_ULINEOFFP_ITALON
  378. sP_ITALOFF
  379. P_SUPERON
  380. P_SUPEROFFP_SUBON
  381. .'P_SUBOFF
  382. =P_DBST_ON
  383. P_DBST_OFFP_LETRQUALP_DRAFT
  384. ahP_COMP_OFFP_WIDT_ON
  385. P_WIDT_OFFP_HEIG_ON
  386. P_HEIG_OFFP_NEWPAGE
  387. P_KODY
  388. = 'MOD_LIB
  389. jmINDIK
  390. "hoNASTAV_PRNST_ORDER
  391. dPLAN
  392. AZAZT
  393. (i)OBRT
  394. = MOD55C
  395. ordera
  396. poradi
  397.  Zadejte : 
  398.  Objedn
  399. vka :
  400.  objedn
  401. vky :
  402. set order to &st_order
  403.  objedn
  404. vky nebylo nalezeno
  405. znam byl nalezen, nen
  406. ak obsa
  407. en v zadan
  408. set order to &st_order
  409. ST_ZAZ
  410. VKAST_ORDER
  411. ST_FOR
  412. ,PORADI
  413. TTOBR_HL
  414. W_OBJ
  415. KAW_POR
  416. NASEL
  417. HLASKA
  418. AMOD55CX
  419. HLASKA
  420. f2 =b
  421. AKT_PL
  422. PORADI
  423. MENU_P
  424. PROC_P
  425. ZMEN_P
  426. ZMENY_P
  427. f.)A,
  428. K_UDAJU
  429. F4_PRG
  430. HL_OBJED
  431. X:\OBEC\05\
  432. MOD55C.FXP
  433. X:\OBEC\05\MOD55C.PRG
  434.