/* =========================================================================================== */
/* Transfert DA - Phase 3 - Delete dans DW des lignes absentes dans HA+                        */
/* =========================================================================================== */
/*=Flag des enreg purg�s==*/
update doc set   DOC_STATUT_ARCHIVE ='PURGED'
from   <PREFIXE_DW>DOCUMENTS doc,  <PREFIXE_HA>NUMDOCBRU n 
where    NUMDOC   = doc.DOC_NUMERO_DOC and TYPEDOC='DA'  and DOC_TYPE_TRANSACTION='DA'
<SEPARATEUR>
/*=Delete des enreg n'existant plus dans HAPlus mais non purg�s=*/
DELETE FROM <PREFIXE_DW>DOCUMENTS WHERE DOC_TYPE_TRANSACTION='DA' and DOC_STATUT_ARCHIVE<>'PURGED' and  not EXISTS
(select 1
from <PREFIXE_HA>DA_PLANN pla 
where ('DA' + '-' + convert(varchar(9),pla.NO_DA) + '-' + convert(varchar(3),pla.NO_PO) + '-'  + pla.DTE_LIV) =RTRIM(DOC_TYPE_TRANSACTION)  + '-' + convert(varchar(9),DOC_NUMERO_DOC)  + '-' + convert(varchar(3),DOC_NUMERO_LIGNE_1)  + '-'  + RTRIM(DOC_MAGIC_DSTR_LIVRAISON)
)