***Adózási magatartás és árképzés együttes adatfelvétele - 2001*** ***A magyar közepes és nagy cégek árképzési és adózási magatartása*** ***az fdi hatása a magyar közepes és nagyvállalatok körében*** ***2001 oktober 25- november 30-i felvétel*** ***esetszám 302*** ***file-ok elokeszitese es egyesitese***. GET FILE='C:\work\pricetax\data\prt01mint.SAV'. sort cases by kshkod. save outfile='C:\work\pricetax\data\X1.SAV' /KEEP asorsz kshkod azon regio teljog teltip telret1 teltips /comp. GET FILE='C:\work\pricetax\data\prt01SOKA.SAV'. sort cases by kshkod. save outfile='C:\work\pricetax\data\prt01SOKA.SAV' /comp. GET FILE='C:\work\pricetax\data\x1.SAV'. comp x=lag(kshkod). comp y= x- kshkod. temp. sel if (x = 0). list kshkod. GET FILE='C:\work\pricetax\data\prt01SOKA.SAV'. comp x=lag(kshkod). comp y= x- kshkod. temp. sel if (x = 0). list kshkod. match files file='C:\work\pricetax\data\prt01SOKA.SAV' /file='C:\work\pricetax\data\x1.SAV' /by kshkod. fre var megye. MEGYE Frequency Percent Valid Percent Cumulative Percent Valid 1 830 24,0 24,3 24,3 2 130 3,8 3,8 28,2 3 229 6,6 6,7 34,9 4 128 3,7 3,8 38,6 5 188 5,4 5,5 44,1 6 127 3,7 3,7 47,9 7 145 4,2 4,3 52,1 8 200 5,8 5,9 58,0 9 152 4,4 4,5 62,4 10 86 2,5 2,5 65,0 11 93 2,7 2,7 67,7 12 62 1,8 1,8 69,5 13 256 7,4 7,5 77,0 14 87 2,5 2,6 79,6 15 144 4,2 4,2 83,8 16 134 3,9 3,9 87,7 17 72 2,1 2,1 89,8 18 117 3,4 3,4 93,3 19 124 3,6 3,6 96,9 20 106 3,1 3,1 100,0 Total 3410 98,6 100,0 Missing System 48 1,4 Total 3458 100,0 ***48 helyen kezzel javitottam a megye missing erteket 47 esetben Budapest volt***. SAVE OUTFILE='C:\work\pricetax\data\prt01sok2.sav' /COMPRESSED. fre var megye. MEGYE Frequency Percent Valid Percent Cumulative Percent Valid 1 877 25,4 25,4 25,4 2 130 3,8 3,8 29,1 3 229 6,6 6,6 35,7 4 128 3,7 3,7 39,4 5 188 5,4 5,4 44,9 6 127 3,7 3,7 48,6 7 145 4,2 4,2 52,7 8 200 5,8 5,8 58,5 9 152 4,4 4,4 62,9 10 86 2,5 2,5 65,4 11 93 2,7 2,7 68,1 12 62 1,8 1,8 69,9 13 256 7,4 7,4 77,3 14 87 2,5 2,5 79,8 15 144 4,2 4,2 84,0 16 134 3,9 3,9 87,9 17 73 2,1 2,1 90,0 18 117 3,4 3,4 93,3 19 124 3,6 3,6 96,9 20 106 3,1 3,1 100,0 Total 3458 100,0 100,0 ***rendben***. GET FILE='C:\work\pricetax\data\prt01SOK2.SAV'. if (missing(asorsz)) asorsz=kshkod. fre var megye. sort cases by asorsz. save outfile='C:\work\pricetax\data\prt01SOK2.SAV' /comp. GET FILE='C:\work\pricetax\data\prt01_0.SAV'. sort cases by asorsz. save outfile='C:\work\pricetax\data\prt01_0.SAV' /comp. match files file='C:\work\pricetax\data\prt01SOK2.SAV' /file='C:\work\pricetax\data\prt01_0.SAV' /by asorsz. fre var megye. save outfile='C:\work\pricetax\data\prt01_1.SAV' /comp. ***regio, letszam, szektor***. comp good=1. if (asorsz = 5000) good=0. fre var good. filter by good. fre var megye. comp regio7=9. if (megye = 1) regio7=1. if (megye = 2) regio7=4. if (megye = 3) regio7=7. if (megye = 4) regio7=7. if (megye = 5) regio7=5. if (megye = 6) regio7=7. if (megye = 7) regio7=2. if (megye = 8) regio7=3. if (megye = 9) regio7=6. if (megye = 10) regio7=5. if (megye = 11) regio7=2. if (megye = 12) regio7=5. if (megye = 13) regio7=1. if (megye = 14) regio7=4. if (megye = 15) regio7=6. if (megye = 16) regio7=6. if (megye = 17) regio7=4. if (megye = 18) regio7=3. if (megye = 19) regio7=2. if (megye = 20) regio7=3. fre var regio7. comp regio3=9. if (megye = 1) regio3=1. if (megye = 2) regio3=2. if (megye = 3) regio3=3. if (megye = 4) regio3=3. if (megye = 5) regio3=3. if (megye = 6) regio3=3. if (megye = 7) regio3=2. if (megye = 8) regio3=2. if (megye = 9) regio3=3. if (megye = 10) regio3=3. if (megye = 11) regio3=2. if (megye = 12) regio3=3. if (megye = 13) regio3=1. if (megye = 14) regio3=2. if (megye = 15) regio3=3. if (megye = 16) regio3=3. if (megye = 17) regio3=2. if (megye = 18) regio3=2. if (megye = 19) regio3=2. if (megye = 20) regio3=2. fre var regio3. value labels regio3 1 'Central' 2 'Transdanubia' 3 'East'. value labels regio7 1 'Central' 2 'Middle Transdanubia' 3 'West Transdanubia' 4 'South Transdanubia' 5 'North-east' 6 'Middle-east' 7 'South-east'. missing value regio3 regio7 (9). fre var regio3 regio7. ***. fre var letszksh. comp lo=9. if (letszksh = 50) lo=1. if (letszksh ge 61 and letszksh le 70) lo=2. if (letszksh ge 81 and letszksh le 95) lo=3. fre var lo. variable label lo 'employment'. value label lo 1 '-99' 2 '100-249' 3 '250-'. missing value lo (9). fre var lo. ****. fre var teaor. comp sector3=9. if (teaor ge 1500 and teaor le 3699) sector3=1. if (teaor ge 4500 and teaor le 4599) sector3=2. if (teaor ge 5100 and teaor le 5279) sector3=3. variable labels sector3 'sector (three groups)'. value labels sector3 1 'Manufacturing' 2 'Construction' 3 'Trade'. missing value sector3 (9). fre var sector3. comp ssample=0. if (aev gt 0) ssample=1. fre var ssample. crosstabs tables lo by ssample/cells=count column/stat= phi. crosstabs tables sector3 by ssample/cells=count column/stat= phi. comp sector10=teaor. COMP SECTOR10=99. IF (teaor GE 1500 AND teaor LE 1699) sector10=1. IF (teaor GE 1700 AND teaor LE 1999) sector10=2. IF (teaor GE 2000 AND teaor LE 2299) sector10=3. IF (teaor GE 2300 AND teaor LE 2599) sector10=4. IF (teaor GE 2600 AND teaor LE 2699) sector10=5. IF (teaor GE 2700 AND teaor LE 2899) sector10=6. IF (teaor GE 2900 AND teaor LE 3699) sector10=7. IF (teaor GE 3600 AND teaor LE 3799) sector10=8. if (teaor ge 4500 and teaor le 4599) sector10=9. if (teaor ge 5100 and teaor le 5279) sector10=10. missing value sector10 (99). value labels sector10 1 'Food+ (15,16)' 2 'Textile+ (17-19)' 3 'Wood+ (20-22)' 4 'Chemical prod.(23-25)' 5 'Non-metallic mineral prod. (26)' 6 'Metal+ (27,28)' 7 'Machinery (29-35)' 8 'Other manuf. (36,37)' 9 'Construction (45)' 10 'Trade (51-52)'. missing value sector10 (99). fre var sector10. COMP SVAR=99. VARIABLE LABEL SVAR 'VALTOZO A SULYOZASHOZ'. IF (SECTOR3 EQ 1 AND lo EQ 1) SVAR=1. IF (SECTOR3 EQ 1 AND lo EQ 2) SVAR=2. IF (SECTOR3 EQ 1 AND lo EQ 3) SVAR=3. IF (SECTOR3 EQ 2 AND lo EQ 1) SVAR=4. IF (SECTOR3 EQ 2 AND lo EQ 2) SVAR=5. IF (SECTOR3 EQ 2 AND lo EQ 3) SVAR=6. IF (SECTOR3 EQ 3 AND lo EQ 1) SVAR=7. IF (SECTOR3 EQ 3 AND lo EQ 2) SVAR=8. IF (SECTOR3 EQ 3 AND lo EQ 3) SVAR=9. MISSING VALUE SVAR (99). FRE VAR SVAR. temp. sel if (ssample=1). fre var svar. if (svar=5) svar=6. fre var svar. temp. sel if (ssample = 1). NPAR TEST /CHISQUARE=svar /EXPECTED= 30.8 22.7 16.5 7.9 3.6 10.5 5.7 2.5 /MISSING ANALYSIS. SVAR VALTOZO A SULYOZASHOZ Observed N Expected N Residual 1,00 79 92,2 -13,2 2,00 69 68,0 1,0 3,00 57 49,4 7,6 4,00 31 23,7 7,3 6,00 8 10,8 -2,8 7,00 28 31,4 -3,4 8,00 20 17,1 2,9 9,00 8 7,5 ,5 Total 300 Test Statistics SVAR VALTOZO A SULYOZASHOZ Chi-Square 6,993 df 7 Asymp. Sig. ,430 a 0 cells (,0%) have expected frequencies less than 5. The minimum expected cell frequency is 7,5. ***azaz a lekerdezett minta illeszkedese statisztikailag elfogadhato, kismertekben (13 ceggel) kevesebb kisebb feldolgozoipari ceg kerult lekerdezesre, de ezt a torzitast nem szukseges korrigalni, meg belefer.*** ***A MINTA JO, A NULLHIPOTÉZIST ELFOGADJUK***. ***szamitasok az elso jelenteshez***. ***fontosabb változók megoszlása***. filter by good. fre var a90 a91 a6 a7 a87. comp q99= a4a1. comp exp99= a4a2. comp q00= a4b1. comp exp00=a4b2. comp q01=a4c1. comp exp01=a4c2. comp expr99=exp99/q99*100. comp expr00=exp00/q00*100. comp expr01=exp01/q01*100. fre var expr99 expr00 expr01/stat all. if (expr01 lt 0) expr01=999. missing value expr01 (999). fre var expr01. comp expr01o=9. if (expr01 le 0.01) expr01o=0. if (expr01 gt 0 and expr01 le 20) expr01o=1. if (expr01 gt 20 and expr01 le 50) expr01o=2. if (expr01 gt 50) expr01o=3. missing value expr01o (9). fre var expr01o. comp exp99d=9. if (exp99=0) exp99d=0. if (exp99 gt 0) exp99d=1. missing value exp99d (9). comp exp00d=9. if (exp00 = 0) exp00d=0. if (exp00 gt 0) exp00d=1. missing value exp00d (9). comp exp01d=9. if (exp01 = 0) exp01d=0. if (exp01 gt 0) exp01d=1. missing value exp01d (9). fre var exp99d exp00d exp01d. temp. sel if (exp01 gt 0). fre var expr01/stat all. fre var a54 a54a a54b. fre var a54a. missing value a54a a54b (99). comp bcd01=0. if (a54 = 1) bcd01=1. if (a54a gt 0) bcd01=0. if (a54a gt 0 and a54b gt 0) bcd01=1. if (missing(a54)) bcd01=9. missing value bcd01 (9). fre var bcd01. fre var bcd01 a55b a79. fre var a57a a57b a57c a58. fre var a63 a64. comp vers1=a80a. comp vers2=a80b. comp vers3=a80c. comp vers4=a80d. comp vers5=a80e. comp vers6=a80f. recode vers1 (1=5) (2=4) (3=3) (4=2) (5=1). recode vers2 (1=5) (2=4) (3=3) (4=2) (5=1). recode vers3 (1=5) (2=4) (3=3) (4=2) (5=1). recode vers4 (1=5) (2=4) (3=3) (4=2) (5=1). recode vers5 (1=5) (2=4) (3=3) (4=2) (5=1). recode vers6 (1=5) (2=4) (3=3) (4=2) (5=1). fre var vers1 to vers6 /format notable /stat all. missing value a83a to a83d (9). fre var a83a to a83d. value labels a83a 3 'teljes mértékben igaz' 2 'csak részben igaz' 1 'egyáltalán nem igaz'/ a83b 3 'teljes mértékben igaz' 2 'csak részben igaz' 1 'egyáltalán nem igaz'/ a83c 3 'teljes mértékben igaz' 2 'csak részben igaz' 1 'egyáltalán nem igaz'/ a83d 3 'teljes mértékben igaz' 2 'csak részben igaz' 1 'egyáltalán nem igaz'. ***tulajdonosok típusa***. ***tultip meghatározása***. ***sector3 es label***. ***tobbsegi tulajdonos tipusa*** fre var a3a to a3i. missing value a3a to a3i (9). comp klfd=0. if (a3e ge 5 or a3f ge 5 or a3g ge 5) klfd=1. if (a3e eq 4 and (a3f ge 3 or a3g eq 4)) klfd=1. if (a3e eq 4 and (a3g ge 3 or a3f eq 4)) klfd=1. if (a3e eq 4 and (a3f eq 3 and a3g eq 3)) klfd=1. if (a3f eq 4 and (a3e ge 3 or a3g eq 4)) klfd=1. if (a3f eq 4 and (a3g ge 4 or a3e eq 4)) klfd=1. if (a3f eq 4 and (a3e eq 3 and a3e eq 3)) klfd=1. if (a3g eq 4 and (a3e ge 3 or a3f eq 4)) klfd=1. if (a3g eq 4 and (a3f ge 3 or a3e eq 4)) klfd=1. if (a3g eq 4 and (a3e eq 3 and a3f eq 3)) klfd=1. if (a3e eq 4 and a3f eq 4 and a3g eq 4) klfd=1. comp kozos=0. if (a3a ge 5) kozos=1. comp mmsz=0. if (a3b ge 5 or a3c ge 5) mmsz=1. if (a3b eq 4 and a3c eq 4) mmsz=1. comp mceg=0. if (a3d ge 5 or a3h ge 5) mceg=1. if (a3d eq 4 and a3h eq 4) mceg=1. fre var mceg. comp vgys=1. if (kozos eq 1 or klfd eq 1 or mmsz eq 1 or mceg eq 1) vgys =0. if (ssample = 0) vgys=9. missing vgys (9). fre var vgys. crosstabs tables kozos by klfd mmsz mceg vgys. crosstabs tables klfd by mmsz mceg vgys. crosstabs tables mmsz by mceg vgys. crosstabs tables mceg by vgys. temp. sel if (klfd eq 1 and mmsz eq 1). list azon a3b a3c a3e a3f a3g. if (azon = 3185) klfd =0. if (azon = 3185) mmsz=0. if (azon = 3185) vgys =1. temp. sel if (klfd eq 1 and mceg eq 1). list azon a3e a3f a3g a3d a3h. if (azon = 3285) klfd =9. if (azon = 3285) mceg=9. if (azon = 1496) klfd =0. if (azon = 1496) mceg=0. if (azon = 1496) vgys =1. if (azon = 1382) klfd =9. if (azon = 1382) mceg=9. temp. sel if (mmsz eq 1 and mceg eq 1). list azon a3b a3c a3d a3h. AZON A3B A3C A3D A3H 960 1 6 6 1 2356 1 6 6 1 2168 1 6 6 1 2007 1 5 5 1 75 1 6 6 1 ***itt belfoldi cegnek irom, ha mindketto 6-os volt***. ***mert itt olyan magyar maganszemelyek tulajdonarol lehet szo, ami cegeken keresztul ervenyesul***. if (azon = 960) mmsz=0. if (azon = 2356) mmsz=0. if (azon = 2168) mmsz=0. if (azon = 75) mmsz=0. if (azon = 2007) mmsz=0. if (azon = 2007) mceg=0. if (azon = 2007) vgys=1. missing value klfd kozos mmsz mceg vgys (9). crosstabs tables kozos by klfd mmsz mceg vgys. crosstabs tables klfd by mmsz mceg vgys. crosstabs tables mmsz by mceg vgys. crosstabs tables mceg by vgys. comp egyb=9. if (kozos eq 0 and vgys eq 0) egyb=0. if (kozos eq 1 or vgys eq 1) egyb=1. missing value egyb (9). fre var egyb. comp ttip=9. if (klfd = 1) ttip=1. if (mceg = 1) ttip=2. if (mmsz = 1) ttip=3. if (egyb = 1) ttip=4. value labels ttip 1 'foreign' 2 'domestic comp.' 3 'Hungarian individual' 4 'other'. missing value ttip (9). fre var ttip. fre var kozos vgys. comp l99=a8a. comp l00=a8b. comp l01=a8c. fre var a8c. missing value l99 l00 l01 (8,9). fre var l01. comp l01o=l01. recode l01o (lo thru 100=1) (101 thru 200=2) (201 thru 300=3) (301 thru hi=4). value label l01o 1'-100' 2'101-200' 3 '201-300' 4'301-'. fre var l01o. comp dl10o=9. if (l00 lt l01) dl10o=1. if (l00 eq l01) dl10o=0. if (l00 gt l01) dl10o=-1. value labels dl10o 1'nott' 0'nem valtozott' -1'csokkent'. missing value dl10o (9). fre var dl10o. missing value a11 (999). fre var a11 /stat all. ***képzett változók: good = a helyes esetszám, a ksh által adott file leválogatása lo = létszámkategóriák a KSH létszám adatok alapján l99,l00, l01= létszám a felvételben, 1999, 2000, 2001-ben l01o = létszámkategóriák 2001-ben sector10 = ágazati változó a KSH által adott négyjegyű szektor kódok (4 digit NACE) alapján, 10 ágazat sector3 = ugyanez három csoportot képezve ssample= a felvetel soran lekerdezett cegek regio7 = a KSH által alkalmazott regionális csoportok regio3 = három nagyrégió: Közép, Kelet és Dunántúl ttip = a többségi tulajdonos típusa (other = vegyes tulajdon vagy állami többségi tulajdon) klfd, mceg, mmsz, egyb, kozos, vgys = többségi tulajdonos típusai svar = az illeszkedes vizsgalathoz kontroll valtozo a szamitasokhoz csak azok az esetek jok, ahol good=1, ilyen (n=) 3458 van ***missing értékek képzése némely kérdéseknél***. ***vigyázat, statában át kell írni őket sysmis-re!!!***. if (a45 = 0) a45=999. if (a45 gt 100) a45=100. if (a55a ge 1000) a55a=999. missing value a7 a33 a46 a47 a55b a55c a55d a57a a57b a57c a58 a63 a64 a87 a79 a88 a89 a91 a92 a95 (9) / a45 a52 a53 a55a (999)/ a56 (8). fre var a56. temp. sel if (lo le 1). fre var a56. ***. fre var a6 a7 a33 a45 a46 a47 a54 a55b a55c a55d a57a a57b a57c a58 a63 a64 a87 a79 a88 a89 a90 a91 a92 a94 a95. fre var a45 a52 a53 a55a/stat mean stddev. filter by good. save outfile='C:\aaa\wargo\pricetax\data\prt01_2.SAV' /comp. save outfile='C:\aaa\wargo\pricetax\data\prt01_3.SAV' /drop cegnev szir szvaros szutca uir uvaros uutca var12 var13 var14 irsz varos utca asorsz regio teljog telret1 afopot atelep akerdez aev ahonap anap aora1 aperc1 a96aemai a96fax1 a96fax2 aora2 aperc2 ainstr aibaj aihiba aposzt apbaj aphiba /comp. export outfile='C:\work\pricetax\data\prt01_2.por'. ***az 1996-os es 1998-as felvetelnel a kulfoldi tulajdon sulyanak szamitasa ***netto arbevetel es letszam szerint*** ***1998** fre var klfd. if (v1502 lt 0) v1502=9. missing value v1502 ( 8, 9) / v1702 (9). fre var v1502 v1702/stat all. temp. sel if (klfd = 1). fre var v1502 v1702/format notable/stat all. ***1996*** fre var c11 ltsm6 /stat all. temp. sel if (klfd = 1). fre var c11 ltsm6 /stat all. ***2001*** missing value a4b1 a4b2 (-9,0) / l00 (0,8,9). fre var a4b2 /stat all. temp. sel if (klfd = 1). fre var a4b2/stat all. fre var good. ***. missing value a54b (0,99). fre var a54b. fre var bcd01 a54 a54a a54b. temp. sel if (a54a gt 0). fre var bcd01. fre var a54. ***vissza a 2002-es vizsgálathoz, a nagyság és szektor valamint kulfoldi tul. szerint az egyes változók megoszlása***. filter by good. fre var ttip l01o sector3. crosstabs tables ttip l01o sector3 by bcd01 a55b a79/cells count row asresid/stat phi gamma. ***nincs semmi szignifikáns, ami nem jó hír*** fre var a55a. comp a55ax=0. if (a55a gt 0) a55ax=1. comp bfd01=9. fre var ahonap. if (ahonap gt 0) bfd01=0. if (good01 gt 0) bfd01=0. if (a55ax = 1 or a55b = 1 or a55c = 1) bfd01=1. value label bfd01 1 'yes' 0 'no'. variable label bfd01 'breaching financial discipline in 2001'. missing value bfd01 (9). fre var bfd01. crosstabs tables ttip l01o sector3 by bfd01/cells count row asresid/stat phi gamma. ***részvétel a rejtett gazdaságban***. filter by good. crosstabs tables ttip l01o sector3 bfd01 by a57a a57b a57c/cells count row asresid/stat phi gamma. crosstabs tables ttip l01o sector3 bfd01 by a58 /cells count row asresid/stat phi gamma. fre var a56. crosstabs tables akerdez by a56/cells count row. ***adócsaló cégek aránya*** ***a becslésből ki kell szedni a 21009-es, a 22052, a 3131 kérdezőbiztost, mert ***náluk valószínüleg torzítottak a válaszok: valószínüleg nem keverték meg a kártyát. ***3/7 volt a "nem csalt adót" /"adót csalt" kártyák aránya. Tehát a "hamis" válaszok aránya ***nem lehet nagyobb mint 0.70, mert ez azt jelentené, hogy a válaszadó a "nem csalt adót" kártyára ***"hamis" választ adott, miközben tényleg nem csalt adót, tehát hazudott, vagy nem is kapott 0.3 valószínüséggel ***"nem csalt adót" kártyát *** . *** jobb lett volna a 4/6 arány, mert ekkor jobban kiderült volna az esetleges csalás***. comp rrt_good=1. if (akerdez = 3131) rrt_good=0. if (akerdez = 12003) rrt_good=0. if (akerdez = 18045) rrt_good=0. if (akerdez = 21009) rrt_good=0. if (akerdez = 22052) rrt_good=0. if (ssample =0) rrt_good=9. missing value rrt_good (9). fre var rrt_good. ***nem jo 44 eset, azaz 44/289*** filter by good. temp. sel if (rrt_good = 1). fre var a56. temp. sel if (rrt_good = 1). crosstabs tables l01o by a56/cells count row. filter off. ***nézzük meg az 1998-as kérdőívet***. fre var v35. crosstabs tables ltsmkt8 by v35/cells count row. ****. crosstabs tables ttip l01o sector3 bfd01 by a83a a83b a83c a83d/cells count row asresid/stat phi gamma. ****andras kerdesei***. filter by good. ***tb járulék*** missing value a61a a61b a61c a61d a61e (9). fre var a61a a61b a61c a61d a61e. ***helyi adó***. missing value a62b a62c a62d a62e (9). fre var a62b a62c a62d a62e. ***adójogszabályok***. missing value a63 (9). fre var a63. ***veszély a versenyképességre: adónemek***. missing value a80a a80b a80c a80d a80e a80f (9). fre var a80a a80b a80c a80d a80e a80f /stat mean. ***andras kerdesei****. missing value a65 a66 a65a a65b a66a a67 a68 a69 a70 a71 a72 a73 a74 a75 a76 a77 a78 a79 a82 (9). missing value a66a a67a a79a (99). fre var a65 a65a a65b a66 a66a a67 a67a a68 a69 a70 a71 a72 a73 a74 a75 a76 a77 a78 a79 a79a. fre var a81 a82 a82a. ***árfolyam***. missing value a84 a85 a86a a86b a86c a86d a86e a86f a86g a86h a86i (9). fre var a84 a85 a86a a86b a86c a86d a86e a86f a86g a86h a86i . ***üzleti kilátások***. fre var a87 a88 a89 a90 a91 a92 a93a a93b a93c a93d a93e a94 a95. ***andrás kérdései a háttérváltozókkal***. crosstabs tabes ttip l01o sector3 bfd01 by a65 a65a a65b a66 a66a a67 a67a a68 a69 a70 a71 a72 a73 a74 a75 a76 a77 a78 a79 a79a a81 a82 a82a /cells count row asresid /stat phi gamma. ***árképzés blokk*** ***az árképzésre vonatkozó kérdések feldolgozása***. fre var a15 a16 a18 a19 a20 a21 a22 a23 a24 a25 a26a a26b a26c a27 a28 a29e a29t a30 a31 a32 a32a a33 a34 a35 a35a a36 a37 a38 a39a a39b a39c a39d a39e a39f a39g a40h a40i a40j a40k a40l a40m a40n a41 a42 a43 a44a a44b a44c a44d a44e a45 a46 a47. recode a22 (650=99). missing value a15 a16 a18 a19 a41 a42 (999) a22 a23 a29e (99) / a24 a25 a26a a26b a26c a30 a31 a32 a36 a37 a38 a43 (9) / a39a to a40n a44a a44e (8,9) . comp x29=a29e + a29t/10. fre var x29. ***x29 az értékelhetlen***. fre var a15 a16 a18 a19 a20 a21 a22 a23 a24 a25 a26a a26b a26c a27 a28 a30 a31 a32 a32a a33 a34 a35 a35a a36 a37 a38 a39a a39b a39c a39d a39e a39f a39g a40h a40i a40j a40k a40l a40m a40n a41 a42 a43 a44a a44b a44c a44d a44e a45 a46 a47. save outfile='C:\aaa\wargo\pricetax\data\prt01_3.SAV' /comp. ***vissza az 1998-as file-hoz***. fre var l97o l98o. comp good01=0. fre var lksh. filter off. comp good01x=0. if (lksh ge 3) good01x=1. fre var sector2. fre var good01x. filter by good01x. filter off. crosstabs tables good01 by lksh /cells count row asresid/stat phi. if (l98o ge 4) good01=1. fre var good01. filter by good01. fre var ardont2. ***sulyozas***. comp svalt=9. if (sector2 = 1 and lksh=3) svalt=1. if (sector2 = 1 and lksh=4) svalt=2. if (sector2 = 2 and lksh=3) svalt=3. if (sector2 = 2 and lksh=4) svalt=4. if (sector2 = 3 and lksh=3) svalt=5. if (sector2 = 3 and lksh=4) svalt=6. missing value svalt (9). fre var svalt. temp. sel if (good01= 1). fre var svalt. temp. sel if (good01= 1). NPAR TEST /CHISQUARE=svalt /EXPECTED=50.6 16.2 11.2 1.2 16.9 3.9 /MISSING ANALYSIS. comp suly98=1. if (svalt =1) suly98=102.2/95. if (svalt =2) suly98=32.7/54. if (svalt =3) suly98=22.6/14. if (svalt =4) suly98=2.4/4. if (svalt =5) suly98=34.1/23. if (svalt =6) suly98=7.9/12. temp. sel if (good01= 1). fre var suly98 /stat mean. filter off. ***súlyozás vége***. SAVE OUTFILE='C:\aaa\wargo\pricetax\data\prc98_3.sav' /COMPRESSED. GET FILE "C:\aaa\wargo\pricetax\data\prc98_3.sav". comp year=1998. rename var (a1 = kshkod). fre var ardont1. fre var sector_p. comp teaor=sector_p. COMP SECTOR10=99. IF (teaor GE 1500 AND teaor LE 1699) sector10=1. IF (teaor GE 1700 AND teaor LE 1999) sector10=2. IF (teaor GE 2000 AND teaor LE 2299) sector10=3. IF (teaor GE 2300 AND teaor LE 2599) sector10=4. IF (teaor GE 2600 AND teaor LE 2699) sector10=5. IF (teaor GE 2700 AND teaor LE 2899) sector10=6. IF (teaor GE 2900 AND teaor LE 3699) sector10=7. IF (teaor GE 3600 AND teaor LE 3799) sector10=8. if (teaor ge 4500 and teaor le 4599) sector10=9. if (teaor ge 5100 and teaor le 5279) sector10=10. missing value sector10 (99). value labels sector10 1 'Food+ (15,16)' 2 'Textile+ (17-19)' 3 'Wood+ (20-22)' 4 'Chemical prod.(23-25)' 5 'Non-metallic mineral prod. (26)' 6 'Metal+ (27,28)' 7 'Machinery (29-35)' 8 'Other manuf. (36,37)' 9 'Construction (45)' 10 'Trade (51-52)'. missing value sector10 (99). fre var sector10. fre var a8. rename var (ardont1=ardont98). fre var sector2 tultip good01 l98. sel if good01 = 1. sort cases by kshkod. comp sszam=kshkod. SAVE OUTFILE='C:\aaa\wargo\pricetax\data\prc98_x.sav' /keep sszam kshkod sector2 sector10 tultip l98 ardont98 year suly98 a8 a23 a3 a4 a7 a8 a20b1 a20c1 a21a a21b a21c /COMPRESSED. ***. GET FILE='C:\aaa\wargo\pricetax\data\prt01_3.SAV'. fre var a21. comp ardont1=a21. recode ardont1 (1=1) (2=2) (3=3) (4=4) (5=5) (6,7=6). value label ardont1 1 'naponta' 2'hetente' 3'havonta' 4 'negyedévente' 5 'évente' 6 'rendszertelenül+ biz. események'. fre var good ssample. filter by good. fre var ardont1. comp year = 2001. fre var good sector3 sector10 ttip . rename var (ardont1=ardont01). sort cases by kshkod. fre var a8c. missing value a8c (8,9). comp l01=a8c. sel if (good = 1 and ssample =1 and l01 ge 50). fre var l01. fre var ardont01. fre var a16. comp sszam=kshkod*2. SAVE OUTFILE='C:\aaa\wargo\pricetax\data\prc01_x.sav' /keep sszam kshkod sector3 sector10 ttip l01 ardont01 year a4b1 a15 a16 a18 a19 a8b a8c a4a1 a4b1 a4b2 a4c1 /COMPRESSED. add files file='C:\aaa\wargo\pricetax\data\prc98_x.SAV' /file='C:\aaa\wargo\pricetax\data\prc01_x.SAV' /by sszam. fre var a4b1 a4b2. missing value a4b1 a4b2 (-9). comp exp=99. if (a23 ge 1) exp=a23. missing value a4b1 (-9). comp exp01=a4b2/a4b1*100. fre var exp01. recode exp01 (0=1) (0.001 thru 10.9999=2) (11 thru 30.99999=3) (31 thru 50.9999=4) (51 thru 70.9999=5) (71 thru 90.9999=6) (91 thru 100=7). fre var exp01. fre var sector2 sector3 year. if (missing(suly98)) suly98=1. fre var suly98/format notable/stat mean. fre var tultip ttip. comp sector=9. if (sector2 ge 1) sector=sector2. if (sector3 ge 1) sector=sector3. missing value sector (9). comp l=-9. if (l98 ge 1 ) l=l98. if (l01 ge 1 ) l=l01. missing value l (-9). fre var comp l0=-9. fre var tultip. comp otype=9. if (tultip = 1) otype=1. if (tultip = 2) otype=2. if (tultip = 3) otype=3. if (tultip ge 4) otype=4. value label otype 1'klfd' 2 'mceg' 3 'mmsz' 4 'egyeb'. missing value otype (9). fre var otype. comp ardont=9. if (ardont98 ge 1) ardont=ardont98. if (ardont01 ge 1) ardont=ardont01. missing value ardont (9). value label ardont 1 'naponta' 2'hetente' 3'havonta' 4 'negyedévente' 5 'évente' 6 'rendszertelenül+ biz. események'. value label sector 1 'feldolgozóipar' 2 'építőipar' 3 'kereskedelem'. weight by suly98. fre var ardont. fre var l sector otype. fre var year. temp. sel if (year = 1998). fre var ardont. fre var a8 a16. comp xrate=999. if (a8 ge 0) xrate=a8. if (a16 ge 0) xrate=a16. missing value xrate (999). fre var xrate. ***fo termekcsoport piaci reszesedese Magyarorszagon***. fre var a3 a15. comp bpr1=-9. variable labels bpr1 'fő termékcsoport piaci részesedése belföldön'. if (a3 ge 0) bpr1=a3. if (a15 ge 0) bpr1=a15. missing value bpr1 (-9). fre var bpr1. ***fő termékcsoport export aránya ***. fre var a4 a16. comp xrtcs=-9. variable label xtrcs 'fő termékcsoport: export arány'. if (a4 ge 0) xtrcs=a4. if (a16 ge 0) xtrcs=a16. missing value xtrcs (-9). fre var xtrcs. ***fő termék piaci részesedése Magyarországon***. fre var a7 a18. comp bpr2=-9. variable labels bpr2 'fő termék piaci részesedése belföldön'. if (a7 ge 0) bpr2=a7. if (a18 ge 0) bpr2=a18. missing value bpr2 (-9). fre var bpr2. ***fő termék export aránya ***. fre var a8 a19. comp xtr=-9. variable labels xtr 'fő termék: export arány'. if (a8 ge 0) xtr=a8. if (a19 ge 0) xtr=a19. missing value xtr (-9). fre var xtr. fre var bpr1 bpr2. fre var xtrcs xtr. crosstabs tables ardont by year /cells count column asresid/stat phi. crosstabs tables sector by year /cells count column asresid/stat phi. crosstabs tables ardont by year by sector /cells count column asresid/stat phi. means tables xrate by year by ardont /stat anova. means tables xrate by year /stat anova. weight by suly98. fre var ardont. temp. sel if (ardont ne 6). means tables xtr by ardont /stat anova. temp. sel if (ardont ne 6). means tables xtrcs by ardont /stat anova. temp. sel if (ardont ne 6). means tables bpr1 by ardont /stat anova. temp. sel if (ardont ne 6). means tables bpr2 by ardont /stat anova. ***átvinni statába és ott megnézni***. NOMREG ardont BY otype sector year WITH l xtrcs /CRITERIA = CIN(95) DELTA(0) MXITER(100) MXSTEP(5) LCONVERGE(0) PCONVERGE (1.0E-6) SINGULAR(1.0E-8) /MODEL /INTERCEPT = INCLUDE /PRINT = FIT PARAMETER SUMMARY LRT . comp lo=9. if (l ge 50 and l le 99) lo=1. if (l ge 100 and l le 249) lo =2. if (l ge 250 ) lo=3. value labels lo 1 '50-99' 2'100-249' 3'250-'. missing value lo (9). fre var lo. fre var sector10. crosstabs tables lo by year /cells count column/stat phi. crosstabs tables sector10 by year /cells count column/stat phi. temp. sel if (ardont ne 6). crosstabs tables ardont by year /cells count column/stat phi. comp ardont2=ardont. value label ardont2 1 'naponta' 2'hetente' 3'havonta' 4 'negyedévente' 5 'évente'. missing value ardont2 (6). fre var ardont2. weight off. SAVE OUTFILE='C:\aaa\wargo\pricetax\data\prc9801x.sav' /COMPRESSED. ***1998-as file elemzésének vége***. ***vissza a 2001-es file-hoz és az árképzés file elemzésének folytatása*** GET FILE='C:\aaa\wargo\pricetax\data\prt01_3.SAV'. fre var good ssample. missing value a8c (8,9). comp l01=a8c. comp good_ar=0. if (ssample = 1 and l01 ge 50) good_ar=1. fre var good_ar. filter by good_ar. fre var a21. comp ardont1=a21. recode ardont1 (1=1) (2=2) (3=3) (4=4) (5=5) (6,7=6). value label ardont1 1 'naponta' 2'hetente' 3'havonta' 4 'negyedévente' 5 'évente' 6 'rendszertelenül+ biz. események'. fre var ardont1. fre var a15 a16 a18 a19 a20 a21 a22 a23 a24 a25 a26a a26b a26c a27 a28 a30 a31 a32 a32a a33 a34 a35 a35a a36 a37 a38 a39a a39b a39c a39d a39e a39f a39g a40h a40i a40j a40k a40l a40m a40n a41 a42 a43 a44a a44b a44c a44d a44e a45 a46 a47. fre var ardont1 a33. comp ardont2=ardont1. value label ardont2 1 'naponta' 2'hetente' 3'havonta' 4 'negyedévente' 5 'évente'. missing value ardont2 (6). fre var ardont2. crosstabs tables ardont2 by a33 /cells count column asresid/stat phi. fre var a33. fre var a26a a26b a26c a30 a31 a32 a32a a34 a35 a35a a36 a37 a38. fre var a24 a25. comp arvez=0. if (a25 = 1) arvez=1. fre var arvez. comp euro=9. if (a35a = 3 or a35a = 6 or a35a = 8 or a35a = 10 or a35a = 16 or a35a = 18 or a35a = 19 or a35a = 23) euro=1. if (a35a = 22 or a35a =25) euro=0. missing value euro (9). comp xprice=9. if (a35 = 1) xprice=1. if (a35 = 2 and euro = 1) xprice=2. if (a35 = 2 and euro = 0) xprice=3. if (a34 = 1) xprice=4. missing value xprice (9). value label xprice 1'importor valutaja' 2 'euro' 3'nem-euro' 4'forint'. fre var a34 xprice. fre var a15. fre var a16/stat all. fre var euro. fre var arvez. crosstabs tables ardont2 by arvez /cells count column asresid/stat phi. crosstabs tables arvez by lo sector10 ttip /cells count column asresid/stat phi. means tables a15 a16 a18 a19 by arvez/stat anova. fre var a32 a32a. means tables a13 by a32a/stat anova. filter off. SAVE OUTFILE='C:\aaa\wargo\pricetax\data\prt01_3.SAV' /COMPRESSED. ****az adózási magatartás és fdi munka folytatása*** ****a harom adatbazis osszeillesztese***. GET FILE "C:\aaa\wargo\pricetax\data\prt01_2.SAV". sort cases by kshkod. comp tax01=1. rename var (a5=a501). save outfile='C:\aaa\wargo\pricetax\data\tax01_3.SAV' /drop azon cegnev szir szvaros szutca uir uvaros uutca var12 var13 var14 irsz varos utca asorsz telret1 afopot atelep akerdez aev ahonap anap aora1 aperc1. GET FILE "C:\aaa\wargo\pricetax\data\tax96_2.SAV". rename variable (a1=kshkod). fre var vgys. fre var lminta. if (lminta=0) vgys=9. missing value vgys (9). fre var vgys. fre var tultip. comp tultip=9. if (klfd =1) tultip=1. if (bceg =1) tultip=2. if (mmsz=1) tultip=3. if (koztul=1) tultip=4. if (vgys =1) tultip=5. missing value tultip (9). fre var tultip. sort cases by kshkod. fre var tultip. fre var lminta. comp tax96=1. sel if (lminta=1 or lminta=0). save outfile='C:\aaa\wargo\pricetax\data\tax96_3.SAV' /drop sorszam cfopot cfsorsz cpsorsz calmin ctelep cker cteljel ckerd ckezd1 ckezd2 ckezd3 ckezd4 cinstr ckezd6 cutomun cinfohi ckorrhi minta nev irszam szekhely utca levirsza levszekh levutca ssample2 klfd bceg mmsz koztul vgys. GET FILE "C:\aaa\wargo\pricetax\data\tax96_3.SAV". fre var tultip. add files file ='C:\aaa\wargo\pricetax\data\tax96_3.SAV' /file ='C:\aaa\wargo\pricetax\data\tax01_3.SAV' /by kshkod. fre var tax96 tax01. if (missing(tax96)) tax96=0. if (missing(tax01)) tax01=0. crosstabs tables tax96 by tax01. save outFILE='C:\aaa\wargo\pricetax\data\tax13.SAV' /comp. GET FILE "C:\aaa\wargo\pricetax\data\c98_alapsok.SAV". sort cases by sorsz. comp tax98=1. save outfile='C:\aaa\wargo\pricetax\data\tax98_01.sav' /drop nev irszam cim telep utca minta. GET FILE "C:\aaa\wargo\pricetax\data\c98b_3.SAV". sort cases by sorsz. comp lminta98=1. save outfile='C:\aaa\wargo\pricetax\data\tax98_02.sav' /drop sector gforma ltsm_ksh nbv6_ksh megye. match files file ='C:\aaa\wargo\pricetax\data\tax98_01.SAV' /file ='C:\aaa\wargo\pricetax\data\tax98_02.SAV' /by sorsz. fre var tax98 lminta98. if (missing(tax98)) tax98=1. fre var tax98. if (missing(lminta98)) lminta98=0. fre var lminta98. rename var ( sector =sector98). rename var ( gforma =gforma98) / ( megye =megye98) / ( tultip =tultip98). comp good98=lminta98. sort cases by kshkod. save outfile='C:\aaa\wargo\pricetax\data\tax98_3.sav' /drop lminta /comp. add files file ='C:\aaa\wargo\pricetax\data\tax98_3.SAV' /file ='C:\aaa\wargo\pricetax\data\tax13.SAV' /by kshkod. fre var good98. ***változók képzése*** ***good változó képzése***. fre var lminta. comp good96=lminta. if (missing(good96)) good96=0. if (missing(good98)) good98=0. fre var good96. fre var good98. comp good01=0. if (a1 ge 1) good01=1. if (missing(good01)) good01=0. fre var good01. crosstabs tables good96 by good98. crosstabs tables good98 by good01. crosstabs tables good96 by good01. comp good61=0. if (good96 = 1 or good01 = 1) good61=1. fre var good61. comp good81=0. if (good98 = 1 or good01 = 1) good81=1. fre var good81. comp good681=0. if (good96 = 1 or good98 = 1 or good01 = 1) good681=1. fre var good681. ***nagyság, szektor, árbevétel, export, exporthányad, *** ***nagyság 1995 és 2000: létszám***. fre var c15 a8b. fre var v1702. missing value a8b (0,8,9). fre var a8b. comp lt0i=-9. if (c15 gt 0) lt0i=c15. if (v1702 gt 0) lt0i=v1702. if (a8b gt 0) lt0i=a8b. missing value lt0i (-9). variable label lt0i 'létszám: előző év'. fre var lt0i /stat all. comp lt0o=9. if (lt0i le 99) lt0o=1. if (lt0i gt 99 and lt0i le 249) lt0o=2. if (lt0i gt 249 ) lt0o=3. variable label lt0o 'létszám kat.:előző év'. value labe lt0o 1 '-99' 2 '100-249' 3 '250-'. missing value lt0o (9). fre var lt0o. ***. comp lt1i=-9. if (c16 gt 0) lt1i=c16. if (v1703 gt 0) lt1i=v1703. if (a8c gt 0) lt1i=a8c. missing value lt1i (-9). variable label lt1i 'létszám: kérdezés éve'. fre var lt1i /stat all. comp lt1o=9. if (lt1i le 99) lt1o=1. if (lt1i gt 99 and lt1i le 249) lt1o=2. if (lt1i gt 249 ) lt1o=3. variable label lt1o 'létszám kat.:kérdezés éve'. value labe lt1o 1 '-99' 2 '100-249' 3 '250-'. missing value lt1o (9). fre var lt1o. ***szektor***. fre var a5 teaor sector98. comp sector4=9999. if (a5 gt 0) sector4=a5. if (sector98 gt 0) sector4=sector98. if (teaor gt 0) sector4=teaor. missing value sector4 (9999). fre var sector4. comp sector=99. if (sector4 ge 1500 and sector4 le 1699) sector=1. if (sector4 ge 1700 and sector4 le 1999) sector=2. if (sector4 ge 2000 and sector4 le 2299) sector=3. if (sector4 ge 2300 and sector4 le 2599) sector=4. if (sector4 ge 2600 and sector4 le 2699) sector=5. if (sector4 ge 2700 and sector4 le 2899) sector=6. if (sector4 ge 2900 and sector4 le 3599) sector=7. if (sector4 ge 3600 and sector4 le 3799) sector=8. if (sector4 ge 4500 and sector4 le 4599) sector=9. if (sector4 ge 5100 and sector4 le 5279) sector=10. missing value sector (99). value labels sector 1 'food (15,16)' 2 'textile (17-19)' 3 'wood (20-22)' 4 'chemical (23-25)' 5 'non-metal (26)' 6 'metal. (27,28)' 7 'machinery (29-35)' 8 'other manuf. (36,37)' 9 'construction (45)' 10 'trade (51,52)'. value labels sector 1 'élelm. (15,16)' 2 'textil (17-19)' 3 'fa, papír (20-22)' 4 'vegyipar (23-25)' 5 'nem-fém (26)' 6 'kohászat (27,28)' 7 'gépipar (29-35)' 8 'egyéb feld. (36,37)' 9 'építőipar (45)' 10 'ker. (51,52)'. filter by good681. fre var sector. ***nyereségesség, 1995, 1997 és 2000***. fre var a1. fre var c12 a6 v16. comp prt0o=9. if (c12 = 1) prt0o=1. if (v16 = 1) prt0o=1. if (a6 = 1) prt0o=1. if (c12 = 2) prt0o=0. if (v16 = 2) prt0o=0. if (a6 = 2) prt0o=0. if (c12 = 3) prt0o=-1. if (v16 = 3) prt0o=-1. if (a6 = 3) prt0o=-1. missing value prt0o (9). fre var prt0o. variable label prt0o 'mérleg pozíció: előző év'. value label prt0o 1 'nyereség' 0 'null-szaldó' -1 'veszteség'. fre var prt0o. ****. ***kibocsátás: kérdezés éve***. fre var c11 v1503 a4c1 . missing value v1503 (8,9). missing value a4c1 (-9). comp qt1i=-9. if (c11 ge 1) qt1i=c11. if (v1503 ge 1) qt1i=v1503. if (a4c1 ge 1) qt1i =a4c1. missing value qt1i (-9). fre var qt1i. ***tulajdonos típusa***. fre var tultip tultip98 . comp ttip=9. if (tultip = 1) ttip=1. if (klfd = 1) ttip=1. if (tultip98 = 1) ttip=1. if (tultip = 2) ttip=2. if (mceg = 1) ttip=2. if (tultip98 = 2) ttip=2. if (tultip = 3) ttip=3. if (mmsz = 1) ttip=3. if (tultip98 = 3) ttip=3. if (tultip = 4) ttip=4. if (kozos =1) ttip=4. if (tultip98 =4) ttip=4. if (tultip = 5) ttip=5. if (vgys = 1) ttip=5. if (tultip98= 5) ttip=5. missing value ttip (9). value labels ttip 1 'klfd' 2 'bceg' 3 'mmsz' 4'kozos' 5'vgys'. filter off. fre var ttip. ***. ***importhányad***. fre var a13 c36. missing value a13 (-9). comp importh=-9. if (a13 ge 0) importh=a13. if (c36 ge 0) importh=c36. missing value importh (-9). fre var importh. mean tables importh by year/stat anova. *** export: kérdezés éve***. *** 1998*ban pedig 1997***. fre var c33 a4c2 v30. comp x96=-9. comp x1=0. comp x2=0. if (c11 ge 0) x1=1. if (c33 ge 0) x2=1. if (x1 = 1 and x2 = 0 and good96 = 1) x96=0. if (x2 = 1) x96=c11*c33/100. if (x96 =0.006) x96=0. missing value x96 (-9). fre var x96. comp x97=-9. comp x1=0. comp x2=0. if (v1502 ge 0) x1=1. if (v30 ge 0) x2=1. if (x1 = 1 and x2 = 0 and good98 = 1) x97=0. if (x2 = 1) x97 =v1502*v30/100. if (x97 lt 0) x97=-9. missing value x97 (-9). fre var x97. comp xt1i=-9. if (x96 ge 0) xt1i=x96. if (a4c2 ge 0) xt1i=a4c2. if (x97 ge 0 ) xt1i=x97. missing value xt1i (-9). fre var xt1i. ***exporthányad: kérdezés éve***. ***1998-ban 1997-es adat***. comp xht1i=-9. if (x96 ge 0) xht1i=x96/c11*100. if (a4c1 ge 0) xht1i=a4c2/a4c1*100. if (x97 ge 0) xht1i=x97/v1502*100. if (xht1i lt 0) xht1i=0. fre var xht1i. ***. ***beruházás***. ***1998-ban az 1998-as várható adat***. fre var c25 a91 v25. comp invt2o=9. if (c25 = 1) invt2o=-1. if (a91 = 3) invt2o=-1. if (v25 = 1) invt2o=-1. if (c25 = 2) invt2o=0. if (a91 = 2) invt2o=0. if (v25 = 2) invt2o=0. if (c25 = 3) invt2o=1. if (a91 = 1) invt2o=1. if (v25 = 1) invt2o=1. missing value invt2o (9). value labels invt2o 1'nőni fog' 0 'nem változik' -1'csökkenni fog'. fre var invt2o. ***tervezés***. fre var c31 v28 a87. comp trvt1o=9. if (c31 ge 1) trvt1o=c31. if (v28 ge 1) trvt1o =v28. if (a87 ge 1) trvt1o=a87. missing value trvt1o (9). value labels trvt1o 1'nem terveznek' 2' kevesebb mint 1 év' 3 '1-2 év' 4 '3-5 év' 5 'több mint 5 év'. fre var trvt1o. ***béren kívüli juttatás aránya*** fre var c56 v50 a11. comp frben=-9. if (c56 ge 0) frben=c56. if (v50 ge 0) frben=v50. if (a11 ge 0) frben=a11. if (frben = 999) frben=-9. missing value frben (-9). variable labels frben 'béren kívüli juttatások aránya,%'. fre var frben. ***alvállalkozó***. fre var c18 c19 v19 v20 a48 a49. comp alval=9. if (c18 = 0) alval=0. if (v19 = 0) alval=0. if (a48 = 2) alval=0. if (c18 = 1) alval=1. if (v19 = 1) alval=1. if (a48 = 1) alval=1. missing value alval (9). value labels alval 0 'nincs alvállalkozó' 1 'van alvállalkozó'. fre var alval. comp alvalq=-9. if (c18 = 1) alvalq=c19. if (v19 = 1) alvalq =v20. if (a48 = 1) alvalq=a49. missing value alvalq (-9). fre var alvalq. ***year*** comp year=9. if (good96=1) year=1. if (good98=1) year=2. if (good01=1) year=3. value labels year 1 '1996' 2 '1998' 3' 2001'. missing value year (9). fre var year. ***tb: késés***. fre var c30c v27c a55b. comp tbkes=9. if (c30c = 1) tbkes=1. if (c30c = 0) tbkes=0. if (v27c = 0) tbkes=0. if (v27c = 1) tbkes=1. if (a55b = 2) tbkes=0. if (a55b = 1) tbkes=1. missing value tbkes (9). variable labels tbkes 'elmúlt év: késés a tb járulék befizetésével' value label tbkes 0' nem' 1 'igen'. fre var tbkes. ***számla nélkül: versenytársak és üzleti partnerek***. fre var c53b v47b a57b. comp sznlk_v=9. if (c53b ge 1) sznlk_v =c53b. if (v47b ge 1) sznlk_v = v47b. if (a57b ge 1) sznlk_v = a57b. missing value sznlk_v (9). value label sznlk_v 1 'egyáltalán nem' 2 'ritkán' 3 'gyakran'. variable label sznlk_v 'számla nélkül: versenytársak'. fre var sznlk_v. comp sznlk_p=9. if (c53a ge 1) sznlk_p =c53a. if (v47a ge 1) sznlk_p = v47a. if (a57a ge 1) sznlk_p = a57a. missing value sznlk_p (9). value label sznlk_p 1 'egyáltalán nem' 2 'ritkán' 3 'gyakran'. variable label sznlk_p 'számla nélkül: üzleti partnerek'. fre var sznlk_p. ***versenytárs a rejtett gazdaságban***. fre var c54 v48 a58. comp uhly_v=9. if (c54 ge 1) uhly_v = c54. if (v48 ge 1) uhly_v = v48. if (a58 ge 1) uhly_v = a58. missing value uhly_v (9). value label uhly_v 1 'egyáltalán nem' 2 'kismértékben' 3 'nagymértékben'. variable label uhly_v 'uzleti helyzet: versenytársak a rejtett gazdaságban'. fre var uhly_v. crosstabs tables year by uhly_v/cells count row. ***cég helyzete és a helyzet változása***. fre var v75 v76 a94 a95. comp cuhly=9. if (v75 ge 1) cuhly=v75. if (a94 ge 1) cuhly=a94. recode cuhly (1=1) (2=0) (3=-1). value label cuhly 1'jó' 0 'közepes' -1 'rossz'. variable label cuhly 'a cég üzleti helyzete'. missing value cuhly (9). fre var cuhly. fre var v76 a95. comp dcuhly=9. if (v76 ge 1) dcuhly=v76. if (a95 ge 1) dcuhly=a95. recode dcuhly (1=2) (2=1) (3=0) (4=-1) (5=-2). recode dcuhly (1,2=1) (0=0) (-1,-2=-1). value label dcuhly 1'javul' 0 'nem változik' -1 'romlik'. variable label dcuhly 'a cég üzleti helyzetének változása'. missing value dcuhly (9). fre var dcuhly. ***szerződéses kötelezettség nem teljesítése*** fre var c37a c37b v32 v32a bcd01 a54a a54b. temp. sel if (bcd01 = 1). fre var a54a a54b. comp bcd=9. if (c37a ge 0) bcd=c37a. if (v32 ge 0) bcd=v32. if (bcd01 ge 0) bcd=bcd01. missing value bcd (9). value labels bcd 0 'nem fordult elő' 1'előfordult'. variable labels bcd 'elmúlt év: szerződéses köt.nem teljesítése'. fre var bcd. ***adózási fegyelem*** fre var c75a c75b v68 v6801 a79 a79a . missing value a79a (99). recode a79 (1=1) (2=0). fre var a79. comp bfisd=9. if (c75a ge 0) bfisd=c75a. if (v68 ge 0) bfisd=v68. if (a79 ge 0) bfisd=a79. missing value bfisd (9). value label bfisd 0 'nem fordult elő' 1 'előfordult'. variable label bfisd 'elmúlt két év: adózási fegyelem megsértése'. fre var bfisd. comp bfisdx=999. if (c75b ge 0) bfisdx=c75a. if (v6801 ge 0) bfisdx=v6801. if (a79a ge 0) bfisdx=a79a. variable label bfisd 'elmúlt két év: adózási fegy. megsértése'. missing value bfisdx (999). variable label bfisdx 'elmúlt két év: adózási fegy. megsértése x-szer'. fre var bfisdx. ***szerződéses fegyelem: üzleti partnerek: 1998,2001***. fre var v33 v34 a52 a53. if (a53=99) a53=999. fre var a53. comp lateq=999. if (v33 ge 0) lateq=v33. if (a52 ge 0) lateq=a52. missing value lateq (999). variable labels lateq 'árbevétel x %-a késve'. comp latev=999. if (v34 ge 0) latev=v34. if (a53 ge 0) latev=a53. missing value latev (999). variable labels latev 'vevők x %-a késve'. fre var lateq latev. ***megye és régió***. fre var megye megye98 cmegye. comp x1=0. if (megye ge 0) x1=1. comp x2=0. if (cmegye ge 0) x2=1. crosstabs tables x1 by x2. comp county=99. if (cmegye ge 0 and good96 = 1) county=cmegye. if (megye98 ge 0 and good98 = 1) county=megye98. if (megye ge 0 and good01 = 1) county=megye. missing value county (99). fre var county. comp regio=9. if (county = 1 or county = 13) regio=1. if (county = 20 or county = 18 or county = 8) regio=2. if (county = 19 or county = 7 or county = 11) regio=3. if (county = 14 or county = 17 or county = 2) regio=4. if (county = 12 or county = 10 or county = 5) regio=5. if (county = 16 or county = 9 or county = 15) regio=6. if (county = 3 or county = 6 or county = 4) regio=7. missing value regio (9). value labels regio 1 'Central' 2 'West-Transdanubia' 3 'East-Transdanubia' 4 'South-Trandanubia' 5 'North-East' 6 'Middle-East' 7'South-East. fre var regio. ***számolások***. ***képzett változók statisztikái***. fre var ttip lt0i lt0o lt1i lt1o sector prt0o qt1i importh xt1i xht1i invt2o trvt1o frben year alval alvalq tbkes sznlk_v sznlk_p uhly_v cuhly dcuhly bcd01 bcd bfisd bfisdx bfd01 lateq latev county regio. fre var importh. filter by good61. means tables importh by ttip/stat anova. corr var importh xht1i. ***először nézzük meg a munkatermelékenységet, a mérlegpozíció hatását aztán azt, ***hogy erre milyen hatással van az importhányad. fre var qt1i lt1i. comp lpt1i=qt1i/lt1i. comp lnlpt1i =ln(lpt1i). fre var lpt1i/format notable/stat all. temp. sel if (lpt1i gt 100). list var qt1i lt1i lpt1i. if (lpt1i ge 200) lnlpt1i=9. missing value lnlpt1i (9). GRAPH /HISTOGRAM=lnlpt1i. ***a munkatermelékenység modellje, year sector exporthányad xht1i tultip nagyság importhányad ***. fre var year sector ttip. comp yr1=0. if (year = 1) yr1=1. comp yr2=0. if (year = 2) yr2=1. fre var yr1 yr2. comp s1=0. comp s2=0. comp s3=0. comp s4=0. comp s5=0. comp s6=0. comp s7=0. comp s8=0. comp s9=0. if (sector = 1) s1=1. if (sector = 2) s2=1. if (sector = 3) s3=1. if (sector = 4) s4=1. if (sector = 5) s5=1. if (sector = 6) s6=1. if (sector = 7) s7=1. if (sector = 8) s8=1. if (sector = 9) s9=1. comp klfd=9. if (ttip=1) klfd=1. if (ttip gt 1) klfd=0. missing value klfd (9). REGRESSION /MISSING LISTWISE /STATISTICS COEFF OUTS R ANOVA TOL /CRITERIA=PIN(.05) POUT(.10) /NOORIGIN /DEPENDENT lnlpt1i /METHOD=ENTER yr1 yr2 s1 s2 s3 s4 s5 s6 s7 s8 s9 klfd xht1i lt1i. REGRESSION /MISSING LISTWISE /STATISTICS COEFF OUTS R ANOVA TOL /CRITERIA=PIN(.05) POUT(.10) /NOORIGIN /DEPENDENT lnlpt1i /METHOD=ENTER yr1 s1 s2 s3 s4 s5 s6 s7 s8 s9 klfd importh lt1i. REGRESSION /MISSING LISTWISE /STATISTICS COEFF OUTS R ANOVA TOL /CRITERIA=PIN(.05) POUT(.10) /NOORIGIN /DEPENDENT lnlpt1i /METHOD=stepwise yr1 s1 s2 s3 s4 s5 s6 s7 s8 s9 klfd importh lt1i. means tables importh by year/stat anova. ***Brüsszel***. ****létszámváltozás***. fre var c15 c16. comp dlo=9. if (c15 gt c16) dlo=-1. if (c15 = c16) dlo=0. if (c15 lt c16) dlo=1. if (v1701 gt v1702) dlo=-1. if (v1701 = v1702) dlo=0. if (v1701 lt v1702) dlo=1. if (a8a gt a8b) dlo=-1. if (a8a = a8b) dlo=0. if (a8a lt a8b) dlo=1. value label dlo -1'csökkent' 0 'nem változott' 1'növekedett'. missing value dlo (9). fre var dlo. ****béren kívüli juttatások***. comp frbend=9. if (frben le 5) frbend=0. if (frben gt 5) frbend=1. variable label frbend 'béren kívüli juttatások aránya, %'. value label frbend 0'x <= 5' 1' x > 5'. missing value frbend (9). filter by good681. fre var frbend. ****alacsony bérszint****. fre var c23 v18. comp swd=9. if (c23 = 0) swd=0. if (v18 = 0) swd=0. if (c23 gt 0) swd=1. if (v18 gt 0) swd=1. missing value swd (9). variable label swd 'alacsony bérszinten fogl.'. value label swd 0 'nincs' 1 'van'. fre var swd. ***adórendszer változása: veszély az üzleti kalkuláció biztonságára***. fre var c72 v66 a64. vukbd=9. if (c72 = 0) vukbd=0. if (c72 = 1) vukbd=1. if (v66 = 0) vukbd=0. if (v66 = 1) vukbd=1. if (a64 = 2) vukbd=0. if (a64 = 1) vukbd=1. variable label vukbd 'adórendszer változása veszélyezteti az üzleti kalkuláció biztonságát'. missing value vukbd (9). value label vukbd 0 'nem' 1 'igen'. fre var vukbd. fre var a52 a53 c38 v34. ***vevők: fizetési kötelezettség megszegése***. comp latevd=9. if (c38 le 2) latevd=1. if (c38 = 3) latevd=0. if (v34 lt 10) latevd=0. if (v34 ge 10) latevd=1. if (a53 lt 10) latevd=0. if (a53 ge 10) latevd=1. missing value latevd (9). variable labelst latevd 'üzleti partnerek: késve'. value label latevd 0 'x<10%' 1'x=>10%'. fre var latevd. crosstabs tables year by latevd /cells count row. ****. comp xho=xht1i. recode xho (0=0) (0.0001 thru 20=1) (20.0001 thru 50=2) (50.0001 thru hi=3). value label xho 0'nincs' 1' 0 < x <=20' 2 '20 < x <=50' 3 '50 < x'. fre var xho. ****. rename var (sznlk_p=sznpd). fre var sznpd. recode sznpd (1=0) (2,3=1). value label sznpd 0 'nem fordul elo' 1 'elofordul'. fre var sznpd. crosstabs tables year by sector3. comp sector3=sector. recode sector3 (1,2,3,4,5,6,7,8=1) (9=2) (10=3). value label sector3 1 'feld. ipar' 2'építőipar' 3'kereskedelem'. missing sector3 (99). fre var sector3. save outfile='C:\aaa\wargo\pricetax\data\tax123.sav' /drop a96aemai a96fax1 a96fax2 aora2 aperc2 ainstr aibaj aihiba aposzt apbaj aphiba /comp. save outfile='C:\aaa\wargo\pricetax\data\tax123.sav' /comp. ****a három felvétel összeillesztésének, az adózási magatartás és az fdi munka vége***. ****. ****számolás az adózási dolgozat befejezéséhez: regressziók***. filter by good681. fre var sector ttip lt1o dlo xho. fre var bcd bfisd frbend swd vukbd latevd sznpd. fre var klfd. fre var sector. fre var sector3. LOGISTIC REGRESSION VAR=bcd /METHOD=ENTER year sector3 ttip lt1o dlo xho /CONTRAST (year)=Indicator /CONTRAST (sector3)=Indicator /CONTRAST (ttip)=Indicator /CONTRAST (lt1o)=Indicator /CONTRAST (dlo)=Indicator /CONTRAST (xho)=Indicator /CRITERIA PIN(.05) POUT(.10) ITERATE(20) CUT(.5). LOGISTIC REGRESSION VAR=bfisd /METHOD=ENTER year sector3 ttip lt1o dlo xho /CONTRAST (year)=Indicator /CONTRAST (sector3)=Indicator /CONTRAST (ttip)=Indicator /CONTRAST (lt1o)=Indicator /CONTRAST (dlo)=Indicator /CONTRAST (xho)=Indicator /CRITERIA PIN(.05) POUT(.10) ITERATE(20) CUT(.5). LOGISTIC REGRESSION VAR=frbend /METHOD=ENTER year sector3 ttip lt1o dlo xho /CONTRAST (year)=Indicator /CONTRAST (sector3)=Indicator /CONTRAST (ttip)=Indicator /CONTRAST (lt1o)=Indicator /CONTRAST (dlo)=Indicator /CONTRAST (xho)=Indicator /CRITERIA PIN(.05) POUT(.10) ITERATE(20) CUT(.5). LOGISTIC REGRESSION VAR=swd /METHOD=ENTER year sector3 ttip lt1o dlo xho /CONTRAST (year)=Indicator /CONTRAST (sector3)=Indicator /CONTRAST (ttip)=Indicator /CONTRAST (lt1o)=Indicator /CONTRAST (dlo)=Indicator /CONTRAST (xho)=Indicator /CRITERIA PIN(.05) POUT(.10) ITERATE(20) CUT(.5). LOGISTIC REGRESSION VAR=vukbd /METHOD=ENTER year sector3 ttip lt1o dlo xho /CONTRAST (year)=Indicator /CONTRAST (sector3)=Indicator /CONTRAST (ttip)=Indicator /CONTRAST (lt1o)=Indicator /CONTRAST (dlo)=Indicator /CONTRAST (xho)=Indicator /CRITERIA PIN(.05) POUT(.10) ITERATE(20) CUT(.5). LOGISTIC REGRESSION VAR=latevd /METHOD=ENTER year sector3 ttip lt1o dlo xho /CONTRAST (year)=Indicator /CONTRAST (sector3)=Indicator /CONTRAST (ttip)=Indicator /CONTRAST (lt1o)=Indicator /CONTRAST (dlo)=Indicator /CONTRAST (xho)=Indicator /CRITERIA PIN(.05) POUT(.10) ITERATE(20) CUT(.5). LOGISTIC REGRESSION VAR=sznpd /METHOD=ENTER year sector3 ttip lt1o dlo xho /CONTRAST (year)=Indicator /CONTRAST (sector3)=Indicator /CONTRAST (ttip)=Indicator /CONTRAST (lt1o)=Indicator /CONTRAST (dlo)=Indicator /CONTRAST (xho)=Indicator /CRITERIA PIN(.05) POUT(.10) ITERATE(20) CUT(.5). LOGISTIC REGRESSION VAR=bfisd /METHOD=ENTER year sector3 klfd lt1o dlo xho /CONTRAST (year)=Indicator /CONTRAST (sector3)=Indicator /CONTRAST (lt1o)=Indicator /CONTRAST (dlo)=Indicator /CONTRAST (xho)=Indicator /CRITERIA PIN(.05) POUT(.10) ITERATE(20) CUT(.5). LOGISTIC REGRESSION VAR=swd /METHOD=ENTER year sector3 klfd lt1o dlo xho /CONTRAST (year)=Indicator /CONTRAST (sector3)=Indicator /CONTRAST (lt1o)=Indicator /CONTRAST (dlo)=Indicator /CONTRAST (xho)=Indicator /CRITERIA PIN(.05) POUT(.10) ITERATE(20) CUT(.5). LOGISTIC REGRESSION VAR=sznpd /METHOD=ENTER year sector3 klfd lt1o dlo xho /CONTRAST (year)=Indicator alvalq /CONTRAST (sector3)=Indicator /CONTRAST (lt1o)=Indicator /CONTRAST (dlo)=Indicator /CONTRAST (xho)=Indicator /CRITERIA PIN(.05) POUT(.10) ITERATE(20) CUT(.5). ***. LOGISTIC REGRESSION VAR=bcd /METHOD=ENTER year sector3 ttip lt1o cuhly xho /CONTRAST (year)=Indicator /CONTRAST (sector3)=Indicator /CONTRAST (ttip)=Indicator /CONTRAST (lt1o)=Indicator /CONTRAST (xho)=Indicator /CRITERIA PIN(.05) POUT(.10) ITERATE(20) CUT(.5). LOGISTIC REGRESSION VAR=bfisd /METHOD=ENTER year sector3 ttip lt1o cuhly xho /CONTRAST (year)=Indicator /CONTRAST (sector3)=Indicator /CONTRAST (ttip)=Indicator /CONTRAST (xho)=Indicator /CRITERIA PIN(.05) POUT(.10) ITERATE(20) CUT(.5). LOGISTIC REGRESSION VAR=frbend /METHOD=ENTER year sector3 ttip lt1o cuhly xho /CONTRAST (year)=Indicator /CONTRAST (sector3)=Indicator /CONTRAST (ttip)=Indicator /CONTRAST (xho)=Indicator /CRITERIA PIN(.05) POUT(.10) ITERATE(20) CUT(.5). LOGISTIC REGRESSION VAR=swd /METHOD=ENTER year sector3 ttip lt1o cuhly xho /CONTRAST (year)=Indicator /CONTRAST (sector3)=Indicator /CONTRAST (ttip)=Indicator /CONTRAST (lt1o)=Indicator /CONTRAST (xho)=Indicator /CRITERIA PIN(.05) POUT(.10) ITERATE(20) CUT(.5). LOGISTIC REGRESSION VAR=vukbd /METHOD=ENTER year sector3 ttip lt1o cuhly xho /CONTRAST (year)=Indicator /CONTRAST (sector3)=Indicator /CONTRAST (ttip)=Indicator /CONTRAST (lt1o)=Indicator /CONTRAST (xho)=Indicator /CRITERIA PIN(.05) POUT(.10) ITERATE(20) CUT(.5). LOGISTIC REGRESSION VAR=latevd /METHOD=ENTER year sector3 ttip lt1o cuhly xho /CONTRAST (year)=Indicator /CONTRAST (sector3)=Indicator /CONTRAST (ttip)=Indicator /CONTRAST (lt1o)=Indicator /CONTRAST (xho)=Indicator /CRITERIA PIN(.05) POUT(.10) ITERATE(20) CUT(.5). LOGISTIC REGRESSION VAR=sznpd /METHOD=ENTER year sector3 ttip lt1o cuhly xho /CONTRAST (year)=Indicator /CONTRAST (sector3)=Indicator /CONTRAST (ttip)=Indicator /CONTRAST (lt1o)=Indicator /CONTRAST (xho)=Indicator /CRITERIA PIN(.05) POUT(.10) ITERATE(20) CUT(.5). ****az adoellenőrzésre vonatkozó kérdések vizsgálata, ****03/03/09***. ****majd folytatása 03/08/19*** fre var good01. filter by good01. fre var a65 a66 a66a a67 a67a a78. comp eell=9. comp eellx=-9. if (a66 = 1) eell=1. if (a66 = 2) eell=0. if (a66a gt 0) eellx=a66a. if (a66a = 99) eellx=-9. variable label eell 'kiutalás előtti ellenőrzés az elmúlt 3 évben'. variable label eellx 'kiutalás előtti ellenőrzés száma az elmúlt 3 évben'. missing value eell (9) / eellx (-9). fre var eell eellx. comp uell=9. comp uellx=-9. if (a67 = 1) uell=1. if (a67 = 2) uell=0. if (a67a gt 0) uellx=a67a. if (a67a = 99) uellx=-9. variable label uell 'utólagos ellenőrzés az elmúlt 3 évben'. variable label uellx 'utólagos ellenőrzés száma az elmúlt 3 évben'. missing value uell (9) / uellx (-9). fre var uell uellx. comp ell=9. if (eell = 1 or uell=1) ell=1. if (eell = 0 and uell = 0) ell=0. missing value ell (9). fre var eell uell ell. comp ellx=-9. if (eellx gt 0) ellx=eellx. if (uellx gt 0) ellx= ellx + uellx. missing value ellx (-9). fre var ellx. rank lt1i /ntiles (10). fre var nlt1i. GRAPH /LINE(SIMPLE)=MEAN(eell) BY nlt1i . GRAPH /LINE(SIMPLE)=MEAN(uell) BY nlt1i . GRAPH /LINE(SIMPLE)=MEAN(bfisd) BY nlt1i . GRAPH /LINE(MULTIPLE)MEAN(uell) BY nlt1i BY bfd01 . LOGISTIC REGRESSION VAR=bfd01 /METHOD=ENTER sector3 ttip lt1o ell /CONTRAST (sector3)=Indicator /CONTRAST (ttip)=Indicator /CONTRAST (lt1o)=Indicator /CRITERIA PIN(.05) POUT(.10) ITERATE(20) CUT(.5). LOGISTIC REGRESSION VAR=eell /METHOD=ENTER sector3 ttip lt1o /CONTRAST (sector3)=Indicator /CONTRAST (ttip)=Indicator /CONTRAST (lt1o)=Indicator /CRITERIA PIN(.05) POUT(.10) ITERATE(20) CUT(.5). fre var klfd. LOGISTIC REGRESSION VAR=eell /METHOD=ENTER sector3 klfd lt1o /CONTRAST (sector3)=Indicator /CONTRAST (lt1o)=Indicator /CRITERIA PIN(.05) POUT(.10) ITERATE(20) CUT(.5). ***itt még a feltárt adóhiány is fontos*** fre var a65. recode a65 (1=1) (2=0). value label a65 0'nem' 1'igen'. missing value a65 (9). fre var a68. comp tgap=9. if (a68=2)tgap=0. if (a68=1)tgap=1. missing value tgap (9). fre var tgap. GRAPH /LINE(SIMPLE)=MEAN(tgap) BY nlt1i . crosstabs tables a65 by uell/cells count row column asresid/stat phi. GRAPH /BAR(GROUPED)=PCT BY EELL BY klfd . GRAPH /BAR(GROUPED)=PCT BY UELL BY klfd . GRAPH /BAR(GROUPED)=PCT BY UELL BY a65. rank qt1i /ntiles (10). fre var nqt1i. fre var nlt1i. temp. sel if (good01=1). rank qt1i /ntiles (10). fre var nti001. GRAPH /LINE(SIMPLE)=MEAN(tgap) BY nti001. ***2004 február***. ***vege***