public static function deleteSoiltype($obj_mainpacket)
{
$packet = $obj_mainpacket->packet;
$TblId = $packet[0];
$msg = "failed";
$result = 0;
$result_TblId = 0;
$retResult = BL_manageSoiltype::getSoiltypeListByTblId($TblId);
if ($retResult->type == 1) {
$obj_Soiltype = $retResult->data[0];
$obj_result2 = DAL_manageSoiltype::deleteSoiltype($obj_Soiltype->TblId);
if ($obj_result2->type == 1) {
$result = 1;
$result_TblId = $obj_Soiltype->TblId;
$msg = "success";
} else {
$msg = "Sorry!!! Problem occured while deleting this Soiltype";
}
} else {
$msg = "Sorry!!! The Soiltype you are tring to delete is not found";
}
$obj_mainpacket->returnValues = array($result, $obj_Soiltype->TblId, $msg);
$obj_mainpacket->main_setPacket();
}
