============= u-c-f4 ====================== $$c //連結財務データセクション $f //処理対象企業フラグコマンド ==..(7004)1351,1353,1392,18962 //★日産,トヨタ,本田,三菱の日経会社コード順に指示 $n //企業名コマンド lst, //フラグgの企業のリスト出力 :n1, //企業名の最初の漢字2文字 :n2, // 次の漢字2文字 :n3, // その次の漢字2文字 $p //原数値プリントコマンド .... 【新項番3001】 売上高・営業収益 .... 【新項番3006】 営業利益 .... 【新項番3008】 受取利息・割引料・有価証券利息 .... 【新項番3009】 受取配当金 .... 【新項番3016】 支払利息・割引料 .... 【新項番3058】 当期利益 .... 【新項番5056】 従業員数(単位:人) .... 【新項番1026】 連結子会社数(単位:社) ,3001,3006,3008,3009,3016,3058,5056,1026 //項番指示(最初の30社までプリント) $r //期間限定コマンド 新期間指定(西暦年4桁表記) 1996.04,1997.03 //★1996年4月から1997年3月までの1996年度に限定 $c //クロスセクションコマンド flw,3001,,連結売上高 flw,3006,,連結営業利益 flw,3058,,連結当期利益 stk,2125,,連結株主資本 ========================== $$u //ユーザデータセクション $c //クロスセクション属性指示コマンド 0001,0004,生産台数;万台 //★ケース範囲,変量名;単位 $d //ユーザデータ内容入力コマンド ctype //データ内容パラメータ<ケースごと記述タイプ> 274 //★日産 世界生産台数1996年度実績 488 //★トヨタ 出所:日本経済新聞1998.5.8 216 //★本田 198 //★三菱 $l //入力変量名リスト ============================ $$v //変量分析セクション $a //変量記号割当コマンド N,:n1, //最初の企業名漢字2文字 A,:n2, //次の企業名漢字2文字 M,:n3, //その次の企業名漢字2文字 s,連結売上高 p,連結営業利益 i,連結当期利益 e,連結株主資本 c,生産台数 $t //変数変換コマンド =pr*(N,A,M,s,p,i,e,c) //数値プリント h=f>=(e)100 //株主資本が100百万円以上のフラグh r=(i/e*h)*100 //以上の条件hを満たすケースの連結ROE F=(1,-1,log100) //関数ベクトルF P=:ci(s) //ケース識別文字系列 =pr*(N,A,M,r,P) //数値プリント ============================= $$g //グラフセクション $p //プロットコマンド r,c,s //連結ROE(r),生産台数(c),連結売上高(s) $c //散布図コマンド r,c,*,P //連結ROE(r),生産台数(c),回帰線(*),ケース識別文字(P) $3 //3次元図コマンド r*i*e*P,F //縦軸r(対数*),横軸i(対数*),奥行軸e(対数*),印字(P),関数表示(F) ======================= 終了セクション $$