PROCÉDURE INTERNE AjouterDocumentAnnexe()
pclDocumentLK est un objet dynamique
iDocumentLK est un IDocument
sProcedure est une chaîne = "COL_[%LAMBIQUE_Files.Valeur%].GetDocumentLKListe"
sSource est une chaîne = MArticleFamille
nRefSource est un entier = nRefFamille
iDocumentLKListe est un IListe <- GComposantWD.GetModele(LAMBIQUE_Files).Exécute(sProcedure, (sSource, nRefSource))
POUR TOUT pclDocumentLK DE iDocumentLKListe.p_tabModele
iDocumentLK <- pclDocumentLK
pclFusion.AjouterFichier(iDocumentLK.p_sFichier)
FIN
FIN