WypF wynagr.spr with kod,1 wynagr.spr with kod,2 Nie ma F adnych wyp zab.nazwisko:25:H='Nazwisko',zab.imie1:15:H='Imi'+pl[12], zab.brutto:17:H='Brutto':p='9,999,999,999.99',zab.netto:17:H='Netto':p='9,999,999,999.99' nazwisko WypF kaswyp with kod wynagr.spr with kod,2 Nie ma F adnych wyp nazwisko:25:H='Nazwisko',imie1:15:H='Imi'+pl[12], brutto:17:H='Brutto':p='9,999,999,999.99',netto:17:H='Netto':p='9,999,999,999.99' nazwisko WypF wpisz wynagr.spr with kod,1 wynagr.spr with kod,2 kaswyp with kod nazwisko:25:H='Nazwisko',imie1:15:H='Imi'+pl[12], brutto:17:H='Brutto':p='9,999,999,999.99',netto:17:H='Netto':p='9,999,999,999.99' nazwisko ewparam.spr zab.dbf zab.dbf zab.cdx zab.cdx RIBBON NAZWISKO IMIE1 IMIE2 WPISZ ZAROBKI STARTLIS TEMPPATH LISTA EWPARAM KSIEGWYPL ODKSWYPL CLEARRIB w_do_ks.spr MIESIACE KWYPL NOTICE W_DO_KS MIESIACE KWYPL NOTICE EWWYPL MIESNR IDKSIEGI BLOKADA ZAKSIEG MIESIACE KWYPL NOTICE TAKNIE EWWYPL MIESNR MIESIACE KWYPL NOTICE DOPISZ Wybierz pracownika ewprac.spr with 2, kod kod, imie1, imie2, nazwisko Brak danych pracownikF nazwisko:25 :H = 'Nazwisko',imie1:15:H='Imi'+pl[12],miasto:25:H = 'Miejscowosc' nazwisko ulica:25:H='Ulica',miasto:5 :H = 'Miejscowosc',nazwisko:25:H = 'Nazwisko' ulica wynagr.spr MAINPATH EWPRAC LISTAZW LPRACA WYBIERZ RIBBON EWWYPL MIESNR NOTICE FULLYEAR ROKNR DATAPRZYJ DATAZW WYNAGR nazwisko ewwypl, EWWYPL MIESNR EWPRAC NAZWISKO LPRACA EWPRAC EWWYPL ewprac ewwypl ..\temp\zab EWPRAC NAZWISKO IMIE1 IMIE2 EWWYPL GOTOWKA NATURA DOPLATA BRUTTO NETTO MIESNR KSIEGWYPL ODKSWYPL KASWYP WPISZ DOPISZ SETREL UNSETREL ZAROBKI exactz _lowzorzec _lolistabr _lowzorzec TYTUL DLWZORCA MYILOSC ALIAS TOMENTER TOMPODGLADINFO CZYBLOK POMOC POLA1 INDEX1 POLA2 INDEX2 POLA3 INDEX3 POLA4 INDEX4 POLA5 INDEX5 NUMER IOPEN EXACT WIERSZE _LOWZORZEC_LOLISTABRSETRIB ZECPROPRZEGLASTARTPRO CLEARRIB {DNARROW} {UPARROW} {TAB} Koniec danych PoczF tek danych Koniec danych PoczF tek danych Zapis jest zablokowany DO &tomenter DO &tompodglad STRING MYQUIT WIERSZE _LOWZORZECDLWZORCA LOKATA MYSZR MYSZC GLADTCOL TOMENTER CZYBLOK BLOKADA MYILOSC PROPRZEGLATOMPODGLADSETRIB POMOC NUMER PROWYKAZ POLA1 INDEX1 POLA2 INDEX2 ZECPOLA3 INDEX3 INDEX4 POLA5 INDEX5 LADMYILOSC SET ORDER TO &kolejnosc _olistast BROWSE NOWAIT WINDOW _olistast IN WINDOW _lolistabr TITLE "Dane" COLOR SCHEM 10 FIELDS &pola {INS} KOLEJNOSC _OLISTAST ZECTCOL STARTPRO PROPRZEGLA PROWYKAZ exactz Razem _lowzorzec _olistabr _losumy TYTUL DLWZORCA MYILOSC ALIAS TOMPLUS TOMENTER TOMDRUK TOMPODGLADTOMMINUS TOMBLOKUJ TOMANULUJ POMOC SUMGDZIE SUMILE SUMWYR POLA1 INDEX1 POLA2 INDEX2 POLA3 INDEX3 POLA4 INDEX4 POLA5 INDEX5 NUMER IOPEN EXACT _LOSUMY _LOWZORZEC_OLISTABR SETRIB ZECREFRSUMY PRZEGLAD CLEARRIB {DNARROW} {UPARROW} {TAB} Koniec danych PoczF tek danych Koniec danych PoczF tek danych MiesiF c jest zablokowany Zapis jest zablokowany Nie moF esz poprawia DO &tomenter DO &tomenter MiesiF c jest zablokowany Zapis jest zablokowany Nie moF esz usuwa DO &tomminus do &tomminus MiesiF c jest zablokowany Nie moF esz dodawa DO &tomplus do &tomplus DO &tomdruk DO &tomblokuj DO &tomanuluj DO &tompodglad STRING LOKATA WIERSZE MYQUIT MYSZR MYSZC SUMILE DLWZORCA DGLADTROW TOMENTER TOMBLOKUJ BLOKUJ BLOKADA REFRSUMY SETRIB POMOC _LOWZORZECTOMMINUS BLOKUJ TOMPLUS BLOKUJ MYILOSC ECPRZEGLAD TOMDRUK TOMANULUJ TOMPODGLAD NUMER WYKAZ POLA1 INDEX1 POLA2 INDEX2 POLA3 INDEX3 INDEX4 POLA5 INDEX5 MYILOSC SET ORDER TO &kolejnosc BROWSE NOWAIT WINDOW _dlabrow IN WINDOW _olistabr TITLE "Dane" COLOR SCHEM 10 FIELDS &pola {INS} KOLEJNOSC _DLABROW SUM ALL &sumwyr TO ARRAY sumy FOR not poprawka and typ <> 50 SUM ALL &sumwyr TO ARRAY sumy Razem 99,999,999,999.99 LEJNOSC ILREC SUMWYR SUMILE TOMANULUJ _LOSUMY SUMGDZIE PRZEGLAD WYKAZ REFRSUMY _curobj=objnum(m.exiterr) _curobj=objnum(m.exitok) TALKz COMPATIBLEz _parkoszty _parodlicz _parkumowy _parzus _par_kzus _parfund _par_kfund _parwyn _par_kwyn _paruzus _parukzus _par_p1 _parstopa1 _par_p2 _parstopa2 _parstopa3 m.exitok m.exiterr _r6s0nc9zi Parametry _r6s0nc9zi podatek: Kwota miesiF cznych wiadczenia gwarantowane: Progi i stopy podatkowe: podatek: Stopy procentowe : kosztF w uzyskania : odliczeF od podatku : koszty umF w : fundusz pracy : dochF d do: dochF d od: (kwota) (kwota) (kwota) @K 9,999,999.99 @K 9,999,999.99 @K 99.99 @K 99.99 @K 99,999,999.99 @K 99.99 @K 99,999,999.99 @K 99.99 @K 99,999,999.99 ZUS od umF w o prac : (kwota) @K 99.99 @K 99,999,999.99 ZUS od umF w-zlece : podatek: dochF d od: @K 9,999,999,999.99 @K 99.99 @K 9,999,999,999.99 @K 9,999,999,999.99 @K 99.99 @K 9,999,999,999.99 @K 99.99 @*HT Zapisz @*HT Zaniechaj _r6s0nc9zi RIBBON CURRAREA TALKSTAT COMPSTAT __OBJS __NUMOBJ m_R6S0NC9ZI_PARKOSZTY_R6S0NCAOB_PARODLICZ_R6S0NCAQG_PARKUMOWY_R6S0NCAS9_PARZUS en_R6S0NCAU3_PAR_KZUS _R6S0NCAVZ_PARFUND b_R6S0NCAXT_PAR_KFUND_R6S0NCAZL_PARWYN _R6S0NCB1F_PAR_KWYN _R6S0NCB38_PARUZUS _R6S0NCB69_PARUKZUS _R6S0NCB81_PAR_P1 K _R6S0NCBBV_R6S0NCBDI_PARSTOPA1_R6S0NCBF3_PAR_P2 0,_R6S0NCBH8_R6S0NCBIP_PARSTOPA2_R6S0NCBK8_PARSTOPA3_R6S0NCBMEEXITOK n .ACT _R6S0NCBOLEXITERR bb_R6S0NCBQV_ m.exiterr _parodlicz _PARKOSZTYf m._parkoszty m._parkumowy _PARODLICZc m._parodlicz m._parzus _PARKUMOWYe m._parkumowy m._par_kzus _PARZUS m._parzus m._paruzus _PAR_KZUS m._parukzus m._par_kfund _PARFUND m._parfund m._parwyn _PAR_KFUNDe m._par_kfund m._par_kwyn _PARWYN m._parwyn m._par_p1 _PAR_KWYN m._par_kzus m._parukzus _PARUZUS m._paruzus m._parfund _PARUKZUS m._par_kwyn m._parstopa1 _PAR_P1 m._par_p1 m._par_p2 _PARSTOPA1` _parstopa1 _parstopa2 _PAR_P2 m._par_p2 m._parstopa3 _PARSTOPA2b m._parstopa2 m.exitok _PARSTOPA3# params _par* PODMPATH _R6S0NC9ZI @K 9,999,999,999.99 @K 9,999,999,999.99 CURRWIND _R6S0NC9ZI_PAR_P1 A3_PAR_P2 _R6S0NCAOB _R6S0NCAQG _R6S0NCAS9 _R6S0NCAU3 _R6S0NCAVZ _R6S0NCAXT _R6S0NCAZL _R6S0NCB1F _R6S0NCB38 _R6S0NCB69 _R6S0NCB81 _R6S0NCBBV _R6S0NCBDI _R6S0NCBF3 _R6S0NCBH8 _R6S0NCBIP _R6S0NCBK8 _R6S0NCBME _R6S0NCBOL _R6S0NCBQV @ srows()-1, 0 say replicate(" ", scols()-1 ) COLOR &col RIBBON COL SETRIB CLEARRIB CURSORz errors WciF nij dowolny klawisz ... ECodeF SET CURSOR &curstat ECODE1 ECODE2 ECODE3 OLDALIAS ILOSC CURSTAT SYSPATH ERRWIN ERRORS ERRCODE MESSAGE Dane wypF at do ksi gowania _curobj=objnum(m.exiterr) _curobj=objnum(m.exitok) TALKz COMPATIBLEz _r030uzjrr _r030uzjrr RAZEM: Gwarantowane F wiadczenia: Data ksiF gowania: Wynagrodzenie w gotF wce : Wynagrodzenie w naturze : ZUS : Fundusz pracy : Kategoria : Opis : Uwagi : 99,999,999,999.99 99,999,999,999.99 99,999,999,999.99 99,999,999,999.99 99,999,999,999.99 99,999,999,999.99 @L 99 @!TK XXXXXXXXXX @K XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX @*HN KsiF @*HT Zaniechaj @*C KsiF cznie jako 'Wynagrodzenia' _r030uzjrr RIBBON TYTUL DZIEN GFUND TOTAL EWWYPL GOTOWKA NATURA ZUS_K FUND_K WYN_K MIESNR CURRAREA TALKSTAT COMPSTAT _R030UZJRRFULLYEAR RROKNR _R030UZKB9_R030UZKD0_R030UZKEC_R030UZKFY_R030UZKHCUWAGI EXITOK _R030UZKJX_R030UZKL8EXITERR _R030UZKQ3_R030UZKSP] y dzie DZIEN MAXDAY do wpiskat.prg do dodkat.prg do wpisopis.prg do dodopis.prg y dzie DZIEN MAXDAY MIESNR IDENT FULLYEAR ROKNR WWYPLATA UWAGI KATEG MAKEDATA GFUND WINNE WNATURA EWWYPL ZAKSIEG IDKSIEGI MIESIACE RKWYPL RNOTICE _R030UZJRR 99,999,999,999.99 99,999,999,999.99 99,999,999,999.99 99,999,999,999.99 99,999,999,999.99 99,999,999,999.99 @L 99 CURRWIND _R030UZJRRGOT GFUND TOTAL FULLYEAR ROKNR MIESNR _R030UZKB9 _R030UZKD0 _R030UZKEC _R030UZKFY _R030UZKHC _R030UZKJX _R030UZKL8 _R030UZKQ3 _R030UZKSP m.xloc = m.xloc errors \