. . # m1_zdroj x1_dilna x1_zdroj RIIS 1.5 P r e h l e d ciselniku pracovist POLEX APOC2 OBSAHX COLORZAHL OBSAH LJMENO IM1_ZDROJ X1_DILNA X1_ZDROJ NADPIS JLEVA MPRAVA FPOLE MRIIS NAZEVT ESSPROHL pocet=poc&u zahlavi&u=zahlavi&u+zahl(i) veta&u=veta&u+jmeno(i) zahlavi&u=zahlavi&u+chr(179) veta&u=veta&u+"+chr(179)+" mez=len(veta&u)+1 i=poc&a zahlavi&u=zahlavi&u+' ' veta&u=veta&u+"+' '+" +' '+ @ r+nadpis,leva say pol&cp @ r+nadpis,leva say pol&cp @ r+nadpis,leva say pol&cp zahlavi=zahlavi&y veta=veta&y zahlavi=zahlavi&y veta=veta&y ZAHLAVI1 ZAHLAVI2 ZAHLAVI3 AZAHLAVI4 ZAHLAVI5 ZAHLAVIT ZAHLT1 VETA1 VETA2 VETA3 VETA4 OLORVETA5 VETAT1 LPOCI _ZDROJ POCET JCARA POLEX FJMENO MZAHLAVI PROHL FPOCZ RAMECEK HLAVI SPOL3 FPOL4 _KOOPPOL8 POL10 POL11 POL12 POL13 POL14 POL15 RPOL16 _HLAVA PPREHLED _TEXT PODMV PODMS NADPIS PRAVA VYBER TRIDENI MODTESTT VOLBA KAKTUAL Pocet zaznamu: FF Vyber Trideni Volba polozek Zmena Pohyb Konec Prirustek - ,PgUp,PgDn - Esc,^End NAZEVT NADPIS PRAVA NADPIS PRAVA ZAHLAVI @ p+nadpis,leva say &veta @ p+nadpis,cara+1 say &a pol&cp=&veta PREHLEDV HLAVI PRAVA OLORCP @ p+nadpis,leva say &veta pol&cp=&veta EHLEDV APRAVA p_kody p_name Epson LX-810 SOUBOR P_KODY P_NAME W_TISKARNABOLD_ON NAP_BOLDON BOLD_OFF P_BOLDOFF DBST_ON P_DBST_ON DBST_OFF P_DBST_OFFNLQ_ON LORP_LETRQUALNLQ_OFF LP_DRAFT IP_SUBON SUB_OFF P_SUBOFF SUPER_ON JP_SUPERON SUPER_OFF P_SUPEROFFHUSTE_ON FP_10CPI MP_COMPRESSHUSTE_OFF P_COMP_OFFPICA_ON FELITE_ON P_12CPI RESET P_SETUP NCOMP RESSR8LPI _OFFP_8LPI FSTRANA TISK_HL TISK_S NCOMP KARNAZACP NAPODNIK SUB_OFF NLQ_ON BOLD_ON NAZEVT NLQ_OFF BOLD_OFF LORPOCS RQUALZAHLAVIT LZAHLAVI ICOMP ZAHLT1 @cr,s say &vetat KARNAPOCS NAVETAT VETAT1 R8LPI ZAHLAVIT NCOMP LORSTRANA UALMALE LSUB_OFF a .and. nebo konec Vyber . . # -------------------- nebrat @s,v get &prom @s,v say &prom dtoc(dat) STOP - delku podminky jiz nelze zvetsovat ! Ukoncit Zrusit set filter to &podmv K zadane podmince nebyl nalezen zadny zaznam . LOGIC OPERAND ERAND NAXOPER OBSAHX HLAVIT FPOLEX LORZAHL UALVYBER LPODMV OBSAH RELACE JSTOP dalsi konec Volba polozek -------------------- .......... +' '+ ................. ZAHLAVI ERAND NALOGIC XOPER POLEX VYBER FZAHLAVI1 RVETA1 UALJMENO dalsi konec Trideni -------------------- nebrat ...... ................. STOP - delku klice jiz nelze zvetsovat ! Ukoncit Zrusit sort to c1_tr on &podms c1_tr LOGIC NAXOPER POLEX VYBER PODMS OBSAH FPROM RHODN LSTOP C1_TR IPROHL @hor,leva say pol&cp Aktualizace ciselniku (Storno - F10) Dilna Prac. Nazev pracoviste Poc.stroju Specifikace Opravdu zrusit tento zaznam ? (a/N): PRAVA NADILNA NAIDENT_ZDR NAZEV_ZDR POC_STR SPECIF TYP_ZDR FPOCZ Dilna dilna+' ' obs pict '9999' dilna Prac. ident_zdr obs pict '99999' ident_zdr Nazev pracovisteF nazev_zdr obs pict '@s25 ' +repl('!',45) nazev_zdr Stroju str(poc_str,6) nula pict '@z 999' poc_str str(typ_zdr,3) nula pict '@z 999' typ_zdr SpecifikaceF specif obs pict '@s25' specif JMENO OBSAH NAHODN NAS135B PROHL RAMECEK ZAHLAVI PREHLED PREHLEDV TISK_HL TISK_S VYBER VOLBA TRIDENI AKTUAL L:\OBEC\01\ S135B.FXP L:\OBEC\01\S135B.PRG