ｐｈｐ４０ - プログラム倉庫

<?php
require("calldata.php");
$sql = "SELECT * FROM eli38";
$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];
$mj[$year][$age]=$matrix[$n][3];
$fj[$year][$age]=$matrix[$n][4];
}

$sql = "SELECT * FROM data383";
$result = mysql_query($sql, $link);
$n=1;
while( $row = mysql_fetch_row( $result ) ){
$matrix[$n][1] = $row[0];
$matrix[$n][12]  =$row[11];
$matrix[$n][13]  =$row[12];
$matrix[$n][14]  =$row[13];

$n=$n+1;
}
$maxn=$n;
for ($n=1; $n < $maxn; $n++) {
$age =$matrix[$n][1];
$mm=$matrix[$n][12]+$matrix[$n][13]+$matrix[$n][14];    
$startmi[$age]=$mm/10000;
}

$sql = "SELECT * FROM data384";
$result = mysql_query($sql, $link);
$n=1;
while( $row = mysql_fetch_row( $result ) ){
$matrix[$n][1] = $row[0];
$matrix[$n][12]  =$row[11];
$matrix[$n][13]  =$row[12];
$matrix[$n][14]  =$row[13];
$n=$n+1;
}
$maxn=$n;
for ($n=1; $n < $maxn; $n++) {
$age =$matrix[$n][1];
$ff=$matrix[$n][12]+$matrix[$n][13]+$matrix[$n][14];  
$startfi[$age]=$ff/10000;
}

$sql = "SELECT * FROM data381";
$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;
}
for ($n=1; $n < 100; $n++) {
$age =$matrix[$n][1];
$mjde[$age]=$matrix[$n][2];
$mide[$age]=$matrix[$n][4];
}

$sql = "SELECT * FROM data382";
$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;
}
for ($n=1; $n < 100; $n++) {
$age =$matrix[$n][1];
$fjde[$age]=$matrix[$n][2];
$fide[$age]=$matrix[$n][4];
}

$sql = "SELECT * FROM data385";
$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;
}
for ($n=1; $n < 116; $n++) {
$age =$matrix[$n][1];  
$mrate[$age]=$matrix[$n][3];
}


$sql = "SELECT * FROM data386";
$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;
}
for ($n=1; $n < 116; $n++) {
$age =$matrix[$n][1];  
$frate[$age]=$matrix[$n][3];
}


for ($age=0; $age < 100; $age++) {
$mi[8][$age]=$startmi[$age];
$fi[8][$age]=$startfi[$age];
}

for ($year=9; $year< 100; $year++) {
for ($age=10; $age < 100; $age++) {
$mi[$year][$age]=(1-$mide[$age])*$mi[$year-1][$age-1];
$fi[$year][$age]=(1-$fide[$age])*$fi[$year-1][$age-1];
}

for ($age=10; $age < 100; $age++) {
$mi[$year][$age]=$mi[$year][$age]+$mjde[$age]*$mrate[$age]*$mj[$year][$age];
$fi[$year][$age]=$fi[$year][$age]+$fjde[$age]*$frate[$age]*$fj[$year][$age];
}

}

$sql = "truncate eli40";
$exe= mysql_query($sql,$link);
for ($year=10;$year<100;$year++){
for ($age=60; $age <100; $age++) {
$x=$mi[$year][$age];
$y=$fi[$year][$age];
$sql = "insert into eli40 values($year,$age,$x,$y)";
$exe= mysql_query($sql,$link);
}
}
$close_flag = mysql_close($link);
print("40 遺族年金 計算終了");
?>