\n" ; echo " \n" ; echo " \n" ; echo " \n" ; echo " \n" ; echo " \n" ; echo " \n" ; echo "$titre \n" ; echo " \n" ; echo " \n" ; echo " \n" ; echo "
\n" ; echo "

 

\n" ; echo "

\n" ; echo " \n" ; echo "\"Valid \n" ; echo "\n" ; echo "   " ; echo "

\n" ; } ; # fin de fonction debutPage ########################################################### function debutPageCourt($titre) { ########################################################### echo "\n" ; echo " \n" ; echo " \n" ; echo " \n" ; echo " \n" ; echo " \n" ; echo " \n" ; echo "$titre \n" ; echo " \n" ; echo " \n" ; echo " \n" ; echo "
\n" ; echo "\n" ; echo "\n" ; echo "\n" ; echo "\n" ; echo "\n" ; echo "
\n" ; echo "$titre\n" ; echo "\n" ; echo "

\n" ; echo " \n" ; echo "\"Valid \n" ; echo "\n" ; echo "   " ; echo "

\n" ; echo "
\n" ; } ; # fin de fonction debutPage ####################################################################################### ####################################################################################### function finPage($opt="oui") { ####################################################################################### echo "

 

\n" ; if ($opt=="oui") { echo " \n" ; echo "\"retour \n" ; echo "   Retour au menu principal de gestion des biopsies \n" ; echo "(gH) \n" ; } else { echo ancre("http://www.info.univ-angers.fr/pub/gh/",'(gH)') ; } ; # fin de si echo "

 

\n" ; echo "
\n" ; echo " \n" ; echo " \n" ; } ; # fin de fonction finPage ########################################################### function debutPageRedir($titre,$temps="",$newUrl="http://www.google.fr/search?q=giluno") { ########################################################### echo "\n" ; echo " \n" ; echo " \n" ; echo " \n" ; echo " \n" ; echo "" ; echo " \n" ; echo " \n" ; echo "$titre \n" ; echo " \n" ; echo " \n" ; echo " \n" ; echo "
\n" ; echo "

 

\n" ; echo "

\n" ; echo " \n" ; echo "\"Valid \n" ; echo "\n" ; echo "   " ; echo "

\n" ; } ; # fin de fonction debutPage ####################################################################################### ####################################################################################### function debutSection() { ####################################################################################### echo "
\n" ; } ; # fin de fonction debutSection ####################################################################################### ####################################################################################### function finSection() { ####################################################################################### echo "
\n" ; echo "

 

\n" ; } ; # fin de fonction finSection ####################################################################################### ####################################################################################### # titre de niveau 1 function h1($chen) { echo "

$chen

\n" ; } ; # fin de fonction h1 # titre de niveau 2 function h2($chen) { echo "

$chen

\n" ; } ; # fin de fonction h2 # titre de niveau 3 function h3($chen) { echo "

$chen

\n" ; } ; # fin de fonction h3 # quelques span function grouge($chen) { echo " $chen \n" ; } ; # fin de fonction grouge function gbleu($chen) { echo " $chen \n" ; } ; # fin de fonction gbleu function gvert ($chen) { echo "$chen\n" ; } ; # fin de fonction gvert # pre, blockquote et les autres function finform() { echo "" ; } ; # fin de function finform function pre() { echo "
\n" ;
} ; # fin de function pre

