This article applies to Microsoft Dynamics NAV for the following countries and language locales.
- Belgium (French) (fr-be)
- Belgium (Dutch) (nl-be)
Notice: This website is an unofficial Microsoft Knowledge Base (hereinafter KB) archive and is intended to provide a reliable access to deleted content from Microsoft KB. All KB articles are owned by Microsoft Corporation. Read full disclaimer for more details.
View products that this article applies to.
...
LOCAL PROCEDURE AddHeader@1010007(VAR XMLCurrNode@1010000 : Automation "{F5078F18-C551-11D3-89B9-0000F81FE221} 6.0:{2933BF80-7B36-11D2-B20E-00C04F983E60}:'Microsoft XML, v6.0'.IXMLDOMNode");
BEGIN
INTERVATHelper.AddAttribute(XMLCurrNode,'VATDeclarationsNbr','1');
INTERVATHelper.AddAttribute(XMLCurrNode,'xsi:schemaLocation',Text020);
INTERVATHelper.AddAttribute(XMLCurrNode,'xmlns',Text018);
INTERVATHelper.AddAttribute(XMLCurrNode,'xmlns:common',Text019);
INTERVATHelper.AddAttribute(XMLCurrNode,'xmlns:xsi',Text014);
END;
...
...
LOCAL PROCEDURE AddHeader@1010007(VAR XMLCurrNode@1010000 : Automation "{F5078F18-C551-11D3-89B9-0000F81FE221} 6.0:{2933BF80-7B36-11D2-B20E-00C04F983E60}:'Microsoft XML, v6.0'.IXMLDOMNode");
BEGIN
DocNameSpace := 'http://www.minfin.fgov.be/VATConsignment';
INTERVATHelper.AddAttribute(XMLCurrNode,'VATDeclarationsNbr','1');
INTERVATHelper.AddAttribute(XMLCurrNode,'xsi:schemaLocation',DocNameSpace + ' NewTVA-in_v0_7.xsd');
INTERVATHelper.AddAttribute(XMLCurrNode,'xmlns',DocNameSpace);
INTERVATHelper.AddAttribute(XMLCurrNode,'xmlns:common','http://www.minfin.fgov.be/InputCommon');
INTERVATHelper.AddAttribute(XMLCurrNode,'xmlns:xsi','http://www.w3.org/2001/XMLSchema-instance');
END;
...
...
IF AddRepresentative THEN
Representative.AddRepresentativeElement(XMLCurrNode,Text018,GetSequenceNumber);
AddElementVatDeclaration(XMLCurrNode);
...
...
IF AddRepresentative THEN
Representative.AddRepresentativeElement(XMLCurrNode,DocNameSpace,GetSequenceNumber);
AddElementVatDeclaration(XMLCurrNode);
...
...
INTERVATHelper.AddElement(
XMLCurrNode,'Amount',INTERVATHelper.GetXMLAmountRepresentation(Amount),Text018,XMLNewChild);
INTERVATHelper.AddAttribute(XMLNewChild,'GridNumber',FORMAT(ExternalRowNo));
...
...
INTERVATHelper.AddElement(
XMLCurrNode,'Amount',INTERVATHelper.GetXMLAmountRepresentation(Amount),DocNameSpace,XMLNewChild);
INTERVATHelper.AddAttribute(XMLNewChild,'GridNumber',FORMAT(ExternalRowNo));
...
...
INTERVATHelper.AddElement(XMLCurrNode,'Ask','',Text018,XMLNewChild);
INTERVATHelper.AddAttribute(XMLNewChild,'Restitution',YesNo(Reimbursement));
INTERVATHelper.AddAttribute(XMLNewChild,'Payment',YesNo(PaymForms));
...
...
INTERVATHelper.AddElement(XMLCurrNode,'Ask','',DocNameSpace,XMLNewChild);
INTERVATHelper.AddAttribute(XMLNewChild,'Restitution',YesNo(Reimbursement));
INTERVATHelper.AddAttribute(XMLNewChild,'Payment',YesNo(PaymForms));
...
...
INTERVATHelper.AddElement(XMLCurrNode,'ClientListingNihil',YesNo(Annuallist),Text018,XMLNewChild);
...
...
INTERVATHelper.AddElement(XMLCurrNode,'ClientListingNihil',YesNo(Annuallist),DocNameSpace,XMLNewChild);
...
...
INTERVATHelper.AddElement(XMLCurrNode,'Data','',Text018,XMLNewChild);
XMLCurrNode := XMLNewChild;
...
...
INTERVATHelper.AddElement(XMLCurrNode,'Data','',DocNameSpace,XMLNewChild);
XMLCurrNode := XMLNewChild;
...
...
INTERVATHelper.AddElement(XMLCurrNode,'VATDeclaration','',Text018,XMLNewChild);
XMLCurrNode := XMLNewChild;
INTERVATHelper.AddAttribute(XMLCurrNode,'SequenceNumber','1');
...
...
INTERVATHelper.AddElement(XMLCurrNode,'VATDeclaration','',DocNameSpace,XMLNewChild);
XMLCurrNode := XMLNewChild;
INTERVATHelper.AddAttribute(XMLCurrNode,'SequenceNumber','1');
...
...
INTERVATHelper.AddAttribute(XMLCurrNode,'VATDeclarationsNbr','1');
INTERVATHelper.AddAttribute(XMLCurrNode,'xsi:schemaLocation',Text020);
INTERVATHelper.AddAttribute(XMLCurrNode,'xmlns',Text018);
INTERVATHelper.AddAttribute(XMLCurrNode,'xmlns:common',Text019);
INTERVATHelper.AddAttribute(XMLCurrNode,'xmlns:xsi',Text014);
...
...
DocNameSpace := 'http://www.minfin.fgov.be/VATConsignment';
INTERVATHelper.AddAttribute(XMLCurrNode,'VATDeclarationsNbr','1');
INTERVATHelper.AddAttribute(XMLCurrNode,'xsi:schemaLocation',DocNameSpace + ' NewTVA-in_v0_7.xsd');
INTERVATHelper.AddAttribute(XMLCurrNode,'xmlns',DocNameSpace);
INTERVATHelper.AddAttribute(XMLCurrNode,'xmlns:common','http://www.minfin.fgov.be/InputCommon');
INTERVATHelper.AddAttribute(XMLCurrNode,'xmlns:xsi','http://www.w3.org/2001/XMLSchema-instance');
...
Keywords: kberrmsg, kbmbscodefix, kbnoloc, kbsurveynew, kbqfe, kbmbspartner, kbmbsquickpub, kb, kbmbsmigrate