php38 - プログラム倉庫

<?php
require("calldata.php");
$sql = "SELECT * FROM eli27";
$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];
$n=$n+1;
}
$maxn=$n;
for ($n=1; $n < $maxn; $n++) {
$byear =$matrix[$n][1];
$mnew[$byear]=$matrix[$n][2];
$fnew[$byear]=$matrix[$n][3];
}

$sql = "SELECT * FROM eli72";
$result = mysql_query($sql, $link);
$n=1;
while( $row = mysql_fetch_row( $result ) ){
$matrix[$n][1] = $row[0];
$matrix[$n][2]  =$row[1];
$n=$n+1;
}
$maxn=$n;
for ($n=1; $n < $maxn; $n++) {
$age =$matrix[$n][1];
$mplus[$age]=$matrix[$n][2];  
}

$sql = "SELECT * FROM eli73";
$result = mysql_query($sql, $link);
$n=1;
while( $row = mysql_fetch_row( $result ) ){
$matrix[$n][1] = $row[0];
$matrix[$n][2]  =$row[1];
$n=$n+1;
}
$maxn=$n;
for ($n=1; $n < $maxn; $n++) {
$age =$matrix[$n][1];
$fplus[$age]=$matrix[$n][2];  
}

$sql = "SELECT * FROM data38";
$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];
$n=$n+1;
}
$maxn=$n;
for ($n=1; $n < $maxn; $n++) {
$byear =$matrix[$n][1];
$mage[$byear]=$matrix[$n][2];  
$fage[$byear]=$matrix[$n][3];  
}

for ($byear=1940; $byear <1951; $byear++) {
$mage[$byear]=60;  
$fage[$byear]=60;  
}

for ($byear=1970; $byear <2035; $byear++) {
$mage[$byear]=65;  
$fage[$byear]=65;  
}

$sql = "SELECT * FROM data383";
$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];
$matrix[$n][6]  =$row[5];
$matrix[$n][7] = $row[6];
$n=$n+1;
}
$maxn=$n;
for ($n=1; $n < $maxn; $n++) {
$age =$matrix[$n][1];
$mm=$matrix[$n][2]+$matrix[$n][3]+$matrix[$n][6]+$matrix[$n][7];  
$startmj[$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][2]  =$row[1];
$matrix[$n][3]  =$row[2];
$matrix[$n][4] = $row[3];
$matrix[$n][5]  =$row[4];
$matrix[$n][6]  =$row[5];
$matrix[$n][7] = $row[6];
$n=$n+1;
}
$maxn=$n;
for ($n=1; $n < $maxn; $n++) {
$age =$matrix[$n][1];
$ff=$matrix[$n][2]+$matrix[$n][3]+$matrix[$n][6]+$matrix[$n][7];  ;  
$startfj[$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];
$mde[$age]=$matrix[$n][2];
}

$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];
$fde[$age]=$matrix[$n][2];
}

for ($age=0; $age < 100; $age++) {
$mj[8][$age]=$startmj[$age];
$fj[8][$age]=$startfj[$age];
}

for ($age=60; $age < 70; $age++) {
$mj[8][$age]=$mj[8][$age]+$mplus[$age];
$fj[8][$age]=$fj[8][$age]+$fplus[$age];
}

for ($year=9; $year <100; $year++) {
for ($age=1; $age < 100; $age++) {
$mj[$year][$age]=(1-$mde[$age])*$mj[$year-1][$age-1];
$fj[$year][$age]=(1-$fde[$age])*$fj[$year-1][$age-1];
}
for ($age=60; $age < 66; $age++) {
$byear=$year+2000-$age;
$z1=0;
$z2=0;
if ($mage[$byear]==$age)$z1= $mnew[$byear];
if ($fage[$byear]==$age)$z2= $fnew[$byear];
$mj[$year][$age]=$mj[$year][$age]+$z1;
$fj[$year][$age]=$fj[$year][$age]+$z2;
}
}
$sql = "truncate eli38";
$exe= mysql_query($sql,$link);
for ($year=10;$year<100;$year++){
for ($age=0; $age < 100; $age++) {
$x=$mj[$year][$age];
$y=$fj[$year][$age];
$sql = "insert into eli38 values($year,$age,$x,$y)";
$exe= mysql_query($sql,$link);
}
}
$close_flag = mysql_close($link);
print("38 老齢年金 計算終了");
?>