public static function isChildPerson_alresult($ALResultId, $ChildALResultId)
 {
     $ischild = false;
     $obj_retResult = DAL_managePerson_alresult::getPerson_alresultListByALResultId($ChildALResultId);
     //get child node
     if ($obj_retResult->type == 1) {
         $arr_Person_alresultList = $obj_retResult->data;
         $obj_Person_alresult = $arr_Person_alresultList[0];
         $arrParentIds = explode(",", $obj_Person_alresult->Url);
         foreach ($arrParentIds as $Person_alresultParentId) {
             if ($Person_alresultParentId == $ALResultId) {
                 $ischild = true;
             }
         }
     }
     return $ischild;
 }
function updatePerson_alresult($sessionkey, $appcode, $Person_alresultdata)
{
    $main_result = "<VPROFILERESULT>";
    $main_result .= "<AUTHSTATUS>0</AUTHSTATUS>";
    $userId = ValidateSession($sessionkey, $appcode);
    if ($userId > -1) {
        $main_result = "<AUTHSTATUS>1</AUTHSTATUS>";
        $obj_Person_alresult = new Person_alresult();
        foreach ($Userdata["[UPPERTEMPLATENAME"] as $key => $child) {
            switch ($key) {
                case "ALRESULTID":
                    $obj_Person_alresult->ALResultId = $child;
                    break;
                case "SUBJECTID":
                    $obj_Person_alresult->SubjectId = $child;
                    break;
                case "SCHOOLID":
                    $obj_Person_alresult->SchoolId = $child;
                    break;
                case "GRADE":
                    $obj_Person_alresult->Grade = $child;
                    break;
                case "LANGUAGE":
                    $obj_Person_alresult->Language = $child;
                    break;
                case "DATETIME":
                    $obj_Person_alresult->DateTime = $child;
                    break;
                case "PERSONID":
                    $obj_Person_alresult->PersonId = $child;
                    break;
            }
        }
        $obj_retResult_Person_alresult = DAL_managePerson_alresult::updatePerson_alresult($obj_Person_alresult);
        if ($obj_retResult_Person_alresult->type == 1) {
            $main_result .= "<RESULTSTATUS>1</RESULTSTATUS>";
            $main_result .= getPerson_alresultXml($obj_retResult_Person_alresult->data);
        } else {
            $main_result .= "<RESULTSTATUS>0</RESULTSTATUS>";
        }
    }
    $main_result .= "</VPROFILERESULT>";
    return $main_result;
}