Hello,
il faut passer par un tableau pour générer les balises Datafield.
Exemple :
1 - importer le xml modèle dans Description xml
2 - Utilisation d'une structure qui contient le nom du datafield et sa valeur
StructDataField est une structure
Name est une chaîne
Valeur est une chaîne
FIN
TabDataFields est un tableau de 0 StructDataField
MonDocXML est un WL.XMLDocument, Description = "modelall"
MonDocXML.DataPreparation..Attribut["LcName"] = "String"
MonDocXML.DataPreparation..Attribut["MCESTransform"] = "@SCP60_XXX.xsl"
MonDocXML.DataPreparation.Job..Attribut["Name"] = "'ANYAMA_1_11-04-2023_14-57-56"
MonDocXML.DataPreparation.Job..Attribut["OutputMagazineQuantity"] = "3"
MonDocXML.DataPreparation.Job.Cards.Card..Attribut["Name"] = "1"
TabDataFields = [ ["ID","4c97e0e1bfb0190320"],["DISPLAYED_PORTRAIT","4c97e0e1bfb013140206P.JPG"],
["IMMATRICULATION_NUMBER","bf384001020053"],["LAST_NAME","SOMES"],
["FIRST_NAME","BERT JUDI"],["GENDER","M"],["DATE_OF_BIRTH","01.07.1997"],
["PLACE_OF_BIRTH","ATTINGUIE"],["JOB","OUVRIER "],["ISSUE_DATE","19/03/2023"],
["VALIDITY_DATE","18/03/2028"],["PLACE_OF_ISSUE","ABIDJAN"],["PLACE_OF_DELIVERY","ANYAMA"],
["DISPLAYED_SIGNATURE","4c97e0e1bfb019032023140206S.JPG"],["PLACE_OF_RESIDENCE","ATTINGUIE "],
["ADR_TEL","0749941689"],["NAME_FATHER","PIERRE SOME"],["NAME_MOTHER","MANSOZO APPOLINE "],
["CONTACT_PERSON","SOME PIERRE"],["TEL_CONTACT_PERSON","0749689"],["SIZE","175"],
["BLOOD_GROUP",""],["DATE_OF_BIRTH_FATHER","01.01.1900"],["DATE_OF_BIRTH_MOTHER","01.01.1900"],
["AUTHORITY_SIGNATURE","ABIDJAN.JPG"],["CODEBARRE","4c97e0e1bfb01923140206_2D.JPG"]]
xml_noeud est un WL.xmlNoeud dynamique = MonDocXML.DataPreparation.Job.Cards.Card.DataFields
x est un entier = 1
POUR TOUT datafield de TabDataFields
Ajoute(xml_noeud,xml_noeud.DataField)
xml_noeud.DataField[x]..Attribut["Name"] = datafield.Name
xml_noeud.DataField[x] = datafield.Valeur
x++
FIN
MonDocXML.DataPreparation.Job.Cards.Card.DocumentNumber = "10000000185"

XMLSauve(MonDocXML,"D:\temp\Mondoc.xml",XMLMiseEnForme)

Résultat :
<?xml version="1.0" encoding="utf-8"?>
<DataPreparation LcName="String" MCESTransform="@SCP60_XXX.xsl">
<Job Name="'ANYAMA_1_11-04-2023_14-57-56" OutputMagazineQuantity="3">
<Cards>
<Card Name="1">
<DataFields>
<DataField Name="ID">4c97e0e1bfb0190320</DataField>
<DataField Name="DISPLAYED_PORTRAIT">4c97e0e1bfb013140206P.JPG</DataField>
<DataField Name="IMMATRICULATION_NUMBER">bf384001020053</DataField>
<DataField Name="LAST_NAME">SOMES</DataField>
<DataField Name="FIRST_NAME">BERT JUDI</DataField>
<DataField Name="GENDER">M</DataField>
<DataField Name="DATE_OF_BIRTH">01.07.1997</DataField>
<DataField Name="PLACE_OF_BIRTH">ATTINGUIE</DataField>
<DataField Name="JOB">OUVRIER </DataField>
<DataField Name="ISSUE_DATE">19/03/2023</DataField>
<DataField Name="VALIDITY_DATE">18/03/2028</DataField>
<DataField Name="PLACE_OF_ISSUE">ABIDJAN</DataField>
<DataField Name="PLACE_OF_DELIVERY">ANYAMA</DataField>
<DataField Name="DISPLAYED_SIGNATURE">4c97e0e1bfb019032023140206S.JPG</DataField>
<DataField Name="PLACE_OF_RESIDENCE">ATTINGUIE </DataField>
<DataField Name="ADR_TEL">0749941689</DataField>
<DataField Name="NAME_FATHER">PIERRE SOME</DataField>
<DataField Name="NAME_MOTHER">MANSOZO APPOLINE </DataField>
<DataField Name="CONTACT_PERSON">SOME PIERRE</DataField>
<DataField Name="TEL_CONTACT_PERSON">0749689</DataField>
<DataField Name="SIZE">175</DataField>
<DataField Name="BLOOD_GROUP" />
<DataField Name="DATE_OF_BIRTH_FATHER">01.01.1900</DataField>
<DataField Name="DATE_OF_BIRTH_MOTHER">01.01.1900</DataField>
<DataField Name="AUTHORITY_SIGNATURE">ABIDJAN.JPG</DataField>
<DataField Name="CODEBARRE">4c97e0e1bfb01923140206_2D.JPG</DataField>
</DataFields>
<DocumentNumber>10000000185</DocumentNumber>
</Card>
</Cards>
</Job>
</DataPreparation>


