home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Polish Programs 2
/
polishprograms2.iso
/
firma
/
rachmist
/
wzorce2.arj
/
PIT-11.WVR
< prev
next >
Wrap
Text File
|
1996-10-03
|
8KB
|
164 lines
p1 = IIF(!empty(wspolnik.nip),ALLTRIM(wspolnik.nip),ALLTRIM(podmioty.nip)) ; ; 20
p2 = CTOD("01/01/"+ALLTRIM(STR(x_roknr,99,0)));;
p3 = maxday();;
p6 = alltrim(urzedy.us_nazwa)+', '+alltrim(urzedy.us_ulica)+' '+alltrim(urzedy.us_nrdomu)+', '+ alltrim(urzedy.us_miasto) ; ; 116
p7 = IIF(m.numwspol > 0, IIF(podmioty.osobafiz,.T.,.F.), .F.) ; ;
p8 = IIF(~p7~,alltrim( wspolnik.nazwisko ) + ' ' + alltrim( wspolnik.imie1 ) + ' ' + alltrim( wspolnik.imie2 ),podmioty.nazwa) ; ; 116
p9 = IIF(~p7~,alltrim( wspolnik.ojciec ) + ' ' + alltrim( wspolnik.matka ),podmioty.nazwaskr) ; ; 116
p10 = IIF(~p7~,alltrim( wspolnik.pesel ),podmioty.regon) ; ; 30
p11 = IIF(~p7~,DTOC(wspolnik.dataur),DTOC(podmioty.datarozp)) ; ; 10
p12 = podmioty.orgrej; ; 120
p13 = podmioty.nazwarej ; ; 120
p14 = DTOC(podmioty.datarej) ; ; 10
p15 = podmioty.nrrej ; ; 38
p16 = IIF(~p7~,wspolnik.kraj,podmioty.kraj) ; ; 22
p17 = IIF(~p7~,wspolnik.wojewod,podmioty.wojewod) ; ; 26
p18 = IIF(~p7~,wspolnik.gmina,podmioty.gmina) ; ; 40
p19 = IIF(~p7~,wspolnik.ulica,podmioty.adres) ; ; 60
p20 = IIF(~p7~,wspolnik.nr_domu,podmioty.nr_domu) ; ; 8
p21 = IIF(~p7~,wspolnik.nr_lokalu,podmioty.nr_lokalu) ; ; 6
p22 = IIF(~p7~,wspolnik.miasto,podmioty.miasto) ; ; 30
p23 = IIF(~p7~,wspolnik.kod,podmioty.kod) ; ; 6
p24 = IIF(~p7~,wspolnik.poczta,podmioty.poczta) ; ; 30
p25 = IIF(~p7~,wspolnik.skrpocz,podmioty.skrpocz) ; ; 26
p26 = IIF(~p7~,wspolnik.telefon,podmioty.telefon) ; ; 29
p27 = IIF(~p7~,wspolnik.teleks,podmioty.telex) ; ; 26
p28 = IIF(~p7~,wspolnik.fax,podmioty.fax) ; ; 22
p29 = m.pd29 ; ; 15
p30 = m.pd30 ; ; 15
p31 = m.pd31 ; ; 60
p32 = m.pd32 ; ; 40
p33 = m.pd33 ; ; 40
p34 = m.pd34 ; ; 40
p35 = m.pd35 ; ; 40
p36 = m.pd36 ; ;
p37 = m.pd37 ; ; 27
p38 = m.pd38 ; ; 30
p39 = m.pd39 ; ; 58
p40 = m.pd40 ; ; 60
p41 = m.pd41 ; 999 ; 8
p42 = m.pd42 ; 999 ; 6
p43 = m.pd43 ; ; 30
p44 = m.pd44 ; ; 6
p45 = m.pd45 ; ; 30
p46 = m.pd46 ; ; 26
p47 = m.pd47 ; ; 29
p48 = m.pd48 ; ; 26
p49 = m.pd49 ; ; 22
p50 = dbf_suma("ewwypl","brutto", "MONTH(dataw)=x_miesnr and !bez and ewwypl.kod=m.kodprac") ; ;
p51 = dbf_suma("ewwypl","koszt", "MONTH(dataw)=x_miesnr and !bez and ewwypl.kod=m.kodprac") ; ;
p52 = ~p50~ - ~p51~ ; ;
p53 = dbf_suma("ewwypl","zaliczka", "MONTH(dataw)=x_miesnr and !bez and ewwypl.kod=m.kodprac") ; ;
p54 = m.pd54 ; ;
p55 = m.pd55 ; ;
p56 = m.pd56 ; ;
p57 = m.pd57 ; ;
p58 = m.pd58 ; ;
p59 = m.pd59 ; ;
p60 = m.pd60 ; ;
p61 = m.pd61 ; ;
p62 = m.pd62 ; ;
p63 = m.pd63 ; ;
p64 = m.pd64 ; ;
p65 = m.pd65 ; ;
p66 = m.pd66 ; ;
p67 = m.pd67 ; ;
p68 = m.pd68 ; ;
p69 = m.pd69 ; ;
p70 = m.pd70; ;
p71 = m.pd71 ; ;
p72 = m.pd72 ; ;
p73 = m.pd73 ; ;
p74 = m.pd74 ; ;
p75 = m.pd75 ; ;
p76 = m.pd76 ; ;
p77 = m.pd77 ; ;
p78 = m.pd78 ; ;
p79 = m.pd79 ; ;
p80 = m.pd80 ; ;
p81 = m.pd81; ;
p82 = m.pd82 ; ;
p83 = m.pd83 ; ;
p84 = m.pd84 ; ;
p85 = m.pd85 ; ;
p86 = m.pd86 ; ;
p87 = m.pd87 ; ;
p88 = m.pd88 ; ;
p89 = dbf_suma("ewumowy","u_brutto","ewumowy.kod=m.kodprac") ; ;
p90 = dbf_suma("ewumowy","u_brutto*u_koszt_s/100","ewumowy.kod=m.kodprac") ; ;
p91 = ~p89~ - ~p90~ ; ;
p92 = dbf_suma("ewumowy","u_podatek","ewumowy.kod=m.kodprac") ; ;
p93 = m.pd93 ; ;
p94 = m.pd94 ; ;
p95 = m.pd95 ; ;
p96 = m.pd96 ; ;
p97 = m.pd97 ; ;
p98 = m.pd98 ; ;
p99 = m.pd99 ; ;
p100 = m.pd100 ; ;
p101 = ~p50~+~p54~+~p57~+~p60~+~p63~+~p66~+~p69~+~p72~+~p75~+~p79~+~p82~+~p86~+~p89~+~p93~+~p97~ ; ;
p102 = ~p51~+~p76~+~p83~+~p90~+~p94~+~p98~ ; ;
p103 = ~p101~-~p102~ ; ;
p104 = ~p53~+~p56~+~p59~+~p62~+~p65~+~p68~+~p71~+~p74~+~p78~+~p81~+~p85~+~p88~+~p92~+~p96~+~p100~ ; ;
p105 = m.pd105 ; ; 38
p106 = m.pd106 ; ; 38
p107 = m.pd107 ; ;
p203 = CTOD(ALLTRIM(STR(~p3~,99,0))+"/"+ALLTRIM(STR(x_miesnr,2,0))+"/"+ALLTRIM(STR(x_roknr,99,0))) ; ; 2
p206 = iif( ~p7~, ' ', 'X' ) ; ; 1
p207 = iif( ~p7~, 'X', ' ' ) ; ; 1
p211 = iif(~p50~<>0, transform(~p50~,'9,999,999,999.99'),' ') ; ; 16
p212 = iif(~p54~<>0, transform(~p54~,'9,999,999,999.99'),' ') ; ; 16
p213 = iif(~p57~<>0, transform(~p57~,'9,999,999,999.99'),' ') ; ; 16
p214 = iif(~p60~<>0, transform(~p60~,'9,999,999,999.99'),' ') ; ; 16
p215 = iif(~p63~<>0, transform(~p63~,'9,999,999,999.99'),' ') ; ; 16
p216 = iif(~p66~<>0, transform(~p66~,'9,999,999,999.99'),' ') ; ; 16
p217 = iif(~p69~<>0, transform(~p69~,'9,999,999,999.99'),' ') ; ; 16
p218 = iif(~p72~<>0, transform(~p72~,'9,999,999,999.99'),' ') ; ; 16
p219 = iif(~p75~<>0, transform(~p75~,'9,999,999,999.99'),' ') ; ; 16
p220 = iif(~p79~<>0, transform(~p79~,'9,999,999,999.99'),' ') ; ; 16
p221 = iif(~p82~<>0, transform(~p82~,'9,999,999,999.99'),' ') ; ; 16
p222 = iif(~p86~<>0, transform(~p86~,'9,999,999,999.99'),' ') ; ; 16
p223 = iif(~p89~<>0, transform(~p89~,'9,999,999,999.99'),' ') ; ; 16
p224 = iif(~p93~<>0, transform(~p93~,'9,999,999,999.99'),' ') ; ; 16
p225 = iif(~p97~<>0, transform(~p97~,'9,999,999,999.99'),' ') ; ; 16
p226 = iif(~p101~<>0, transform(~p101~,'9,999,999,999.99'),' ') ; ; 16
p227 = iif(~p51~<>0, transform(~p51~,'99,999,999,999.99'),' ') ; ; 17
p228 = iif(~p76~<>0, transform(~p76~,'99,999,999,999.99'),' ') ; ; 17
p229 = iif(~p83~<>0, transform(~p83~,'99,999,999,999.99'),' ') ; ; 17
p230 = iif(~p90~<>0, transform(~p90~,'99,999,999,999.99'),' ') ; ; 17
p231 = iif(~p94~<>0, transform(~p94~,'99,999,999,999.99'),' ') ; ; 17
p232 = iif(~p98~<>0, transform(~p98~,'99,999,999,999.99'),' ') ; ; 17
p233 = iif(~p102~<>0, transform(~p102~,'99,999,999,999.99'),' ') ; ; 17
p234 = iif(~p52~<>0, transform(~p52~,'99,999,999,999.99'),' ') ; ; 17
p235 = iif(~p55~<>0, transform(~p55~,'99,999,999,999.99'),' ') ; ; 17
p236 = iif(~p58~<>0, transform(~p58~,'99,999,999,999.99'),' ') ; ; 17
p237 = iif(~p61~<>0, transform(~p61~,'99,999,999,999.99'),' ') ; ; 17
p238 = iif(~p64~<>0, transform(~p64~,'99,999,999,999.99'),' ') ; ; 17
p239 = iif(~p67~<>0, transform(~p67~,'99,999,999,999.99'),' ') ; ; 17
p240 = iif(~p70~<>0, transform(~p70~,'99,999,999,999.99'),' ') ; ; 17
p241 = iif(~p73~<>0, transform(~p73~,'99,999,999,999.99'),' ') ; ; 17
p242 = iif(~p77~<>0, transform(~p77~,'99,999,999,999.99'),' ') ; ; 17
p243 = iif(~p80~<>0, transform(~p80~,'99,999,999,999.99'),' ') ; ; 17
p244 = iif(~p84~<>0, transform(~p84~,'99,999,999,999.99'),' ') ; ; 17
p245 = iif(~p87~<>0, transform(~p87~,'99,999,999,999.99'),' ') ; ; 17
p246 = iif(~p91~<>0, transform(~p91~,'99,999,999,999.99'),' ') ; ; 17
p247 = iif(~p95~<>0, transform(~p95~,'99,999,999,999.99'),' ') ; ; 17
p248 = iif(~p99~<>0, transform(~p99~,'99,999,999,999.99'),' ') ; ; 17
p249 = iif(~p103~<>0, transform(~p103~,'99,999,999,999.99'),' ') ; ; 17
p250 = iif(~p104~<>0, transform(~p104~,'99,999,999,999.99'),' ') ; ; 17
p251 = iif(~p53~<>0, transform(~p53~,'99,999,999,999.99'),' ') ; ; 17
p252 = iif(~p56~<>0, transform(~p56~,'99,999,999,999.99'),' ') ; ; 17
p253 = iif(~p59~<>0, transform(~p59~,'99,999,999,999.99'),' ') ; ; 17
p254 = iif(~p62~<>0, transform(~p62~,'99,999,999,999.99'),' ') ; ; 17
p255 = iif(~p65~<>0, transform(~p65~,'99,999,999,999.99'),' ') ; ; 17
p256 = iif(~p68~<>0, transform(~p68~,'99,999,999,999.99'),' ') ; ; 17
p257 = iif(~p71~<>0, transform(~p71~,'99,999,999,999.99'),' ') ; ; 17
p258 = iif(~p74~<>0, transform(~p74~,'99,999,999,999.99'),' ') ; ; 17
p259 = iif(~p78~<>0, transform(~p78~,'99,999,999,999.99'),' ') ; ; 17
p260 = iif(~p81~<>0, transform(~p81~,'99,999,999,999.99'),' ') ; ; 17
p261 = iif(~p85~<>0, transform(~p85~,'99,999,999,999.99'),' ') ; ; 17
p262 = iif(~p88~<>0, transform(~p88~,'99,999,999,999.99'),' ') ; ; 17
p263 = iif(~p92~<>0, transform(~p92~,'99,999,999,999.99'),' ') ; ; 17
p264 = iif(~p96~<>0, transform(~p96~,'99,999,999,999.99'),' ') ; ; 17
p265 = iif(~p100~<>0, transform(~p100~,'99,999,999,999.99'),' ') ; ; 17