Génération XML - XSD et Table Hyperfile

1 pièce(s) jointe(s)

Bonjour à tous,

Je reviens vers vous encore avec un casse tête (je l'espère pas).

On me demande encore de produire un fichier XML, j'ai juste eu droit à : récupères les infos du SI et sert toi de la structure XSD que voici pour générer ta sortie, deadline : 1 semaine (fourni par la banque centrale, qui a besoin des informations de crédits des clients pour le Mois M-1, 1 semaine ouvrable pendant le mois en cours.)

Bref, je tâtonne un peu sur la façon de faire :

J'ai importé mes infos dans une table HPFSQL.
Intégré le XSD fournit par la banque centrale dans le projet

j'ai commencé le codage et franchement, ma logique ne me semble pas être la bonne. Ci-dessous un bout de code.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
xsdBIC est un xmlDocument , description = "3_BCEAO 25-05-2015"
 
bRes est un booléen 
 
 
 
bRes = XMLDocument("Contracts",xsdBIC)
 
SI bRes = Faux ALORS
	Erreur("Le problème suivant a été détecté : " + ErreurInfo())
SINON
 
	Info("Le document a bien été créé. Il est prêt à être utilisé.")
 
FIN
 
//Reconstruction de la chaine XML
 
sXmlversion est une chaîne
//xsdBIC.Batch.BatchIdentifier = "DSIBNDA_201506_M_DEF_1_XML"
 
//Balise principale
	XMLAjouteAttribut(xsdBIC, sXmlversion,"1.0")
	XMLAjouteAttribut(xsdBIC,xsdBIC.Batch.BatchIdentifier,"DSIBNDA_201506_M_DEF_1_XML")
	XMLAjouteAttribut(xsdBIC,xsdBIC.Batch.Contract)
		XMLAjouteFils(xsdBIC,xsdBIC.Batch.Contract.Collateral)
		XMLAjouteFils(xsdBIC,xsdBIC.Batch.Contract.Collateral.CollateralCode)
		XMLAjouteFils(xsdBIC,xsdBIC.Batch.Contract.Collateral.CollateralDescription)
		XMLAjouteFils(xsdBIC,xsdBIC.Batch.Contract.Collateral.CollateralType)
		XMLAjouteFils(xsdBIC,xsdBIC.Batch.Contract.Collateral.CollateralValue)
		XMLAjouteFils(xsdBIC,xsdBIC.Batch.Contract.Collateral.CollateralValue.Currency)
		XMLAjouteFils(xsdBIC,xsdBIC.Batch.Contract.Collateral.CollateralValue.Value)
		XMLAjouteFils(xsdBIC,xsdBIC.Batch.Contract.Collateral.ValuationDate)
	XMLAjouteAttribut(xsdBIC,xsdBIC.Batch.Contract.Company)
		XMLAjouteFils(xsdBIC,xsdBIC.Batch.Contract.Company.BusinessStatus)
		XMLAjouteFils(xsdBIC,xsdBIC.Batch.Contract.Company.CompanyName)
		XMLAjouteFils(xsdBIC,xsdBIC.Batch.Contract.Company.Contacts)
		XMLAjouteFils(xsdBIC,xsdBIC.Batch.Contract.Company.CustomerCode)
		XMLAjouteFils(xsdBIC,xsdBIC.Batch.Contract.Company.EstablishmentDate)
		XMLAjouteFils(xsdBIC,xsdBIC.Batch.Contract.Company.IdentificationNumbers)
		XMLAjouteFils(xsdBIC,xsdBIC.Batch.Contract.Company.IndustrySector)
		XMLAjouteFils(xsdBIC,xsdBIC.Batch.Contract.Company.LegalForm)
		XMLAjouteFils(xsdBIC,xsdBIC.Batch.Contract.Company.MainAddress)
		XMLAjouteFils(xsdBIC,xsdBIC.Batch.Contract.Company.NumberOfEmployees)
		XMLAjouteFils(xsdBIC,xsdBIC.Batch.Contract.Company.SecondaryAddress)
		XMLAjouteFils(xsdBIC,xsdBIC.Batch.Contract.Company.TradeName)
	XMLAjouteAttribut(xsdBIC,xsdBIC.Batch.Contract.ContractCode)
	XMLAjouteAttribut(xsdBIC,xsdBIC.Batch.Contract.ContractData)
		XMLAjouteFils(xsdBIC,xsdBIC.Batch.Contract.ContractData.Branch)
		XMLAjouteFils(xsdBIC,xsdBIC.Batch.Contract.ContractData.ConsentCode)
		XMLAjouteFils(xsdBIC,xsdBIC.Batch.Contract.ContractData.ContractStatus)
		XMLAjouteFils(xsdBIC,xsdBIC.Batch.Contract.ContractData.CurrencyOfContract)

Bien sur, j'envisage de récupérer les valeurs des Tags de la table Hyperfile, le problème qui se pose est que nous avons parfois des balises structurées (composées d'autres balises) :?.

Joint, mon xsd en format ZIP Pièce jointe 181823

Je voudrai savoir si quelqu'un a une idée que je puisses implémenter rapidement et générer le fichier dans les délais.

Cordialement,
_shuriken_

Bonsoir,

Je me permet de vous relancer par rapport à ce sujet.

Cordialement,
_shuriken_

Bonjour,

Tu as un bel exemple ici pour générer un XML à partir d'un XSD :
http://doc.pcsoft.fr/fr-FR/?10000191...Gestion_du_XSD

Citation:

Envoyé par Lo²

Bonjour,

Tu as un bel exemple ici pour générer un XML à partir d'un XSD :
http://doc.pcsoft.fr/fr-FR/?10000191...Gestion_du_XSD

Déjà vu.

Mais je vais y retourner encore.

Merci !