--
Ami calmant, J.P

Hello,
il semble y a voir des problèmes dans l'écriture des balises Datafield lorsque l'on met la boucle d'écriture de ces balises dans une boucle de Balise CARD. Cela se produit quand on utilise une description XML. Finalement dans le code du premier message , le problème provenait du fait qu'il fallait faire le XMlAjouterFils avec un changement de position pour la balise Datafield et remonter au niveau DataFields à chaque boucle par un XmlParent. Il manquait aussi un XMlParent après l'ajout de la balise DocumentNumber.
Voici un code qui fonctionne chez moi :
StructDataField est une structure
Name est une chaîne
Valeur est une chaîne
FIN
TabDataFields est un tableau de 0 StructDataField
MonXml est une chaîne = "xmltest"
XMLDocument(MonXml, "")
XMLAjouteFils(MonXml,"Datapreparation","",Vrai)
XMLAjouteAttribut(MonXml, "LcName","String")
XMLAjouteAttribut(MonXml, "MCESTransform","@SC.xsl")
XMLAjouteFils(MonXml,"Job","",Vrai)
XMLAjouteAttribut(MonXml, "Name", "ANYAMA_1_11-04-2023_14-57-56")
XMLAjouteAttribut(MonXml, "OutputMagazineQuantity", "3")
XMLAjouteFils(MonXml, "Cards","",Vrai)
POUR i = 1 _A_ 3
TabDataFields = [ ["ID","4c97e0e1bfb0190320" +i],["DISPLAYED_PORTRAIT","4c97e0e1bfb013140206P.JPG"],
["IMMATRICULATION_NUMBER","bf384001020053"],["LAST_NAME","SOMES"],
["FIRST_NAME","BERT JUDI"],["GENDER","M"],["DATE_OF_BIRTH","01.07.1997"],
["PLACE_OF_BIRTH","ATTINGUIE"],["JOB","OUVRIER "],["ISSUE_DATE","19/03/2023"],
["VALIDITY_DATE","18/03/2028"],["PLACE_OF_ISSUE","ABIDJAN"],["PLACE_OF_DELIVERY","ANYAMA"],
["DISPLAYED_SIGNATURE","4c97e0e1bfb019032023140206S.JPG"],["PLACE_OF_RESIDENCE","ATTINGUIE "],
["ADR_TEL","0749941689"],["NAME_FATHER","PIERRE SOME"],["NAME_MOTHER","MANSOZO APPOLINE "],
["CONTACT_PERSON","SOME PIERRE"],["TEL_CONTACT_PERSON","0749689"],["SIZE","175"],
["BLOOD_GROUP",""],["DATE_OF_BIRTH_FATHER","01.01.1900"],["DATE_OF_BIRTH_MOTHER","01.01.1900"],
["AUTHORITY_SIGNATURE","ABIDJAN.JPG"],["CODEBARRE","4c97e0e1bfb01923140206_2D.JPG"]]
XMLAjouteFils(MonXml, "Card","",Vrai)
attribut_card est une chaîne = i
XMLAjouteAttribut(MonXml, "name",attribut_card)
XMLAjouteFils(MonXml, "DataFields","",Vrai)
x est un entier = 1
POUR TOUT datafield de TabDataFields
XMLAjouteFils(MonXml, "DataField",datafield.Valeur,Vrai)
XMLAjouteAttribut(MonXml, "name",datafield.Name)
XMLParent(MonXml)
x++
FIN
XMLParent(MonXml)
XMLAjouteFils(MonXml,"DocumentNumber","10000000185" + NumériqueVersChaîne(i))
XMLParent(MonXml)
FIN
sInfoXML est une chaîne = XMLConstruitChaîne(MonXml,XMLMiseEnForme)

XMLTermine(MonXml) // Libère le document XML
fSauveTexte("D:\temp\testessai.xml",sInfoXML) //// Création du fichier XML

je répète les même données pour les datafield (sauf le ID) pour simplifier le test.

--
Ami calmant, J.P