Chip 1999 June

home *** CD-ROM | disk | FTP | other *** search

/ Chip 1999 June / Chip_1999-06_cd.bin / tema / SoWa / OBEC.EXE / 10 / S1009H.FXP (.txt) < prev next >

Wrap

MS Visual FoxPro App | 1999-01-05 | 20.7 KB | 546 lines

m_Param s2_Hydr s2_HydrP Tisk_Volba Zadejte identifikaci hydr.za Aktual Aktual s1009h RIIS 1 e h l e d ku hydraul.za Hydraul.za Nazev Nazev e - FPOM_VHYDR POM_PODNIKM_PARAM FIRMA DNIKS2_HYDR HYDR ontroS2_HYDRP POLEX pom_PROCX RTOP endCLEFT CRIGHT pisFREEZE ORDER y =HOR DOL c2_HyLEVA PRAVA ty(cNADPIS PorZAHL JMENO do PHODN SOUC endiPSOUC sTITLE to uTITLECOLORPOC0 storF0 r to x,F1 F2 do PrF4 F6 Hlav2 do PF9 F10 Menu2 F0PRG F1ON * posF1PRG vo, F4_JM sF4PRG TISKPRG inF7_JM 1, F7PRG , 27F9PRG y=="F9KEY F9KEY1 et&F10_JM recF10PRG RAMECEK o RIIS NAZEVT ifKLICO m_KoKLNAZ SPACEBAR pTR_HL1 TR_HL2 TR_HL3 TR_HL4 q TR_HL5 TR_HL6 TR_HL7 zTR_HL8 TR_HL9 DET_JM ENTER DETAIL DETPRG if PS_LINE PS_RETURN PS_ZAZN 9MOD_PSV OBSAH s01_Proc znamem se pracuje, nelze aktualizovat. POM_OBR FS2_HYDR ODNIKHLASKA S01_PROC KZMEN_TXT set color to b/w set color to bg/n set color to w+/bg set color to b/bg,w+/rb set color to w+/b set color to w+/w set color to w/n set color to w+/n A k t u a l i z a c e hydraul.za RIIS 1 c2_HydrP c2_HydrP c2_HydrP+ c2_HydrP POM_VETA FPOM_PROM BARVAS KBARVAR BARVAZ KBARVAU BARVAN roBARVAT BARVAH om_BARVAP BARVA endQ2 Q3 pisQ4 y =Q ZMENA1 _HyZMENA2 POM_KONTR POM_KONEC NOVY_Z1 NOVY_Z2 PHOR endiPOCET1 sPOCET2 o uPOMOC storRAD to x,SL POC S2_HYDR PrW_HYDR HYDR W_NAZEV PNAZEV C2_HYDRP S2_HYDRP AUTOR sMM_AUTOR AKTUAL sDAT_AKT HLAV1 inMENU1 1, PROC1 , 27HLAV2 y=="U _HYDRP et&PROC2 recZMENY PS_RETURN NEXIT &barvah - ^PgDn - ^Home - F10 - ^End,Esc &barvap Pohyb Parametry st par. Konec &barvau &barvas &barvaz &barvar &barvaz &barvat Hydr.za zev : &barvau M_VETA &barvau &barvas &barvau M_VETA FW_HYDR W_NAZEV &barvau if q>pocet&y q =pocet&y if novy_Z&y pocet&y =2 pocet&y =1 @ 4,13 &vloz w_Hydr pict "@!X" @ 5,13 &vloz w_Nazev Zmena&y =.t. s01_Proc Duplicitn identifikace hydr.za FPOM_VETA KW_HYDR HLASKA oS01_PROC _VETA _S2_HYDR HYDR &barvah - ,PgDn,PgUp - ^PgUp,^PgDn - ^Home - ^End,Esc &barvap Pohyb Konec &barvau &barvas &barvaz &barvar Parametry &barvan Hodnota &barvau POM_TEXT M_VETA &barvau &barvas M_TEXT _VETA M_TEXT KC2_HYDRP PORADI_P oNAZEV_P HODNOTA _MJ_P POZN_P &barvau pocet&y =4 if q>pocet&y q =pocet&y @ x,5 &vloz c2_HydrP.Nazev_P @ x,31 &vloz c2_HydrP.Hodnota @ x,38 &vloz c2_HydrP.MJ_P @ x,49 &vloz c2_HydrP.Pozn_P Zmena&y =.t. _VETA _TEXT _HYDRP RADI_P oAKTUAL MM_AUTOR _DAT_AKT do Proc&y do Zmen&y with "get" do Zmen&y with "say" if q=pocet&y and z<reccount() if q<pocet&y and i#55 q =pocet&y Zmena&y =.t. novy_Z&y =.t. Zmena&y =.t. novy_Z&y =.t. Zmena&y =.t. Zmena&y =.t. novy_Z&y =.t. colorz Opravdu zru it tento z znam? (A/N) if novy_Z&y =.t. novy_Z&y =.f. c2_HydrP c2_HydrP+ c2_HydrP if q<pocet&y q =pocet&y it pr ci beze zm n? (a/N) POM_OBR FMMCOLOR _TEXT RADI_P POM_KONEC LK pisPOMOC y =Y VZOREK _HyKONTROLA POM_KONTR ZAPIS C2_HYDRP PORADI_P PPREPOC_PORQ endiHLAV1 sPROC1 o uHLAV2 PROC2 storMENU2 o x,HYDR S2_HYDR AUTOR PrMM_AUTOR AKTUAL DAT_AKT PW_HYDR W_NAZEV NAZEV ORS2_HYDRP ZMENA1 ZMENA2 NOVY_Z1 s01_Proc identifikace hydraul. za s01_Proc Duplicitn identifikace hydr.za s01_Proc zev. POM_VETA FPOM_KONTR _TEXT KW_HYDR HLASKA KS01_PROC RADI_P S2_HYDR W_NAZEV _PROC c2_HydrP Zmena&y =.f. POM_OBR FMOD_SYS ZMENA1 KS2_HYDR KW_HYDR S2_HYDRP oC2_HYDRP NAZEV W_NAZEV NOVY_Z1 AUTOR MM_AUTOR sAKTUAL DAT_AKT =ZMENA2 PORADI_P s01_Proc POM_VETA PORADI_P KDEJ_STAV S01_PROC filterz colorz Hydr.za navedeny parametry. P epsat ? (a/N): s01_Proc POM_KOP FPOM_ALI POM_ORD KPOM_VETA POM_FILT KMMCOLOR POM_OBR oZOBR_HYDR POM_VHYDR C2_HYDRP KOP_HYDR _HYDRP HOR sPROC2 S2_HYDR =ZMENA2 DEJ_STAV yS01_PROC filterz colorz pom_Pom pom_Pom pom_Pom pom_VHydr ehled hydraul.za Hydraul. N Hydr+' '+Nazev Mod_Fun s01_Proc POM_ALI FPOM_ORD POM_VETA KPOM_FILT MMCOLOR KPOM_OBR POM_VETAH POM_POM S2_HYDR W_HYDR POM_VHYDR N_LMEZ N_PMEZ sN_HMEZ N_DMEZ =N_PROM N_HOD yN_POC N_TEXT N_HLAV N_RAD ZOBR_NAP PMOD_FUN ORDEJ_STAV iS01_PROC filterz c2_HydrP c2_HydrP c2_HydrP+ c2_HydrP s01_Proc POM_ALI FPOM_ORD POM_VETA KPOM_FILT C2_HYDRP KS2_HYDRP POM_VHYDR S2_HYDR AUTOR MM_AUTOR AKTUAL DAT_AKT sNOVY_Z2 DEJ_STAV =S01_PROC Tisk p ehledu Tisk hydr.za Konec Mod_Psv POM_VETA FPOM_OBR POM_VOL KTISK MOD_PSV KTISK_HYDR pom_Ozn c2_Pom c_Oznac.dbf2 c_Oznac s01_Proc Nelze tisknout, nebyly vybr daje. s01_Proc Prob prava dat ... pom_Ozn pom_Ozn pom_Ozn s2_HydrP c2_Pom Mod_Lib Mod_Lib c_Oznac.dbf s01_Proc Prob tisk ... Mod_Lib s1009h s1009h(!9 c_Oznac.dbf POM_RADEK POM_VETA POM_OBR KPOM_OZN C2_POM KHLASKA S01_PROC C_OZNAC ZAZNAM HYDR NAZEV S2_HYDRP PORADI_P sNAZEV_P HODNOTA =MJ_P POZN_P yAUTOR AKTUAL DAT_AKT P_SETUP PP_RESET ORP_6LPI iP_8LPI sP_10CPI uP_12CPI P_16CPI orP_20CPI x,P_BOLDON P_BOLDOFF P_ULINEON P_ULINEOFFP_ITALON P_ITALOFF P_SUPERON P_SUPEROFFP_SUBON P_SUBOFF RP_DBST_ON P_DBST_OFFP_LETRQUALP_DRAFT inP_COMPRESSP_COMP_OFFP_WIDT_ON P_WIDT_OFFP_HEIG_ON P_HEIG_OFFP_NEWPAGE P_KODY MOD_LIB W_TISK NASTAV_PRNMODTESTT NTRGPZAZ S2_HYDR PS_RETURN MOD_SYS NASTAV_REPS1009H S1009H % AKTUAL ZMEN_TXT MENU1 HLAV1 f PROC1 ZMEN1 MENU2 c2_Hy5 HLAV2 PROC2 sel{ ZMEN2 ZMENY do KONTROLA ZAPIS R4 PREPOC_POR VZOREK s}7 ZOBR_HYDR KOP_HYDR TISK_VOLBA TISK_HYDR Z:\RIIS\ S1009H.FXP Z:\RIIS\S1009H.PRG