wagner_fix
-
Total de ítens
188 -
Registro em
-
Última visita
Community Answers
-
wagner_fix's post in ACBrANe - Cancelar averbação AT&M was marked as the answer
Pessoal consegui.
Tentei excluir o tópico, mas sem sucesso.
Caso alguém mais tenha dúvida... esse é o comando DocNFeCTe := ACBrCTe1.EventoCTe.Evento.Items[0].XML;
Grato,
Wagner
-
wagner_fix's post in Chave Privada was marked as the answer
Liguei no suporte e ele resolveu.
Obrigado desde já pela ajuda.
Grato,
Wagner
-
wagner_fix's post in Erro Schema Cce was marked as the answer
ítalo tinha outra pessoa com o mesmo problema mas era no cancelamento e lá você pediu para atualizar os fontes... Fiz o mesmo procedimento, e funcionou perfeitamente... atualizando o tópico como resolvido.
Agradeço pela atenção de sempre...
Grato,
Wagner
-
wagner_fix's post in Varias Nfe Num Cte was marked as the answer
Segue o exemplo...
with DM.SqlAux5 do begin LimpaSQL(DM.SqlAux5); SQL.Add('SELECT * FROM CTE05 WHERE CODC=:xCODC'); Parameters.ParambyName('xCODC').Value := StrToInt(txtCod.Text); Open; First; end; j := 0; j := DM.SqlAux5.RecordCount; if j > 0 then begin for i := 1 to j do begin with infCTeNorm.infDoc.infNFe.Add do begin chave := Trim(DM.SqlAux5.FieldByName('CHAVE').AsString); PIN := Trim(DM.SqlAux5.FieldByName('PIN').AsString); dPrev := StrToDate(txtGeraDtPrevista.Text); end; DM.SqlAux5.Next; end; end; Faço assim e dá certo... Abraço, Wagner