PC World Komputer 1996 May

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

/ PC World Komputer 1996 May / PCW596.iso / polskie / insert / rachmist / druk.arj / PEWSRTR.APP (.txt) < prev next >

Wrap

MS Visual FoxPro App | 1996-01-21 | 172KB | 1,376 lines

OBJTYPE OBJCODE HEIGHT WIDTH STYLE PICTURE ORDER UNIQUE COMMENT ENVIRON BOXCHAR FILLCHAR FLOAT STRETCH NOREPEAT RESETRPT PAGEBREAK RESETPAGE SWAPHEADER SWAPFOOTER EJECTBEFOR EJECTAFTER PLAIN SUMMARY ADDALIAS OFFSET TOPMARGIN BOTMARGIN TOTALTYPE RESETTOTAL 1 0 97132 F F FFFFT 0 0 0 21 9 1 24 9 4 3 9 7 7 8 0 16 26 1 1130 C FFF 0 0 0 5 0 18 21 2 1 1 F 5 0 19 28 84 1 11 F 5 0 20 30 73 1 22 F 5 0 21 32 89 1 6 F 5 0 22 9 56 1 8 F 8 0 23 9 65 1 3 24 N FFF 0 0 0 5 0 25 13 1 1 3 F 8 0 26 7 48 1 30 C FFF 0 0 0 8 0 28 24 5 1 22 C FFF 0 0 0 8 0 29 24 28 1 8 D FFF 0 0 0 8 0 30 24 37 1 17 32 31 N FFF 0 0 0 8 0 33 24 55 1 17 35 34 N FFF 0 0 0 8 0 36 24 73 1 17 38 37 N FFF 0 0 0 8 0 39 24 91 1 4 N FFF 0 0 0 8 0 40 24 96 1 17 42 41 N FFF 0 0 0 8 0 43 24 114 1 17 45 44 N FFF 0 0 0 5 0 46 13 7 1 17 F 5 0 47 14 5 1 22 F 5 0 48 17 10 1 11 F 5 0 49 13 30 1 4 F 5 0 50 14 28 1 7 F 5 0 51 13 41 1 7 F 5 0 52 14 40 1 10 F 5 0 53 15 44 1 2 F 5 0 54 15 60 1 7 F 5 0 55 16 58 1 10 F 5 0 56 17 56 1 14 F 5 0 57 15 78 1 7 F 5 0 58 16 77 1 9 F 5 0 59 17 75 1 13 F 5 0 60 18 74 1 14 F 5 0 61 15 91 1 4 F 5 0 62 16 91 1 3 F 5 0 63 18 92 1 1 F 5 0 64 17 91 1 3 F 5 0 65 15 98 1 13 F 5 0 66 16 97 1 15 F 5 0 67 17 101 1 6 F 5 0 68 18 103 1 2 F 5 0 69 15 115 1 15 F 5 0 70 16 119 1 7 F 5 0 71 17 115 1 15 F 5 0 72 18 121 1 2 F 5 0 73 15 9 1 14 F 5 0 74 16 10 1 11 F 5 0 75 21 15 1 1 F 5 0 76 21 31 1 1 F 5 0 77 21 45 1 1 F 5 0 78 21 63 1 1 F 5 0 79 21 81 1 1 F 5 0 80 21 92 1 1 F 5 0 81 21 104 1 1 F 5 0 82 21 122 1 1 F 8 0 83 28 96 1 17 85 84 N FFF 0 0 1 5 0 86 13 81 1 13 F 8 0 87 13 95 1 7 C FFF 0 0 0 8 0 89 25 73 1 17 91 90 N FFF 0 0 0 7 7 12 0 1132 = F 7 7 20 0 1132 = F 7 7 22 0 1132 = F 7 7 27 0 1132 = F 7 7 14 54 1 78 = F 7 7 29 72 1 60 = F 7 7 31 72 1 60 = F 7 7 33 72 1 60 = F 7 7 12 0 16 1 | F 7 7 12 4 16 1 | F 7 7 12 27 16 1 | F 7 7 12 36 16 1 | F 7 7 12 54 16 1 | F 7 7 14 72 20 1 | F 7 7 14 90 14 1 | F 7 7 14 95 20 1 | F 7 7 14 113 20 1 | F 7 7 12 131 22 1 | F 5 0 92 7 46 1 1 F 8 0 93 24 1 1 3 94 N FFF 0 0 0 5 0 95 5 38 1 51 F 5 0 97 6 46 1 34 F 5 0 99 10 56 1 7 F 8 0 100 30 96 1 17 103 102 N FFF 0 0 0 8 0 104 30 114 1 17 107 106 N FFF 0 0 0 8 0 108 32 96 1 17 110 109 N FFF 0 0 1 8 0 111 28 114 1 17 113 112 N FFF 0 0 1 8 0 114 32 114 1 17 116 115 N FFF 0 0 1 8 0 117 0 0 1 1 120 C FFF 0 0 0 8 0 130 0 1 1 80 C FFF 0 0 0 8 0 132 3 1 1 25 C FFF 0 0 0 8 0 135 1 1 1 50 C FFF 0 0 0 8 0 142 2 1 1 40 C FFF 0 0 0 18 146 147 T 148 2 1 18 149 150 F 151 2 0 18 152 153 T 154 2 1 18 155 156 F 157 2 0 18 158 159 T 160 1 0 8iif(licz<m.counter," ",REPLICATE(chr(m.total_sign),130)) "Suma folio:" "Przeniesienie z folio:" "Razem:" "Strona: " _pageno + m.offset "Lp." %alltrim(str(fullyear(m.roknr)))+" r." ALLTRIM(kursorek.symbol) kursorek.datazak kursorek.wartpocz "99,999,999,999.99" kursorek.wartpocz_1 "99,999,999,999.99" kursorek.umorz_1 "99,999,999,999.99" kursorek.stawka_1 kursorek.kwotaodp_1 "99,999,999,999.99" kursorek.rataodp_1 "99,999,999,999.99" "Okre lenie rodka" "trwa ego oraz warto "Symbol KR "Data" "nabycia" "Warto "pocz tkowa" "Warto "pocz tkowa" "zaktualizowana" "Warto "umorzenia" "dotychczasowa" "zaktualizowana" "Sta-" "wka" "am." "Kwota odpis "amortyzacyjnych" "w roku" "Miesi czna rata" "odpis "amortyzacyjnych" "niematerialnej" "lub prawnej" kwotaodp10 "99,999,999,999.99" "Amortyzacja w" %alltrim(str(fullyear(m.roknr)))+" r." kursorek.umorznow_1 "99,999,999,999.99" 5"E W I D E N C J A R O D K W T R W A Y C H" $"dla cel w prowadzonej dzia kwotaodp11 - kwotaodp10 + e1 "99,999,999,999.99" rataodp11 - rataodp10 + e2 "99,999,999,999.99" kwotaodp11 + e1 "99,999,999,999.99" rataodp10 "99,999,999,999.99" rataodp11 + e2 "99,999,999,999.99" Aiif(p_paper=1 .and. _pageno>1 and predruk=.f., new_page(.t.)," ") 4Wywo anie funkcji new_page(.t.) (kt ra wtedy wy wietla komunikat "W kartk ..itd." oraz wysuwa stron tylko w sytuacji, gdy: - drukarka przyjmuje pojedy cze kartki - dana strona nie jest stron pierwsz aktualnego raportu - raport nie jest wykonywany w trybie predruk (czyli tylko do pami dane_firmy(m.firmnr,'nazwa') Wiif(len(dane_firmy(m.firmnr,'telefon'))>0,"tel. " + dane_firmy(m.firmnr,'telefon'),' ') dane_firmy(m.firmnr,'adres') +iif(len(dane_firmy(m.firmnr,'nr_domu'))>0,", " + dane_firmy(m.firmnr,'nr_domu'),' ') +iif(len(dane_firmy(m.firmnr,'nr_lokalu'))>0,"/" + dane_firmy(m.firmnr,'nr_lokalu'),' ') odane_firmy(m.firmnr,'kod') + iif(len(dane_firmy(m.firmnr,'miasto'))>0," " + dane_firmy(m.firmnr,'miasto'),' ') KWOTAODP10 kursorek.kwotaodp_1 KWOTAODP11 kursorek.kwotaodp_1 RATAODP10 kursorek.rataodp_1 RATAODP11 kursorek.rataodp_1 kursorek.symbol m.beg_num OBJTYPE OBJCODE HEIGHT WIDTH STYLE PICTURE ORDER UNIQUE COMMENT ENVIRON BOXCHAR FILLCHAR FLOAT STRETCH NOREPEAT RESETRPT PAGEBREAK RESETPAGE SWAPHEADER SWAPFOOTER EJECTBEFOR EJECTAFTER PLAIN SUMMARY ADDALIAS OFFSET TOPMARGIN BOTMARGIN TOTALTYPE RESETTOTAL 1 0 97132 F F FFFFT 0 0 0 21 9 1 24 9 4 3 9 7 7 8 0 16 26 1 1 76 C FFF 0 0 0 5 0 18 30 19 1 22 F 5 0 19 32 35 1 6 F 5 0 20 28 30 1 11 F 5 0 21 30 19 1 22 F 5 0 22 32 35 1 6 F 8 0 23 24 1 1 17 25 24 N FFF 0 0 0 8 0 26 24 19 1 17 28 27 N FFF 0 0 0 8 0 29 24 37 1 4 30 N FFF 0 0 0 8 0 31 24 42 1 17 33 32 N FFF 0 0 0 8 0 34 24 60 1 17 36 35 N FFF 0 0 0 5 0 37 15 6 1 7 F 5 0 38 16 4 1 10 F 5 0 39 17 2 1 14 F 5 0 40 15 24 1 7 F 5 0 41 16 23 1 9 F 5 0 42 17 21 1 13 F 5 0 43 18 20 1 14 F 5 0 44 15 37 1 4 F 5 0 45 16 37 1 3 F 5 0 46 18 38 1 1 F 5 0 47 17 37 1 3 F 5 0 48 15 44 1 13 F 5 0 49 16 43 1 15 F 5 0 50 17 47 1 6 F 5 0 51 18 49 1 2 F 5 0 52 15 61 1 15 F 5 0 53 16 65 1 7 F 5 0 54 17 61 1 15 F 5 0 55 18 67 1 2 F 5 0 56 13 27 1 13 F 5 0 57 21 8 1 2 F 5 0 58 21 27 1 2 F 5 0 59 21 38 1 2 F 5 0 60 21 49 1 2 F 5 0 61 21 67 1 2 F 8 0 62 25 19 1 17 64 63 N FFF 0 0 0 7 7 12 0 1 78 = F 7 7 14 0 1 78 = F 7 7 20 0 1 78 = F 7 7 22 0 1 78 = F 7 7 27 0 1 77 = F 7 7 29 18 1 60 = F 7 7 31 18 1 60 = F 7 7 33 18 1 60 = F 7 7 12 0 16 1 | F 7 7 14 18 20 1 | F 7 7 14 36 14 1 | F 7 7 14 41 20 1 | F 7 7 14 59 20 1 | F 7 7 12 77 22 1 | F 5 0 65 9 35 1 8 F 5 0 66 7 25 1 1 F 5 0 67 5 17 1 51 F 5 0 69 6 25 1 34 F 8 0 71 9 44 1 3 72 N FFF 0 0 0 8 0 73 30 42 1 17 76 75 N FFF 0 0 0 8 0 77 30 60 1 17 80 79 N FFF 0 0 0 5 0 81 10 35 1 8 F 8 0 82 28 42 1 17 84 83 N FFF 0 0 1 8 0 85 28 60 1 17 87 86 N FFF 0 0 1 8 0 88 32 42 1 17 90 89 N FFF 0 0 1 8 0 91 32 60 1 17 93 92 N FFF 0 0 1 8 0 94 0 0 1 1 97 C FFF 0 0 0 8 0 107 7 27 1 30 C FFF 0 0 0 8 0 109 13 41 1 7 C FFF 0 0 0 8 0 111 0 1 1 80 C FFF 0 0 0 8 0 113 3 1 1 25 C FFF 0 0 0 8 0 116 1 1 1 50 C FFF 0 0 0 8 0 123 2 1 1 40 C FFF 0 0 0 18 127 128 T 129 2 1 18 130 131 F 132 2 0 18 133 134 T 135 2 1 18 136 137 F 138 2 0 18 139 140 T 141 1 0 7iif(licz<m.counter," ",REPLICATE(chr(m.total_sign),76)) "Przeniesienie z folio:" "Razem:" "Suma folio:" "Przeniesienie z folio:" "Razem:" kursorek.wartpocz_2 "99,999,999,999.99" kursorek.umorz_2 "99,999,999,999.99" kursorek.stawka_2 kursorek.kwotaodp_2 "99,999,999,999.99" kursorek.rataodp_2 "99,999,999,999.99" "Warto "pocz tkowa" "zaktualizowana" "Warto "umorzenia" "dotychczasowa" "zaktualizowana" "Sta-" "wka" "am." "Kwota odpis "amortyzacyjnych" "w roku" "Miesi czna rata" "odpis "amortyzacyjnych" "Amortyzacja w" kursorek.umorznow_2 "99,999,999,999.99" "Strona: " 5"E W I D E N C J A R O D K W T R W A Y C H" $"dla cel w prowadzonej dzia _pageno + m.offset kwotaodp21 - kwotaodp20 + e3 "99,999,999,999.99" rataodp21 - rataodp20 + e4 "99,999,999,999.99" kwotaodp20 "99,999,999,999.99" rataodp20 "99,999,999,999.99" kwotaodp21 + e3 "99,999,999,999.99" rataodp21 + e4 "99,999,999,999.99" Aiif(p_paper=1 .and. _pageno>1 and predruk=.f., new_page(.t.)," ") 4Wywo anie funkcji new_page(.t.) (kt ra wtedy wy wietla komunikat "W kartk ..itd." oraz wysuwa stron tylko w sytuacji, gdy: - drukarka przyjmuje pojedy cze kartki - dana strona nie jest stron pierwsz aktualnego raportu - raport nie jest wykonywany w trybie predruk (czyli tylko do pami %alltrim(str(fullyear(m.roknr)))+" r." %alltrim(str(fullyear(m.roknr)))+" r." dane_firmy(m.firmnr,'nazwa') Wiif(len(dane_firmy(m.firmnr,'telefon'))>0,"tel. " + dane_firmy(m.firmnr,'telefon'),' ') dane_firmy(m.firmnr,'adres') +iif(len(dane_firmy(m.firmnr,'nr_domu'))>0,", " + dane_firmy(m.firmnr,'nr_domu'),' ') +iif(len(dane_firmy(m.firmnr,'nr_lokalu'))>0,"/" + dane_firmy(m.firmnr,'nr_lokalu'),' ') odane_firmy(m.firmnr,'kod') + iif(len(dane_firmy(m.firmnr,'miasto'))>0," " + dane_firmy(m.firmnr,'miasto'),' ') KWOTAODP20 kursorek.kwotaodp_2 KWOTAODP21 kursorek.kwotaodp_2 RATAODP20 kursorek.rataodp_2 RATAODP21 kursorek.rataodp_2 kursorek.symbol m.beg_num kursorek bilans umowa dowolny P_ESCSTAT sDIALOG KURSOREK qPLIK IOPEN AALIASB AAREA DOWOLNY PRINT_ERR ESCON P_TAKNIE sGETSTOP _mies ODMIANA sAREA NAZWA qPLIK IOPEN A_MIES SYSPATH podmioty podmioty m.nazwa=podmioty.&pole KTORY P_POLE sAREA NAZWA qOTWARTE PODMIOTY APODMPATH SYMBOL WaitWin errors errors komunikF ONOFF P_CZEKAC sKOMUNIK1 KOMUNIK2 qKOMUNIK3 MIOTY AZNAK AILOSC IOPEN WOLNY WAITWIN ERRORS SYSPATH ERRCODE MESSAGE NA_EKRAN _PYTANIE NA_EKRAN _P_FF WYSUW sDIALOG TAKNIE qGETSTOP APRINTER_FE FAKTURY KORYGUJ RACHUNKI KORYGUJ FAKTURY VAT RACHUNKI UPROSZCZONE _ERMES sERLIN qERLINNO ERDZIEN AERRHAND FEGETSTOP P32P028 _P32P033 sP32P038 P32P043 qP32P046 P32P049 AP32P052 FEP32P055 AP32P058 P32P063 P32P068 P32P072 P32P077 P32P029 _P32P034 sP32P039 P32P059 qP32P064 P32P069 AP32P073 FEP32P078 P32P032 _P32P037 sP32P042 P32P045 qP32P048 P32P051 AP32P054 FEP32P057 AP32P062 P32P067 P32P071 P32P076 P32P081 P32P086 _P32P089 sP32P094 P32P099 P32P090 _P32P095 sP32P100 P32P116 _P32P120 sP32P122 P32P028 _P32P029 sP32P033 P32P034 qP32P038 P32P039 AP32P043 FEP32P046 AP32P049 P32P052 P32P055 P32P058 P32P059 P32P063 P32P064 P32P068 orP32P069 TP32P072 P32P073 P32P077 P32P078 P32P086 _P32P089 sP32P090 P32P094 qP32P095 P32P099 AP32P100 FEGETSTOP ESCOUT GET_MIES DANE_FIRMY DIALOG PRINTER_FE WYSUW NEW_PAGE PODTYTUL MY_ERRH SUM_85 SUM_86 SUM_88 SUM_107 SUM_108 SUM_128 SUM_DOCH SUM_DZIE OBJTYPE OBJCODE HEIGHT WIDTH STYLE PICTURE ORDER UNIQUE COMMENT ENVIRON BOXCHAR FILLCHAR FLOAT STRETCH NOREPEAT RESETRPT PAGEBREAK RESETPAGE SWAPHEADER SWAPFOOTER EJECTBEFOR EJECTAFTER PLAIN SUMMARY ADDALIAS OFFSET TOPMARGIN BOTMARGIN TOTALTYPE RESETTOTAL 1 0 97132 F F FFFFT 0 0 0 21 9 1 24 9 4 3 9 7 7 8 0 16 26 1 1130 C FFF 0 0 0 5 0 18 21 2 1 1 F 5 0 19 28 84 1 11 F 5 0 20 30 73 1 22 F 5 0 21 32 89 1 6 F 5 0 22 13 1 1 3 F 8 0 23 24 5 1 22 C FFF 0 0 0 8 0 24 24 28 1 8 D FFF 0 0 0 8 0 25 24 37 1 17 27 26 N FFF 0 0 0 8 0 28 24 55 1 17 30 29 N FFF 0 0 0 8 0 31 24 73 1 17 33 32 N FFF 0 0 0 8 0 34 24 91 1 4 35 N FFF 0 0 0 8 0 36 24 96 1 17 38 37 N FFF 0 0 0 8 0 39 24 114 1 17 41 40 N FFF 0 0 0 5 0 42 13 7 1 17 F 5 0 43 14 5 1 22 F 5 0 44 17 10 1 11 F 7 4 20 0 3132 F 7 4 12 36 16 19 F 7 4 12 54 3 78 F 7 4 12 27 16 10 F 7 4 12 4 16 24 F 7 4 12 0 16 5 F 7 4 14 54 14 19 F 7 4 14 72 14 19 F 7 4 14 95 14 19 F 7 4 14 113 14 19 F 7 4 27 72 7 60 F 7 4 27 72 3 60 F 7 4 29 72 3 60 F 7 4 27 95 7 19 F 5 0 45 29 95 1 1 F 5 0 46 31 95 1 1 F 5 0 47 29 113 1 1 F 5 0 48 31 113 1 1 F 5 0 49 27 95 1 1 F 5 0 50 27 113 1 1 F 5 0 51 33 95 1 1 F 5 0 52 33 113 1 1 F 5 0 53 29 72 1 1 F 5 0 54 29 131 1 1 F 5 0 55 31 72 1 1 F 5 0 56 31 131 1 1 F 5 0 57 27 72 1 1 F 5 0 58 27 131 1 1 F 5 0 59 27 90 1 1 F 5 0 60 14 113 1 1 F 5 0 61 14 131 1 1 F 5 0 62 20 113 1 1 F 5 0 63 22 113 1 1 F 5 0 64 20 131 1 1 F 5 0 65 22 131 1 1 F 5 0 66 14 95 1 1 F 5 0 67 20 95 1 1 F 5 0 68 22 95 1 1 F 5 0 69 14 72 1 1 F 5 0 70 14 90 1 1 F 5 0 71 20 72 1 1 F 5 0 72 22 72 1 1 F 5 0 73 20 90 1 1 F 5 0 74 22 90 1 1 F 5 0 75 14 54 1 1 F 5 0 76 27 54 1 1 F 5 0 77 20 54 1 1 F 5 0 78 22 54 1 1 F 5 0 79 12 4 1 1 F 5 0 80 27 4 1 1 F 5 0 81 20 0 1 1 F 5 0 82 22 0 1 1 F 5 0 83 20 4 1 1 F 5 0 84 22 4 1 1 F 5 0 85 12 27 1 1 F 5 0 86 27 27 1 1 F 5 0 87 20 27 1 1 F 5 0 88 22 27 1 1 F 5 0 89 12 36 1 1 F 5 0 90 27 36 1 1 F 5 0 91 20 36 1 1 F 5 0 92 22 36 1 1 F 5 0 93 12 54 1 1 F 5 0 94 13 30 1 4 F 5 0 95 14 28 1 7 F 5 0 96 13 41 1 7 F 5 0 97 14 40 1 10 F 5 0 98 15 44 1 2 F 5 0 99 15 60 1 7 F 5 0 100 16 58 1 10 F 5 0 101 17 56 1 14 F 5 0 102 15 78 1 7 F 5 0 103 16 77 1 9 F 5 0 104 17 75 1 13 F 5 0 105 18 74 1 14 F 5 0 106 15 91 1 4 F 5 0 107 16 91 1 3 F 5 0 108 18 92 1 1 F 5 0 109 17 91 1 3 F 5 0 110 15 98 1 13 F 5 0 111 16 97 1 15 F 5 0 112 17 101 1 6 F 5 0 113 18 103 1 2 F 5 0 114 15 115 1 15 F 5 0 115 16 119 1 7 F 5 0 116 17 115 1 15 F 5 0 117 18 121 1 2 F 5 0 118 15 9 1 14 F 5 0 119 16 10 1 11 F 5 0 120 21 15 1 1 F 5 0 121 21 31 1 1 F 5 0 122 21 45 1 1 F 5 0 123 21 63 1 1 F 5 0 124 21 81 1 1 F 5 0 125 21 92 1 1 F 5 0 126 21 104 1 1 F 5 0 127 21 122 1 1 F 8 0 128 30 96 1 17 131 130 N FFF 0 0 0 8 0 132 30 114 1 17 135 134 N FFF 0 0 0 5 0 136 13 81 1 13 F 8 0 137 25 73 1 17 139 138 N FFF 0 0 0 8 0 140 24 1 1 3 141 N FFF 0 0 0 5 0 142 9 56 1 8 F 5 0 143 7 46 1 1 F 5 0 144 5 38 1 51 F 5 0 146 6 46 1 34 F 5 0 148 10 56 1 7 F 8 0 149 9 65 1 3 150 N FFF 0 0 0 8 0 151 28 96 1 17 153 152 N FFF 0 0 1 8 0 154 28 114 1 17 156 155 N FFF 0 0 1 8 0 157 32 96 1 17 159 158 N FFF 0 0 1 8 0 160 32 114 1 17 162 161 N FFF 0 0 1 8 0 163 0 0 1 1 166 C FFF 0 0 0 8 0 176 13 95 1 7 C FFF 0 0 0 8 0 178 7 48 1 30 C FFF 0 0 0 8 0 180 0 1 1 80 C FFF 0 0 0 8 0 182 3 1 1 25 C FFF 0 0 0 8 0 185 1 1 1 50 C FFF 0 0 0 8 0 192 2 1 1 40 C FFF 0 0 0 10 1 18 63 18 196 197 T 198 2 1 18 199 200 F 201 2 0 18 202 203 T 204 2 1 18 205 206 F 207 2 0 18 208 209 T 210 1 0 8iif(licz<m.counter," ",REPLICATE(chr(m.total_sign),130)) "Suma folio:" "Przeniesienie z folio:" "Razem:" "Lp." ALLTRIM(kursorek.symbol) kursorek.datazak kursorek.wartpocz "99,999,999,999.99" kursorek.wartpocz_1 "99,999,999,999.99" kursorek.umorz_1 "99,999,999,999.99" kursorek.stawka_1 kursorek.kwotaodp_1 "99,999,999,999.99" kursorek.rataodp_1 "99,999,999,999.99" "Okre lenie rodka" "trwa ego oraz warto "Symbol KR "Data" "nabycia" "Warto "pocz tkowa" "Warto "pocz tkowa" "zaktualizowana" "Warto "umorzenia" "dotychczasowa" "zaktualizowana" "Sta-" "wka" "am." "Kwota odpis "amortyzacyjnych" "w roku" "Miesi czna rata" "odpis "amortyzacyjnych" "niematerialnej" "lub prawnej" kwotaodp11 - kwotaodp10 + e1 "99,999,999,999.99" rataodp11 - rataodp10 + e2 "99,999,999,999.99" "Amortyzacja w" kursorek.umorznow_1 "99,999,999,999.99" "Strona: " 5"E W I D E N C J A R O D K W T R W A Y C H" $"dla cel w prowadzonej dzia _pageno + m.offset kwotaodp10 "99,999,999,999.99" rataodp10 "99,999,999,999.99" kwotaodp11 + e1 "99,999,999,999.99" rataodp11 + e2 "99,999,999,999.99" Aiif(p_paper=1 .and. _pageno>1 and predruk=.f., new_page(.t.)," ") 4Wywo anie funkcji new_page(.t.) (kt ra wtedy wy wietla komunikat "W kartk ..itd." oraz wysuwa stron tylko w sytuacji, gdy: - drukarka przyjmuje pojedy cze kartki - dana strona nie jest stron pierwsz aktualnego raportu - raport nie jest wykonywany w trybie predruk (czyli tylko do pami %alltrim(str(fullyear(m.roknr)))+" r." %alltrim(str(fullyear(m.roknr)))+" r." dane_firmy(m.firmnr,'nazwa') Wiif(len(dane_firmy(m.firmnr,'telefon'))>0,"tel. " + dane_firmy(m.firmnr,'telefon'),' ') dane_firmy(m.firmnr,'adres') +iif(len(dane_firmy(m.firmnr,'nr_domu'))>0,", " + dane_firmy(m.firmnr,'nr_domu'),' ') +iif(len(dane_firmy(m.firmnr,'nr_lokalu'))>0,"/" + dane_firmy(m.firmnr,'nr_lokalu'),' ') odane_firmy(m.firmnr,'kod') + iif(len(dane_firmy(m.firmnr,'miasto'))>0," " + dane_firmy(m.firmnr,'miasto'),' ') KWOTAODP10 kursorek.kwotaodp_1 KWOTAODP11 kursorek.kwotaodp_1 RATAODP10 kursorek.rataodp_1 RATAODP11 kursorek.rataodp_1 kursorek.symbol m.beg_num OBJTYPE OBJCODE HEIGHT WIDTH STYLE PICTURE ORDER UNIQUE COMMENT ENVIRON BOXCHAR FILLCHAR FLOAT STRETCH NOREPEAT RESETRPT PAGEBREAK RESETPAGE SWAPHEADER SWAPFOOTER EJECTBEFOR EJECTAFTER PLAIN SUMMARY ADDALIAS OFFSET TOPMARGIN BOTMARGIN TOTALTYPE RESETTOTAL 1 0 97132 F F FFFFT 0 0 0 21 9 1 24 9 4 3 9 7 7 8 0 16 26 1 1 76 C FFF 0 0 0 7 4 20 0 3 78 F 7 4 12 0 3 78 F 7 4 14 0 14 19 F 7 4 14 18 14 19 F 7 4 14 41 14 19 F 7 4 14 59 14 19 F 7 4 27 18 7 60 F 7 4 27 18 3 60 F 7 4 29 18 3 60 F 7 4 27 41 7 19 F 5 0 18 29 41 1 1 F 5 0 19 31 41 1 1 F 5 0 20 29 59 1 1 F 5 0 21 31 59 1 1 F 5 0 22 27 41 1 1 F 5 0 23 27 59 1 1 F 5 0 24 33 41 1 1 F 5 0 25 33 59 1 1 F 5 0 26 29 18 1 1 F 5 0 27 29 77 1 1 F 5 0 28 31 18 1 1 F 5 0 29 31 77 1 1 F 5 0 30 27 18 1 1 F 5 0 31 27 77 1 1 F 5 0 32 27 36 1 1 F 5 0 33 14 59 1 1 F 5 0 34 14 77 1 1 F 5 0 35 20 59 1 1 F 5 0 36 22 59 1 1 F 5 0 37 20 77 1 1 F 5 0 38 22 77 1 1 F 5 0 39 14 41 1 1 F 5 0 40 20 41 1 1 F 5 0 41 22 41 1 1 F 5 0 42 14 18 1 1 F 5 0 43 14 36 1 1 F 5 0 44 20 18 1 1 F 5 0 45 22 18 1 1 F 5 0 46 20 36 1 1 F 5 0 47 22 36 1 1 F 5 0 48 14 0 1 1 F 5 0 49 20 0 1 1 F 5 0 50 22 0 1 1 F 5 0 51 30 19 1 22 F 5 0 52 32 35 1 6 F 5 0 53 28 30 1 11 F 5 0 54 30 19 1 22 F 5 0 55 32 35 1 6 F 8 0 56 24 1 1 17 58 57 N FFF 0 0 0 8 0 59 24 19 1 17 61 60 N FFF 0 0 0 8 0 62 24 37 1 4 63 N FFF 0 0 0 8 0 64 24 42 1 17 66 65 N FFF 0 0 0 8 0 67 24 60 1 17 69 68 N FFF 0 0 0 5 0 70 15 6 1 7 F 5 0 71 16 4 1 10 F 5 0 72 17 2 1 14 F 5 0 73 15 24 1 7 F 5 0 74 16 23 1 9 F 5 0 75 17 21 1 13 F 5 0 76 18 20 1 14 F 5 0 77 15 37 1 4 F 5 0 78 16 37 1 3 F 5 0 79 18 38 1 1 F 5 0 80 17 37 1 3 F 5 0 81 15 44 1 13 F 5 0 82 16 43 1 15 F 5 0 83 17 47 1 6 F 5 0 84 18 49 1 2 F 5 0 85 15 61 1 15 F 5 0 86 16 65 1 7 F 5 0 87 17 61 1 15 F 5 0 88 18 67 1 2 F 8 0 89 30 42 1 17 92 91 N FFF 0 0 0 8 0 93 30 60 1 17 96 95 N FFF 0 0 0 5 0 97 13 27 1 13 F 5 0 98 21 8 1 2 F 5 0 99 21 27 1 2 F 5 0 100 21 38 1 2 F 5 0 101 21 49 1 2 F 5 0 102 21 67 1 2 F 8 0 103 25 19 1 17 105 104 N FFF 0 0 0 5 0 106 9 31 1 8 F 5 0 107 7 21 1 1 F 5 0 108 5 13 1 51 F 5 0 110 6 21 1 34 F 8 0 112 9 40 1 3 113 N FFF 0 0 0 5 0 114 10 31 1 8 F 8 0 115 28 42 1 17 117 116 N FFF 0 0 1 8 0 118 28 60 1 17 120 119 N FFF 0 0 1 8 0 121 32 42 1 17 123 122 N FFF 0 0 1 8 0 124 32 60 1 17 126 125 N FFF 0 0 1 8 0 127 0 0 1 1 130 C FFF 0 0 0 8 0 140 13 41 1 7 C FFF 0 0 0 8 0 142 7 23 1 30 C FFF 0 0 0 8 0 144 0 1 1 80 C FFF 0 0 0 8 0 146 3 1 1 25 C FFF 0 0 0 8 0 149 1 1 1 50 C FFF 0 0 0 8 0 156 2 1 1 40 C FFF 0 0 0 10 1 2 43 18 160 161 T 162 2 1 18 163 164 F 165 2 0 18 166 167 T 168 2 1 18 169 170 F 171 2 0 18 172 173 T 174 1 0 7iif(licz<m.counter," ",REPLICATE(chr(m.total_sign),76)) "Przeniesienie z folio:" "Razem:" "Suma folio:" "Przeniesienie z folio:" "Razem:" kursorek.wartpocz_2 "99,999,999,999.99" kursorek.umorz_2 "99,999,999,999.99" kursorek.stawka_2 kursorek.kwotaodp_2 "99,999,999,999.99" kursorek.rataodp_2 "99,999,999,999.99" "Warto "pocz tkowa" "zaktualizowana" "Warto "umorzenia" "dotychczasowa" "zaktualizowana" "Sta-" "wka" "am." "Kwota odpis "amortyzacyjnych" "w roku" "Miesi czna rata" "odpis "amortyzacyjnych" kwotaodp21 - kwotaodp20 + e3 "99,999,999,999.99" rataodp21 - rataodp20 + e4 "99,999,999,999.99" "Amortyzacja w" kursorek.umorznow_2 "99,999,999,999.99" "Strona: " 5"E W I D E N C J A R O D K W T R W A Y C H" $"dla cel w prowadzonej dzia _pageno + m.offset kwotaodp20 "99,999,999,999.99" rataodp20 "99,999,999,999.99" kwotaodp21 + e3 "99,999,999,999.99" rataodp21 + e4 "99,999,999,999.99" Aiif(p_paper=1 .and. _pageno>1 and predruk=.f., new_page(.t.)," ") 4Wywo anie funkcji new_page(.t.) (kt ra wtedy wy wietla komunikat "W kartk ..itd." oraz wysuwa stron tylko w sytuacji, gdy: - drukarka przyjmuje pojedy cze kartki - dana strona nie jest stron pierwsz aktualnego raportu - raport nie jest wykonywany w trybie predruk (czyli tylko do pami %alltrim(str(fullyear(m.roknr)))+" r." %alltrim(str(fullyear(m.roknr)))+" r." dane_firmy(m.firmnr,'nazwa') Wiif(len(dane_firmy(m.firmnr,'telefon'))>0,"tel. " + dane_firmy(m.firmnr,'telefon'),' ') dane_firmy(m.firmnr,'adres') +iif(len(dane_firmy(m.firmnr,'nr_domu'))>0,", " + dane_firmy(m.firmnr,'nr_domu'),' ') +iif(len(dane_firmy(m.firmnr,'nr_lokalu'))>0,"/" + dane_firmy(m.firmnr,'nr_lokalu'),' ') odane_firmy(m.firmnr,'kod') + iif(len(dane_firmy(m.firmnr,'miasto'))>0," " + dane_firmy(m.firmnr,'miasto'),' ') KWOTAODP20 kursorek.kwotaodp_2 KWOTAODP21 kursorek.kwotaodp_2 RATAODP20 kursorek.rataodp_2 RATAODP21 kursorek.rataodp_2 kursorek.symbol m.beg_num m.xloc = m.xloc errors \<Nie \<Tak ECODE1 DEFAULTANSY0 OLDALIAS *SYSPATH SERRWIN .FXERRCODE ERRORS IE.MESSAGE Brak dostepu do danych w sieci... UWAGA !!! Aby wykonaF operacj potrzeba wi cej pami ci operacyjnej. 80286 W tym celu naleF y zmieni komputer na 80386 (lub lepszy) z 4 MB pamiF W tym celu naleF y dokupi pamiF ci RAM lub inaczej skonfigurowa komupter. UWAGA !!! NastapiF d systemowy. Uruchom program ADMIN i wykonaj operacjF PIERWSZA POMOC li pomimo u ycia opcji PIERWSZA POMOC powtarza to skontaktuj siF z InsERT'em. Koniecznie TERAZ ZAPISZ: - operacje, ktF re wykonywa przed wyst pieniem awarii; - poniF sze 6 linii ekranu: 2. FF 4. FF ERMES ERLIN EGA\SERLINNO LIERDZIEN PRINT_ERR NOTICE ERRWIN aSYSPATH ER_LIN QER_NO ER_MES ER_LIN1 PR_NAME AER_DATE RACHVER CLEAR CURSORz errors WciF nij dowolny klawisz ... ECodeF SET CURSOR &curstat ECODE1 ECODE2 ECODE3 OLDALIAS ILOSC CURSTAT SYSPATH ERRWIN ERRORS ERRCODE MESSAGE LOCALENV7 ksiega.fky2 ksiega MY_QUIT MAINMENU KSIEGA errors komunikF QUEST KOMUNIK1 KOMUNIK2 KOMUNIK3 ILOSC IOPEN SYSPATH INFOTOM FOTOM ERRORS ERRCODE MESSAGE CZYTAK kursorek PREDRUK LICZNIK MODULY OFFSET KURSOREK PRINTER_FEDIALOG NA_EKRAN PRINT_ERR P_PAPER NEW_PAGE GETSTOP P_RESET pdwzorn pdwzor ewreman ewpprzej ewprach ewspvat ewspnaz ewzakvat ewzakdet katup ewsrtr RODZAJ PTOWAR_1 _PTOWAR1 PINNE_1 _PINNE1 MULTI1_1 WZAKUP_1 _WZAKUP1 WKOSZTY_1 _WKOSZTY1 WREKLAMA_1_WREKLAMA1E9 WWYPLATA_1_WWYPLATA1E10 WINNE_1 _WINNE1 MULTI_1 A1INNE_1 _INNE1 PINNE1 WPODATEK_1_WPODATEK1WPRZEROB_1_WPRZEROB1WNATURA_1 _WNATURA1 WSPRZET_1 _WSPRZET1 WARTOSC_1 ZUS_S_1 FUND_S_1 WYN_S_1 DIF_S_1 ZUS_K_1 FUND_K_1 WYN_K_1 NET22_1 VAT22_1 NET12_1 VAT12_1 NET7_1 VAT7_1 NET0_1 NETZW_1 PODATEK_1 BRUTTO_1 NETINW1_1 NETINW2_1 VATINW2_1 NETINW3_1 VATINW3_1 NETINNE1_1NETINNE2_1VATINNE2_1NETINNE3_1VATINNE3_1PRZYCHOD_1ZAKUPY_1 KOSZTY_1 WYDATKI_1 DOCHOD_1 KWOTAODP11RATAODP11 KWOTAODP21RATAODP21 m.xloc = m.xloc errors \<Nie \<Tak ECODE1 DEFAULTANSY0 OLDALIAS SYSPATH SERRWIN ERRCODE ERRORS MESSAGE OBJTYPE OBJCODE HEIGHT WIDTH STYLE PICTURE ORDER UNIQUE COMMENT ENVIRON BOXCHAR FILLCHAR FLOAT STRETCH NOREPEAT RESETRPT PAGEBREAK RESETPAGE SWAPHEADER SWAPFOOTER EJECTBEFOR EJECTAFTER PLAIN SUMMARY ADDALIAS OFFSET TOPMARGIN BOTMARGIN TOTALTYPE RESETTOTAL 1 0 97230 F F FFFFT 0 0 0 21 9 1 24 9 4 3 9 7 7 8 0 16 26 1 1207 C FFF 0 0 0 5 0 18 21 2 1 1 F 5 0 19 28 84 1 11 F 5 0 20 30 73 1 22 F 5 0 21 32 89 1 6 F 5 0 22 13 1 1 3 F 8 0 23 24 5 1 22 C FFF 0 0 0 8 0 24 24 28 1 8 D FFF 0 0 0 8 0 25 24 37 1 17 27 26 N FFF 0 0 0 8 0 28 24 55 1 17 30 29 N FFF 0 0 0 8 0 31 24 73 1 17 33 32 N FFF 0 0 0 8 0 34 24 91 1 4 35 N FFF 0 0 0 8 0 36 24 96 1 17 38 37 N FFF 0 0 0 8 0 39 24 114 1 17 41 40 N FFF 0 0 0 5 0 42 13 7 1 17 F 5 0 43 14 5 1 22 F 5 0 44 17 10 1 11 F 5 0 45 13 30 1 4 F 5 0 46 14 28 1 7 F 5 0 47 13 41 1 7 F 5 0 48 14 40 1 10 F 5 0 49 15 44 1 2 F 5 0 50 15 60 1 7 F 5 0 51 16 58 1 10 F 5 0 52 17 56 1 14 F 5 0 53 15 78 1 7 F 5 0 54 16 77 1 9 F 5 0 55 17 75 1 13 F 5 0 56 18 74 1 14 F 5 0 57 15 91 1 4 F 5 0 58 16 91 1 3 F 5 0 59 18 92 1 1 F 5 0 60 17 91 1 3 F 5 0 61 15 98 1 13 F 5 0 62 16 97 1 15 F 5 0 63 17 101 1 6 F 5 0 64 18 103 1 2 F 5 0 65 15 115 1 15 F 5 0 66 16 119 1 7 F 5 0 67 17 115 1 15 F 5 0 68 18 121 1 2 F 5 0 69 15 9 1 14 F 5 0 70 16 10 1 11 F 5 0 71 21 15 1 1 F 5 0 72 21 31 1 1 F 5 0 73 21 45 1 1 F 5 0 74 21 63 1 1 F 5 0 75 21 81 1 1 F 5 0 76 21 92 1 1 F 5 0 77 21 104 1 1 F 5 0 78 21 122 1 1 F 5 0 79 13 81 1 13 F 5 0 80 30 150 1 22 F 5 0 81 32 166 1 6 F 5 0 82 28 161 1 11 F 5 0 83 30 150 1 22 F 5 0 84 32 166 1 6 F 8 0 85 24 132 1 17 87 86 N FFF 0 0 0 8 0 88 24 150 1 17 90 89 N FFF 0 0 0 8 0 91 24 168 1 4 92 N FFF 0 0 0 8 0 93 24 173 1 17 95 94 N FFF 0 0 0 8 0 96 24 191 1 17 98 97 N FFF 0 0 0 5 0 99 15 137 1 7 F 5 0 100 16 135 1 10 F 5 0 101 17 133 1 14 F 5 0 102 15 155 1 7 F 5 0 103 16 154 1 9 F 5 0 104 17 152 1 13 F 5 0 105 18 151 1 14 F 5 0 106 15 168 1 4 F 5 0 107 16 168 1 3 F 5 0 108 18 169 1 1 F 5 0 109 17 168 1 3 F 5 0 110 15 175 1 13 F 5 0 111 16 174 1 15 F 5 0 112 17 178 1 6 F 5 0 113 18 180 1 2 F 5 0 114 15 192 1 15 F 5 0 115 16 196 1 7 F 5 0 116 17 192 1 15 F 5 0 117 18 198 1 2 F 5 0 118 13 158 1 13 F 5 0 119 21 139 1 2 F 5 0 120 21 158 1 2 F 5 0 121 21 169 1 2 F 5 0 122 21 180 1 2 F 5 0 123 21 198 1 2 F 8 0 124 25 150 1 17 126 125 N FFF 0 0 0 8 0 127 25 73 1 17 129 128 N FFF 0 0 0 7 7 12 0 1209 = F 7 7 20 0 1209 = F 7 7 22 0 1209 = F 7 7 27 0 1209 = F 7 7 14 54 1155 = F 7 7 29 149 1 60 = F 7 7 31 149 1 60 = F 7 7 33 149 1 60 = F 7 7 33 72 1 60 = F 7 7 31 72 1 60 = F 7 7 29 72 1 60 = F 7 7 12 0 16 1 | F 7 7 12 4 16 1 | F 7 7 12 27 16 1 | F 7 7 12 36 16 1 | F 7 7 12 54 16 1 | F 7 7 14 72 20 1 | F 7 7 14 95 20 1 | F 7 7 14 90 14 1 | F 7 7 14 113 20 1 | F 7 7 12 131 22 1 | F 7 7 14 149 20 1 | F 7 7 14 167 14 1 | F 7 7 14 172 20 1 | F 7 7 14 190 20 1 | F 7 7 12 208 22 1 | F 8 0 130 24 1 1 3 131 N FFF 0 0 0 5 0 132 9 105 1 8 F 5 0 133 7 95 1 1 F 5 0 134 5 87 1 51 F 5 0 136 6 95 1 34 F 8 0 138 30 96 1 17 141 140 N FFF 0 0 0 8 0 142 30 114 1 17 145 144 N FFF 0 0 0 8 0 146 30 173 1 17 149 148 N FFF 0 0 0 8 0 150 30 191 1 17 153 152 N FFF 0 0 0 8 0 154 28 173 1 17 156 155 N FFF 0 0 1 8 0 157 28 191 1 17 159 158 N FFF 0 0 1 8 0 160 32 173 1 17 162 161 N FFF 0 0 1 8 0 163 32 191 1 17 165 164 N FFF 0 0 1 8 0 166 28 96 1 17 168 167 N FFF 0 0 1 8 0 169 28 114 1 17 171 170 N FFF 0 0 1 8 0 172 32 96 1 17 174 173 N FFF 0 0 1 8 0 175 32 114 1 17 177 176 N FFF 0 0 1 8 0 178 0 0 1 1 181 C FFF 0 0 0 8 0 191 9 113 1 3 192 N FFF 0 0 0 8 0 193 7 97 1 30 C FFF 0 0 0 8 0 195 13 95 1 7 C FFF 0 0 0 8 0 197 13 172 1 7 C FFF 0 0 0 8 0 199 0 1 1 80 C FFF 0 0 0 8 0 201 3 1 1 25 C FFF 0 0 0 8 0 204 1 1 1 50 C FFF 0 0 0 8 0 211 2 1 1 40 C FFF 0 0 0 18 215 216 T 217 2 1 18 218 219 T 220 2 1 18 221 222 F 223 2 0 18 224 225 T 226 2 1 18 227 228 F 229 2 0 18 230 231 F 232 2 0 18 233 234 T 235 2 1 18 236 237 F 238 2 0 18 239 240 T 241 1 0 8iif(licz<m.counter," ",REPLICATE(chr(m.total_sign),207)) "Suma folio:" "Przeniesienie z folio:" "Razem:" "Lp." ALLTRIM(kursorek.symbol) kursorek.datazak kursorek.wartpocz "99,999,999,999.99" kursorek.wartpocz_1 "99,999,999,999.99" kursorek.umorz_1 "99,999,999,999.99" kursorek.stawka_1 kursorek.kwotaodp_1 "99,999,999,999.99" kursorek.rataodp_1 "99,999,999,999.99" "Okre lenie rodka" "trwa ego oraz warto "Symbol KR "Data" "nabycia" "Warto "pocz tkowa" "Warto "pocz tkowa" "zaktualizowana" "Warto "umorzenia" "dotychczasowa" "zaktualizowana" "Sta-" "wka" "am." "Kwota odpis "amortyzacyjnych" "w roku" "Miesi czna rata" "odpis "amortyzacyjnych" "niematerialnej" "lub prawnej" "Amortyzacja w" "Przeniesienie z folio:" "Razem:" "Suma folio:" "Przeniesienie z folio:" "Razem:" kursorek.wartpocz_2 "99,999,999,999.99" kursorek.umorz_2 "99,999,999,999.99" kursorek.stawka_2 kursorek.kwotaodp_2 "99,999,999,999.99" kursorek.rataodp_2 "99,999,999,999.99" "Warto "pocz tkowa" "zaktualizowana" "Warto "umorzenia" "dotychczasowa" "zaktualizowana" "Sta-" "wka" "am." "Kwota odpis "amortyzacyjnych" "w roku" "Miesi czna rata" "odpis "amortyzacyjnych" "Amortyzacja w" kursorek.umorznow_2 "99,999,999,999.99" kursorek.umorznow_1 "99,999,999,999.99" "Strona: " 5"E W I D E N C J A R O D K W T R W A Y C H" $"dla cel w prowadzonej dzia kwotaodp11 - kwotaodp10 + e1 "99,999,999,999.99" rataodp11 - rataodp10 + e2 "99,999,999,999.99" kwotaodp21 - kwotaodp20 + e3 "99,999,999,999.99" rataodp21 - rataodp20 + e4 "99,999,999,999.99" kwotaodp20 "99,999,999,999.99" rataodp20 "99,999,999,999.99" kwotaodp21 + e3 "99,999,999,999.99" rataodp21 + e4 "99,999,999,999.99" kwotaodp10 "99,999,999,999.99" rataodp10 "99,999,999,999.99" kwotaodp11 + e1 "99,999,999,999.99" rataodp11 + e2 "99,999,999,999.99" Aiif(p_paper=1 .and. _pageno>1 and predruk=.f., new_page(.t.)," ") 4Wywo anie funkcji new_page(.t.) (kt ra wtedy wy wietla komunikat "W kartk ..itd." oraz wysuwa stron tylko w sytuacji, gdy: - drukarka przyjmuje pojedy cze kartki - dana strona nie jest stron pierwsz aktualnego raportu - raport nie jest wykonywany w trybie predruk (czyli tylko do pami _pageno + m.offset %alltrim(str(fullyear(m.roknr)))+" r." %alltrim(str(fullyear(m.roknr)))+" r." %alltrim(str(fullyear(m.roknr)))+" r." dane_firmy(m.firmnr,'nazwa') Wiif(len(dane_firmy(m.firmnr,'telefon'))>0,"tel. " + dane_firmy(m.firmnr,'telefon'),' ') dane_firmy(m.firmnr,'adres') +iif(len(dane_firmy(m.firmnr,'nr_domu'))>0,", " + dane_firmy(m.firmnr,'nr_domu'),' ') +iif(len(dane_firmy(m.firmnr,'nr_lokalu'))>0,"/" + dane_firmy(m.firmnr,'nr_lokalu'),' ') odane_firmy(m.firmnr,'kod') + iif(len(dane_firmy(m.firmnr,'miasto'))>0," " + dane_firmy(m.firmnr,'miasto'),' ') KWOTAODP10 kursorek.kwotaodp_1 KWOTAODP20 kursorek.kwotaodp_2 KWOTAODP21 kursorek.kwotaodp_2 RATAODP20 kursorek.rataodp_2 RATAODP21 kursorek.rataodp_2 KWOTAODP11 kursorek.kwotaodp_1 RATAODP10 kursorek.rataodp_1 RATAODP11 kursorek.rataodp_1 kursorek.symbol m.beg_num OBJTYPE OBJCODE HEIGHT WIDTH STYLE PICTURE ORDER UNIQUE COMMENT ENVIRON BOXCHAR FILLCHAR FLOAT STRETCH NOREPEAT RESETRPT PAGEBREAK RESETPAGE SWAPHEADER SWAPFOOTER EJECTBEFOR EJECTAFTER PLAIN SUMMARY ADDALIAS OFFSET TOPMARGIN BOTMARGIN TOTALTYPE RESETTOTAL 1 0 97230 F F FFFFT 0 0 0 21 9 1 24 9 4 3 9 7 7 8 0 16 26 1 1207 C FFF 0 0 0 5 0 18 21 2 1 1 F 5 0 19 28 84 1 11 F 5 0 20 30 73 1 22 F 5 0 21 32 89 1 6 F 5 0 22 13 1 1 3 F 8 0 23 24 5 1 22 C FFF 0 0 0 8 0 24 24 28 1 8 D FFF 0 0 0 8 0 25 24 37 1 17 27 26 N FFF 0 0 0 8 0 28 24 55 1 17 30 29 N FFF 0 0 0 8 0 31 24 73 1 17 33 32 N FFF 0 0 0 8 0 34 24 91 1 4 35 N FFF 0 0 0 8 0 36 24 96 1 17 38 37 N FFF 0 0 0 8 0 39 24 114 1 17 41 40 N FFF 0 0 0 5 0 42 13 7 1 17 F 5 0 43 14 5 1 22 F 5 0 44 17 10 1 11 F 5 0 45 13 30 1 4 F 5 0 46 14 28 1 7 F 5 0 47 13 41 1 7 F 5 0 48 14 40 1 10 F 5 0 49 15 44 1 2 F 5 0 50 15 60 1 7 F 5 0 51 16 58 1 10 F 5 0 52 17 56 1 14 F 7 4 12 36 16 19 F 7 4 12 54 3 78 F 7 4 12 27 16 10 F 7 4 12 4 16 24 F 7 4 12 0 16 5 F 7 4 14 54 14 19 F 7 4 14 72 14 19 F 7 4 14 95 14 19 F 7 4 14 113 14 19 F 7 4 27 72 7 60 F 7 4 27 72 3 60 F 7 4 29 72 3 60 F 7 4 27 95 7 19 F 7 4 12 131 3 78 F 7 4 14 131 14 19 F 7 4 14 149 14 19 F 7 4 14 172 14 19 F 7 4 14 190 14 19 F 7 4 27 149 7 60 F 7 4 27 149 3 60 F 7 4 29 149 3 60 F 7 4 27 172 7 19 F 7 4 20 0 3209 F 5 0 53 20 190 1 1 F 5 0 54 20 208 1 1 F 5 0 55 22 190 1 1 F 5 0 56 22 208 1 1 F 5 0 57 20 172 1 1 F 5 0 58 22 172 1 1 F 5 0 59 20 149 1 1 F 5 0 60 20 167 1 1 F 5 0 61 22 149 1 1 F 5 0 62 22 167 1 1 F 5 0 63 20 131 1 1 F 5 0 64 22 131 1 1 F 5 0 65 20 113 1 1 F 5 0 66 22 113 1 1 F 5 0 67 20 95 1 1 F 5 0 68 22 95 1 1 F 5 0 69 20 72 1 1 F 5 0 70 20 90 1 1 F 5 0 71 22 72 1 1 F 5 0 72 22 90 1 1 F 5 0 73 20 54 1 1 F 5 0 74 22 54 1 1 F 5 0 75 20 0 1 1 F 5 0 76 20 4 1 1 F 5 0 77 22 0 1 1 F 5 0 78 22 4 1 1 F 5 0 79 20 27 1 1 F 5 0 80 22 27 1 1 F 5 0 81 20 36 1 1 F 5 0 82 22 36 1 1 F 5 0 83 29 172 1 1 F 5 0 84 31 172 1 1 F 5 0 85 29 190 1 1 F 5 0 86 31 190 1 1 F 5 0 87 27 172 1 1 F 5 0 88 27 190 1 1 F 5 0 89 33 172 1 1 F 5 0 90 33 190 1 1 F 5 0 91 29 149 1 1 F 5 0 92 29 208 1 1 F 5 0 93 31 149 1 1 F 5 0 94 31 208 1 1 F 5 0 95 27 149 1 1 F 5 0 96 27 208 1 1 F 5 0 97 27 167 1 1 F 5 0 98 14 190 1 1 F 5 0 99 14 208 1 1 F 5 0 100 14 172 1 1 F 5 0 101 14 149 1 1 F 5 0 102 14 167 1 1 F 5 0 103 14 131 1 1 F 5 0 104 27 131 1 1 F 5 0 105 12 131 1 1 F 5 0 106 29 95 1 1 F 5 0 107 31 95 1 1 F 5 0 108 29 113 1 1 F 5 0 109 31 113 1 1 F 5 0 110 27 95 1 1 F 5 0 111 27 113 1 1 F 5 0 112 33 95 1 1 F 5 0 113 33 113 1 1 F 5 0 114 29 72 1 1 F 5 0 115 29 131 1 1 F 5 0 116 31 72 1 1 F 5 0 117 31 131 1 1 F 5 0 118 27 72 1 1 F 5 0 119 27 90 1 1 F 5 0 120 14 113 1 1 F 5 0 121 14 95 1 1 F 5 0 122 14 72 1 1 F 5 0 123 14 90 1 1 F 5 0 124 14 54 1 1 F 5 0 125 27 54 1 1 F 5 0 126 12 4 1 1 F 5 0 127 27 4 1 1 F 5 0 128 12 27 1 1 F 5 0 129 27 27 1 1 F 5 0 130 12 36 1 1 F 5 0 131 27 36 1 1 F 5 0 132 12 54 1 1 F 5 0 133 15 78 1 7 F 5 0 134 16 77 1 9 F 5 0 135 17 75 1 13 F 5 0 136 18 74 1 14 F 5 0 137 15 91 1 4 F 5 0 138 16 91 1 3 F 5 0 139 18 92 1 1 F 5 0 140 17 91 1 3 F 5 0 141 15 98 1 13 F 5 0 142 16 97 1 15 F 5 0 143 17 101 1 6 F 5 0 144 18 103 1 2 F 5 0 145 15 115 1 15 F 5 0 146 16 119 1 7 F 5 0 147 17 115 1 15 F 5 0 148 18 121 1 2 F 5 0 149 15 9 1 14 F 5 0 150 16 10 1 11 F 5 0 151 21 15 1 1 F 5 0 152 21 31 1 1 F 5 0 153 21 45 1 1 F 5 0 154 21 63 1 1 F 5 0 155 21 81 1 1 F 5 0 156 21 92 1 1 F 5 0 157 21 104 1 1 F 5 0 158 21 122 1 1 F 8 0 159 30 96 1 17 162 161 N FFF 0 0 0 8 0 163 30 114 1 17 166 165 N FFF 0 0 0 5 0 167 13 81 1 13 F 5 0 168 30 150 1 22 F 5 0 169 32 166 1 6 F 5 0 170 28 161 1 11 F 5 0 171 30 150 1 22 F 5 0 172 32 166 1 6 F 8 0 173 24 132 1 17 175 174 N FFF 0 0 0 8 0 176 24 150 1 17 178 177 N FFF 0 0 0 8 0 179 24 168 1 4 180 N FFF 0 0 0 8 0 181 24 173 1 17 183 182 N FFF 0 0 0 8 0 184 24 191 1 17 186 185 N FFF 0 0 0 5 0 187 15 137 1 7 F 5 0 188 16 135 1 10 F 5 0 189 17 133 1 14 F 5 0 190 15 155 1 7 F 5 0 191 16 154 1 9 F 5 0 192 17 152 1 13 F 5 0 193 18 151 1 14 F 5 0 194 15 168 1 4 F 5 0 195 16 168 1 3 F 5 0 196 18 169 1 1 F 5 0 197 17 168 1 3 F 5 0 198 15 175 1 13 F 5 0 199 16 174 1 15 F 5 0 200 17 178 1 6 F 5 0 201 18 180 1 2 F 5 0 202 15 192 1 15 F 5 0 203 16 196 1 7 F 5 0 204 17 192 1 15 F 5 0 205 18 198 1 2 F 8 0 206 30 173 1 17 209 208 N FFF 0 0 0 8 0 210 30 191 1 17 213 212 N FFF 0 0 0 5 0 214 13 158 1 13 F 5 0 215 21 139 1 2 F 5 0 216 21 158 1 2 F 5 0 217 21 169 1 2 F 5 0 218 21 180 1 2 F 5 0 219 21 198 1 2 F 8 0 220 25 150 1 17 222 221 N FFF 0 0 0 8 0 223 25 73 1 17 225 224 N FFF 0 0 0 8 0 226 24 1 1 3 227 N FFF 0 0 0 5 0 228 9 105 1 8 F 5 0 229 7 95 1 1 F 5 0 230 5 87 1 51 F 5 0 232 6 95 1 34 F 5 0 234 10 105 1 7 F 8 0 235 9 114 1 3 236 N FFF 0 0 0 8 0 237 28 96 1 17 239 238 N FFF 0 0 1 8 0 240 28 114 1 17 242 241 N FFF 0 0 1 8 0 243 32 96 1 17 245 244 N FFF 0 0 1 8 0 246 32 114 1 17 248 247 N FFF 0 0 1 8 0 249 28 173 1 17 251 250 N FFF 0 0 1 8 0 252 28 191 1 17 254 253 N FFF 0 0 1 8 0 255 32 173 1 17 257 256 N FFF 0 0 1 8 0 258 32 191 1 17 260 259 N FFF 0 0 1 8 0 261 0 0 1 1 264 C FFF 0 0 0 8 0 274 13 95 1 7 C FFF 0 0 0 8 0 276 13 172 1 7 C FFF 0 0 0 8 0 278 7 97 1 30 C FFF 0 0 0 8 0 280 0 1 1 80 C FFF 0 0 0 8 0 282 3 1 1 25 C FFF 0 0 0 8 0 285 1 1 1 50 C FFF 0 0 0 8 0 292 2 1 1 40 C FFF 0 0 0 10 1 26 103 18 296 297 T 298 2 1 18 299 300 T 301 2 1 18 302 303 F 304 2 0 18 305 306 T 307 2 1 18 308 309 F 310 2 0 18 311 312 F 313 2 0 18 314 315 T 316 2 1 18 317 318 F 319 2 0 18 320 321 T 322 1 0 8iif(licz<m.counter," ",REPLICATE(chr(m.total_sign),207)) "Suma folio:" "Przeniesienie z folio:" "Razem:" "Lp." ALLTRIM(kursorek.symbol) kursorek.datazak kursorek.wartpocz "99,999,999,999.99" kursorek.wartpocz_1 "99,999,999,999.99" kursorek.umorz_1 "99,999,999,999.99" kursorek.stawka_1 kursorek.kwotaodp_1 "99,999,999,999.99" kursorek.rataodp_1 "99,999,999,999.99" "Okre lenie rodka" "trwa ego oraz warto "Symbol KR "Data" "nabycia" "Warto "pocz tkowa" "Warto "pocz tkowa" "zaktualizowana" "Warto "umorzenia" "dotychczasowa" "zaktualizowana" "Sta-" "wka" "am." "Kwota odpis "amortyzacyjnych" "w roku" "Miesi czna rata" "odpis "amortyzacyjnych" "niematerialnej" "lub prawnej" kwotaodp11 - kwotaodp10 + e1 "99,999,999,999.99" rataodp11 - rataodp10 + e2 "99,999,999,999.99" "Amortyzacja w" "Przeniesienie z folio:" "Razem:" "Suma folio:" "Przeniesienie z folio:" "Razem:" kursorek.wartpocz_2 "99,999,999,999.99" kursorek.umorz_2 "99,999,999,999.99" kursorek.stawka_2 kursorek.kwotaodp_2 "99,999,999,999.99" kursorek.rataodp_2 "99,999,999,999.99" "Warto "pocz tkowa" "zaktualizowana" "Warto "umorzenia" "dotychczasowa" "zaktualizowana" "Sta-" "wka" "am." "Kwota odpis "amortyzacyjnych" "w roku" "Miesi czna rata" "odpis "amortyzacyjnych" kwotaodp21 - kwotaodp20 + e3 "99,999,999,999.99" rataodp21 - rataodp20 + e4 "99,999,999,999.99" "Amortyzacja w" kursorek.umorznow_2 "99,999,999,999.99" kursorek.umorznow_1 "99,999,999,999.99" "Strona: " 5"E W I D E N C J A R O D K W T R W A Y C H" $"dla cel w prowadzonej dzia _pageno + m.offset kwotaodp10 "99,999,999,999.99" rataodp10 "99,999,999,999.99" kwotaodp11 + e1 "99,999,999,999.99" rataodp11 + e2 "99,999,999,999.99" kwotaodp20 "99,999,999,999.99" rataodp20 "99,999,999,999.99" kwotaodp21 + e3 "99,999,999,999.99" rataodp21 + e4 "99,999,999,999.99" Aiif(p_paper=1 .and. _pageno>1 and predruk=.f., new_page(.t.)," ") 4Wywo anie funkcji new_page(.t.) (kt ra wtedy wy wietla komunikat "W kartk ..itd." oraz wysuwa stron tylko w sytuacji, gdy: - drukarka przyjmuje pojedy cze kartki - dana strona nie jest stron pierwsz aktualnego raportu - raport nie jest wykonywany w trybie predruk (czyli tylko do pami %alltrim(str(fullyear(m.roknr)))+" r." %alltrim(str(fullyear(m.roknr)))+" r." %alltrim(str(fullyear(m.roknr)))+" r." dane_firmy(m.firmnr,'nazwa') Wiif(len(dane_firmy(m.firmnr,'telefon'))>0,"tel. " + dane_firmy(m.firmnr,'telefon'),' ') dane_firmy(m.firmnr,'adres') +iif(len(dane_firmy(m.firmnr,'nr_domu'))>0,", " + dane_firmy(m.firmnr,'nr_domu'),' ') +iif(len(dane_firmy(m.firmnr,'nr_lokalu'))>0,"/" + dane_firmy(m.firmnr,'nr_lokalu'),' ') odane_firmy(m.firmnr,'kod') + iif(len(dane_firmy(m.firmnr,'miasto'))>0," " + dane_firmy(m.firmnr,'miasto'),' ') KWOTAODP10 kursorek.kwotaodp_1 KWOTAODP20 kursorek.kwotaodp_2 KWOTAODP21 kursorek.kwotaodp_2 RATAODP20 kursorek.rataodp_2 RATAODP21 kursorek.rataodp_2 KWOTAODP11 kursorek.kwotaodp_1 RATAODP10 kursorek.rataodp_1 RATAODP11 kursorek.rataodp_1 kursorek.symbol m.beg_num C:\KSIEGA\DRUK\ ..\DRUK\DRUKUTIL.PRG C:\KSIEGA\SYSTEM\ ..\COMMON\TAKNIE.PRG ..\COMMON\ERRHAND.PRG ..\COMMON\NOTICE.PRG ..\COMMON\CLEAR.PRG ..\COMMON\PYTANIE.PRG ..\DRUK\WYDRUK.PRG ..\DRUK\SKIP.PRG ..\COMMON\CZYTAK.PRG ..\COMMON\FULLYEAR.PRG D0SRTR1.FRX D0SRTR1.FRT D0SRTR2.FRX D0SRTR2.FRT DRUKUTIL.FXP N0SRTR1.FRX N0SRTR1.FRT N0SRTR2.FRX N0SRTR2.FRT TAKNIE.FXP ERRHAND.FXP NOTICE.FXP CLEAR.FXP PYTANIE.FXP WYDRUK.FXP SKIP.FXP CZYTAK.FXP D5SRTR.FRX D5SRTR.FRT N5SRTR.FRX N5SRTR.FRT FULLYEAR.FXP