function finpre() {
  echo "
\n" ; } ; # fin de function finblockquote function br() { echo "
\n" ; } ; # fin de function br function nbsp($rep=1) { echo copies(" ",$rep) ; } ; # fin de function nbsp function p() { echo "

\n" ; } ; # fin de function p function ptexte() { echo "

\n" ; } ; # fin de function p function finp() { echo "

\n" ; } ; # fin de function finp function center() { echo "
\n" ; } ; # fin de fonction center function fincenter() { echo "
\n" ; } ; # fin de function ficenter function blockquote() { echo "
\n" ; } ; # fin de function blockquote function finblockquote() { echo "
\n" ; } ; # fin de function finblockquote function table($bord=0,$pad=0,$cla="",$resum="?") { $defcla = "" ; if (strlen($cla)>0) { $defcla = "class='$cla'" ; } ; echo "\n" ; } ; # fin de fonction table function fintable() { echo "
\n" ; } ; # fin de function fintable function tr() { echo "\n" ; } ; # fin de function tr function trtd() { echo "\n" ; } ; # fin de function trtd function fintr() { echo "\n" ; } ; # fin de function fintr function fintdtr() { echo "\n" ; } ; # fin de function fintdtr function fintdtd() { echo "\n" ; } ; # fin de function fintdtd function td($aligne="L") { if (strtoupper($aligne)=="R") { echo "\n" ; } elseif (strtoupper($aligne)=="C") { echo "\n" ; } else { echo "\n" ; } ; # fin si } ; # fin de function td function fintd() { echo "\n" ; } ; # fin de function fintd function tdk($aligne) { if (strtoupper($aligne)=="R") { echo "\n" ; } else { echo "" ; } ; # fin si } ; # fin de function td function fintdk() { echo "\n\n" ; } ; # fin de function fintd # on passe la chaine en rouge foncé (gras) function ghRouge ($chen) { return("$chen") ; } ; # fin de fonction ghRouge # on passe la chaine en bleu foncé (gras) function ghBleu ($chen) { return("$chen") ; } ; # fin de fonction ghBleu ####################################################################################### ####################################################################################### function ancre( $href , $nomh ) { return "$nomh" ; } ; # fin de fonction ancre ####################################################################################### function showurlcmtbr($chen,$cmt) { # affiche un lien suivi de br echo "$cmt
" ; } ; # fin de fonction showurlcmtbr ####################################################################################### function showurlcmt($chen,$cmt) { # affiche un lien echo "$cmt" ; } ; # fin de fonction showurlcmt ####################################################################################### # affiche une url en "href" et en "cmt function showurl($chen) { showurlcmt($chen,$chen) ; } ; # fin de fonction showurl ####################################################################################### # affiche une url en "href" et en "cmt" suivi de br function showurlbr($chen) { showurlcmtbr($chen,$chen) ; } ; # fin de fonction showurl ####################################################################################### ?> $query \n" ; } ; $retqu = mysql_query($query) ; $tligr = mysql_fetch_array($retqu) ; $nbenr = $tligr["count($nomChamp)"] ; return($nbenr) ; } # fin function comptageparNom ########################################################### function comptageparReference($nomChamp,$valeurChamp,$nomTable,$nomBase="") { ########################################################### $dbgGh = 1 ; # 0 en normal, 1 pour debug connexionMysql(0) ; if ($nomBase=="") { $nomBase = nomBaseFromLieu() ; } ; $query = "use $nomBase " ; $retqu = mysql_query($query) ; $query = "select count($nomChamp) from $nomTable where $nomChamp=$valeurChamp" ; if ($dbgGh==1) { echo "
 $query \n
" ; } ; $retqu = mysql_query($query) ; $tligr = mysql_fetch_array($retqu) ; $nbenr = $tligr["count($nomChamp)"] ; return($nbenr) ; } # fin function comptageparReference ########################################################### function useBase($nomBase="") { ########################################################### connexionMysql() ; if ($nomBase=="") { $nomBase= nomBaseFromLieu() ; } ; $query = "use $nomBase " ; $retqu = mysql_query($query) ; } # fin function useBase ########################################################### function montreChamp($nomChamp,$nomTable,$nomIndex="",$nomChamp2="",$nomChamp3="") { ########################################################### $que = "select $nomChamp " ; if (strlen(trim($nomChamp2))>0) { $que .= " , $nomChamp2 " ; } ; if (strlen(trim($nomChamp3))>0) { $que .= " , $nomChamp3 " ; } ; $que .= " from $nomTable " ; ## echo "

REQUETE $que

\n" ; if (!$nomIndex=="") { $que .= " order by $nomIndex " ; } ; $res = mysql_query($que) ; blockquote() ; $nb = 0 ; echo "" ; echo "\n" ; echo "" ; echo "" ; if (strlen(trim($nomChamp2))>0) { echo "" ; } ; if (strlen(trim($nomChamp3))>0) { echo "" ; } ; echo "\n" ; while ($ligr=mysql_fetch_array($res)) { $nb++ ; echo "\n" ; echo "" ; echo "" ; if (strlen(trim($nomChamp2))>0) { echo "" ; } ; # fin si if (strlen(trim($nomChamp3))>0) { echo "" ; } ; # fin si echo "\n" ; } ; # fin de tant que echo "
  Numéro     $nomChamp     $nomChamp2     $nomChamp3  
$nb      $ligr[0]    $ligr[1]    $ligr[2]  
" ; finblockquote() ; } # fin function montreChamp ##################################################### function listePresents($adj="") { global $masculin,$nomchamp,$nomtable,$nomindex,$nomchamp2,$nomchamp3,$fintitre ; ##################################################### $nl = nbLignes($nomtable) ; if ($nl>0) { $th2 = "Liste des $fintitre $adj présent" ; if ($masculin==0) { $th2 .= "e" ; } ; $th2 .= "s" ; h2($th2) ; montreChamp($nomchamp,$nomtable,$nomindex,$nomchamp2,$nomchamp3) ; } ; # fin si } # fin function listePresents ########################################################### function dejavu($motac,$nomChamp,$nomTable) { ########################################################### $query = "select count(*) from $nomTable where $nomChamp =\"$motac\" " ; $retqu = mysql_query($query) ; $tligr = mysql_fetch_array($retqu) ; $nbenr = $tligr["count(*)"] ; return($nbenr) ; } # fin de fonction dejavu ########################################################### function insertionValeur($laValeur,$nomChamp,$nomTable) { ########################################################### $nl = nbLignes($nomTable) ; $nl++ ; $query = " insert into $nomTable values ( $nl, \"$laValeur\" ) " ; mysql_query($query) ; } # fin fonction insertionValeur ########################################################### function insertionMedecin($laValeur,$laValeur2,$laValeur3,$nomTable) { ########################################################### global $nomchamp ; # vérification d'usage sur les champs $err = 0 ; $laValeur = strtoupper($laValeur) ; if (strlen(trim($laValeur))==0) { erreurSaisie(1,"nom du médecin") ; $err++ ; } ; # fin saisie $laValeur2 = initialeMajuscule($laValeur2) ; if (strlen(trim($laValeur2))==0) { erreurSaisie(1,"prénom du médecin") ; $err++ ; } ; # fin saisie $laValeur3 = strtoupper($laValeur3) ; if (strlen(trim($laValeur3))==0) { erreurSaisie(1,"initiales du médecin") ; $err++ ; } ; # fin saisie ## si la saisie est considérée comme correcte, ## il ne faut pas saisir un médecin déja saisi if ($err>0) { veuillezCorriger() ; } else { $pdm = dejavu($laValeur,$nomchamp,$nomTable) ; if ($pdm>0) { h1(" Le nom \"$laValeur\" existe déjà.") ; $ladj = "" ; } else { $ladj = "désormais" ; $nl = nbLignes($nomTable) ; $nl++ ; $query = " insert into $nomTable values ( $nl, \"$laValeur\" , \"$laValeur2\", \"$laValeur3\" ) " ; #pre() ; #echo " $query\n" ; #finpre() ; mysql_query($query) ; h1(" le nouveau médecin nommé(e) \"$laValeur\" a été inséré.") ; } ; # fin si sur pdm $nl = nbLignes($nomTable) ; if ($nl>0) { listePresents($ladj) ; } ; # fin si sur nl } ; # fin de si sur err } # fin fonction insertionMedecin ########################################################### function refBiopsieEnClair($vvrefb) { ########################################################### $bec = "???" ; $cha = "refbiopsieCHU" ; $que = " select $cha from biopsies where idbiopsie = $vvrefb " ; $rdq = mysql_query($que) ; $tdr = mysql_fetch_array($rdq) ; if (isset($tdr[$cha])) { $bec = $tdr[$cha] ; } ; return($bec) ; } # fin fonction refBiopsieEnClair ########################################################### function refTypeLameEnClair($vvreftl) { ########################################################### $tlec = "???" ; $cha = "typelame" ; $que = " select $cha from typeslames where idtypelame = $vvreftl " ; $rdq = mysql_query($que) ; $tdr = mysql_fetch_array($rdq) ; if (isset($tdr[$cha])) { $tlec = $tdr[$cha] ; } ; return($tlec) ; } # fin fonction refTypeLameEnClair ########################################################### function refLameEnClair($vrefb,$vreftl,$vndtyp,$vnomTable) { ########################################################### $p1 = refBiopsieEnClair($vrefb) ; $p2 = refTypeLameEnClair($vreftl) ; $p3 = $vndtyp ; $rlec = $p1."_".$p2."-".$p3 ; return($rlec) ; } # fin fonction refLameEnClair ########################################################### function patientFromIdbiopsie($vrefb) { ########################################################### #$npfib = "?????" ; # nom #$ppfib = "???" ; # prénom #$ch1 = "pat_prenom" ; #$ch2 = "pat_nom" ; #$que = " select $ch1,$ch2 from patients, biopsies where refpatient=idpatient and idbiopsie=$vrefb" ; #$rdq = mysql_query($que) ; #$tdr = mysql_fetch_array($rdq) ; #if (isset($tdr[$ch1])) { $ppfib = $tdr[$ch1] ; } ; #if (isset($tdr[$ch2])) { $npfib = $tdr[$ch2] ; } ; #return($ppfib." ".$npfib) ; return(" Jean DUPOND (simulation d'information fournie par le Sgl DIAMIC).") ; } # fin fonction patientFromIdbiopsie ########################################################### function insertionLame($refb,$reftl,$ndtyp,$nomTable) { ########################################################### global $nomchamp ; # vérification d'usage sur le champ numéro 3 $err = 0 ; if (strlen(trim($ndtyp))==0) { erreurSaisie(1,"numéro dans le type") ; $err++ ; } ; # fin saisie if ((strlen(trim($ndtyp))>0) and (!is_numeric($ndtyp))) { erreurSaisie(2,"numéro dans le type") ; $err++ ; } ; # fin saisie ## si la saisie est considérée comme correcte, ## il ne faut pas saisir un médecin déja saisi if ($err>0) { veuillezCorriger() ; } else { $pdm = lameDejavue($refb,$reftl,$ndtyp,$nomTable) ; $refLame = " \"$refb\" A COMPLETER $ndtyp " ; $refLame = refLameEnClair($refb,$reftl,$ndtyp,$nomTable) ; if ($pdm>0) { h1(" La lame $refLame existe déjà.") ; blockquote() ; $pab = patientFromIdbiopsie($refb) ; h1(" le patient associé est : $pab ") ; finblockquote() ; h1(" Saisie annulée.") ; } else { $nl = nbLignes($nomTable) ; $nl++ ; $query = " insert into $nomTable values ( $nl, $refb , $reftl, $ndtyp ) " ; #echo "
 $query
