chosenID is $chosenID
“;*/ $servicemanInfo = getName($chosenID); $forename=$servicemanInfo[‘forename’]; $middle=$servicemanInfo [‘middle’]; $surname=$servicemanInfo[‘surname’]; $fullname=$forename.” “.$middle.” “.$surname; $ebBiography = getBiography($chosenID); $Pob = $ebBiography[‘birthplace’]; if (empty ($Pob)) { $Pob = “Not recorded”; } $PoD = $ebBiography[‘deathplace’]; if (empty ($PoD)) { $PoD = “Not recorded”; } $ebServRec = getServiceBasics($chosenID); if (empty ($JoinAge)) { $JoinAge = “Not recorded”; } $JoinRank = $ebServRec[‘rankJ’]; if (empty ($JoinRank)) { $JoinRank = “Not recorded”; } $JoinServNo = $ebServRec[‘serviceNo’]; if (empty ($JoinServNo)) { $JoinServNo = “Not recorded”; } $JoinMedals = $ebServRec[‘medalList’]; if (empty ($JoinMedals)) { $JoinMedals = “Not recorded”; } $JoinReg = $ebServRec[‘RegJ’]; $JoinBatt = $ebServRec[‘BattJ’]; $ebBirthDate = getOccasiondate($chosenID, ‘birth’, ‘names’, ‘ebID’); $ebDeathDate = getOccasionDate($chosenID, ‘death’, ‘names’, ‘ebID’); $ebJoinDate = getOccasionDate($chosenID, ‘DoJ’, ‘warrecords’, ‘wrID’); /* Now need to get regiment using $JoinReg as id and Battalion joined using $JoinBatt as ID */ $JoinRegName = getUnitDetail($JoinReg, ‘RegName’, ‘regiments’, ‘RegID’ ); $JoinBattName = getUnitDetail($JoinBatt, ‘BattName’, ‘battalions’, ‘BattID’); /*now look to see if there has been a transfer or promotion First decide if want to write a header for transfers or additional info using $HeadFlag*/ $HeadFlag = ‘0’; $Transfer = getTransfer($chosenID); if (! empty ($Transfer)) { $HeadFlag = ‘1’; $TransServNo = $Transfer[‘NewServiceNo’]; $TransRank = $Transfer[‘NewRank’]; $TransDate = $Transfer[‘DofT’]; $TransReg = $Transfer[‘NewUnitID’]; $TransRegName = getUnitDetail($TransReg, ‘RegName’, ‘regiments’, ‘RegID’); $TransBatt = $Transfer[‘NewBatt’]; $TransBattName = getUnitDetail($TransBatt, ‘BattName’, ‘battalions’, ‘BattID’); /* For debugging print “TransRegName has value $TransRegName“; print “TransBatt has value $TransBatt
“; print “TransBattName has value $TransBattName
“; */ } /*Look for any additional info*/ $ExtraInfo = getExtraInfo($chosenID); $HaveInfo = $ExtraInfo[‘information’]; if (! empty ($HaveInfo)) { $HeadFlag = ‘1’; } $StPIndex = “”; $cgwcIndex = “”; $ebMemorials = getMemorial($chosenID); $StPIndex = $ebMemorials[‘stpeterRef’]; if (! empty ($StPIndex)) { $StPWebRef = “ St Peters“; } $cgwcIndex = $ebMemorials[‘cgwcRef’]; if (! empty ($cgwcIndex)) { $WarGraveRef = “ War Grave“; } $unit = ‘Army Regiment’; $subunit = ‘Battalion’; if (($JoinReg == 23 ) or ($JoinReg == 30)) { $unit = ‘Naval Unit’; $subunit = ‘Ship’; } echo “
Service biography of $fullname.
\n”;
echo “
\n”;
echo ““;
echo (“Click here to view civilian biography
\n”); echo “
“;
echo “\n”); echo “
\n”; echo “
\n”; echo “
\n”; echo “
\n”; echo “
\n”; echo “
\n”; echo “
\n”; echo “
\n”; echo “
\n”; echo “
\n”; echo “
\n”; if ((! empty ($StPIndex)) or (! empty ($cgwcIndex)) ) { echo “
\n”; } if ($HeadFlag == ‘1’) { echo (“
Additional Information
\n”); } if (! empty ($Transfer)) { if ((empty ($TransBatt)) or ($TransBatt == ‘1’)) { $TransBattName = “”; } if (! empty ($TransRank)) { $TransRankTxt = “with rank of $TransRank “; } else { $TransRankTxt = “”; } if (! empty ($TransServNo)) { $TransServNoTxt = “, service number $TransServNo”; } else { $TransServNoTxt = “”; } if (! empty ($TransDate)) { $TransDateTxt = “Date of transfer is $TransDate”; } else { $TransDateTxt = “Date of transfer not recorded”; } echo (“Transferred to $TransBattName $TransRegName $TransRankTxt $TransServNoTxt . $TransDateTxt
\n”); } /*Now write any additional information found */ if (! empty ($HaveInfo)) { echo ““; echo (“$HaveInfo”); echo ““; } [/insert_php]