eli04 - プログラム倉庫

<?php
require("calldata.php");
$sql = "SELECT * FROM plan";
$result = mysql_query($sql, $link);
while( $row = mysql_fetch_row( $result ) ){
$plan = $row[0];  
}  

$sql = "SELECT * FROM policy";
$result = mysql_query($sql, $link);
$n=1;
while( $row = mysql_fetch_row( $result ) ){
$matrix[$n][1] = $row[0];
$matrix[$n][2]  =$row[1];
$matrix[$n][3]  =$row[2];  
$matrix[$n][4]  =$row[3];  
$matrix[$n][5]  =$row[4];  
$n=$n+1;
}
$maxn=$n;
for ($n=1;$n<$maxn;$n++){
$num=$matrix[$n][1];
$px1[$num]=$matrix[$n][2];
$px2[$num]=$matrix[$n][3];
$px3[$num]=$matrix[$n][4];
$px4[$num]=$matrix[$n][5];
}

$popo= $px4[$plan];

$sql = "SELECT * FROM data0401";
$result = mysql_query($sql, $link);
$n=1;
while( $row = mysql_fetch_row( $result ) ){
$matrix[$n][1] = $row[0];
$matrix[$n][2] = $row[1];
$matrix[$n][3] = $row[2];
$matrix[$n][4] = $row[3];

$n=$n+1;
}
$maxn=$n;
for ($n=1;$n<$maxn;$n++){
$year= $matrix[$n][1];
$age= $matrix[$n][2];
$mpop[$year][$age][1]= $matrix[$n][3];
$fpop[$year][$age][1]= $matrix[$n][4];
}

$sql = "SELECT * FROM data0402";
$result = mysql_query($sql, $link);
$n=1;
while( $row = mysql_fetch_row( $result ) ){
$matrix[$n][1] = $row[0];
$matrix[$n][2] = $row[1];
$matrix[$n][3] = $row[2];
$matrix[$n][4] = $row[3];

$n=$n+1;
}
$maxn=$n;
for ($n=1;$n<$maxn;$n++){
$year= $matrix[$n][1];
$age= $matrix[$n][2];
$mpop[$year][$age][2]= $matrix[$n][3];
$fpop[$year][$age][2]= $matrix[$n][4];
}

$sql = "SELECT * FROM data0403";
$result = mysql_query($sql, $link);
$n=1;
while( $row = mysql_fetch_row( $result ) ){
$matrix[$n][1] = $row[0];
$matrix[$n][2] = $row[1];
$matrix[$n][3] = $row[2];
$matrix[$n][4] = $row[3];

$n=$n+1;
}
$maxn=$n;
for ($n=1;$n<$maxn;$n++){
$year= $matrix[$n][1];
$age= $matrix[$n][2];
$mpop[$year][$age][3]= $matrix[$n][3];
$fpop[$year][$age][3]= $matrix[$n][4];
}

$sql = "SELECT * FROM data0404";
$result = mysql_query($sql, $link);
$n=1;
while( $row = mysql_fetch_row( $result ) ){
$matrix[$n][1] = $row[0];
$matrix[$n][2] = $row[1];
$matrix[$n][3] = $row[2];
$matrix[$n][4] = $row[3];

$n=$n+1;
}
$maxn=$n;
for ($n=1;$n<$maxn;$n++){
$year= $matrix[$n][1];
$age= $matrix[$n][2];
$mpop[$year][$age][4]= $matrix[$n][3];
$fpop[$year][$age][4]= $matrix[$n][4];
}

$sql = "SELECT * FROM data0405";
$result = mysql_query($sql, $link);
$n=1;
while( $row = mysql_fetch_row( $result ) ){
$matrix[$n][1] = $row[0];
$matrix[$n][2] = $row[1];
$matrix[$n][3] = $row[2];
$matrix[$n][4] = $row[3];

$n=$n+1;
}
$maxn=$n;
for ($n=1;$n<$maxn;$n++){
$year= $matrix[$n][1];
$age= $matrix[$n][2];
$mpop[$year][$age][5]= $matrix[$n][3];
$fpop[$year][$age][5]= $matrix[$n][4];
}

$sql = "SELECT * FROM data0406";
$result = mysql_query($sql, $link);
$n=1;
while( $row = mysql_fetch_row( $result ) ){
$matrix[$n][1] = $row[0];
$matrix[$n][2] = $row[1];
$matrix[$n][3] = $row[2];
$matrix[$n][4] = $row[3];

$n=$n+1;
}
$maxn=$n;
for ($n=1;$n<$maxn;$n++){
$year= $matrix[$n][1];
$age= $matrix[$n][2];
$mpop[$year][$age][6]= $matrix[$n][3];
$fpop[$year][$age][6]= $matrix[$n][4];
}

$sql = "SELECT * FROM data0407";
$result = mysql_query($sql, $link);
$n=1;
while( $row = mysql_fetch_row( $result ) ){
$matrix[$n][1] = $row[0];
$matrix[$n][2] = $row[1];
$matrix[$n][3] = $row[2];
$matrix[$n][4] = $row[3];

$n=$n+1;
}
$maxn=$n;
for ($n=1;$n<$maxn;$n++){
$year= $matrix[$n][1];
$age= $matrix[$n][2];
$mpop[$year][$age][7]= $matrix[$n][3];
$fpop[$year][$age][7]= $matrix[$n][4];
}


$sql = "SELECT * FROM data0408";
$result = mysql_query($sql, $link);
$n=1;
while( $row = mysql_fetch_row( $result ) ){
$matrix[$n][1] = $row[0];
$matrix[$n][2] = $row[1];
$matrix[$n][3] = $row[2];
$matrix[$n][4] = $row[3];

$n=$n+1;
}
$maxn=$n;
for ($n=1;$n<$maxn;$n++){
$year= $matrix[$n][1];
$age= $matrix[$n][2];
$mpop[$year][$age][8]= $matrix[$n][3];
$fpop[$year][$age][8]= $matrix[$n][4];
}

$sql = "SELECT * FROM data0409";
$result = mysql_query($sql, $link);
$n=1;
while( $row = mysql_fetch_row( $result ) ){
$matrix[$n][1] = $row[0];
$matrix[$n][2] = $row[1];
$matrix[$n][3] = $row[2];
$matrix[$n][4] = $row[3];
$n=$n+1;
}
$maxn=$n;
for ($n=1;$n<$maxn;$n++){
$year= $matrix[$n][1];
$age= $matrix[$n][2];
$mpop[$year][$age][9]= $matrix[$n][3];
$fpop[$year][$age][9]= $matrix[$n][4];
}

for ($year=5;$year<106;$year++){
for ($age=0;$age<105;$age++){
$m[$year][$age]=$mpop[$year][$age][$popo]/10;
$f[$year][$age]=$fpop[$year][$age][$popo]/10;
}
}

$sql = "truncate eli04";
$exe= mysql_query($sql,$link);
for ($year=5;$year<106;$year++){
for ($age=0;$age<105;$age++){
$x=$m[$year][$age];
$y=$f[$year][$age];
$sql = "insert into eli04 values($year,$age,$x,$y)";
$exe= mysql_query($sql,$link);
}
}
$close_flag = mysql_close($link);
print("04 将来推計人口　計算終了");
?>