$ObjTuple->SetBasesD($ValBasesD);
 $ObjTuple->SetAutresBD($ValAutresBD);
 $ObjTuple->SetAtGL($ValAtGL);
 $ObjTuple->SetMA($ValMA);
 $ObjTuple->SetMCpt($ValMCpt);
 $ObjTuple->SetMP($ValMP);
 $ObjTuple->SetMCtrl($ValMCtrl);
 $ObjTuple->SetMGP($ValMGP);
 $ObjTuple->SetSujet($ValSujet);
 $ObjTuple->SetProg($ValProg);
 $ObjTuple->SetAnalyse($ValAnalyse);
 $ObjTuple->SetPG($ValPG);
 $ObjTuple->SetEI($ValEI);
 $ObjTuple->SetRqs($ValRqs);
 $ObjTuple->SetNPCI($ValNPCI);
 $ObjTuple->SetSTAG($ValSTAG);
 $ObjTuple->SetNbStag($ValNbStag);
 $ObjTuple->SetNbPS($ValNbPS);
 $ObjTuple->SetSEUL($ValSEUL);
 $ObjTuple->SetCOLLAB($ValCOLLAB);
 $ObjTuple->SetIST($ValIST);
 $ObjTuple->SetMIS($ValMIS);
 $ObjTuple->SetIR($ValIR);
 $ObjTuple->SetMIR($ValMIR);
 $ObjTuple->SetIT($ValIT);
 $ObjTuple->SetMIT($ValMIT);
 $ObjTuple->SetMT($ValMT);
 $ObjTuple->SetMMT($ValMMT);
 $ObjTuple->SetEmb($ValEmb);
 $ObjTuple->SetFK_User($ValTut);
 if ($IdentPK == 0) {