<?

include_once 'lib/messages.php';
include_once 'lib/outils.php';
include_once 'lib/formulaire.php';
include_once 'lib/nusoap.php';
include('../www/services/parametrage/config.php');
  
/**
 *
 * Affichage du formulaire 
 * 
 * @param erreurMessage Message d'erreur à afficher
 * @param ok            Indique si le message est Ok (vert) ou une erreur (rouge)    
 *
 */           
function afficheFormulaire($message, $ok) {

  formulaireRechercheDDC("Recherche de dossiers", "ddcDossiers.php", $message, $ok);

}
  
/**
 *
 * Recherche DDC
 * 
 * @param commune  Code INSEE de la commune 
 * @param tdossier Type de dossier
 * @param annee    Année de recherche     
 *  
 */   
function recherche($commune, $tdossier, $annee) {
  
  if (!verificationParamRechercheDDC($commune, $tdossier, $annee, $message)) {
  
    afficheFormulaire($message, false);
    exit(0);
  }

  
  $soapclient = new nusoapclient($GLOBALS['ENDPOINT']."?wsdl",'wsdl');
  $soap_proxy = $soapclient->getProxy();
  
  // Préparation de l'appel
  $tabappel = array('GetEcranSecondaire', $_REQUEST['user'], $_REQUEST['pwd'], $_REQUEST['iduser'], $_REQUEST['session'] , $_REQUEST['idms'], 'SelDossier', '', utf8_decode('VL_DOSSELñID_DOSSIERðId_dossierððð1ðNUMBERð22ð12ð0ð1ð1ðððð1ð0ð0ððñID_MODELEðId_modeleððð2ðNUMBERð22ð12ð0ð0ð0ðððð1ð0ð0ððñCOMMUNECODEðCode communeððð3ðVARCHAR2ð6ððð0ð0ðððð1ð0ð0ððñCOMMUNEINSEECODEðCommuneððð4ðVARCHAR2ð6ððð0ð0ðððð1ð0ð4ððñID_SERVICEGESTVILLEðId_servicegestvilleððð5ðNUMBERð22ð12ð0ð0ð0ðððð1ð0ð0ððñID_SERVICEGESTEPCIðId_servicegestepciððð6ðNUMBERð22ð12ð0ð0ð0ðððð1ð0ð0ððñDOSSIERMODELECODEðType dossierððð7ðVARCHAR2ð3ððð0ð0ðððð1ð0ð-2ððñDOSSIERANNEEðAnnée du dossierððð8ðVARCHAR2ð4ððð0ð0ðððð1ð0ð-3ððñDOSSIERCODEINSTRUCTEURðCode instructeurððð9ðVARCHAR2ð4ððð0ð0ðððð1ð0ð0ððñDOSSIERNUMEROðN° dossierððð10ðNUMBERð22ð12ð0ð0ð0ðððð1ð0ð-2ððñDOSSIERNUMMODIFðN° modif.ððð11ðNUMBERð22ð12ð0ð0ð0ðððð1ð0ð0ððñDOSSIERNUMTRANSFðN° transf.ððð12ðNUMBERð22ð12ð0ð0ð0ðððð1ð0ð0ððñDOSSIERNOMðDossierððð13ðVARCHAR2ð100ððð0ð0ðððð1ð0ð6ððñID_DOSSIERPRECEDENTðId_dossierprecedentððð14ðNUMBERð22ð12ð0ð0ð0ðððð1ð0ð0ððñID_DOSSIERSUIVANTðId_dossiersuivantððð15ðNUMBERð22ð12ð0ð0ð0ðððð1ð0ð0ððñMODELENOMðNom modèleððð16ðVARCHAR2ð100ððð0ð0ðððð1ð0ð-6ððñMODELECOMMENTAIREðCommentairesððð17ðVARCHAR2ð1000ððð0ð0ðððð1ð0ð0ððñDATEDEPOTðDate dépôtððð18ðDATEð7ððð0ð0ðððð1ð0ð4ððñDATEDEPOTMAXðDépôt max.ððð19ðDATEð7ððð0ð0ðððð1ð0ð-4ððñDATERECEPTIONEPCIðDate réception Epciððð20ðDATEð7ððð0ð0ðððð1ð0ð4ððñDATERECEPTIONEPCIMAXðRéception Epci max.ððDATERECEPTIONEPCIMAXð21ðDATEð7ððð0ð0ðððð1ð0ð-4ððñREFCADðParcelle(s)ððð22ðVARCHAR2ð1000ððð0ð0ðððð1ð0ð5ððñDEMANDQUALITEðDemandeur (qualité)ððð23ðVARCHAR2ð200ððð0ð0ðððð1ð0ð4ððñDEMANDNOMðDemandeur (nom)ððð24ðVARCHAR2ð200ððð0ð0ðððð1ð0ð4ððñDEMANDPRENOMðDemandeur (prénom)ððð25ðVARCHAR2ð200ððð0ð0ðððð1ð0ð4ððñDEMANDEURðDemandeurððð26ðVARCHAR2ð602ððð0ð0ðððð1ð0ð0ððñREPRESQUALITEðReprésentant (qualité)ððð27ðVARCHAR2ð200ððð0ð0ðððð1ð0ð4ððñREPRESNOMðReprésentant (nom)ððð28ðVARCHAR2ð200ððð0ð0ðððð1ð0ð4ððñREPRESPRENOMðReprésentant (prénom)ððð29ðVARCHAR2ð200ððð0ð0ðððð1ð0ð4ððñREPRESENTANTðReprésentantððð30ðVARCHAR2ð602ððð0ð0ðððð1ð0ð0ððñPROPQUALITEðPropriétaire (qualité)ððð31ðVARCHAR2ð200ððð0ð0ðððð1ð0ð4ððñPROPNOMðPropriétaire (Nom)ððð32ðVARCHAR2ð200ððð0ð0ðððð1ð0ð4ððñPROPPRENOMðPropriétaire (prénom)ððð33ðVARCHAR2ð200ððð0ð0ðððð1ð0ð4ððñPROPRIETAIREðPropriétaireððð34ðVARCHAR2ð602ððð0ð0ðððð1ð0ð0ððñAUTQUALITEðAuteur (qualité)ððð35ðVARCHAR2ð200ððð0ð0ðððð1ð0ð4ððñAUTNOMðAuteurððð36ðVARCHAR2ð200ððð0ð0ðððð1ð0ð4ððñAUTPRENOMðAuteur (prénom)ððð37ðVARCHAR2ð200ððð0ð0ðððð1ð0ð4ððñAUTEURðAuteurððð38ðVARCHAR2ð602ððð0ð0ðððð1ð0ð0ððñNUMVOIE1ðNuméro de voieððð39ðVARCHAR2ð201ððð0ð0ðððð1ð0ð2ððñDOSADR1TYPEVOIEðType de voieððð40ðVARCHAR2ð100ððð0ð0ðððð1ð0ð3ððñDOSADR1LIBVOIEðLibellé de voieððð41ðVARCHAR2ð1100ððð0ð0ðððð1ð0ð5ððñNUMVOIE2ðN° voieððð42ðVARCHAR2ð201ððð0ð0ðððð1ð0ð2ððñDOSADR2TYPEVOIEðType de voieððð43ðVARCHAR2ð100ððð0ð0ðððð1ð0ð3ððñDOSADR2LIBVOIEðLibellé de voieððð44ðVARCHAR2ð1100ððð0ð0ðððð1ð0ð5ððñDOSSIERDESIGNATIONðDésignationððDésignation du dossierð45ðVARCHAR2ð100ððð0ð0ðððð1ð0ð5ððñDOSQUARTIERðQuartierððð46ðVARCHAR2ð100ððð0ð0ðððð1ð0ð4ððñDOSSECTEURðSecteurððð47ðVARCHAR2ð100ððð0ð0ðððð1ð0ð4ððñINSTRUCTEURNOMðInstructeur Villeððð48ðVARCHAR2ð100ððð0ð0ðððð1ð0ð6ððñINSTRUCTEUREPCINOMðInstructeur Epciððð49ðVARCHAR2ð100ððð0ð0ðððð1ð0ð6ððñPROJETSHONðShonððð50ðNUMBERð22ð12ð2ð0ð0ðm²ððð1ð0ð4ððñPROJETSHOBðShobððð51ðNUMBERð22ð12ð2ð0ð0ðm²ððð1ð0ð4ððñLIMINSTRINITDATEðDate limite instruction initialeððð52ðDATEð7ððð0ð0ðððð1ð0ð0ððñLIMINSTRMODIFDATEðDate limite instruction modifiéeððð53ðDATEð7ððð0ð0ðððð1ð0ð4ððñLIMITEINSTRUCTIONDATEðDate limite instructionððð54ðDATEð7ððð0ð0ðððð1ð0ð4ððñSIGNATUREDATEðSignatureððð55ðVARCHAR2ð50ððð0ð0ðððð1ð0ð4ððñSIGNATURENATUREðDécisionððð56ðVARCHAR2ð500ððð0ð0ðððð1ð0ð5ððñLIMITEVALIDDATEðDate limite validitéððð57ðDATEð7ððð0ð0ðððð1ð0ð4ððñDECISPUBLICDATEðPublicationððð58ðDATEð7ððð0ð0ðððð1ð0ð0ððñCHANTDOCDATEðDate DOCððð59ðDATEð7ððð0ð0ðððð1ð0ð4ððñCHANTDAACTDATEðDate DAACTððð60ðDATEð7ððð0ð0ðððð1ð0ð4ððñCHANTCONFOR1DATEðConformité 1 (date)ððð61ðDATEð7ððð0ð0ðððð1ð0ð4ððñCHANTCONFOR1DECISIONðConformité 1ððð62ðVARCHAR2ð100ððð0ð0ðððð1ð0ð4ððñCHANTCONFOR2DATEðDate Conformité 2ððð63ðDATEð7ððð0ð0ðððð1ð0ð4ððñCHANTCONFOR2DECISIONðConformité 2ððð64ðVARCHAR2ð100ððð0ð0ðððð1ð0ð4ððñCOMMUNEINSEEDIRECTIONðCOMMUNEINSEEDIRECTIONððCOMMUNEINSEEDIRECTIONð65ðVARCHAR2ð1ððð0ð0ðððð1ð0ð0ððñCOMMUNEINSEENOMðCOMMUNEINSEENOMððCOMMUNEINSEENOMð66ðVARCHAR2ð100ððð0ð0ðððð1ð0ð0ððñDOSTRANSCONSABFðDOSTRANSCONSABFððDOSTRANSCONSABFð67ðNUMBERð22ð1ð0ð0ð0ðððð1ð0ð0ðð'),
        utf8_decode('ððð'.$commune.'ððð'.$tdossier.'ð'.$annee.'ððððððððððððððððððððððððððððððððððððððððððððððððððððððððððð'),
        '','','','','' );
//  print_r($tabappel);

  $debut = time();
  
  // Appel
  $returnValue = $soap_proxy->ddc($tabappel);
//  $message = print_r($returnValue, true);
//  echo $message;

  // Durée d'exécution
  $fin = time();
  $duree = $fin - $debut;
  
  // Gestion des erreurs
  if (isset($returnValue['faultstring'])) {
    $message = $returnValue['faultstring'];
    afficheFormulaire($message, false);
    exit(0);    
  }

  if (trim($returnValue[13]) != "") {
    $message = $returnValue[13];
    afficheFormulaire($message, false);
    exit(0);    
  }
  
  $message = "</b></font>Temps d'exécution : ".$duree."s<br/>";
  
  // Résultats trouvés
  if (trim($returnValue[9]) != "") {

    $tabDossiers = explode(utf8_decode('ñ'), $returnValue[9]);

    $message.= count($tabDossiers)." dossiers trouvés<br/>";
    
    $message.="<tr><td>".$curDossier[0]."</td><td>".$curDossier[12]."</td></tr>";
    
    $message.='<table border="1"><tr><td><b>Id Dossier</b></td><td><b>Nom dossier</b></td></tr>';
    for ($i = 0; $i < count($tabDossiers); $i++) {
      $curDossier = explode(utf8_decode('ð'), $tabDossiers[$i]);
      $message.= "<tr><td>".$curDossier[0]."</td><td>".$curDossier[12]."</td></tr>";
    }
    $message.='</table><font><b>';
  
    afficheFormulaire($message, true);
  
  }
  else // Pas de résultats
    afficheFormulaire($message.MSG_AUCUN_DOSSIER_TROUVE."<font><b>", false);
  

}  
  

// Si les arguments du formulaire sont présents
if (isset($_REQUEST['reponse'])) {

  recherche($_REQUEST['commune'],
            $_REQUEST['tdossier'],
            $_REQUEST['annee']);

}
else {

  afficheFormulaire("", false);
}

?>