Ir para conteúdo
Fórum Script Brasil

Hudson Dias

Membros
  • Total de itens

    6
  • Registro em

  • Última visita

Sobre Hudson Dias

Hudson Dias's Achievements

0

Reputação

  1. Jhonas, compilei conforme o indicado deu erro na compilação, ai fiz algumas modificações conforme abaixo, ai compilou no entanto, quando chamo o codigo da a mesma mensagem de erro access violation at address 00612889 in module read of address 00000000C ao debugar, mostra nas linhas mensagem0.data.AsDate := now(); // data atual e cobranca0.valor.DecimalString := Format('%.2f', [valor]); sem compilar var service: WSBillingPortType; mensagem0 : mensagem; sacador0 : sacador; sacado0 : sacado; agendamento0 : agendamento; cobranca0 : cobranca; carne0 : carne; log : WideString; f2b: F2bCobranca; valor : Double; begin service:= GetWSBillingPortType(false,'',HTTPRIO1); /// MONTAR O CÓDIGO DOS OBJETOS valor := 2123.40; mensagem0.data.AsDate := now(); // data atual mensagem0.numero := '010203'; mensagem0.tipo_ws := 'webservice'; sacador0.conta := '9023'; sacado0.nome := 'Jose Oliveira'; sacado0.email[0] := 'joseoliveira@f2b.com.br'; //sacado0.numero := 0123456; cobranca0.valor.DecimalString := Format('%.2f', [valor]); cobranca0.tipo_cobranca := ''; cobranca0.demonstrativo[0] := 'teste'; cobranca0.num_parcelas := 1; carne0.url := ''; carne0.numero := 0; f2b := F2bCobranca.Create; f2b.mensagem := mensagem0; f2b.sacador := sacador0; //f2b.sacado := sacado0.; f2b.cobranca := cobranca0; service.RegisterWSBilling(f2b);
  2. Jhonas sempre da essa mensagem access violation at address em duas linhas, não aceita a tipagem TXSDate ou TXSDecimal var msng : mensagem; saca : sacador; cobr : cobranca; begin //conta := '9023010157650103'; msng := mensagem.Create; msng.data.AsDate := Now; // aqui um dos erros msng.numero := '010203'; msng.tipo_ws := 'WebService'; saca := sacador.Create; saca.conta := '9023010857450105'; cobr := cobranca.Create; cobr.valor.DecimalString := FormatFloat('%d', 20.5); // aqui outro erro. cobr.tipo_cobranca := ''; poxa, ws é dificil
  3. Compilei sim, o problema acho que deve ser para montar, na hora de atribuir os parâmetros para montar o xml e eviar ws. Poxa já tentei de tudo, sou novo em Ws deve ser por isso que estou tomando um coro
  4. Ola Jonas, Gerei wsdl, mas não conseguir usa-lo, todas as tentativas deram erros
  5. Ola Jonas, Cheguei ai nesta construção, mas não existem um manual para usar e todas as tentativas tenho erros.
  6. Ola Gente, Sou novo com webservices e através de videos do Rodrigo Mourão consegui fazer alguma coisa, porem, preciso associar a um serviço de webservices da f2b (www.f2b.com.br) onde posso gerar carnês e boletos. Já usava o ws em php em outro sistema online, porem a empresa esta migrando tudo para o delphi, e não estou conseguindo fazer isso funcionar. Esse é o wsdl http://www.f2b.com.br/soap/wsbilling.wsdl xml. alguém pode me ajudar? Preciso muito de fazer isso funcionar, deste já agradeço.
×
×
  • Criar Novo...