MOD37A m_Cis1 x_Cis1 m_Dat x_Dat m3_Zdrt Ident_Zdr m3_Zdr Ident_Zdr e h l e d p r a c o v i RIIS 3.7 mod37a Zadejte pracovi Detail aktual Pracovi ' '+m3_Zdr.Ident_Zdr+' ' m3_Zdr.Ident_Zdr m3_Zdr.Nazev_Zdr m3_Zdr.Nazev_Zdr Zkratka m3_Zdr.Zkr_Zdr+' ' m3_Zdr.Zkr_Zdr ' '+m3_Zdr.Typ_Zdr+' ' m3_Zdr.Typ_Zdr Rozli ' '+m3_Zdr.Rozl m3_Zdr.Rozl Prac.m ' '+str(m3_Zdr.mist,3) m3_Zdr.mist pPOM_KAMNAVI para vlM_CIS1 NAVX_CIS1 pomM_DAT om_VX_DAT m_FiM3_ZDRT orIDENT_ZDR M3_ZDR poPOLEX PROCX m_VeRTOP cno()RBOT ilt =CLEFT lterCRIGHT or FREEZE oloORDER arvaHOR novy_zDOL q1 =1 PRAVA qNADPIS q5 ZAHL q6 =6JMENO et1 HODN SOUC q2PSOUC q3 =TITLE TITLECOLORPOC0 pF0 if q>poF2 q =F3 endiF4 o case ase q=qF7 && praF9 F10 ,14 &vF0PRG dentF1ON t "@!F1PRG ase F4_JM &&F4PRG TISKPRG vlF7_JM zev_F7PRG "!XXF9PRG XXXXF9KEY XXXXF9KEY1 F10_JM 3 F10PRG ratRAMECEK @ 6NAZEVT z wKLICO pictKLNAZ cSPACEBAR TR_HL1 TR_HL2 1 &TR_HL3 yp_TR_HL4 "9"TR_HL5 q=TR_HL6 & rTR_HL7 TR_HL8 4 &TR_HL9 ozlDET_JM "XXENTER se qDETAIL && DETPRG PS_LINE 58PS_RETURN PS_ZAZN "OBSAHX asMOD_PSV z=OBSAH A k t u a l i z a c e p r a c o v i 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 c3_txt+ c3_txt c3_txt POM_OBR pW_IDENT_Z W_NAZEV_Z W_ZKR_Z AVW_TYP_Z omW_ROZL m_VW_MIST _FiQ1 NT_ZDR m_VeQ cno()ZMENA1 t =ZMENA2 terPOCET1 or POCET2 oloPOM_KONTR POM_KONEC q1 =1 BARVA qRADEK_C 5 SLOUPEC_C et1 Y q2SL q3 =POC BARVAS LORBARVAR pBARVAZ enBARVAU >poBARVAN q =BARVAT ndiBARVAH M3_ZDR q=qNOVY_Z1 raIDENT_ZDR NAZEV_ZDR ZKR_ZDR ntTYP_ZDR @!ROZL se MIST &&M3_ZDRT C3_TXT NOVY_Z2 XXXXX XXXXR MECEK HLAV1 @ 6MENU1 z wPROC1 pictHLAV2 cPROC2 ZMENY VETA 1 &PS_RETURN &barvau &barvas &barvaz &barvar &barvaz &barvat Pracovi Zkratka pracovi Typ pracovi Rozli pracovi et pracovn &barvau M_OBR &barvas &barvau &barvar &barvaz &barvat &barvau M_OBR &barvau &barvas !XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX M_OBR pW_IDENT_Z W_NAZEV_Z W_ZKR_Z AVW_TYP_Z omW_ROZL m_VW_MIST &barvas &barvau M_OBR DENT_Z NAZEV_Z ZKR_Z AVDOL omTEXT filterz colorz &barvau @ 4,14 &vloz w_Ident_Z pict "@!X" @ 4,42 &vloz w_Nazev_Z pict "!XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX" @ 6,24 &vloz w_Zkr_Z pict "@!X" @ 6,51 &vloz w_Typ_Z pict "9" @ 7,24 &vloz w_Rozl pict "XX" @ 7,58 &vloz w_Mist pict "999" m3_Zdr Duplicitn slo pracovi zmena&y =.t. pPOM_ALI POM_ORD POM_VETA VPOM_FILT mMMCOLOR _VNOVY_Z1 NT_ZDR m_VeQ6 cno()POCET1 terW_IDENT_Z oloHLASKA DEJ_STAV W_NAZEV_Z &barvau @ x,2 &vloz c3_txt.text zmena&y=.t. M_ALI POCET2 _VETA M_FILT - - ^PgDn - F2 - ^Home - ^End,Esc Pohyb znamu znamu Konec - ,PgDn,PgUp - ^PgUp,^PgDn - ^Home - ^End,Esc Pohyb Konec do Proc&y do Zmen&y with "get" do Zmen&y with "say" Zmena&y =.f. novy_Z&y =.t. Zmena&y =.f. novy_Z&y =.f. return to &pom_KamNavr if q