Jicelmo Andrade

Peço desculpas mandei os arquivos errados, enviando os arquivos corretos, compilados e testados para todos os eventos, anexo uma print com o evento do colega que abriu o post que a property já está no 1298 pcesCommon.pas pcesS2299.pas pcesS2399.pas

Sua observação foi importante colega, e devido a isso me levou a analisar quais eventos usam essa tag ( indGuia ), então pesquisei pelo PDF do e-Social Layout Simplificado e encontrei os seguintes eventos que usam essa tag como obrigatória : S-2299, S-2399, S-1200, S-1210, S-1260, S-1270, S-1280, S-1298, S-1299 Sendo assim, vi que outro colega do fórum já tinha feito uma alteração para os eventos S-1200 e s-1210 criando a property indGuia na classe TIdeEvento3 que herda os métodos da classe TIdeEvento2, so que os eventos 2299 e 2399 herdam as property de TIdeEvento2 por isso que vc nao ver essa property nos eventos que informei, sendo assim fiz algumas alterações para atender a todos os eventos listados acima, Criei uma classe chamada TIdeEventoGuia = class(TIdeEvento2) { Classe Criada para atender a Tag indGuia do S-2299 e S-2399 } e adicionei a property indGuia e fiz alterações na classe TIdeEvento3 removendo a property indGuia e mudando a herança da classe de TIdeEvento2 para TIdeEventoGuia e alterei as Classes pcesS2299 e pcesS2399 para herdar de TIdeEventoGuia que estava como TIdeEvento2 segue em anexos as alterações para análise pcesCommon.pas pcesS2299.pas pcesS2399.pas As alterações que fiz atende a seu evento tb