\n" ; mysql_query($query) ; h1(" la lame $refLame a été insérée.") ; } ; # fin si sur pdm } ; # fin de si sur err } # fin fonction insertionLame ########################################################### function insertionImage($reflame,$lefrag,$nomTable) { ########################################################### global $nomchamp ; $err = 0 ; if (strlen(trim($reflame))==0) { erreurSaisie(1,"référence de lame") ; $err++ ; } ; # fin saisie if (strlen(trim($lefrag))==0) { erreurSaisie(1,"position du fragment") ; $err++ ; } ; # fin saisie ## si la saisie est considérée comme correcte, ## il ne faut pas saisir un médecin déja saisi if ($err>0) { veuillezCorriger() ; } else { $nl = nbLignes($nomTable) ; $nl++ ; $query = " insert into $nomTable values ( $nl , $reflame, $lefrag , 1, 20 ) " ; #echo "
 $query
\n" ; mysql_query($query) ; h1(" l'image a été insérée.") ; } ; # fin de si sur err } # fin fonction insertionImage ########################################################### function lameDejavue($larefb,$lareftl,$lendtyp,$lenomTable) { ########################################################### $ndc = "count(*)" ; $que = "select $ndc from lames where refbiopsie=$larefb and reftyplame=$lareftl and numtype=$lendtyp " ; #echo "
$que
" ; $res = mysql_query($que) ; $ldr = mysql_fetch_array($res) ; $nbv = $ldr[$ndc] ; return($nbv) ; } # fin fonction lameDeja ########################################################### function select_jour ($jour=""){ ########################################################### echo "\n" ; } # fin fonction select_jour ########################################################### function select_mois ($mois=""){ ########################################################### $mois_liste = array('Janvier','Février','Mars','Avril','Mai','Juin','Juillet','Août','Septembre','Octobre','Novembre','Décembre'); echo "\n" ; } # fin fonction select_mois ########################################################### function select_an ($an=""){ ########################################################### echo "\n" ; } # fin fonction select_an ########################################################### function select_sexe() { ########################################################### echo '' ; nbsp(5) ; echo "Homme " ; echo '' ; nbsp(5) ; echo "Femme " ; } # fin fonction select_sexe ########################################################### function select_listeSql($nomTable,$idChamp,$nomChamp,$champComp="") { ########################################################### $comp = 0 ; if (strlen(trim($champComp))>0) { $comp = 1 ; } ; useBase() ; echo "\n" ; } # fin fonction select_listeSql ########################################################### function erreurSaisie($codeErr,$raisonErr) { ########################################################### if ($codeErr==1) { h1(" Erreur de saisie : le champ \"$raisonErr\" est vide.") ; } ; # fin si if ($codeErr==2) { h1(" Erreur de saisie : le champ \"$raisonErr\" est incorrect, on attend un nombre entier.") ; } ; # fin si } # fin function erreurSaisie ########################################################### function veuillezCorriger() { ########################################################### blockquote() ; echo h2("Suite aux erreurs, la saisie n'est pas validée.") ; echo h2("Veuillez revenir à la page précédente et corriger les données.") ; finblockquote() ; } # fin function veuillezCorriger() ########################################################### function nomCentreFromIdcentre($idce) { ########################################################### connexionMysql(0) ; $res = mysql_query("use test ") ; $ndc = "nom_centre" ; $res = mysql_query("select nom_centre from centres where idcentre=$idce") ; $ligr = mysql_fetch_array($res) ; $ndce = $ligr[$ndc] ; ## echo "
 le centre associé à $idce est $ndce
" ; return($ndce) ; } # fin function nomCentreFromIdcentre ########################################################### ########################################################### ?>
( ! ) Fatal error: Uncaught Error: Call to undefined function debutPageCourt() in /var/www/html/Fibrose/Aimg/index.php on line 13
( ! ) Error: Call to undefined function debutPageCourt() in /var/www/html/Fibrose/Aimg/index.php on line 13
Call Stack
#TimeMemoryFunctionLocation
10.0010358520{main}( ).../index.php:0