\r\n";
echo " \r\n";
// *** HTML - Entête
$headhtml.= "".trad("Informer d'une rupture")."
";
// *** HTML - Corps
$ficheArticle = getFicheArticle($itmref);
$itmdes = getItmDes($itmref);
$tclcod = $ficheArticle['TCLCOD_0'];
$stu = $ficheArticle['STU_0'];
$bodyhtml.= "OP : $op";
$bodyhtml.= "
";
$bodyhtml.= "[$tclcod] $itmref $itmdes";
/* ***************************************
*
* On va lister les allocations hors EXPED pour cet article.
* On pourra ensuite les envoyer au WS pour qu'il les desalloue
*
*/
$locMobile = $_SESSION['defloc'];
$QuaiGeneral = CLIPREPLOC;
# D/B.B./28.12.2016/MANTIS 0001179/Dés-allocation - Rupture - Préparation commande
// Récupère ttes les lignes de l'op et choisit la bonne avec le tablin
if ($tablin != "" and is_numeric($tablin)) {
$lignesop = ApplyLignesOpFilters(getLignesOp($op), $op);
$lignesop = $lignesop[$tablin];
}
# $QuaiClient = " ";
if (trim($_GET['cde'])!="") $cde = trim($_GET['cde']);
if (trim($_GET['cde'])!="") {
$cde = trim($_GET['cde']);
$locclient = getLocClient($cde);
}
if (trim($locclient)!="") $QuaiClient = $locclient;
else $QuaiClient = " ";
//D-DEVMLTCDE
if($_SESSION['agrege']!=true){
$sql = "SELECT
YOD.SOHNUM_0,
STA.ITMREF_0,
STA.ALLTYP_0,
STA.QTYSTU_0,
STA.STOFCY_0,
STA.STOCOU_0,
STA.SEQ_0,
STO.LOT_0,
STO.LOC_0,
STO.STA_0,
YOD.Y_OPLIG_0,
STL.SHLDAT_0
FROM
$dbdoss.YORDPREPD YOD,
$dbdoss.SORDERQ SOQ,
$dbdoss.STOALL STA,
$dbdoss.STOCK STO,
$dbdoss.STOLOT STL
WHERE
STO.STOCOU_0 = STA.STOCOU_0
AND STO.STOFCY_0 = STA.STOFCY_0
AND STO.LOC_0 <> '$locMobile'
AND STO.LOC_0 <> '$QuaiGeneral'
AND STO.LOC_0 <> '$QuaiClient'
AND STO.STOFCY_0 = '$site'
AND YOD.ITMREF_0 = '$itmref'
AND YOD.SOHNUM_0 = STA.VCRNUM_0
AND YOD.SOPLIN_0 = STA.VCRLIN_0
AND YOD.SOQSEQ_0 = STA.VCRSEQ_0
AND YOD.SOHNUM_0 = SOQ.SOHNUM_0
AND YOD.SOPLIN_0 = SOQ.SOPLIN_0
AND YOD.SOQSEQ_0 = SOQ.SOQSEQ_0
AND STO.ITMREF_0=STL.ITMREF_0
AND STO.LOT_0=STL.LOT_0
AND STO.SLO_0=STL.SLO_0
AND STA.VCRNUM_0 = '".$_GET['cde']."'
AND STA.VCRLIN_0 = ".$_GET['soplin']."
AND STA.VCRSEQ_0 = ".$_GET['soqseq']."
AND YOD.Y_OP_0 = '$op'
AND YOD.Y_OPLIG_0 = '".$lignesop['OPLIG']."'
AND STO.STOCOU_0 = '".$lignesop['STOCOU']."'
AND STA.ALLTYP_0=2";
}else{
$sql = "SELECT
YOD.SOHNUM_0,
STA.ITMREF_0,
STA.ALLTYP_0,
STA.QTYSTU_0,
STA.STOFCY_0,
STA.STOCOU_0,
STA.SEQ_0,
STO.LOT_0,
STO.LOC_0,
STO.STA_0,
YOD.Y_OPLIG_0,
STL.SHLDAT_0
FROM
$dbdoss.YORDPREPD YOD,
$dbdoss.SORDERQ SOQ,
$dbdoss.STOALL STA,
$dbdoss.STOCK STO,
$dbdoss.STOLOT STL
WHERE
STO.STOCOU_0 = STA.STOCOU_0
AND STO.STOFCY_0 = STA.STOFCY_0
AND STO.LOC_0 <> '$locMobile'
AND STO.LOC_0 <> '$QuaiGeneral'
AND STO.LOC_0 <> '$QuaiClient'
AND STO.STOFCY_0 = '$site'
AND YOD.ITMREF_0 = '$itmref'
AND YOD.SOHNUM_0 = STA.VCRNUM_0
AND YOD.SOPLIN_0 = STA.VCRLIN_0
AND YOD.SOQSEQ_0 = STA.VCRSEQ_0
AND YOD.SOHNUM_0 = SOQ.SOHNUM_0
AND YOD.SOPLIN_0 = SOQ.SOPLIN_0
AND YOD.SOQSEQ_0 = SOQ.SOQSEQ_0
AND STO.ITMREF_0=STL.ITMREF_0
AND STO.LOT_0=STL.LOT_0
AND STO.SLO_0=STL.SLO_0
AND YOD.Y_OP_0 = '$op'
AND STO.STOCOU_0 = ".$_GET['stocou']."
AND STA.ALLTYP_0=2";
}
//F-DEVMLTCDE
# F/B.B./28.12.2016/MANTIS 0001179/Dés-allocation - Rupture - Préparation commande
$AllocHorsExped = $dbora->getAll($sql);
if (count($AllocHorsExped)>0) {
$bodyhtml.= "
";
$bodyhtml.= "
";
$bodyhtml.= trad("Sélectionner les allocations à supprimer :");
$form = new JPHTMLForm('forme', 'PC1_actions.php', 'GET', 'JPHTMLTable');
$form->addHidden("act", "ValidFormManquantsAlloc");
$form->addHidden("op", $op);
# D/B.B./28.12.2016/MANTIS 0001179/Dés-allocation - Rupture - Préparation commande
$form->addHidden("tablin", $tablin);
$form->addHidden("cde", $cde);
$form->addHidden("backurl", basename(supprMessages($_SERVER['REQUEST_URI'])));
# F/B.B./28.12.2016/MANTIS 0001179/Dés-allocation - Rupture - Préparation commande
if(ArticleAvecPeremption($itmref)) {
$form->addTh(array(trad('Empl.'), trad('Lot'), trad('Qté'), trad('Sta.'), trad('DLUO'), trad('Sel.')));
}
else {
$form->addTh(array(trad('Empl.'), trad('Lot'), trad('Qté'), trad('Sta.'), trad('Sel.')));
}
foreach($AllocHorsExped as $alloc) {
$i++;
list($sohnum, $itmref, $alltyp, $qtystu, $stofcy, $stocou, $seq, $lot, $loc, $sta,$oplig, $shldate) = array_values($alloc);
# D/B.B./28.12.2016/MANTIS 0001179/Dés-allocation - Rupture - Préparation commande
# $form->addLineTdCheckBox(array($loc, $lot, $qtystu." ".$stu, $sta), "cb-$i", "$i;$stofcy;$itmref;$stocou;$seq");
if(ArticleAvecPeremption($itmref)){
$form->addLineTdCheckBox(array(
$loc, $lot, $qtystu." ".$stu, $sta, $shldate
),
"desallouestoallLignesOp[]",
"$i;$stofcy;$itmref;$stocou;$seq;$qtystu;$oplig",
" class=\"ligne$itmref$stocou$seq\" ",
"",
" id=\"choixYJP$itmref$stocou$seq\" class=\"choixYJP$itmref$stocou$seq\" ",
"",
false);
# F/B.B./28.12.2016/MANTIS 0001179/Dés-allocation - Rupture - Préparation commande
}
else {
$form->addLineTdCheckBox(array(
$loc, $lot, $qtystu." ".$stu, $sta
),
"desallouestoallLignesOp[]",
"$i;$stofcy;$itmref;$stocou;$seq;$qtystu;$oplig",
" class=\"ligne$itmref$stocou$seq\" ",
"",
" id=\"choixYJP$itmref$stocou$seq\" class=\"choixYJP$itmref$stocou$seq\" ",
"",
false);
# F/B.B./28.12.2016/MANTIS 0001179/Dés-allocation - Rupture - Préparation commande
}
}
$bodyhtml.= $form->getHtml();
} else {
$bodyhtml.= "
";
$bodyhtml.= "
";
$bodyhtml.= "".trad("Aucune allocation trouvée...")."";
if(CLIPREPLOC == "")
$bodyhtml.= "".trad("ATTENTION LE QUAI GÉNÉRAL D'ALLOCATION WMS N'EST PAS RENSEIGNÉ")."";
}
// *** HTML - Pieds
$foothtmlleft.= "";
$confirmMsg = trad("Êtes-vous sûr de vouloir désallouer cette ligne ?");
# D/B.B./28.12.2016/MANTIS 0001179/Dés-allocation - Rupture - Préparation commande
# $foothtmlleft.= "";
$foothtmlleft.= "";
# F/B.B./28.12.2016/MANTIS 0001179/Dés-allocation - Rupture - Préparation commande
$confirmMsg2 = trad("Êtes-vous sûr de vouloir générer une rupture ?");
# D/B.B./28.12.2016/MANTIS 0001179/Dés-allocation - Rupture - Préparation commande
# $foothtmlright.= "";
$foothtmlright.= "";
# F/B.B./28.12.2016/MANTIS 0001179/Dés-allocation - Rupture - Préparation commande
/* */
$GPOINT = "AV_ECHOPAGE";
getPointEntreePath(__FILE__);
if (file_exists($_SESSION['SPEFILE'])) require $_SESSION['SPEFILE'];
/* */
// On utilise une classe PHP pour la mise en page globale
$WMSPage = new JPWMSPage();
$WMSPage->addHeader($headhtml);
$WMSPage->addBody($bodyhtml);
$WMSPage->addLeftFoot($foothtmlleft);
$WMSPage->addRightFoot($foothtmlright);
$WMSPage->echoPage();
require "_bottom.php";
?>![](\"$dos_images/svg/exit.svg\")
";
$confirmMsg = trad("Êtes-vous sûr de vouloir désallouer cette ligne ?");
# D/B.B./28.12.2016/MANTIS 0001179/Dés-allocation - Rupture - Préparation commande
# $foothtmlleft.= "![](\"$dos_images/svg/cadenax.svg\")
";
$foothtmlleft.= "![](\"$dos_images/svg/Desalloc.svg\")
";
# F/B.B./28.12.2016/MANTIS 0001179/Dés-allocation - Rupture - Préparation commande
$confirmMsg2 = trad("Êtes-vous sûr de vouloir générer une rupture ?");
# D/B.B./28.12.2016/MANTIS 0001179/Dés-allocation - Rupture - Préparation commande
# $foothtmlright.= "![](\"$dos_images/svg/valide2.svg\")
";
$foothtmlright.= "![](\"$dos_images/svg/desallocRupture.svg\")
";
# F/B.B./28.12.2016/MANTIS 0001179/Dés-allocation - Rupture - Préparation commande
/*