Chip 1999 June/Chip_1999-06_cd.bin/tema/SoWa/OBEC.EXE/10/SL1.FXP

MS Visual FoxPro App | 1999-04-13 | 27KB | 531 lines

set path to &f_adr,&pth, &pth\10,&pth\01,&pth\02,&pth\03,&pth\04,&pth\05, &pth\06,&pth\07,&pth\08,&pth\09,&pth\11,&pth\12,&pth\13, &f_adr\data
zakladni
kladn
CENTz
EUTIF
          S l
 r e n s k
    p
 p r a v a    v
 r o b y
         M e t a l u r g i c k
    p
 p r a v a    v
 r o b y
RIIS 1
EUTIF
@ 5,3 say ' Sl
rensk
prava v
roby '
@ 5,5 say 'l'
@ 5,3 say ' Metalurg. p
prava v
roby '
@ 5,8 say 'l'
@ 8,3 say ' Polo
ky, receptury '
@ 8,5 say 'o'
@ 9,3 say ' Aktualizace v
r. postup
@ 9,4 say 'A'
@10,3 say ' P
ehledy v
r. postup
@10,4 say 'P'
@11,3 say ' Tisk v
ho postupu '
@11,4 say 'T'
@12,3 say ' Pl
 kalkulace '
@12,12 say 'k'
@13,3 say ' V
 pracovi
@13,4 say 'V'
@14,3 say ' Konstruk
 rozpiska '
@14,16 say 'r'
@15,3 say ' Technologick
 postupy '
@15,5 say 'e'
@16,3 say ' Odv
rny '
@16,5 say 'd'
@17,3 say '
ky, pomocn
 soubory '
@17,9 say 'n'
@21,3 say ' Stop '
@21,4 say 'S'
set color to w+/b
set color to w+/bg
set color to b/w
set color to b/bg
set color to w+/b
set color to w/w
set color to b/w
set color to w+/w
set color to w+/bg
set color to w/w
set color to n/bg
p_prist
xp_prist
Tabulka mzdov
ch tarif
 Tabulka mzdov
ch tarif
epocet K
 Konec
zakladni
kladn
s01_Proc
@ 7,47 say ' Vyr
 polo
@ 7,48 say 'V'
@ 8,47 say ' Receptury   '
@ 8,48 say 'R'
@ 9,47 say ' Materi
l.polo
@ 9,48 say 'M'
@16,47 say ' Vyr
 polo
@16,49 say 'y'
@17,47 say ' Receptury   '
@17,49 say 'e'
@18,47 say ' Materi
l.polo
@18,49 say 'a'
@22,68 say ' Konec '
@22,69 say 'K'
set century &pom_Cent
VYR,ODL
set century &pom_Cent
RECEPTURY
set century &pom_Cent
MATERIAL
set century &pom_Cent
VYR,ODL
set century &pom_Cent
SLEVARNA3
set century &pom_Cent
MATERIAL
zakladni
kladn
@12,42 say ' Aktualizace v
ho postupu '
@12,43 say 'A'
@20,68 say ' Konec '
@20,69 say 'K'
@11,43 say '
@11,46 say 'z'
@12,43 say '
 modelov
 - modely '
@12,46 say 'm'
@13,43 say '
 - kokily '
@13,46 say 'l'
@14,43 say '
 jadern
@14,46 say 'j'
@15,43 say '
 rastry '
@15,46 say 'r'
@16,43 say '
 formov
@16,46 say 'f'
@17,43 say '
 operace '
@17,47 say 'p'
@18,43 say '
dra   '
@18,48 say 'd'
@21,68 say ' Konec '
@21,69 say 'K'
@12,46 say ' Tisk v
ho postupu '
@12,47 say 'T'
@18,68 say ' Konec '
@18,69 say 'K'
@ 7,40 say ' materi
 norma taveniny '
@ 7,41 say 'm'
@ 8,40 say ' materi
 norma sm
@ 8,42 say 'a'
@ 9,40 say ' pl
n.kalkulace jader z p
ehledu '
@ 9,41 say 'p'
@10,40 say ' pl
n.kalkulace odlitk
ehledu '
@10,42 say 'l'
@11,40 say ' pl
 kalkulace 1 odlitku '
@11,44 say 'n'
@20,68 say ' Konec '
@20,69 say 'K'
@ 9,38 say ' Pracovi
@ 9,42 say 'c'
@ 9,55 say ' Pracovi
edisek '
@ 9,58 say 'a'
@16,46 say '
 po pracovi
@16,51 say 'p'
@17,46 say '
 po st
edisc
@17,51 say 's'
@18,46 say '
ediska + pracovi
@18,49 say 't'
@22,68 say ' Konec '
@22,69 say 'K'
@ 5,44 say ' Aktualizace-vyr.polo
@ 5,45 say 'A'
@ 6,44 say ' Ru
     '
@ 6,45 say 'R'
@ 7,44 say ' Hr.zm
ny ku.vazeb '
@ 7,45 say 'H'
@ 8,44 say ' Kop
 text
@ 8,46 say 'o'
@14,47 say ' P
ehled-vyr.polo
@14,48 say 'P'
@15,47 say ' Kusovn
 vazby '
@15,49 say 'u'
@16,47 say ' Z
kaznick
 ident. '
@16,48 say 'Z'
@17,47 say ' Archiv polo
@17,52 say 'i'
@18,47 say ' Texty '
@18,48 say 'T'
@19,47 say ' P
ehled v
ech text
@19,50 say 'e'
@22,68 say ' Konec '
@22,69 say 'K'
set century &pom_Cent
VYR,ODL
set century &pom_Cent
set century &pom_Cent
set century &pom_Cent
VYROBA
set century &pom_Cent
set century &pom_Cent
set century &pom_Cent
mod11o
set century &pom_Cent
set century &pom_Cent
VYROBA
set century &pom_Cent
VYROBA
zakladni
kladn
@10,51 say ' Aktualizace '
@10,52 say 'A'
@17,52 say '
@17,54 say 'z'
@18,52 say '
 operace '
