dr 05 - プログラム倉庫

<?php  
require("calldata.php");
$sql = "SELECT * FROM data05";
$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++){
$p1= $matrix[$n][1];
$p2= $matrix[$n][2];
$prate[$p1][$p2]= $matrix[$n][3];
}

for ($n=1;$n<12;$n++){
$mrate[$n][1]= $prate[$n][1];
$mrate[$n][2]= $prate[$n][2];
$mrate[$n][3]= $prate[$n][3];
$mrate[$n][4]= $prate[$n][4];
}


for ($n=1;$n<12;$n++){
$wrate[$n][1]= $prate[$n+11][1];
$wrate[$n][2]= $prate[$n+11][2];
$wrate[$n][3]= $prate[$n+11][3];
$wrate[$n][4]= $prate[$n+11][4];
}

for ($n=1;$n<12;$n++){
$drate[$n][1]= $prate[$n+22][1];
$drate[$n][2]= $prate[$n+22][2];
$drate[$n][3]= $prate[$n+22][3];
$drate[$n][4]= $prate[$n+22][4];
}


for ($year=6;$year<12;$year++){
for ($age=15;$age<70;$age++){
$n1 = ($year - 6) / 6 ;
$n2 =floor(($age - 10) / 5);
$mrourate[$year][$age] = $mrate[$n2][1] + $n1 * ($mrate[$n2][2]  - $mrate[$n2][1] );
$wrourate[$year][$age] = $wrate[$n2][1] + $n1 * ($wrate[$n2][2]  - $wrate[$n2][1] );
$drourate[$year][$age] = $drate[$n2][1] + $n1 * ($drate[$n2][2]  - $drate[$n2][1] );
}
}

for ($year=7;$year<18;$year++){
for ($age=15;$age<70;$age++){
$n1 = ($year - 12) / 6 ;
$n2 =floor(($age - 10) / 5);
$mrourate[$year][$age] = $mrate[$n2][2] + $n1 * ($mrate[$n2][3]  - $mrate[$n2][2] );
$wrourate[$year][$age] = $wrate[$n2][2] + $n1 * ($wrate[$n2][3]  - $wrate[$n2][2] );
$drourate[$year][$age] = $drate[$n2][2] + $n1 * ($drate[$n2][3]  - $drate[$n2][2]);
}
}

for ($year=18;$year<30;$year++){
for ($age=15;$age<70;$age++){
$n1 = ($year - 18) / 12 ;
$n2 =floor(($age - 10) / 5);
$mrourate[$year][$age] = $mrate[$n2][3] + $n1 * ($mrate[$n2][4]  - $mrate[$n2][3] );
$wrourate[$year][$age] = $wrate[$n2][3] + $n1 * ($wrate[$n2][4]  - $wrate[$n2][3] );
$drourate[$year][$age] = $drate[$n2][3] + $n1 * ($drate[$n2][4]  - $drate[$n2][3] );
}
}  

for ($year=30;$year<100;$year++){
for ($age=15;$age<70;$age++){
$n1 = ($year - 18) / 12 ;
$n2 =floor(($age - 10) / 5);
$mrourate[$year][$age] = $mrate[$n2][4] ;
$wrourate[$year][$age] = $wrate[$n2][4] ;
$drourate[$year][$age] = $drate[$n2][4] ;
}
}

$sql = "truncate ben05";
$exe= mysql_query($sql,$link);
for ($year=6;$year<100;$year++){
for ($age=15;$age<70;$age++){
$x=0.01*$mrourate[$year][$age];
$y=0.01*$wrourate[$year][$age];
$z=0.01*$drourate[$year][$age];
$sql = "insert into ben05 values($year,$age,$x,$y,$z)";
$exe= mysql_query($sql,$link);
}
}
$close_flag = mysql_close($link);

print("05 労働力率 計算終了");
?>