Chip 1999 June

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

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

Wrap

MS Visual FoxPro App | 1998-12-22 | 14KB | 359 lines

KONEC ._P_S737AX s737a s737ad ehled p o k l a d e n RIIS 7.37 m_dat x_dat m_cis1 x_cis1 m7_poklo m7_poklm ident_pok m7_obrp cis_dok p_prist xp_prist v1_str x1_str m7_denik denik m7_pokl ident_pok Pokladna ' '+ident_pok+' ' ident_pok zev pokladny str_pok+' ' str_pok ucet_pok ucet_pok et pom au_pom+' ' au_pom ident_den+' ' ident_den Dat.akt. tran(dat_akt,'@E') dat_akt Autor autor autor Aktual. aktual aktual POLEX ._P_FREEZE _ RTOP _ _ _RBOT _ _ CLEFT _ _CRIGHT _ F1 _ _ _ _F2 _ _ _ F3 _ _ _ _F4 _ _ _ F6 _ _ _ _PROCX _ _ ENTER _ _DETAIL _ DET_JM _ _RAMECEK _ NAZEVT _ _RIIS NADPIS _LEVA PRAVA _M_DAT X_DAT _M_CIS1 X_CIS1 _M7_POKLO _M7_POKLM IDENT_POK M7_OBRP CIS_DOK _P_PRIST XP_PRIST _V1_STR X1_STR _M7_DENIK DENIK _M7_POKL JMENO MOD_PSV P_PRIST P_PRIHLAS _ MOD_SYS _M7_POKL _ OPRAVA _PS_RETURN RIIS 7.37 imu v ru nelze prov t opravy z imu t nelze prov t opravy z 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/n &barvau CPODMV IHLAS _ CPODMS _AUTOR _ MM_AUTOR _AKTUAL DAT_AKT _ZMENA _ _ NOVY_Z _ _ANSI _ W_ID_POK _IDENT_POK W_TEXT _ _TEXT _ W_UCET _ _UCET_POK W_STR _ _STR_POK W_AU_POM _AU_POM W_DENIK _IDENT_DEN W_AKTUAL _W_DAT_AKT W_AUTOR _JMENO_C WJMENO_C _RADEK_C SLOUPEC_C P_ZOB PRIST DENIK _CISELNIK POCET _DOP1 _ DOP2 _ _ _POR _ _ _ COUNT ZAKAZNIK POMOC KONTROLA BARVAS BARVAR =BARVAZ BARVAU BARVAN BARVAH BARVA M7_POKL `PORADI KONEC ZMENY &barva Aktualizace pokladen Pokladna zev pokladny edisko pokladny et pokladny et pomocn Aktualizoval Autor Aktualizace &barvau W_ID_POK _W_TEXT _ W_STR _W_UCET _ W_AU_POM _W_DENIK ZMENA _W_AKTUAL MM_AUTOR _W_DAT_AKT W_AUTOR &barvau w_id_pok @ 12,34 &vloz w_id_pok picture '@!X' w_text @ 13,34 &vloz w_text picture '@X' w_str @ 15,36 &vloz w_str pict '@!X' w_ucet @ 16,36 &vloz w_ucet w_au_pom @ 16,63 &vloz w_au_pom w_denik @ 17,36 &vloz w_denik pict '@!X' _P_ZOB _ W_ID_POK DENIK _W_TEXT AUTOR ZMENA _ _W_AKTUAL MM_AUTOR _W_DAT_AKT DAT_AKT do proc&y do zmen&y with 'get' do zmen&y with 'say' Pokladnu nelze zru it, existuje obrat Pokladnu nelze zru it, existuje pen hotovost it pr ci beze zm n? (a/N) KONEC _ DOL AUTOR _NAP_HOD P_ZOB _ _VOLBA M7_OBRP _W_ID_POK HLASKA _M7_POKL M7_POKLM _W_HOT IDENT_POK ZASOBA NOVY_Z S737A W_TEXT W_UCET _UCET_POK W_STR STR_POK W_AU_POM AU_POM W_DENIK _IDENT_DEN W_AKTUAL _AKTUAL W_DAT_AKT DAT_AKT W_AUTOR _AUTOR PROC1 ELNIK _POCET _ _ _K_UDAJU _ OK_C ZMENA <MM_AUTOR Identifikace pokladny mus t vypln Pokladna ji existuje, duplicita Pokladna ji existuje, duplicita edisko neexistuje k neexistuje _W_ID_POK HLASKA ST_ZAZ _NOVY_Z IDENT_POK V1_STR W_STR _M7_POKL _M7_DENIK W_DENIK M7_POKL _ZMENA IDENT_POK W_ID_POK TEXT _W_TEXT UCET_POK _W_UCET STR_POK W_STR AU_POM _W_AU_POM IDENT_DEN W_DENIK DAT_AKT _AKTUAL MM_AUTOR colora set color to &color _COLOR T_POK - - ^PgDn - ^Home - F10 - ^End,Esc Pohyb Funkce Konec colora SET COLOR TO &col CMESS ehled st edisek ehled Konec mod_proc mod7_lib _VOLBA ST_STR W_STR ZOBR_STR _MOD_PROC ZMENA _ST_UCET W_UCET ZOBR_UCET MOD7_LIB _PROC1 w_id_pok mod_proc w_str mod_proc w_ucet mod7_lib w_denik mod7_lib Pro toto pole neexistuje pomocn ehled hodnot P_ZOB _ST_ID W_ID_POK ZOBR_POKL MOD_PROC _ZMENA ST_STR _W_STR ZOBR_STR ST_UCET W_UCET _ZOBR_UCET MOD7_LIB X_DOKLAD ST_DENIK _W_DENIK ZOBR_DENIKHLASKA S737AX S737AD OPRAVA PORADI PROC1 ZMEN1 ZMENY K_UDAJU HLASKA VOLBA NAP_HOD W:\07\ S737A.FXP W:\07\S737A.PRG