Fórum Nota Fiscal eletronica #380093
25/06/2010
0
Ola pessoal, estou tendo alguns problemas com a nova Versão da nota fiscal eletronica que vigora em setembro!
Minha empresa esta alterando o layout e para isso estamos usando um componente novo do acbrnfe....
Estou tendo um problema de type mismatch in expression: nesta procedure abaixo:
-------------
procedure EditaNF(wnf_impressa: string;
wchave: string;
wrecibo: string;
wrecibo_data: TDateTime;
wprotocolo_autorizado: string;
wprotocolo_autorizado_data: TDateTime;
wprotocolo_cancelado: string;
wprotocolo_cancelado_data: TDateTime;
wmotivo_cancelamento: string;
wprotocolo_DPEC: string;
wprotocolo_DPEC_data: TDateTime;
wMensagem_SEFAZ: string;
wXML_NFE: String;
wXML_CANCELAMENTO: string;
wXML_DPEC: String); --------------- _ Porem eu já conferi os tipos passados onde dá o erro , e estão corretos como abaixo: ------------ begin
//verifica se o erro foi por DUPLICIDADE
if Acha_Msg_2(ACBrNFe1.WebServices.Retorno.Msg,'Duplicidade de NF-e') then
begin
ACBrNFe1.Consultar; //se processou OK salvo a chave da NFe
//se processou OK salvo a chave da NFe
EditaNF('S', //status
ACBrNFe1.WebServices.Consulta.NFeChave, //chave
ACBrNFe1.WebServices.Retorno.Recibo, //recibo
ACBrNFe1.WebServices.Consulta.protNFe.dhRecbto, //data recibo
ACBrNFe1.WebServices.Consulta.protNFe.nProt, //prot. autorizacao
ACBrNFe1.WebServices.Consulta.protNFe.dhRecbto, //data prot. autorizacao
ACBrNFe1.WebServices.Consulta.retCancNFe.nProt, //prot. cancelamento
ACBrNFe1.WebServices.Consulta.retCancNFe.dhRecbto, // data prot. cancelamento
'', //motivo cancelamento
'', //prot. DPEC
0, //data prot. DPEC
'', //mensagem SEFAZ
'', //XML NFe
'', //XML CANCELAMENTO
''); // XML DPEC //exibe mensagem --------------- help
wchave: string;
wrecibo: string;
wrecibo_data: TDateTime;
wprotocolo_autorizado: string;
wprotocolo_autorizado_data: TDateTime;
wprotocolo_cancelado: string;
wprotocolo_cancelado_data: TDateTime;
wmotivo_cancelamento: string;
wprotocolo_DPEC: string;
wprotocolo_DPEC_data: TDateTime;
wMensagem_SEFAZ: string;
wXML_NFE: String;
wXML_CANCELAMENTO: string;
wXML_DPEC: String); --------------- _ Porem eu já conferi os tipos passados onde dá o erro , e estão corretos como abaixo: ------------ begin
//verifica se o erro foi por DUPLICIDADE
if Acha_Msg_2(ACBrNFe1.WebServices.Retorno.Msg,'Duplicidade de NF-e') then
begin
ACBrNFe1.Consultar; //se processou OK salvo a chave da NFe
//se processou OK salvo a chave da NFe
EditaNF('S', //status
ACBrNFe1.WebServices.Consulta.NFeChave, //chave
ACBrNFe1.WebServices.Retorno.Recibo, //recibo
ACBrNFe1.WebServices.Consulta.protNFe.dhRecbto, //data recibo
ACBrNFe1.WebServices.Consulta.protNFe.nProt, //prot. autorizacao
ACBrNFe1.WebServices.Consulta.protNFe.dhRecbto, //data prot. autorizacao
ACBrNFe1.WebServices.Consulta.retCancNFe.nProt, //prot. cancelamento
ACBrNFe1.WebServices.Consulta.retCancNFe.dhRecbto, // data prot. cancelamento
'', //motivo cancelamento
'', //prot. DPEC
0, //data prot. DPEC
'', //mensagem SEFAZ
'', //XML NFe
'', //XML CANCELAMENTO
''); // XML DPEC //exibe mensagem --------------- help
Gustavo Matos
Curtir tópico
+ 0
Responder
Posts
29/06/2010
Gustavo Matos
Para catalogar o erro, esse erro foi resolvido com a função nativa FormatDateTime()
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)