/***** JGSS2005分析用シンタックス 2008 1019 ver2 *****/ /***** by Murase 村瀬　洋一 murase(a)gmail.com *****/ /***** 各種の職業分類、年齢、学歴変数を作るためのもの *****/ /***** 最初からこれくらいの変数は入れておいてほしいものですな *****/ /***** データファイルのあるフォルダ名を適当に書き換えて使用してください *****/ /***** ★まずNENDAI EDU JOB8 SIN8JOB などの中を見てみるといいでしょう *****/ /***** 年齢カテゴリーシンタックスのピリオド抜け修正 *****/ /***** バグがあったら修正するのでぜひご連絡ください *****/ /***** *****/ /***** 以下はマイドキュメントにあるファイルを開く時の命令文 *****/ *GET FILE='C:\Documents and Settings\yourname\My Documents\jgss2005v010_j.por'. /***** JGSSもＳＳＭ調査1995職業分類コード(500から689まで)を使用 *****/ /***** ただし701以降のJGSS独自の追加コードがあるので注意 *****/ /***** 701 レジスター係員 会計事務員559 と同じ扱い 事務3 *****/ /***** 702 大工　679熟練5 *****/ /***** 703 教員　521専門1 *****/ /***** 704 製品製造作業者　672半熟練6 *****/ /***** 705 会社員　無回答99 *****/ /***** 707 特に父職で記入が「自営業」 無回答99 *****/ COMPUTE Q4EJOBge=XXJOB. COMPUTE Q5EJOBsy=XXFSTJB. COMPUTE Q11EJOBf=PPJBXX15. COMPUTE Q17EJOBs=SSXXJOB. RECODE Q4EJOBge Q5EJOBsy Q11EJOBf Q17EJOBs (SYSMIS=986). RECODE XXJOB XXFSTJB PPJBXX15 SSXXJOB (701=559) (702=679) (703=521) (704=672) (SYSMIS=986). /***** ◆◆◆ SSM JGSS 職業関係変数名 対比メモ ◆◆◆ *****/ /***** ssm Q4E XXJOB Q4A TP12JOB Q4D SZTTLSTA Q4F TP12JOB *****/ /***** ssm Q5E XXFSTJB Q5A TP12FSTJ Q5D SZSTFFST Q5F TP12FSTJ *****/ /***** ssm Q11E PPJBXX15 Q11A PPJBTP15 Q11D PPJBSZ15 Q11F PPJBTP15 *****/ /***** ssm Q17E SSXXJOB Q17A SSTP12JB Q17D SSSZSTFA Q17F SSTP12JB *****/ /***** 職業小分類　管理職一部修正『SSM1995コードブック』P114 19971229 *****/ /***** まずこれを実行してから職業分類を作成すること MURASE 20080930 *****/ /***** 本人役職が30人以上か公務員かつ *****/ /***** 役職が課長か部長か役員以上の場合は職業を管理職545 548 550に変更 *****/ /***** ★SSM95B Q4A従業上地位 Q4D従業先規模 Q4E仕事内容職種 Q4F役職 *****/ COMPUTE CKANRI=1. IF ( (500 < XXJOB) AND (XXJOB < 554) ) CKANRI=0. IF ( (592 < XXJOB) AND (XXJOB < 599) ) CKANRI=0. IF ( XXJOB = 608 ) CKANRI=0. IF ( (688 < XXJOB) AND (XXJOB <1000) ) CKANRI=0. COMPUTE CKANRI2=0. IF ( (CKANRI=1) AND (SZTTLSTA>4) AND (SZTTLSTA<12) ) CKANRI2=1. IF ( (CKANRI=1) AND (SZTTLSTA=12)) CKANRI2=2. IF ( (CKANRI2=1) AND ((TP12JOB=5) OR (TP12JOB=6)) ) XXJOB=550. IF ( (CKANRI2=1) AND ( TP12JOB=1 ) ) XXJOB=548. IF ( (CKANRI2=2) AND ((TP12JOB=1) OR (TP12JOB=5) OR (TP12JOB=6)) ) XXJOB=545. COMPUTE CKANSYO=1. IF ( (500 < XXFSTJB) AND (XXFSTJB < 554) ) CKANSYO=0. IF ( (592 < XXFSTJB) AND (XXFSTJB < 599) ) CKANSYO=0. IF ( XXFSTJB = 608 ) CKANSYO=0. IF ( (688 < XXFSTJB) AND (XXFSTJB <1000) ) CKANSYO=0. COMPUTE CKANSYO2=0. IF ( (CKANSYO=1) AND (SZSTFFST>4) AND (SZSTFFST<12) ) CKANSYO2=1. IF ( (CKANSYO=1) AND (SZSTFFST=12)) CKANSYO2=2. IF ( (CKANSYO2=1) AND ((TP12FSTJ=5) OR (TP12FSTJ=6)) ) XXFSTJB=550. IF ( (CKANSYO2=1) AND ( TP12FSTJ=1 ) ) XXFSTJB=548. IF ( (CKANSYO2=2) AND ((TP12FSTJ=1) OR (TP12FSTJ=5) OR (TP12FSTJ=6)) ) XXFSTJB=545. COMPUTE CKANFAT=1. IF ( (500 < PPJBXX15) AND (PPJBXX15 < 554) ) CKANFAT=0. IF ( (592 < PPJBXX15) AND (PPJBXX15 < 599) ) CKANFAT=0. IF ( PPJBXX15 = 608 ) CKANFAT=0. IF ( (688 < PPJBXX15) AND (PPJBXX15 <1000) ) CKANFAT=0. COMPUTE CKANFAT2=0. IF ( (CKANFAT=1) AND (PPJBSZ15>2) AND (PPJBSZ15< 5) ) CKANFAT2=1. IF ( (CKANFAT=1) AND (PPJBSZ15= 5)) CKANFAT2=2. IF ( (CKANFAT2=1) AND ((PPJBTP15=5) OR (PPJBTP15=6)) ) PPJBXX15=550. IF ( (CKANFAT2=1) AND ( PPJBTP15=1 ) ) PPJBXX15=548. IF ( (CKANFAT2=2) AND ((PPJBTP15=1) OR (PPJBTP15=5) OR (PPJBTP15=6)) ) PPJBXX15=545. COMPUTE CKANSPO=1. IF ( (500 < SSXXJOB) AND (SSXXJOB < 554) ) CKANSPO=0. IF ( (592 < SSXXJOB) AND (SSXXJOB < 599) ) CKANSPO=0. IF ( SSXXJOB = 608 ) CKANSPO=0. IF ( (688 < SSXXJOB) AND (SSXXJOB <1000) ) CKANSPO=0. COMPUTE CKANSPO2=0. IF ( (CKANSPO=1) AND (SSSZSTFA>4) AND (SSSZSTFA<12) ) CKANSPO2=1. IF ( (CKANSPO=1) AND (SSSZSTFA=12)) CKANSPO2=2. IF ( (CKANSPO2=1) AND ((SSTP12JB=5) OR (SSTP12JB=6)) ) SSXXJOB=550. IF ( (CKANSPO2=1) AND ( SSTP12JB=1 ) ) SSXXJOB=548. IF ( (CKANSPO2=2) AND ((SSTP12JB=1) OR (SSTP12JB=5) OR (SSTP12JB=6)) ) SSXXJOB=545. /***** occupational status recode by MURASE 2008 0912 *****/ /***** 本人と父の従業上地位作成シンタックス *****/ Compute jobstats= tp12job. Compute jobsttf = ppjbtp15. Recode jobstats (1=1)(2,3,4,7,8=3) (5,6=2)(9,10,13=4)(11,12=5)(else=9). Recode jobsttf (1=1)(2,3,4,7,8,9=3) (5,6=2) (10,11=5)(else=9). VALUE LABELS jobstats jobsttf 1 'executive' 2 'manager' 3 'fulltime' 4 'parttime' 5 'selfemply' 9 'nojob' . *missing values jobstats jobsttf (9). Compute jobsttf2 = ppjbtp15. Recode jobsttf2 (1,5,6=1)(2,3,4,7,8,9=3) (10,11=5)(else=9). VALUE LABELS jobsttf2 1 'manager' 3 'fulltime' 5 'selfemply' 9 'nojob' . /***** OLD SSM SYOKUGYO 8BUNRUI BY MURASE 19960707 *****/ /***** JGSS2005 you BY MURASE 20080930 *****/ /***** 9 HA MUSYOKU 10 HA GAKUSEI 11 HA SONOTA *****/ /***** 1995ＳＳＭ調査B票シンタックスをJGSS用に書き換えたもの*****/ /***** *****/ /***** ★このＳＳＭ８分類とは旧８分類である *****/ /***** 専門 管理 事務 販売 熟練 半熟練 非熟練 農林漁業 *****/ /***** なおJGSS2005は母職種(本人仕事内容)の問がない *****/ /***** SSM95B調査票にてQ4は現職 Q5は初職 Q11は父職 *****/ /***** Q13は母職 Q17は配偶者職 である *****/ /*****★JGSS05調査票にてXXJOBは現職 XXFSTJBは初職 *****/ /***** PPJBXX15は父職本人１５歳時 SSXXJOBは配偶者職である*****/ COMPUTE Q4EJOB=XXJOB. COMPUTE Q5EJOB=XXFSTJB. COMPUTE Q11EJOB=PPJBXX15. COMPUTE Q17EJOB=SSXXJOB. RECODE Q4EJOB Q5EJOB Q11EJOB Q17EJOB (SYSMIS=986). RECODE Q4EJOB Q5EJOB Q11EJOB Q17EJOB ( 501 THRU 544 = 1) ( 609 THRU 610 = 1) ( 615 = 1) ( 545 THRU 553 = 2) ( 608 = 2) ( 554 THRU 565 = 3) ( 586 = 3) ( 590 = 3) ( 593 THRU 598 = 3) ( 616 THRU 619 = 3) ( 566 THRU 577 = 4) ( 582 THRU 585 = 4) ( 587 THRU 589 = 4) ( 579 = 5) ( 581 = 5) ( 628 = 5) ( 631 = 5) ( 633 = 5) ( 635 THRU 642 = 5) ( 651 = 5) ( 654 THRU 656 = 5) ( 658 = 5) ( 660 = 5) ( 623 THRU 624 = 5) ( 626 = 5) ( 643 THRU 644 = 5) ( 647 = 5) ( 661 THRU 666 = 5) ( 668 = 5) ( 670 THRU 671 = 5) ( 673 THRU 675 = 5) ( 677 THRU 681 = 5) ( 684 = 5) ( 580 = 6) ( 606 THRU 607 = 6) ( 611 THRU 614 = 6) ( 625 = 6) ( 627 = 6) ( 629 THRU 630 = 6) ( 632 = 6) ( 634 = 6) ( 645 THRU 646 = 6) ( 648 THRU 650 = 6) ( 652 THRU 653 = 6) ( 657 = 6) ( 659 = 6) ( 667 = 6) ( 669 = 6) ( 672 = 6) ( 676 = 6) ( 578 = 7) ( 591 THRU 592 = 7) ( 620 THRU 622 = 7) ( 682 THRU 683 = 7) ( 685 THRU 688 = 7) ( 599 THRU 605 = 8) ( 689 THRU 691, 986= 9) ( 988 THRU 991 =10) ( 987 =99) ( 998 THRU 999 =99) ( 701 = 3) ( 702 = 5) ( 703 = 1) ( 704 = 6) ( 705 =99) ( 706 =99) ( 707 =99) ( 708 =99) (ELSE=11). COMPUTE JOB8=Q4EJOB. COMPUTE JOB8FATH=Q11EJOB. COMPUTE JOB8SYO=Q5EJOB. COMPUTE JOB8SPO=Q17EJOB. VARIABL LABELS JOB8 '旧職業８分類' /JOB8FATH '旧父職業８分類' /JOB8SYO '旧初職８分類' /JOB8SPO '旧配偶者職業８分類' . VALUE LABELS JOB8, JOB8FATH, JOB8SYO, JOB8SPO 1'専門' 2 '管理' 3 '事務' 4 '販売' 5 '熟練' 6 '半熟練' 7 '非熟練' 8 '農林' 9 '無職'. /***** SOGO SYOKUGYO 12 BUNRUI BY MURASE 19960707 *****/ /***** JGSS2005 you BY MURASE 20080930 *****/ /***** 本人現職 ****/ /***** ****/ /***** 安田原の総合職業12分類 『1995ＳＳＭ調査職業分類』か****/ /***** 『社会調査ハンドブック』参照 *****/ /***** 上の旧８分類作成プログラムをもとに分類しているので注意***/ /***** *****/ /*****★以下のJOBAは従業上の地位 JOBDは従業先の規模 *****/ /***** JOBDは従業先規模 JOBEは上記で作った旧８分類 ****/ /***** JOBYが最終的にできる総合職業分類 ****/ /***** つまり2005年の従業先規模の変数名はSZTTLSTA ****/ /***** JOBAの変数名や中身が年により違うことに注意 ****/ /***** ****/ /***** JOBA従業上の地位が自営か家族従業のものは自営と分類 *****/ /***** ただし自営かつ従業先規模500人以上は管理とする *****/ /***** JOBD従業先の規模1000人以上と公務員は大企業と分類 *****/ /***** 職種は管理職だが従業先規模4人以下の場合は *****/ /***** 自営ノンマニュアルと分類 *****/ /***** ただし、旧８分類が専門職はすべて専門職と分類 *****/ /***** ただし、旧８分類が農業はすべて農業と分類 *****/ COMPUTE JOBY=99. COMPUTE JOBA=TP12JOB. COMPUTE JOBD=SZTTLSTA. COMPUTE JOBE=Q4EJOB. IF (JOBE EQ 6 OR JOBE EQ 7) JOBY=11. IF ((JOBY EQ 11) AND (JOBD EQ 9)) JOBY=9. IF ((JOBY EQ 11) AND (JOBD EQ 10)) JOBY=9. IF ((JOBY EQ 11) AND (JOBD EQ 11)) JOBY=9. IF ((JOBY EQ 11) AND (JOBD EQ 12)) JOBY=9. IF (JOBE EQ 5) JOBY=10. IF ((JOBY EQ 10) AND (JOBD EQ 9)) JOBY=8. IF ((JOBY EQ 10) AND (JOBD EQ 10)) JOBY=8. IF ((JOBY EQ 10) AND (JOBD EQ 11)) JOBY=8. IF ((JOBY EQ 10) AND (JOBD EQ 12)) JOBY=8. IF (JOBE EQ 4) JOBY=7. IF (JOBE EQ 3) JOBY=6. IF ((JOBY EQ 6 OR JOBY EQ 7) AND (JOBD EQ 9)) JOBY=5. IF ((JOBY EQ 6 OR JOBY EQ 7) AND (JOBD EQ 10)) JOBY=5. IF ((JOBY EQ 6 OR JOBY EQ 7) AND (JOBD EQ 11)) JOBY=5. IF ((JOBY EQ 6 OR JOBY EQ 7) AND (JOBD EQ 12)) JOBY=5. IF (JOBA EQ 11 OR JOBA EQ 12) JOBY=2. IF ((JOBY EQ 2) AND (JOBE GE 1 AND JOBE LE 4)) JOBY=1. IF ((JOBY EQ 1 OR JOBY EQ 2) AND (JOBD EQ 8)) JOBY=4. IF ((JOBY EQ 1 OR JOBY EQ 2) AND (JOBD EQ 9)) JOBY=4. IF ((JOBY EQ 1 OR JOBY EQ 2) AND (JOBD EQ 10)) JOBY=4. IF ((JOBY EQ 1 OR JOBY EQ 2) AND (JOBD EQ 11)) JOBY=4. IF (JOBE EQ 2) JOBY=4. IF ((JOBY EQ 4) AND (JOBD EQ 1 OR JOBD EQ 2)) JOBY=1. IF (JOBE EQ 1) JOBY=3. IF (JOBE EQ 8) JOBY=12. IF (JOBE EQ 9) JOBY=96. IF (JOBE EQ 10) JOBY=98. IF (JOBE EQ 99) JOBY=99. COMPUTE SOGOJ=JOBY. RECODE JOBY(6,7=6)(8,9=7)(10,11=8)(12=9). /***** SOGOJKは総合職業分類簡略版９分類 *****/ COMPUTE SOGOJK=JOBY. COMPUTE SOGOJKB=JOBY. RECODE SOGOJKB(4=5)(5=6)(6=7)(7=8)(8=9)(9=10). IF ((JOBY EQ 4) AND (JOBD EQ 9 OR JOBD EQ 10)) SOGOJKB=4. IF ((JOBY EQ 4) AND (JOBD EQ 11 OR JOBD EQ 12)) SOGOJKB=4. /***** さらに簡略化した分類 *****/ COMPUTE SOGOJ7=SOGOJK. RECODE SOGOJ7(5,6=5)(7,8=6)(9=7). COMPUTE SOGOJ6=SOGOJ7. RECODE SOGOJ6(1=3)(2=6)(3=1)(4=2)(5=4)(6=5)(7=6). VALUE LABELS SOGOJ 1 '自営ノン' 2 '自営マニ' 3 '専門' 4 '管理' 5 '大Ｗ' 6 '中小事務' 7 '中小販売' 8 '大熟練' 9 '大非熟練' 10 '中小熟練' 11 '中小非熟練' 12 '農業' 96 '無職' 98 '学生' /JOBY,SOGOJK 1 '自営ノン' 2 '自営マニ' 3 '専門' 4 '管理' 5 '大Ｗ' 6 '中小Ｗ' 7 '大Ｂ' 8 '中小Ｂ' 9 '農業' 96 '無職' 98 '学生' /SOGOJKB 1 '自営ノン' 2 '自営マニ' 3 '専門' 4 '大管理' 5 '小管理' 6 '大Ｗ' 7 '中小Ｗ' 8 '大Ｂ' 9 '中小Ｂ' 10 '農業' 96 '無職' 98 '学生' . /***** SOGO SYOKUGYO BUNRUI SYOSYOKU 19980318 *****/ /***** JGSS2005 you BY MURASE 20080930 *****/ /***** 本人初職 ****/ /***** ****/ /***** 安田原の総合職業12分類『社会調査ハンドブック』参照 *****/ /***** *****/ /***** 以下のJOBAは従業上の地位 JOBDは従業先の規模 *****/ /***** JOBA従業上の地位が自営か家族従業のものは自営と分類 *****/ /***** ただし自営かつ従業先規模500人以上は管理とする *****/ /***** JOBD従業先の規模1000人以上と公務員は大企業と分類 *****/ /***** 職種は管理職だが従業先規模4人以下の場合は *****/ /***** 自営ノンマニュアルと分類 *****/ /***** ただし、旧８分類が専門職はすべて専門職と分類 *****/ /***** ただし、旧８分類が農業はすべて農業と分類 *****/ COMPUTE JOBYSYO=99. COMPUTE JOBASYO=TP12FSTJ. COMPUTE JOBDSYO=SZSTFFST. COMPUTE JOBESYO=Q5EJOB. IF (JOBESYO EQ 6 OR JOBESYO EQ 7) JOBYSYO=11. IF ((JOBYSYO EQ 11) AND (JOBDSYO EQ 9)) JOBYSYO=9. IF ((JOBYSYO EQ 11) AND (JOBDSYO EQ 10)) JOBYSYO=9. IF ((JOBYSYO EQ 11) AND (JOBDSYO EQ 11)) JOBYSYO=9. IF ((JOBYSYO EQ 11) AND (JOBDSYO EQ 12)) JOBYSYO=9. IF (JOBESYO EQ 5) JOBYSYO=10. IF ((JOBYSYO EQ 10) AND (JOBDSYO EQ 9)) JOBYSYO=8. IF ((JOBYSYO EQ 10) AND (JOBDSYO EQ 10)) JOBYSYO=8. IF ((JOBYSYO EQ 10) AND (JOBDSYO EQ 11)) JOBYSYO=8. IF ((JOBYSYO EQ 10) AND (JOBDSYO EQ 12)) JOBYSYO=8. IF (JOBESYO EQ 4) JOBYSYO=7. IF (JOBESYO EQ 3) JOBYSYO=6. IF ((JOBYSYO EQ 6 OR JOBYSYO EQ 7) AND (JOBDSYO EQ 9)) JOBYSYO=5. IF ((JOBYSYO EQ 6 OR JOBYSYO EQ 7) AND (JOBDSYO EQ 10)) JOBYSYO=5. IF ((JOBYSYO EQ 6 OR JOBYSYO EQ 7) AND (JOBDSYO EQ 11)) JOBYSYO=5. IF ((JOBYSYO EQ 6 OR JOBYSYO EQ 7) AND (JOBDSYO EQ 12)) JOBYSYO=5. IF (JOBASYO EQ 11 OR JOBASYO EQ 12) JOBYSYO=2. IF ((JOBYSYO EQ 2) AND (JOBESYO GE 1 AND JOBESYO LE 4)) JOBYSYO=1. IF ((JOBYSYO EQ 1 OR JOBYSYO EQ 2) AND (JOBDSYO EQ 8)) JOBYSYO=4. IF ((JOBYSYO EQ 1 OR JOBYSYO EQ 2) AND (JOBDSYO EQ 9)) JOBYSYO=4. IF ((JOBYSYO EQ 1 OR JOBYSYO EQ 2) AND (JOBDSYO EQ 10)) JOBYSYO=4. IF ((JOBYSYO EQ 1 OR JOBYSYO EQ 2) AND (JOBDSYO EQ 11)) JOBYSYO=4. IF (JOBESYO EQ 2) JOBYSYO=4. IF ((JOBYSYO EQ 4) AND (JOBDSYO EQ 1 OR JOBDSYO EQ 2)) JOBYSYO=1. IF (JOBESYO EQ 1) JOBYSYO=3. IF (JOBESYO EQ 8) JOBYSYO=12. IF (JOBESYO EQ 9) JOBYSYO=96. IF (JOBESYO EQ 10) JOBYSYO=98. IF (JOBESYO EQ 99) JOBYSYO=99. COMPUTE SOGOJSYO=JOBYSYO. RECODE JOBYSYO(6,7=6)(8,9=7)(10,11=8)(12=9). COMPUTE SOGOJKSY=JOBYSYO. COMPUTE SOJKSYO2=JOBYSYO. RECODE SOJKSYO2(4=5)(5=6)(6=7)(7=8)(8=9)(9=10). IF ((JOBYSYO EQ 4) AND (JOBDSYO EQ 9 OR JOBDSYO EQ 10)) SOJKSYO2=4. IF ((JOBYSYO EQ 4) AND (JOBDSYO EQ 11 OR JOBDSYO EQ 12)) SOJKSYO2=4. /***** SOGO SYOKUGYO BUNRUI FATHER BY MURASE 19980126 *****/ /***** JGSS2005 you BY MURASE 20080930 *****/ /***** 以下のJOBAは従業上の地位 JOBDは従業先の規模 *****/ /***** 父の従業先規模は回答選択肢が少ないので *****/ /***** 300人以上と公務員を大企業、29人以下を小企業とした *****/ /***** *****/ /***** JOBA従業上の地位が自営か家族従業のものは自営と分類 *****/ /***** ただし自営かつ従業先規模300人以上は管理とする *****/ /***** JOBD従業先の規模300人以上と公務員は大企業と分類 *****/ /***** 職種は管理職だが従業先規模29人以下の場合は *****/ /***** 自営ノンマニュアルと分類 *****/ /***** ただし、旧８分類が専門職はすべて専門職と分類 *****/ /***** ただし、旧８分類が農業はすべて農業と分類 *****/ COMPUTE JOBYFATH=99. COMPUTE JOBAFATH=PPJBTP15. COMPUTE JOBDFATH=PPJBSZ15. COMPUTE JOBEFATH=Q11EJOB. IF ( JOBEFATH EQ 6 OR JOBEFATH EQ 7) JOBYFATH=11. IF ((JOBYFATH EQ 11) AND (JOBDFATH EQ 4)) JOBYFATH=9. IF ((JOBYFATH EQ 11) AND (JOBDFATH EQ 5)) JOBYFATH=9. IF (JOBEFATH EQ 5) JOBYFATH=10. IF ((JOBYFATH EQ 10) AND (JOBDFATH EQ 4)) JOBYFATH=8. IF ((JOBYFATH EQ 10) AND (JOBDFATH EQ 5)) JOBYFATH=8. IF (JOBEFATH EQ 4) JOBYFATH=7. IF (JOBEFATH EQ 3) JOBYFATH=6. IF ((JOBYFATH EQ 6 OR JOBYFATH EQ 7) AND (JOBDFATH EQ 4)) JOBYFATH=5. IF ((JOBYFATH EQ 6 OR JOBYFATH EQ 7) AND (JOBDFATH EQ 5)) JOBYFATH=5. IF (JOBAFATH EQ 10 OR JOBAFATH EQ 11) JOBYFATH=2. IF ((JOBYFATH EQ 2) AND (JOBEFATH GE 1 AND JOBEFATH LE 4)) JOBYFATH=1. IF ((JOBYFATH EQ 1 OR JOBYFATH EQ 2) AND (JOBDFATH EQ 4)) JOBYFATH=4. IF ((JOBYFATH EQ 1 OR JOBYFATH EQ 2) AND (JOBDFATH EQ 5)) JOBYFATH=4. IF (JOBEFATH EQ 2) JOBYFATH=4. IF ((JOBYFATH EQ 4) AND (JOBDFATH EQ 1 OR JOBDFATH EQ 2)) JOBYFATH=1. IF (JOBEFATH EQ 1) JOBYFATH=3. IF (JOBEFATH EQ 8) JOBYFATH=12. IF (JOBEFATH EQ 9) JOBYFATH=96. IF (JOBEFATH EQ 10) JOBYFATH=98. IF (JOBEFATH EQ 99) JOBYFATH=99. COMPUTE SOGOJFAT=JOBYFATH. RECODE JOBYFATH(6,7=6)(8,9=7)(10,11=8)(12=9). /***** SOGOJKFAは総合職業分類簡略版９分類の父のもの *****/ COMPUTE SOGOJKFA=JOBYFATH. COMPUTE SOGOJKF2=JOBYFATH. RECODE SOGOJKF2(4=5)(5=6)(6=7)(7=8)(8=9)(9=10). IF ((JOBYFATH EQ 4) AND (JOBDFATH EQ 4 OR JOBDFATH EQ 5)) SOGOJKF2=4. /***** さらに簡略化した分類 *****/ COMPUTE SOGOJ7F=SOGOJKFA. RECODE SOGOJ7F(5,6=5)(7,8=6)(9=7). COMPUTE SOGOJ6F=SOGOJ7F. RECODE SOGOJ6F(1=3)(2=6)(3=1)(4=2)(5=4)(6=5)(7=6). /***** 職業分類のラベル *****/ VALUE LABELS SOGOJ7,SOGOJ7F 1 '自営ノンマニ' 2 '自営マニ' 3 '専門' 4 '管理' 5 'ノンマニュアル' 6 'マニュアル' 7 '農業' 96 '無職' 98 '学生' /SOGOJ6,SOGOJ6F 1 '専門' 2 '管理' 3 '自営ノンマニ' 4 'ノンマニュアル' 5 'マニュアル' 6 '自営マニ・農業'96 '無職' 98 '学生' VALUE LABELS SOGOJ,SOGOJSYO,SOGOJFAT 1 '自営ノン' 2 '自営マニ' 3 '専門' 4 '管理' 5 '大Ｗ' 6 '中小事務' 7 '中小販売' 8 '大熟練' 9 '大非熟練' 10 '中小熟練' 11 '中小非熟練' 12 '農業' 96 '無職' 98 '学生' /JOBY,SOGOJK,SOGOJKSY,SOGOJKFA 1 '自営ノン' 2 '自営マニ' 3 '専門' 4 '管理' 5 '大Ｗ' 6 '中小Ｗ' 7 '大Ｂ' 8 '中小Ｂ' 9 '農業' 96 '無職' 98 '学生' /SOGOJKB,SOJKSYO2,SOGOJKF2 1 '自営ノン' 2 '自営マニ' 3 '専門' 4 '大管理' 5 '小管理' 6 '大Ｗ' 7 '中小Ｗ' 8 '大Ｂ' 9 '中小Ｂ' 10 '農業' 96 '無職' 98 '学生' . /***** 女性用総合職業分類簡略版を試しに作ってみたもの *****/ /***** 管理とブルーカラーは少数なので合併した　　主婦は無職 *****/ COMPUTE SOGOJKF=SOGOJK. RECODE SOGOJKF (5=4)(6=5)(7=6)(8=6)(9=7) ( 96=8) ( 98=9) . VALUE LABELS SOGOJKF 1 '自営ノン' 2 '自営マニ' 3 '専門' 4 '管理・大Ｗ' 5 '中小Ｗ' 6 '大・中小Ｂ' 7 '農業' 8 '無職' 9 '学生' . /***** SSM SIN 8BUNRUI BY MURASE 20030801 *****/ /***** JGSS2005 you BY MURASE 20080930 *****/ /***** ★新総合８分類　原盛山『社会階層』東大出版　用語解説か ****/ /***** 『９５ＳＳＭ調査シリーズ１』２００ページ参照 ****/ /***** 上の旧８分類シンタックスを使って分類しているので注意 *****/ /***** 以下のJOBAは従業上の地位 JOBDは従業先の規模 *****/ /***** JOBA従業上の地位が自営か家族従業のものは自営と分類 *****/ /***** JOBD従業先の規模300人以上と公務員は大企業と分類 *****/ /***** 旧８分類が熟練、半熟練、非熟練かつ従業上地位が経営は、自営ブルーと分類***/ /***** 旧８分類が管理、事務、販売かつ従業上地位が経営は、自営ホワイトと分類*****/ /***** ただし、旧８分類が専門職はすべて専門職と分類 *****/ /***** ただし、旧８分類が農業はすべて農業と分類 *****/ COMPUTE JOBS8=99. COMPUTE JOBA=TP12JOB. COMPUTE JOBD=SZTTLSTA. COMPUTE JOBE=JOB8. IF (JOBE EQ 5 OR JOBE EQ 6 OR JOBE EQ 7) JOBS8=6. IF ((JOBS8 EQ 6) AND (JOBD EQ 7)) JOBS8=5. IF ((JOBS8 EQ 6) AND (JOBD EQ 8)) JOBS8=5. IF ((JOBS8 EQ 6) AND (JOBD EQ 9)) JOBS8=5. IF ((JOBS8 EQ 6) AND (JOBD EQ 10)) JOBS8=5. IF ((JOBS8 EQ 6) AND (JOBD EQ 11)) JOBS8=5. IF ((JOBS8 EQ 6) AND (JOBD EQ 12)) JOBS8=5. IF ((JOBS8 EQ 6) AND (JOBA EQ 1) AND (JOBD NE 12)) JOBS8=7. IF (JOBE EQ 2 OR JOBE EQ 3 OR JOBE EQ 4) JOBS8=3. IF ((JOBS8 EQ 3) AND (JOBA EQ 1) AND (JOBD NE 12)) JOBS8=4. IF ((JOBS8 EQ 3) AND (JOBD EQ 7)) JOBS8=2. IF ((JOBS8 EQ 3) AND (JOBD EQ 8)) JOBS8=2. IF ((JOBS8 EQ 3) AND (JOBD EQ 9)) JOBS8=2. IF ((JOBS8 EQ 3) AND (JOBD EQ 10)) JOBS8=2. IF ((JOBS8 EQ 3) AND (JOBD EQ 11)) JOBS8=2. IF ((JOBS8 EQ 3) AND (JOBD EQ 12)) JOBS8=2. IF ( JOBA EQ 11 OR JOBA EQ 12 ) JOBS8=7. IF ((JOBS8 EQ 7) AND (JOBE EQ 2)) JOBS8=4. IF ((JOBS8 EQ 7) AND (JOBE EQ 3)) JOBS8=4. IF ((JOBS8 EQ 7) AND (JOBE EQ 4)) JOBS8=4. IF (JOBE EQ 1) JOBS8=1. IF (JOBE EQ 8) JOBS8=8. IF (JOBE EQ 9) JOBS8=96. IF (JOBE EQ 10) JOBS8=98. IF (JOBE EQ 99) JOBS8=99. COMPUTE sin8job=JOBS8. MISSING VALUES sin8job (96, 98, 99). VALUE LABELS sin8job JOBS8 1 '専門' 2 '大Ｗ' 3 '中小Ｗ' 4 '自営Ｗ' 5 '大Ｂ' 6 '中小Ｂ' 7 '自営Ｂ' 8 '農業' 96 '無職' 98 '学生' 99 '無回答' . /***** SSM SIN 8BUNRUI FATHER BY MURASE 20030801 ****/ /***** JGSS2005 you BY MURASE 20080930 ****/ /***** ★新総合８分類　原盛山『社会階層』東大出版　用語解説か ****/ /***** 『９５ＳＳＭ調査シリーズ１』２００ページ参照 ****/ /***** 上の旧８分類シンタックスを使って分類しているので注意 *****/ COMPUTE JOBT8=99. COMPUTE JOBAFA=PPJBTP15. COMPUTE JOBDFA=PPJBSZ15. COMPUTE JOBEF=JOB8FATH. IF (JOBEF EQ 5 OR JOBEF EQ 6 OR JOBEF EQ 7) JOBT8=6. IF ((JOBT8 EQ 6) AND (JOBDFA EQ 4)) JOBT8=5. IF ((JOBT8 EQ 6) AND (JOBDFA EQ 5)) JOBT8=5. IF ((JOBT8 EQ 6) AND (JOBAFA EQ 1) AND (JOBDFA NE 5)) JOBT8=7. IF (JOBEF EQ 2 OR JOBEF EQ 3 OR JOBEF EQ 4) JOBT8=3. IF ((JOBT8 EQ 3) AND (JOBAFA EQ 1) AND (JOBDFA NE 5)) JOBT8=4. IF ((JOBT8 EQ 3) AND (JOBDFA EQ 4)) JOBT8=2. IF ((JOBT8 EQ 3) AND (JOBDFA EQ 5)) JOBT8=2. IF ( JOBAFA EQ 10 OR JOBAFA EQ 11 ) JOBT8=7. IF ((JOBT8 EQ 7) AND (JOBEF EQ 2)) JOBT8=4. IF ((JOBT8 EQ 7) AND (JOBEF EQ 3)) JOBT8=4. IF ((JOBT8 EQ 7) AND (JOBEF EQ 4)) JOBT8=4. IF (JOBEF EQ 1) JOBT8=1. IF (JOBEF EQ 8) JOBT8=8. IF (JOBEF EQ 9) JOBT8=96. IF (JOBEF EQ 10) JOBT8=98. IF (JOBEF EQ 99) JOBT8=99. COMPUTE sin8jobf=JOBT8. MISSING VALUES sin8jobf (96, 98, 99). VALUE LABELS sin8jobf JOBT8 1 '専門' 2 '大Ｗ' 3 '中小Ｗ' 4 '自営Ｗ' 5 '大Ｂ' 6 '中小Ｂ' 7 '自営Ｂ' 8 '農業' 96 '無職' 98 '学生' 99 '無回答' . /***** 年齢と学歴 *****/ /***** 年齢と学歴 *****/ /***** age recode by MURASE *****/ COMPUTE NENDAI =AGEb. RECODE NENDAI(15 THRU 29 =2)(30 THRU 39 =3)(40 THRU 49 =4) (50 THRU 59 =5)(60 THRU 69 =6)(70 THRU 98 =7) . COMPUTE NENDAI2 =NENDAI. RECODE NENDAI2 (2,3 =2)(4,5 =4)(6,7=6). /***** gakureki wo kyoiku nensu ni henkan *****/ COMPUTE EDU=xxlstsch. COMPUTE EDUF=pplstsch. COMPUTE EDUM=mmlstsch. COMPUTE EDUS=sslstsch. RECODE EDU,EDUF,EDUM,EDUS (1=6)(2=8)(3,4=11)(5=13)(6=14)(7=17)(8=9)(9=12)(10=14) (11=16)(12=18)(13=99). /***** GAKUREKI KATEGORI SAKUSEI *****/ COMPUTE EDUCT =xxlstsch. COMPUTE EDUCTF =pplstsch. RECODE EDUCT EDUCTF (1=9) (2=9)(3,4=12)(5,6=14)(7=16) (8=9)(9=12)(10=14)(11,12=16)(13=99). COMPUTE EDUCT2 =xxlstsch. COMPUTE EDUCTF2 =pplstsch. RECODE EDUCT2 EDUCTF2 (1=9) (2=9)(3,4=12)(5,6,7=16) (8=9)(9=12)(10=16)(11,12=16)(13=99). missing values EDUCT EDUCTF EDUCT2 EDUCTF2 (99). /***** dummy hensu sakusei *****/ COMPUTE SEXDM=SEXa-1. COMPUTE SELFEMPL =0. IF (jobstats= 5) SELFEMPL =1. /***** 注意 データ人数を減らす処理 *****/ /***** 注意 データ人数を減らす処理 *****/ /***** 注意 データ人数を減らす処理 *****/ /***** 年齢　２０から６９まで *****/ /***** 絞りたいときは行頭星マークとる *****/ *select if AGEb >19. *select if AGEb <70. CROSSTABS /TABLES=sin8jobf BY sin8job BY sexa.