$prat =& $mbPrescription->_ref_praticien; $tagCode4 = "labo code4"; $idSantePratCode4 = new CIdSante400(); $idSantePratCode4->loadLatestFor($prat, $tagCode4); // Chargement de l'id400 "labo code9" du praticien $tagCode9 = "labo code9"; $idSantePratCode9 = new CIdSante400(); $idSantePratCode9->loadLatestFor($prat, $tagCode9); // Si le praticien n'a pas d'id400, il ne peut pas envoyer la prescription if (!$idSantePratCode4->_id || !$idSantePratCode9->_id) { CAppUI::setMsg("Le praticien n'a pas d'id400 pour le catalogue LABO", UI_MSG_ERROR); redirect(); } $tagCatalogue = CAppUI::conf('dPlabo CCatalogueLabo remote_name'); // Chargement de la valeur de l'id externe de la prescription ==> retourne uniquement l'id400 $idexPresc = $mbPrescription->loadIdPresc(); // Gestion du sexe du patient $transSexe["m"] = "1"; $transSexe["f"] = "2"; $mbPatient =& $mbPrescription->_ref_patient; // Gestion du titre du patient if ($mbPatient->sexe == "m") { if ($mbPatient->_annees >= 0 && $mbPatient->_annees <= 3) { $titre_ = "Bébé garçon"; } if ($mbPatient->civilite == "enf") { $titre_ = "Enfant garçon"; } if ($mbPatient->civilite == "m") { $titre_ = "Monsieur"; }
$pdf->Ln(); $tagCatalogue = CAppUI::conf('dPlabo CCatalogueLabo remote_name'); // Chargement de l'id externe labo code4 du praticien // Chargement de l'id400 "labo code4" du praticien $tagCode4 = "labo code4"; $idex = new CIdSante400(); $idex->loadLatestFor($praticien, $tagCode4); if ($idex->id400) { $numPrat = $idex->id400; $numPrat = str_pad($numPrat, 4, '0', STR_PAD_LEFT); } else { $numPrat = "xxxx"; } // Chargement de la valeur de l'id externe de la prescription ==> retourne uniquement l'id400 if ($prescription->verouillee) { $idex = $prescription->loadIdPresc(); $idex = str_pad($idex, 4, '0', STR_PAD_LEFT); } else { $idex = "xxxx"; } $num = $numPrat . $idex; // Initialisation du code barre, => utilisation par default du codage C128B // L'affichage du code barre est realisee dans la fonction redefinie Footer dans la classe CPrescriptionPdf $pdf->SetBarcode($num, $prescription->_ref_praticien->_user_last_name, substr($prescription->_ref_patient->_view, 0, 20), $prescription->_ref_patient->sexe, CMbDT::transform($prescription->_ref_patient->naissance, null, "%d-%m-%y"), CMbDT::transform($prescription->date, null, "%d-%m-%y %H:%M")); // Tableau de classement des analyses par pack foreach ($prescription->_ref_prescription_items as $key => $item) { if ($item->_ref_pack->_id) { $tab_pack_prescription[$item->_ref_pack->_view][] = $item; } else { $tab_prescription[] = $item; }