@18,54 say 'o'
@19,52 say '
pravky '
@19,54 say 'p'
@18,68 say ' Konec '
@18,69 say 'K'
SLEVARNA
m_param
@13,38 say ' Odv
ediska '
@13,48 say 's'
@16,38 say ' Archiv odv
@16,40 say 'r'
@19,38 say ' V
kony tav
rny Nh  '
@19,39 say 'V'
@13,62 say ' P
ehled obrat
@13,63 say 'P'
@17,62 say ' z
kl. p
ehled '
@17,63 say 'z'
@18,62 say ' polo
ky a data '
@18,73 say 'd'
@19,62 say ' obd.,pol.,data '
@19,64 say 'b'
@22,68 say ' Konec '
@22,69 say 'K'
SLEVARNA
@13,38 say ' Odv
ediska '
@13,48 say 's'
@16,38 say ' Archiv odv
@16,40 say 'r'
@13,62 say ' P
ehled obrat
@13,63 say 'P'
@17,62 say ' z
kl. p
ehled '
@17,63 say 'z'
@18,62 say ' polo
ky a data '
@18,73 say 'd'
@19,62 say ' obd.,pol.,data '
@19,64 say 'b'
@22,68 say ' Konec '
@22,69 say 'K'
SLEVARNA
@10,38 say ' Progr. '
@10,39 say 'P'
@ 9,49 say ' Hydraul.'
@ 9,50 say 'H'
@10,61 say ' mater.'
@10,62 say 'm'
@10,71 say ' oper.'
@10,72 say 'o'
@16,54 say '
@16,59 say 'l'
@22,68 say ' Konec '
@22,69 say 'K'
set century &pom_Cent
POM_CENT
tCISLO
   KOPIE
 casAKT
 AKTUAL
   POM_NAZADRPOM_NAZZOBZMENPOV
  USCHOVA
with "0MM_ZPET
  ANSI
oID_ORG
TERPP
     ZZ
    prgRR
   =.t.POLE
     I
g_plaBARVA1
  BARVAN
   BARVA1P
 =BARVAP
   BARVAZ
rg_BARVAM
       SP
rg_npolRK
   SK
      dCIS
41a_2
UROVEN
   MODDP
e daBARVADP
  P_PRIST
 cXP_PRIST
PRIHLAS
  M_DP
x = 4X_DP
     AX
set cenW_MODUL
_CVOL
      MOD_SYS
 MS131B
withPREP_OPER
S01_PROC
wMODDPDBF
YKONEC
  MOD11A
 dPRG_ZAS
wiPRG_PLAN
 PRG_KALK
oPRG_POZID
PRG_NPOL
 MOD41A_2
yMOD11B
  MOD41B_2
aS1002A
BS1003Z
eS1003M
 &S1003K
 S1003D
  S1003R
ysS1003F
5"S1003O
  S1003J
ulS1004
ASL141A
 SL141B
moSL141C
  SL141D
 cMOD17BS
MOD37C
 MOD37D
tuMOD37F
  MOD11C
eMOD41E2
  MOD11OP
  MOD11O
uryMOD11D
MOD41E
  MOD41G
_SM_PARAM
BPOLE1
    KONT_PR
odD_KOOP
RIDILNA_KOOPS132X
 mS133A
  S133
     S133B
S133C
  W_ARCHIV
tMOD54C
   MOD54C1
sMOD42C
PREHL
seMOD42D
 Technick
ny
 prost
      V
 postup odlitku
EUTIF
rensk
prava v
roby
 Metalurgick
prava v
roby
   Odbyt
 Technicko-
 ekonomick
 Operativn
roby
ID_ORG
tUSCHOVA
 Aktualizace
 polo
 Receptury
 Materi
l.polo
ehledy
 polo
 Receptury
 Materi
l.polo
 Polo
ky, receptury
rustku
 postupu
 storno
 Aktualizace v
ho postupu
 modelov
 - modely
 - kokily
 jadern
 rastry
 formov
 operace
dra
ehledy v
ch postup
 Tisk v
ho postupu
 materi
 norma taveniny
 materi
 norma sm
n.kalkulace jader z p
ehledu
n.kalkulace odlitk
ehledu
 kalkulace 1 odlitku
 P l
 n o v
    k a l k u l a c e
 Pracovi
 Pracovi
edisek
ehled po pracovi
ehled po st
edisc
 pracovi
 Pracovi
 Pracovi
edisek
ehledy
 po pracovi
 po st
edisc
ediska + pracovi
 pracovi
 Aktualizace-vyr.polo
 Hr.zm
ny ku.vazeb
 text
ehled-vyr.polo
 Kusovn
 vazby
kaznick
 ident.
 Archiv polo
 Texty
ehled v
ech text
 Konstruk
 rozpiska
 Aktualizace
ehledy
 operace
pravky
 Technologick
 postupy
ediska
 Arch
v odv
kony tav
rny Nh
ehled obrat
 Arch
v obr. dle
kl. p
ehled
 polo
ky a data
 obd.,pol.,data
ID_ORG
 Progr.
 Hydraul.
 mater.
 oper.
ky, pomocn
 soubory
vrat do hlavn
& barv
set co
/bg"  2L
arva n N
   ba
t colo

va 1.p@W
  barv
OBR10
olor :\
OBR11

P:\IN\SK\O\10\
SL1.FXP
P:\IN\SK\O\10\SL1.PRG