kursorek bilans umowa dowolny ga.fkyESCSTAT @DIALOG egaKURSOREK IOPEN GALIASB MY_TAG1 MAINDOWOLNY EGPRINT_ERR ESCON .fkyTAKNIE @GETSTOP _mies ODMIANA @AREA gaNAZWA IOPEN G_MIES SYSPATH podmioty podmioty m.nazwa=podmioty.&pole KTORY kyPOLE @AREA gaNAZWA OTWARTE PODMIOTY GPODMPATH SYMBOL WaitWin errors errors komunikF ONOFF kyCZEKAC @KOMUNIK1 aKOMUNIK2 KOMUNIK3 MIOTY GZNAK ILOSC Y_IOPEN MAINI WOLNY EGWAITWIN ERRORS SYSPATH ERRCODE 1MESSAGE NA_EKRAN yPYTANIE NA_EKRAN yP_FF WYSUW @DIALOG aTAKNIE GETSTOP GPRINTER_FE FAKTURY KORYGUJ RACHUNKI KORYGUJ FAKTURY VAT RACHUNKI UPROSZCZONE yERMES @ERLIN aERPR ERLINNO ERDZIEN GERRHAND FEGETSTOP P32P028 yP32P033 @P32P038 aP32P043 P32P046 P32P049 GP32P052 FEP32P055 P32P058 Y_P32P063 INP32P068 EGP32P072 P32P077 P32P029 yP32P034 @P32P039 aP32P059 P32P064 P32P069 GP32P073 FEP32P078 P32P032 yP32P037 @P32P042 aP32P045 P32P048 P32P051 GP32P054 FEP32P057 P32P062 Y_P32P067 INP32P071 EGP32P076 P32P081 P32P086 yP32P089 @P32P094 aP32P099 P32P090 yP32P095 @P32P100 P32P116 yP32P120 @P32P122 P32P028 yP32P029 @P32P033 aP32P034 P32P038 P32P039 GP32P043 FEP32P046 P32P049 Y_P32P052 INP32P055 EGP32P058 P32P059 P32P063 P32P064 1P32P068 P32P069 GAP32P072 C:P32P073 OMP32P077 .PP32P078 P32P086 yP32P089 @P32P090 aP32P094 P32P095 P32P099 GP32P100 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 23 9 4 2 9 7 2 8 0 16 24 1 1130 C FFF 0 0 0 5 0 18 11 1 1 3 F 5 0 19 20 2 1 1 F 5 0 20 20 23 1 1 F 5 0 21 20 49 1 1 F 5 0 22 20 58 1 1 F 5 0 23 20 68 1 1 F 5 0 24 20 79 1 1 F 5 0 25 7 55 1 8 F 8 0 26 7 64 1 3 27 N FFF 0 0 0 5 0 28 11 62 1 12 F 5 0 29 13 62 1 9 F 5 0 30 14 62 1 11 F 5 0 31 20 107 1 1 F 8 0 32 23 5 1 40 C FFF 0 0 0 8 0 33 23 46 1 8 D FFF 0 0 0 8 0 34 23 57 1 4 38 37 N FFF 0 0 0 8 0 39 23 62 1 13 41 40 N FFF 0 0 0 8 0 42 23 76 1 8 D FFF 0 0 0 8 0 43 23 85 1 46 C FFF 0 0 0 5 0 45 11 76 1 4 F 5 0 46 12 76 1 8 F 5 0 47 13 76 1 7 F 5 0 48 15 76 1 3 F 5 0 49 11 55 1 6 F 5 0 50 12 55 1 5 F 5 0 51 13 55 1 5 F 5 0 52 14 55 1 6 F 5 0 53 15 55 1 6 F 5 0 54 17 55 1 3 F 5 0 55 18 55 1 6 F 5 0 56 11 46 1 8 F 5 0 57 12 46 1 5 F 5 0 58 13 46 1 7 F 5 0 59 14 46 1 7 F 5 0 60 15 46 1 7 F 5 0 61 17 46 1 3 F 7 7 10 0 1132 = F 7 7 19 0 1132 = F 7 7 21 0 1132 = F 7 7 25 0 1132 = F 8 0 62 23 1 1 3 63 N FFF 0 0 0 5 0 64 5 35 1 53 F 5 0 66 11 16 1 17 F 5 0 67 16 46 1 7 F 5 0 68 16 55 1 5 F 5 0 69 12 62 1 11 F 5 0 70 14 76 1 7 F 5 0 71 11 92 1 31 F 5 0 73 12 90 1 35 F 7 7 11 4 15 1 | F 7 7 11 45 15 1 | F 7 7 11 54 15 1 | F 7 7 11 61 15 1 | F 7 7 11 75 15 1 | F 7 7 11 84 15 1 | F 7 7 11 131 15 1 | F 7 7 11 0 15 1 | F 8 0 75 0 0 1 1 78 C FFF 0 0 0 8 0 88 0 1 1 80 C FFF 0 0 0 8 0 90 3 1 1 25 C FFF 0 0 0 8 0 93 1 1 1 50 C FFF 0 0 0 8 0 100 2 1 1 40 C FFF 0 0 0 18 104 105 T 106 1 0 8iif(licz1 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'),' ') kursorek.nazwa 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 23 9 4 2 9 7 2 8 0 16 24 1 1130 C FFF 0 0 0 5 0 18 11 1 1 3 F 5 0 19 20 2 1 1 F 5 0 20 20 23 1 1 F 5 0 21 20 49 1 1 F 5 0 22 20 58 1 1 F 5 0 23 20 68 1 1 F 5 0 24 20 79 1 1 F 5 0 25 7 55 1 8 F 8 0 26 7 63 1 3 27 N FFF 0 0 0 7 4 10 0 16 5 F 7 4 10 61 16 15 F 7 4 10 75 16 10 F 7 4 10 54 16 8 F 7 4 10 45 16 10 F 7 4 10 84 16 48 F 7 4 10 4 16 42 F 7 4 19 0 3132 F 5 0 28 19 4 1 1 F 5 0 29 19 45 1 1 F 5 0 30 21 4 1 1 F 5 0 31 21 45 1 1 F 5 0 32 19 84 1 1 F 5 0 33 19 131 1 1 F 5 0 34 21 84 1 1 F 5 0 35 21 131 1 1 F 5 0 36 19 54 1 1 F 5 0 37 21 54 1 1 F 5 0 38 19 61 1 1 F 5 0 39 21 61 1 1 F 5 0 40 19 75 1 1 F 5 0 41 21 75 1 1 F 5 0 42 19 0 1 1 F 5 0 43 21 0 1 1 F 5 0 44 10 45 1 1 F 5 0 45 25 45 1 1 F 5 0 46 10 4 1 1 F 5 0 47 25 4 1 1 F 5 0 48 10 84 1 1 F 5 0 49 25 84 1 1 F 5 0 50 10 54 1 1 F 5 0 51 25 54 1 1 F 5 0 52 10 61 1 1 F 5 0 53 25 61 1 1 F 5 0 54 10 75 1 1 F 5 0 55 25 75 1 1 F 5 0 56 11 62 1 12 F 5 0 57 13 62 1 9 F 5 0 58 14 62 1 11 F 5 0 59 20 107 1 1 F 8 0 60 23 5 1 40 C FFF 0 0 0 8 0 61 23 46 1 8 D FFF 0 0 0 8 0 62 23 62 1 13 64 63 N FFF 0 0 0 8 0 65 23 76 1 8 D FFF 0 0 0 8 0 66 23 85 1 46 C FFF 0 0 0 5 0 68 11 76 1 4 F 5 0 69 12 76 1 8 F 5 0 70 13 76 1 7 F 5 0 71 15 76 1 3 F 5 0 72 11 55 1 6 F 5 0 73 12 55 1 5 F 5 0 74 13 55 1 5 F 5 0 75 14 55 1 6 F 5 0 76 15 55 1 6 F 5 0 77 17 55 1 3 F 5 0 78 18 55 1 6 F 5 0 79 11 46 1 8 F 5 0 80 12 46 1 5 F 5 0 81 13 46 1 7 F 5 0 82 14 46 1 7 F 5 0 83 15 46 1 7 F 5 0 84 17 46 1 3 F 8 0 85 23 1 1 3 86 N FFF 0 0 0 5 0 87 5 35 1 53 F 5 0 89 11 16 1 17 F 5 0 90 11 92 1 31 F 5 0 92 12 90 1 35 F 5 0 94 16 46 1 7 F 5 0 95 16 55 1 5 F 5 0 96 12 62 1 11 F 5 0 97 14 76 1 7 F 8 0 98 0 0 1 1 101 C FFF 0 0 0 8 0 111 23 57 1 4 115 114 N FFF 0 0 0 8 0 116 0 1 1 80 C FFF 0 0 0 8 0 118 3 1 1 25 C FFF 0 0 0 8 0 121 1 1 1 50 C FFF 0 0 0 8 0 128 2 1 1 40 C FFF 0 0 0 10 1 11 36 18 132 133 T 134 1 0 8iif(licz1 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 @findnum(kursorek.idksiegi, kursorek.pozksiegi, kursorek.datanab) 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'),' ') kursorek.nazwa m.beg_num m.xloc = m.xloc errors \