============= c-c-f4  ====================
$$c // 連結財務データセクション
$f        // 処理対象企業フラグコマンド
<g>==..(7103)03021,03022    //★業種が繊維の化合繊・綿紡績にフラグg
$n        // 企業名コマンド
lst,<g>             // フラグｇの企業一覧出力
:n1,<g>             // フラグｇの企業名の最初の漢字２文字
:n2,<g>             // フラグｇの企業名の次の漢字２文字
:n3,<g>             // フラグｇの企業名のその次の漢字２文字
$p        // 原数値プリントコマンド
....  【新項番3001】  売上高・営業収益
....  【新項番3052】  法人税・住民税及び事業税合計
....  【新項番3053】  法人税等調整額
....  【新項番1036】  税効果会計の採用フラグ（2000年3月期以降収録中止）
....  【新項番3058】  当期利益
....  【新項番5056】  従業員数（単位：人）
....  【新項番1026】  連結子会社数（単位：社）
....  【新項番1027】  （うち上場会社数）（単位：社）
....  【新項番1030】  持分法適用の非連結子会社・関連会社数（単位：社）
....  【新項番1031】  持分法非適用の非連結子会社・関連会社数（単位：社）
<g>,3001,3052,3053,1036,3058,5056,1026,1027,1030,1031
$r        // 期間限定コマンド
9604,9703           //★1996年４月から1997年３月
$c        // クロスセクション作成コマンド
flw,3001,<g>,sales            // 連結売上高
f-1,3001,<g>,sales(-1)        // 前年連結売上高
stk,1026,<g>,subsidiaries     // 連結子会社数
s-1,1026,<g>,subsidiaries(-1) // 前年連結子会社数
==============  変量分析セクション
$$v
$a      // 変量記号割当コマンド
n,:n1,<g>
a,:n2,<g>
m,:n3,<g>
s,sales             // 連結売上高
S,sales(-1)         // 前年連結売上高
u,subsidiaries      // 連結子会社数
U,subsidiaries(-1)  // 前年連結子会社数
$d     // 表示範囲指示コマンド
all             // 全範囲
$t     // 変数変換コマンド
x=(s-S)/S*100          // 連結売上高前年比増減率
P=:ci(s)               // 散布点識別文字変量
 =pr*(n,a,m,S,s,U,u,x,P)   // 数値プリント
$r    // 回帰コマンド
F,@"*,S=(U)        // 回帰係数ベクトルF  ＜前年＞
f,@"*,s=(u)        // 回帰係数ベクトルf  ＜当年＞
============== グラフセクション
$$g
$d    // 表示範囲指示コマンド
all         // 全範囲
$p    // プロットコマンド
x,Ss       // 連結売上高前年比増減率xと，別スケールで前年連結売上高S，当年連結売上高s
Uu         // 前年連結子会社数U，当年連結子会社数uを同一スケール
$c    // 散布（相関）図コマンド
s,S,*,P    // 縦軸s，横軸S，回帰線*，印字変量Ｐ
u,U,*,P    // 縦軸u，横軸U，回帰線*，印字変量Ｐ
S,U,*,P    // 縦軸S，横軸U，回帰線*，印字変量Ｐ ＜前年＞
s,u,*,P    // 縦軸s，横軸u，回帰線*，印字変量Ｐ ＜当年＞
$3    //３次元図コマンド
S,U, ,P,F,*   // 縦軸S，横軸U，奥行軸△，印字P，関数F，重ね合せ用保存* ＜前年＞
s,u, ,P,f,*   // 縦軸s，横軸u，奥行軸△，印字P，関数f，重ね合せ用保存* ＜当年＞
              // 重ね合せ図
============== 終了セクション
$$