Jump to content

click.png

click.png

click.png

click.png click.png click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

Vander Ramos

Membros Pro
  • Posts

    29
  • Joined

  • Last visited

About Vander Ramos

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

Vander Ramos's Achievements

Contributor

Contributor (5/14)

  • First Post
  • Collaborator Rare
  • Week One Done
  • One Month Later
  • One Year In

Recent Badges

5

Reputation

1

Community Answers

  1. WS de um Cliente (ERP). abs Vander
  2. Olá Daniel Acredito que resolvi por aqui com esta rotina: procedure TfrmPrincipal.Button6Click(Sender: TObject); var wProtocolo : String ; wXML : TStringlist ; begin //localiza protocolo em pdx_MySql.ssa_retorno_protocolo pdx_qryGrvSSA.Close ; pdx_qryGrvSSA.Open('select ssa_protocolo from ssa_retorno_protocolo where ssa_protocolo = :pProtocolo', [edit2.text]); pdx_qryGrvSSA.FetchAll ; if pdx_qryGrvSSA.RecordCount > 0 then begin try wProtocolo := pdx_qryGrvSSA.FieldByName('ssa_protocolo').AsString ; wXML := TStringList.Create ; wXML.Text := ReplaceStr(ReplaceStr(GetSSA_EAISoap.ConsultTask('fbq1wl',wProtocolo).XMLNode.XML, '&lt;', '<'), '&gt;', '>'); wTag := 'LogdeDados' ; //Grava MYSql pdx_qryGrvSSA.Close ; pdx_qryGrvSSA.ExecSQL('update ssa_retorno_protocolo set ssa_logdados = :pLodDados where ssa_protocolo = :pProtocolo', [ACBRUtil.LerTagXML(wXml.Text, wTag), edit2.Text]) ; finally wXML.Free ; end; end; end;
  3. Olá PessoALL, ACBRUtil.LerTagXML() não está buscando o conteudo da TAG LogDeDados dentro do XML: XML ORIGINAL (NÃO É UM ARQUIVO) <SSA_EAI xmlns=""><Principal><TASK><Status>-2</Status><Processo>NFSE </Processo><LogDeDados>Iniciar o processo NFSE Com ID [BD42809] <br /> Serviço (1000027) não registrado como Item de Estoque, ou sem vínculo com o Código de Serviços Municipais para a cidade da empresa <br /> Item de estoque 1000027 não cadastrado <br /> Operação não realizada identificador de integracao BD42809 <br /> </LogDeDados></TASK></Principal></SSA_EAI> procedure TfrmPrincipal.Button6Click(Sender: TObject); var wProtocolo : String ; wXML : TStringlist ; begin //localiza protocolo em pdx_MySql.ssa_retorno_protocolo pdx_qryGrvSSA.Close ; pdx_qryGrvSSA.Open('select ssa_protocolo from ssa_retorno_protocolo where ssa_protocolo = :pProtocolo', [edit2.text]); pdx_qryGrvSSA.FetchAll ; if pdx_qryGrvSSA.RecordCount > 0 then begin try wProtocolo := pdx_qryGrvSSA.FieldByName('ssa_protocolo').AsString ; wTag := 'LogdeDados' ; wXML := TStringList.Create ; wXMl.LoadFromStream(GetSSA_EAISoap.ConsultTask('fbqwerft',wProtocolo).XMLNode.XML); ShowMessage(ACBRUtil.LerTagXML(GetSSA_EAISoap.ConsultTask(wXML.Text, wTag)) ; finally end; end; end;
  4. TKS continuo a procura de alguem para me ajudar
  5. Obrigado Daniel.. Vou verificar, mas minha necessidade é urgente. Mais alguem?? Vander Daniel, mandei email [email protected] e retornou. Eles ainda estão ativos? Sem contato vander
  6. Preciso de um consultor Delphi para aulas de WebServices (Consumir e criar). Aguardo propostas urgente. Esqueci do email: [email protected]
  7. Olá Juliomar Nao sei se posso passar a documentação aqui, pois o cliente nada falou e tenho reeio de publicar em foruns Mas minha indagação é saber como faço um teste de WS do Sefaz/SP, utilizando o Consulta Lote sem Utilizar o Componente da ACBR que já uso em outro sistema. Quero utilizar este WSDL no delphi como aprendizado, para entender como acesso um WS com um XML Encapsulado. Se tiver uma rotina simples de exemplo agradeço. https://wssatsp.fazenda.sp.gov.br/CfeConsultarLotes/CfeConsultarLotes.asmx?WSDL
  8. Humm aqui no publico? Estou aguardando o forum privado do acbr para manter seguro por conta do cliente
  9. Oi Sim tem documentação e tem link sim. Gostaria de fazer um teste usando uma consulta de LOtes do SAt em SP, sem usar o componente ACBR do SAT . Já tenho o WSDL da consulta acima importado no Delphi e as informações necessárias.
  10. Olá Tenho um sistema, em delphi, que necessita consumir o cadastro de clientes e produtos de um webservice SOAP. Alem disto a segunda etapa é enviar informações para o WS incluir no ERP do cliente. Acontece que nunca programei para WS e nem sei por onde começar. Será que teria alguém para me ajudar neste processo com alguma dica? As dicas que vejo na internet são superficiais. Gostaria de fazer um teste usando uma consulta de LOtes do SAt em SP. Já tenho o WSDL importado no Delphi e as informações necessárias. Alguém?
  11. Olá Em Santa Catarina o modulo NFCe já está valendo? ou seja pode ser emitido NFCe no Ambiente Produção? Existe algumas regra diferente dos demais estados?
  12. Olá Estou com erro ao atualizar o ACBR. Podem ajudar? segue log log_Delphi_10.3_Rio_Win32.txt
  13. ok, já consegui a informação.. Resolvido !
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.