Tambem verifiquei isso colega, e o que observei é que os índices do Array ( TUFString ) está diferente do tpuf, eu corrigi colocando na posição correta, pois o tipo ufNenhum no array TUFString tem que está na mesma ordem, exemplo: TUFString : array[0..27] of String = (",'AC','AL','AP','AM','BA','CE','DF','ES','GO', 'MA','MT','MS','MG','PA','PB','PR','PE','PI', 'RJ','RN','RS','RO','RR','SC','SP','SE','TO'); alterar a posicao do primero indice como vazio para ficar correto e não começar com AC e o ultimo índice ser TO e não " ", espero que tenha ajudado

Bom dia. pessoal exite algum programa de demostração usando as classes?

Um pouco tarde para resposta mais vamos la : Se quer saber em qual revisao seu acbr está, faça o seguinte, se estiver usando tortoiseSVN, botao direito na pasta do acbr - TortoiseSVN - ShowLog a sua revisao vai estar com número em negrito, abraço

Anotado a dica, ja tinha pensando em homologar com eles tb, sobre a questao do preço acho.que o proprio nome ja fala por si mesmo, se o serviço é o melhor do mercado entao se é justo o preço

Respondendo sua pergunta daniel : "Você realmente trabalhará apenas com o pagamento de 1 Cartão apenas por Cupom ?" nos 3 tefs que ja homologuei TEF Turbo, VsPague e agora com Pay&go essa opção de multiplos cartões é opicional, como eu estava com tempo curto para homologar fui cortando o que nao era obrigatorio para que atendesse o cliente no momento, apos essa homologação ai sim vou poder respirar e ter mais tempo de fazer uma homologação completa mesmo pq vou migrar os outros tef que tenho feito para o componente, hoje tenho uma classe para cada um desse e faço so as chamadas. com pomponente eu centralizo tudo e mais facil de dar manutenção.

Blz, vou pensar nisso quando for começar a trablahar com tef da vspague novamente pois tem certas coias que eles nao seguem um padrao mesmo nao, outro caso e nos decontos do cielo premia que no acbrtefd não vem preenchida as propriedade desconto ( CpTEF.RespostasPendentes[CpTEF.RespostasPendentes.Count-1].Desconto) mais isso não é um probelma do componente nao, pq eu estou com pay&go e com ele essa propriedade vem preenchida sem probelemas, acredito que a classe da vspague tenha que passar por algumas implementações.

Ok daniel estou ciente de que não vou estar homologado pela vspague, mesmo pq esse é uma re-homologação, pois ja tinha sido homologado sem usar o acbrtefd como tinha dito em topicos anteriores, optei por homologar com componente para que fosse mais rapida minha homologação pois a mesma está com um cliente aguardando, sobre o tipo que vamos usar, cliente ainda não tem tef esse vai ser o primeiro. So uma pergunta Daniel , existe uma forma no componente para que eu mande uma string para o client, pois assim que homologar devo começar o desenvolvimento com sitef e tentar o vspague de novo. estou perguntando isso pq existe uma situação no vspague que para exibir a tela para digitar o cartao devo mandar a seguinte string automação_coleta_retorno="9"

Brigado daniel mais pellas dicas, ja estou adiantando no desenvolvimento. Regys respondendo sua duvida, eu usava gp da V$pague mais não deu para avançar no desenvolvimento devido eu está com pressa para homologação pois existe um cliente esperando essa homologação, o problema é do suporte mesmo, servidor de desenvolvimeto sempre cai e resolvi mudar de gp para não ter que prejudicar a homologação.

Mudei de V$Pague para Play&Go Pessimo no suporte, servidor cair sempre, e alem disso quando nao cai bloqueiam seu computador e ele fica fora do ar, demora no atendimento e client incossitente, mexem no client quase todos os dias e toda vez que muda versao vem com outros problemas

Estou verificando com pessoal da vspague se é algum problema de ma configuração deles no GP, pois muito estarnho esse erro. assim que tiver uma noticia posto aqui os resultados

OK daniel coloquei o componente no meu sistema e consegui fazer o cielo premia, não preciso fazer nenhuma alteração na classe do vspague, o processo feito foi o seguinte : AutoEfetuaPagamento = False AutoFinalizaCupom = False AutoAtivaGP = True SuportaSaque = True SuportaDesconto = True MultiplosCartoes = False Faço uma venda no valor de 9010,02 Vefico se a venda é com Cielo Premia CpTEF.CRT(vValorParcela,IndiceFormaPag,cpECF.NumCupom); //------------------< Aplicando Cielo Premia >-----------------> if CieloPremia then begin ValorDescontoCieloPremia := ( vValorParcela - CpTEF.RespostasPendentes[CpTEF.RespostasPendentes.Count-1].ValorTotal); // if vTotalDescontos > 0 then begin ValorDescontoCieloPremia := ValorDescontoCieloPremia + vTotalDescontos; end; // end else if ( vTotalDescontos > 0) then begin ValorDescontoCieloPremia := vTotalDescontos; end; // cpECF.SubtotalizaCupom(-ValorDescontoCieloPremia); CpTEF.FinalizarCupom; CpTEF.ImprimirTransacoesPendentes; Daniel obrigado pelas dicas e so questionei que forum sejam mais claros, poderia ter dado esses passo as passos pq ate para eu saber quais as ordens dos metodos para serem chamados tive que debugar muito e testar e como eu disse nao estava com tempo para isso, mais tudo bem, remarqui minha homologação para proxima semana. OBS : Optei por fazer os calculos para achar o valor do desconto por que a propriedade Desconto do retorno está vindo zerada nao sei se é algum erro da classe vspague ou do GP pois se alimenta ValorTotal e fazem parte da mesma lista deveria vim tb o valor do desconto CpTEF.RespostasPendentes[CpTEF.RespostasPendentes.Count-1].Desconto ==> ( Está vindo zerado )

Ok daniel obrigado por essa informaçao, como preciso.homologar irei fazer as devidas alteraçoes necessarias, e volto aqui no forum para dar uma resposta Me responda uma coisa, existe a possibilidade de enviar comando pelo componente ? vou dar um exemplo se tem como eu enviar automação_coleta_retorno="9" Tipo alguma propreidade do componente que eu mande essa string e ela envie para o GP segundo pessoal da vspague eu preciso enviar essa string para aparecer a tela de digitação do cartao

Ola Daniel mais uma vez aqui te dando trabalho, seguinte eu uso o GP da V$Pague poderia me explicar melhor sobre esse Sitef ? tenho que programar os eventos do CliSitef?

Ok Daniel como meu tempo ta curto coloquei o componente na minha aplicação e farei os testes diretamente por ela, ai posto os resultados, so me diga qual é a ordem que devo chamar os eventos. Propriedades Setadas : Identificação = Todos os Parametros Preenchidos AutoEfetuaPagamento = False AutoFinalizaCupom = False AutoAtivaGP = True SuportaSaque = True SuportaDesconto = True MultiplosCartoes = False Ordem dos Eventos que estou Chamando : CpTEF.CRT(vValorParcela,IndiceFormaPag,cpECF.NumCupom); CpTEF.CRT(cCPCaixaVenda.TotalCartao,IndiceFormaPag,cpECF.NumCupom); CpTEF.ConfirmarTransacoesPendentes; CpTEF.FinalizarCupom; CpTEF.ImprimirTransacoesPendentes; OBS : Buferizo os pagamentos que não são feitos no cartao ( Dinheiro etc ) Print dos Eventos anexo Segue em anexo Roteiro Cielo ( O que estou fazendo é o Primeiro Cielo Premia ) Trecho do Roteiro : 1º SITUAÇÃO DE TESTE (Passo 3.1.1.4 do Roteiro da Cielo) (Os valores utilizado não pode ser alterado devido o script da Cielo) - Cielo Premia com 1 CARTÃO [OBJETIVO]: Realizar uma venda com Cielo Premia e validar se os cupons CF e CCD estão sendo impresso corretamente. [PROCEDIMENTO]: Realizar uma venda de CRÉDITO Á VISTA no valor de R$ 9.010,02. [RESULTADO ESPERADO]: A automação deve ler o campo de desconto e inseri-lo no CF antes de totalizar a venda e imprimir o comprovante CCD conforme retorno da DLL. ROTEIRO CIELO PREMIA_03.pdf

Senhores qual passo a passo para aparecer a tela de digitar o cartao, pois quando envio fcancelar = True ele exibte uma tela para escolher 3 opções, dentre elas tem uma que é digitar, quando clico nela e confirmo o sistema me retorna uma mensagem de not conected. PS : Continuou a dizer que tudo é feito no TEFDemo

Bom ate agora não obtive sucesso, mais vamos la. Daniel vc é um dos fundadores, quero te pedir que nao me veja como um um simples colaborador por estar pagando para ter acesso a informações, somo profissionais do mesmo ramo, nunca tinha ouvido falar do acbr, pois toda necessidade a respeito de automação eu dava conta desenvolvendo as rotinas, entao esto com uma homologação marcada para 12/05/2014 e apri um post aqui com uma unica duvida pois as outras ja foram sanadas, ja tinha uma rotina que fazia todo o mesmo processo sem o seu componente e vi nele uma forma de acelerar o processo de desenvolvimento sendo assim começei pelo forum aberto tirando duvidas mais la vcs nao são claros, ate endenti pq existe uma parte diferenciada. Entao optei por paga para ter acesso a respostas mais claras, e quando expalnei isso foi que vc me deu uma dica que nao tinha ate o momento AutoFinalizarCupom := False AutoEfetuarPagamento := False Quero te dar os parabens colega pelo seu conhecimento em OO, tipagem fortes e sabe usar bem suas logicas, criando eventos etc, quero tb dizer que sou um analista com mais de 16 anos de estrada e se tivesse tempo para estudar toda sua biblioteca não haveria problema em entender toda rotina, amigo eu nao estou com tempo para estudar todas as classes e se optei por pagar é pq preciso de respostas claras e rapidas, entendo que esse valor é irrisorio que é so para ajudar mesmo para quem tenha duvidas, entao so estou aqui pedindo a vcs que se coloquem em meu lugar e entendam que estou sem tempo, se for para perder tempo estudando passo a passao debugando para entender como o componente faz o cielo premia, tentando advinhar em que momento eu chamo o finalizacumpom confirmatransações e imprimetransaçoes que nao pode subtotalizar antes do crt etc, eu partiria para terminar o que ja estava fazendo. PS: Não estou aqui pedindo para me ensinar a usar o TEF e sim como e que propriedaes se preenche para prepara o componente para usar o cielo premia, será que isso é complicado de postar?, outro detahe e que vcs sabem que o tefdemo não realiza o premia, pois como diz o nome é demo, se ele faz me perdoe pela confimação, desde o inicio do post que disse que todos os meus testes foram feitos pelo TEFdemo minha aplicação anda está trabalhando sem o ACBrTef, pois troco mensagens diretamente com o GP da VSpague. Considerações : Me digam qual passo a passao devo fazer no TEFDemo para ele imprimir o Cielo Premia, se isso for possivel ja me ajuda e eu deixo esse post como resolvido se nao tem como ser feito pelo TefDemo que me digam quais eventos devo focar e a ordem que devo chamalos, em momento algum estou pedindo trechos de codigos e sim processos operacionais, espero que entendeam pq se continuarem a me da respostas vagas vou voltar a terminar o que tinha parado e morre o assunto, pois prejuizo ja estou tomando pq perdi 3 dias so com cielo prremia e quando resolver esse caso pode aparecer outros que com certeza pode tomar ate mais temopo. Ass : Jicelmo Andrade obs : Quero pedir desculpas pelos erros de acentuaçãoes e concordancias e de letras faltando estou digitando do celular

Obrigado daniel por esses dois detalhes que foram postos, sobre a questão de me expressar em texto coloquei imagens e um video para ficar mais claro o processo de como estava manusenado o seu TEFDemo, não disse que seu componente nao está apto para homologação o que te questionei foi mostra o processo do cielo premia pelo seu TEFDemo. espero que entendeam o que estou dizendo, para não confundir que estou falado o outras coisas. Meu AutoFinalizaCupom estava = True Se visse o video que eu postei acharia um monte de falhas de que não estava sabendo manusear o seu TEFdemo e evitaria tantas contras respostas.

ok vc me garante que o demo faz o cielo premia sem altera nehuma linha de codigo?, se vc me garante isso o erro é de minha parte por não saber usar, mais o que vc me diz de quando eu faço um crt assim que termina ele ja emite o cupom, entao como eu iria clicar no botao FinalizarCupom e depois ImprimirPendetes se ele ja fecha o cupom apos informar os dados do tef PS : Quanto ai tef eu não estou pedido que me ensine a pois ja tenho minha aplicação homologada feita toda no braço com troca de mesnsagens via sokets entao o funcinamento do tef eu sei como é, resolvi usar esse compennete e fazer uma nova homologação entao pedi simplismente que so me mostrassem o tefdemo fazenso o cielo premia nao pedi que me ensinassem a usar o tef. fui bem claro no post e mostrei meu processo no video.

Desculpas aceitas, afinal podemos cometer erros assim como eu tb posso, te peço desculpas tb pela minha resposta gorsseira.

Poderia ser mais claro?, pois apesar do video e dos logs deu para vc entender perfeitamente o que eu estou em duvida, que se me mostrarem o tefdemo fazendo esse desconto no cupom ai sim vou ter certeza como fazer. PS : Esse forum é para os que contriubuem, resposta são dadas em ate 1 dia util, eu tive que esperar 1 dia para receber uma resposata dessas, que eu não sei como funciona, nada contra sua resposta, ate agradeço por vc ser o unico que me respondeu, mais queroa te pedir colega que como estou aqui perguntando é pq alem de ter varias duvidas devo nao saber mesmo como esse componente funciona entao postei o video para que alguem me explicasse como usar, "Acho que está faltando você entender como o TEF funciona, incluindo quais comandos devem ser enviados e quando devem ser enviados. A partir daí procurar no ACBrTEFD os comandos correspondentes" pegando por esse trecho que vc escreveu entao pq não me da a resposa de como ele fuiciona em que estou errando e quais os comendos correspondentes, forum server para explicar e mostrar como vc deve fazer. Essa resposta continua vaga para mim. o custo que tive para estar aqui nesse forum ta me parecendo o que o que muda é pq um é pago e o outro nao, pois estou recebendo a mesmas resposatas que o forum aberto sem se precupar em esclarecer minhas duvidas

Pessoal estou aqui so para pedir que me mostrem como fazer o cielo premia pelo demo, nem estou aqui levando em questão como está na minha aplicação, estou falando isso pq o maximo que consegui foi imprimir com autoefetuapagamento = True Se alguem me mostrar como o demo dando desconto no cielo premia ja é uma ajuda e tanto. Procedimento realizado por mim AutoEfetuaPagamento = False Abrir Cupom Venda Item = 9010,02 Subtotaliza CRT = 9010,02 Ele aprova mais nao imprime as vias do tef CCD 2 Procedimento AutoEfetuaPagamento = True Abrir Cupom Venda Item = 9010,02 Subtotaliza CRT = 9010,02 Ele aprova imprime as vias normais mais o cupom nao sai o desconto Desconto é de 5,00 Total da venda deveria ser 9005,02 Segue em anexo um video com a venda sendo feita no demo sem alterar nehuma linha de codigo e com todos os eventos setados antes que me pergunte. PS : O video é com autoefetuapagamento = True Estou com prazo de homologação curto, não estou aqui pedindo muito so que me mostrem como fucionar no demo e o resto eu me viro ja ta bom d+ para mim, Video := https://www.youtube.com/watch?v=fa48ZHuZMFc&feature=youtu.be&hd=1 VSPague.txt

Juliomar posso entrar em contato com vc pelo skype?, pois estou fazendo esses testes pelo tefdemo sem alterar nehuma linha de codigo se pudesse me ajudar agradeceria, aguardo um retorno, sobre o simulador da vspague foi configurado pelo proprio pessoal da vspague remotamente no meu pc

Juliomar obrigado pela sua gentileza e me responder o post, se não for incomodo de minha parte, pessoal da vbi me disse que tenho que enviar esse comando para aparecer a tela para digitar o cartao ( automação_coleta_retorno="9" ), no componente como faço para enviar esses comandos, poderia me ajudar nesse quisito?