Ir para conteúdo
  • Cadastre-se

PHCASTANHO

Membros Pro
  • Total de ítens

    5
  • Registro em

  • Última visita

Sobre PHCASTANHO

PHCASTANHO's Achievements

Newbie

Newbie (1/14)

  • Dedicated Rare
  • First Post
  • Conversation Starter
  • Week One Done

Recent Badges

0

Reputação

  1. Bom dia amigo… obrigado pelo retorno … depois de ler exemplos, pouco do manual, etc, notei e consegui gerar o xml… obrigado por enquanto !!
  2. completo não, muita coisa tenho dificuldade de interpretar, com o exemplo tive mais facilidade de adequar. mas de qualquer forma, eu vou ler novamente e tentar encontrar esses erros no manual.
  3. Juliomar, obrgiado pelo retorno, aos poucos consegui me identificar aqui. porém, travaram algumas informações: a chave está dando como nao identificada. e alguns campos que vou te relatar aqui com erro semelhante: infCTeNorm.infCarga.InfQ.cUnid := uKg; infCTeNorm.infCarga.InfQ.tpMed := 'Kg'; infCTeNorm.infDoc.InfNFE.chave := '' ( deixei com aspas, mas vou puxar ela do meu banco de dados) with vPrest.comp.New do begin vPrest.xNome := 'DFRNER KRTJ'; -> estes dois, mesmo erro... vPrest.vComp := 100.00; end; Se puder me direcionar sobre estas falhas, eu agradeço.
  4. Italo, bom dia, Obrigado pelo rápido retorno; Este código já estava no exemplo, e não alterei para primeiro testar a alimentação do componente. Com sua orientação o XML já foi carregado com as informações; Se puder me auxiliar em mais uma orientação; todos os campos que tem esses nomes estão dando como não declarada: tiRetrato; teNormal; taHomologacao; mdRodoviario; tsTranspValores; inContribuinte; Eu preciso aplicar algum comando para criar essas variaveis, ou carregar de algum lugar?? o restante está ficando bala.... segue novo XML 25240215005858000116570010000000011000000016-cte.xml eu acredito que preciso puxar do meu banco de dados, e estes sejam apenas nomes de exemplo; mas antes de alterar tudo, achei melhor perguntar
  5. Boa noite, sou bem limitado com programação, e tenho tido dificuldades em carregar os dados do componente e gerar XML. Estou tentando gerar o XML para poder validar, transmitir no sistema na receita (até que eu não termine o meu) fiz esse procedimento: procedure TFRM_CteNEW.exportar_txtClick(Sender: TObject); begin F_DM.ACBrCTe1.Conhecimentos.Clear; F_DM.ACBrCTe1.Conhecimentos.Add.CTe.infCTe.versao := 4.0; F_DM.ACBrCTe1.Conhecimentos.Add.CTe.Ide.cUF := 0125 ; // UFtoCUF(edtEmitUF.Text); F_DM.ACBrCTe1.Conhecimentos.Add.CTe.Ide.CFOP := 6932; F_DM.ACBrCTe1.Conhecimentos.Add.CTe.Emit.CNPJ := IBQ_EMIT.FieldByName('CNPJ').AsString; // Trim(edtEmitCNPJ.Text); F_DM.ACBrCTe1.Conhecimentos.Add.CTe.Emit.IE := IBQ_EMIT.FieldByName('INSCRICAO').AsString; // Trim(edtEmitIE.Text); F_DM.ACBrCTe1.Conhecimentos.Add.CTe.Emit.xNome := Trim( IBQ_EMIT.FieldByName('RAZAO_SOCIAL').AsString ) ; // Trim(edtEmitRazao.Text); F_DM.ACBrCTe1.Conhecimentos.Add.CTe.Emit.xFant := Trim( IBQ_EMIT.FieldByName('RAZAO_SOCIAL').AsString ) ; // Trim(edtEmitFantasia.Text); F_DM.ACBrCTe1.Conhecimentos.Add.CTe.Emit.enderEmit.xLgr := Trim( IBQ_EMIT.FieldByName('ENTR_END').AsString ); F_DM.ACBrCTe1.Conhecimentos.Add.CTe.Emit.enderEmit.nro := Trim( IBQ_EMIT.FieldByName('ENTR_NUM').AsString ); F_DM.ACBrCTe1.Conhecimentos.Add.CTe.Emit.enderEmit.xCpl := Trim( IBQ_EMIT.FieldByName('ENTR_COMPL').AsString ); F_DM.ACBrCTe1.Conhecimentos.Add.CTe.Emit.enderEmit.xBairro := Trim( IBQ_EMIT.FieldByName('ENTR_BAIRRO').AsString ); F_DM.ACBrCTe1.Conhecimentos.Add.CTe.Emit.enderEmit.cMun := StrToInt( IBQ_EMIT.FieldByName('ENTR_CODMUN').AsString ); F_DM.ACBrCTe1.Conhecimentos.Add.CTe.Emit.enderEmit.xMun := Trim( IBQ_EMIT.FieldByName('ENTR_MUN').AsString ); {Informações do Responsável Técnico pela emissão do DF-e} F_DM.ACBrCTe1.Conhecimentos.Add.CTe.infRespTec.xContato := ''; F_DM.ACBrCTe1.Conhecimentos.Add.CTe.infRespTec.email := ''; F_DM.ACBrCTe1.Conhecimentos.Add.CTe.infRespTec.fone := ''; F_DM.ACBrCTe1.Conhecimentos.Items[0].GravarXML(); *** Carreguei todos os campos, só coloquei alguns aqui como exemplo para não ficar extenso.. mas em resumo: F_DM.ACBrCTe1.Conhecimentos.Clear; F_DM.ACBrCTe1.Conhecimentos.Add.CTe. (todos os campos) F_DM.ACBrCTe1.Conhecimentos.Items[0].GravarXML(); Porem, ele gera o XML conforme anexo (sem informações nenhumas) podem me auxiliar e dizer se falta alguma informação?? obrigado 00991200000000000000570000000000001010196460-cte.xml 00991200000000000000570000000000001098568326-cte.xml
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.