Ler XML Nota Fiscal Eletronica
2016-08-23
0 0 0
no vote
Other
Earn points
unit uXml;
interface
uses Classes, DBClient, Xmlxform, FileCtrl, ADODB, StdCtrls, Controls, ExtCtrls, StrUtils,
xmldom, XMLIntf, msxmldom, XMLDoc, DBGrids;
type
TMatrixXML = class(TComponent)
private
FPathXml: String;
FTotalPisTrib: Extended;
FTotalCofinsTrib: Extended;
fQry : TAdoQuery;
fCds : TClientDataSet;
FNodeProdImposto: IXmlNode;
FNodeInfProt: IXmlNode;
FNodeProd: IXmlNode;
FNodeinfNFe: IXmlNode;
FNodeProtNfe: IXmlNode;
FNodeTotal: IXmlNode;
FNodeDest: IXmlNode;
FNodeICMSTotal: IXmlNode;
FNodeDet: IXmlNode;
interface
uses Classes, DBClient, Xmlxform, FileCtrl, ADODB, StdCtrls, Controls, ExtCtrls, StrUtils,
xmldom, XMLIntf, msxmldom, XMLDoc, DBGrids;
type
TMatrixXML = class(TComponent)
private
FPathXml: String;
FTotalPisTrib: Extended;
FTotalCofinsTrib: Extended;
fQry : TAdoQuery;
fCds : TClientDataSet;
FNodeProdImposto: IXmlNode;
FNodeInfProt: IXmlNode;
FNodeProd: IXmlNode;
FNodeinfNFe: IXmlNode;
FNodeProtNfe: IXmlNode;
FNodeTotal: IXmlNode;
FNodeDest: IXmlNode;
FNodeICMSTotal: IXmlNode;
FNodeDet: IXmlNode;
delphi
Related Source Codes
MY Function Library
0
0
no vote
DELPHI calls the voice synthesis provided by windo
0
0
no vote
Compare binary file
0
0
no vote
Delphi 7
0
0
no vote
SQL database table structure merge tool
0
0
no vote
No comment