home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Polish Programs 2
/
polishprograms2.iso
/
firma
/
rachmist
/
wzorce2.arj
/
PIT-8.WVR
< prev
next >
Wrap
Text File
|
1996-10-03
|
6KB
|
119 lines
p1 = IIF(!empty(wspolnik.nip),ALLTRIM(wspolnik.nip),ALLTRIM(podmioty.nip)) ; ; 20
p5 = alltrim(urzedy.us_nazwa)+', '+alltrim(urzedy.us_ulica)+' '+alltrim(urzedy.us_nrdomu)+', '+ alltrim(urzedy.us_miasto) ; ; 116
p6 = IIF(m.numwspol > 0, IIF(podmioty.osobafiz,.T.,.F.), .F.) ; ;
p7 = IIF(~p6~,alltrim( wspolnik.nazwisko ) + ' ' + alltrim( wspolnik.imie1 ) + ' ' + alltrim( wspolnik.imie2 ),podmioty.nazwa) ; ; 116
p8 = IIF(~p6~,alltrim( wspolnik.ojciec ) + ' ' + alltrim( wspolnik.matka ),podmioty.nazwaskr) ; ; 116
p9 = IIF(~p6~,alltrim( wspolnik.pesel ),podmioty.regon) ; ; 30
p10 = IIF(~p6~,DTOC(wspolnik.dataur),DTOC(podmioty.datarozp)) ; ; 10
p11 = podmioty.orgrej; ; 116
p12 = podmioty.nazwarej ; ; 116
p13 = DTOC(podmioty.datarej) ; ; 10
p14 = podmioty.nrrej ; ; 38
p15 = IIF(~p6~,wspolnik.kraj,podmioty.kraj) ; ; 22
p16 = IIF(~p6~,wspolnik.wojewod,podmioty.wojewod) ; ; 26
p17 = IIF(~p6~,wspolnik.gmina,podmioty.gmina) ; ; 40
p18 = IIF(~p6~,wspolnik.ulica,podmioty.adres) ; ; 60
p19 = IIF(~p6~,wspolnik.nr_domu,podmioty.nr_domu) ; ; 8
p20 = IIF(~p6~,wspolnik.nr_lokalu,podmioty.nr_lokalu) ; ; 6
p21 = IIF(~p6~,wspolnik.miasto,podmioty.miasto) ; ; 30
p22 = IIF(~p6~,wspolnik.kod,podmioty.kod) ; ; 6
p23 = IIF(~p6~,wspolnik.poczta,podmioty.poczta) ; ; 30
p24 = IIF(~p6~,wspolnik.skrpocz,podmioty.skrpocz) ; ; 26
p25 = IIF(~p6~,wspolnik.telefon,podmioty.telefon) ; ; 29
p26 = IIF(~p6~,wspolnik.teleks,podmioty.telex) ; ; 26
p27 = IIF(~p6~,wspolnik.fax,podmioty.fax) ; ; 22
p28 = m.pd28 ; ; 15
p29 = m.pd29 ; ; 15
p30 = m.pd30 ; ; 60
p31 = m.pd31 ; ; 40
p32 = m.pd32 ; ; 40
p33 = m.pd33 ; ; 40
p34 = m.pd34 ; ; 40
p35 = m.pd35 ; ;
p36 = m.pd36 ; ; 27
p37 = m.pd37 ; ; 30
p38 = m.pd38 ; ; 58
p39 = m.pd39 ; ; 58
p40 = m.pd40 ; ; 8
p41 = m.pd41 ; ; 6
p42 = m.pd42 ; ; 30
p43 = m.pd43 ; ; 6
p44 = m.pd44 ; ; 30
p45 = m.pd45 ; ; 26
p46 = m.pd46 ; ; 29
p47 = m.pd47 ; ; 26
p48 = m.pd48 ; ; 22
p49 = m.pd49 ; ;
p50 = m.pd50 ; ;
p51 = m.pd51 ; ;
p52 = m.pd52 ; ;
p53 = m.pd53 ; ;
p54 = ~p53~ ; ;
p55 = m.pd55 ; ;
p56 = m.pd56 ; ;
p57 = m.pd57 ; ;
p58 = ~p56~ - ~p57~; ;
p59 = m.pd59 ; ;
p60 = m.pd60 ; ;
p61 = ~p60~; ;
p62 = m.pd62 ; ;
p63 = dbf_suma("ewumowy","u_brutto","ewumowy.kod=m.kodprac") ; ;
p64 = dbf_suma("ewumowy","u_brutto*u_koszt_s/100","ewumowy.kod=m.kodprac") ; ;
p65 = ~p63~ - ~p64~ ; ;
p66 = dbf_suma("ewumowy","u_podatek","ewumowy.kod=m.kodprac") ; ;
p67 = m.pd67 ; ;
p68 = m.pd68 ; ;
p69 = ~p67~ - ~p68~ ; ;
p70 = m.pd70 ; ;
p71 = m.pd71 ; ;
p72 = m.pd72 ; ;
p73 = ~p71~ - ~p72~ ; ;
p74 = m.pd74 ; ;
p75 = ~p49~ + ~p53~ + ~p56~ + ~p60~ + ~p63~ + ~p67~ + ~p71~; ;
p76 = ~p50~ + ~p57~ + ~p64~ + ~p68~ + ~p72~; ;
p77 = ~p75~ - ~p76~ ; ;
p78 = ~p52~ + ~p55~ + ~p59~ + ~p62~ + ~p66~ + ~p70~ + ~p74~ ; ;
p79 = m.pd79 ; 99,999,999,999.99 ; 17
p80 = m.pd80 ; ; 100
p81 = m.pd81 ; ;
p82 = m.pd82 ; ; 100
p83 = m.pd83 ; ;
p84 = m.pd84 ; ; 38
p85 = m.pd85 ; ; 38
p86 = m.pd86 ; ;
p200 = iif( ~p6~, ' ', 'X' ) ; ; 1
p201 = iif( ~p6~, 'X', ' ' ) ; ; 1
p205 = str(fullyear(x_roknr),4) ; ; 4
p206 = iif(~p49~<>0, transform(~p49~,'99,999,999,999.99'),' ') ; ; 17
p207 = iif(~p53~<>0, transform(~p53~,'99,999,999,999.99'),' ') ; ; 17
p208 = iif(~p56~<>0, transform(~p56~,'99,999,999,999.99'),' ') ; ; 17
p209 = iif(~p60~<>0, transform(~p60~,'99,999,999,999.99'),' ') ; ; 17
p210 = iif(~p63~<>0, transform(~p63~,'99,999,999,999.99'),' ') ; ; 17
p211 = iif(~p67~<>0, transform(~p67~,'99,999,999,999.99'),' ') ; ; 17
p212 = iif(~p71~<>0, transform(~p71~,'99,999,999,999.99'),' ') ; ; 17
p213 = iif(~p75~<>0, transform(~p75~,'99,999,999,999.99'),' ') ; ; 17
p214 = iif(~p50~<>0, transform(~p50~,'99,999,999,999.99'),' ') ; ; 17
p215 = iif(~p57~<>0, transform(~p57~,'99,999,999,999.99'),' ') ; ; 17
p216 = iif(~p64~<>0, transform(~p64~,'99,999,999,999.99'),' ') ; ; 17
p217 = iif(~p68~<>0, transform(~p68~,'99,999,999,999.99'),' ') ; ; 17
p218 = iif(~p72~<>0, transform(~p72~,'99,999,999,999.99'),' ') ; ; 17
p219 = iif(~p76~<>0, transform(~p76~,'99,999,999,999.99'),' ') ; ; 17
p220 = iif(~p52~<>0, transform(~p52~,'99,999,999,999.99'),' ') ; ; 17
p221 = iif(~p55~<>0, transform(~p55~,'99,999,999,999.99'),' ') ; ; 17
p222 = iif(~p59~<>0, transform(~p59~,'99,999,999,999.99'),' ') ; ; 17
p223 = iif(~p62~<>0, transform(~p62~,'99,999,999,999.99'),' ') ; ; 17
p224 = iif(~p66~<>0, transform(~p66~,'99,999,999,999.99'),' ') ; ; 17
p225 = iif(~p70~<>0, transform(~p70~,'99,999,999,999.99'),' ') ; ; 17
p226 = iif(~p74~<>0, transform(~p74~,'99,999,999,999.99'),' ') ; ; 17
p227 = iif(~p78~<>0, transform(~p78~,'99,999,999,999.99'),' ') ; ; 17
p228 = iif(~p51~<>0, transform(~p51~,'99,999,999,999.99'),' ') ; ; 17
p229 = iif(~p54~<>0, transform(~p54~,'99,999,999,999.99'),' ') ; ; 17
p230 = iif(~p58~<>0, transform(~p58~,'99,999,999,999.99'),' ') ; ; 17
p231 = iif(~p61~<>0, transform(~p61~,'99,999,999,999.99'),' ') ; ; 17
p232 = iif(~p65~<>0, transform(~p65~,'99,999,999,999.99'),' ') ; ; 17
p233 = iif(~p69~<>0, transform(~p69~,'99,999,999,999.99'),' ') ; ; 17
p234 = iif(~p73~<>0, transform(~p73~,'99,999,999,999.99'),' ') ; ; 17
p235 = iif(~p77~<>0, transform(~p77~,'99,999,999,999.99'),' ') ; ; 17
p239 = iif(~p81~<>0, transform(~p81~,'99,999,999,999.99'),' ') ; ; 17
p240 = iif(~p83~<>0, transform(~p83~,'99,999,999,999.99'),' ') ; ; 17