$ObjTuple = new CNewInscript();
$ObjTuple->SetCiviliteTuteur($ValCiviliteTuteur);
$ObjTuple->SetNomTuteur(ProtectApos($ValNomTuteur));
$ObjTuple->SetPrenomTuteur(ProtectApos($PrenomTuteur));
$ObjTuple->SetTelTuteur($ValTelTuteur);
$ObjTuple->SetMailTuteur($ValMailTuteur);
$ObjTuple->SetFaxTuteur($ValFaxTuteur);
$ObjTuple->SetIs_IdemTuteur($ValIs_IdemTuteur);
$ObjTuple->SetCiviliteRespAdmin($ValCiviliteRespAdmin);
$ObjTuple->SetNomRespAdmin(ProtectApos($ValNomRespAdmin));
$ObjTuple->SetPrenomRespAdmin(ProtectApos($PrenomRespAdmin));
$ObjTuple->SetTelRespAdmin($ValTelRespAdmin);
$ObjTuple->SetMailRespAdmin($ValMailRespAdmin);
$ObjTuple->SetFaxRespAdmin($ValFaxRespAdmin);
$ObjTuple->SetNomE(ProtectApos($ValNomE));
$ObjTuple->SetAdr1(ProtectApos($ValAdr1));
$ObjTuple->SetAdr2(ProtectApos($ValAdr2));
$ObjTuple->SetCP($ValCP);
$ObjTuple->SetVille(ProtectApos($ValVille));
$ObjTuple->SetFK_Entreprise($ValFK_Entreprise);
$ObjTuple->Insert();
$StepNewInscript = 'Ack';
// Envoyer un mail au responsable des stages
// =========================================
$Sujet = 'Nouvel inscrit pour stage';
$Message = 'Inscription de : ' . $ValCiviliteTuteur . ' ' . $ValPrenomTuteur . ' ' . $ValNomTuteur . ' à valider';
$Dest = $MailResponsableStages;
if ($MachineHote == INFODOC) {
die(test);
mail($Dest, $Sujet, $Message);
}
