Jump to content
Fivewin Brasil

vagner

Membros
  • Posts

    4,981
  • Joined

  • Last visited

  • Days Won

    9

Everything posted by vagner

  1. Bom dia Jorge, Já tentei, das seguintes formas : Primeira : <pgto> <MP> <cMP>01</cMP> <vMP>0.20</vMP> </MP> </pgto> <pgto> <MP> <cMP>03</cMP> <vMP>0.24</vMP> </MP> </pgto> Segunda : <pgto> <MP> <cMP>01</cMP> <vMP>0.98</vMP> <cMP>03</cMP> <vMP>1.00</vMP> </MP> </pgto> Terceira : <pgto> <MP> <cMP>01</cMP> <vMP>0.98</vMP> <cMP>03</cMP> <vMP>1.00</vMP> <cAdmC>999</cAdmC> </MP> </pgto> e todas me retornam sempre o código - 1999-Erro desconhecido, por isso Kapi, não adiantava o código de retorno, é sempre "Desconhecido" Obrigado
  2. É Kapi, não adiantou muito não :), eu já tenho a emissão do CF-e, porém não vai com mais de um pagamento seria o mesmo caso do nosso amigo do primeiro link, porém, não é igual, já testei de todas as formas e não vai, sempre me dá erro, com uma única forma de pagamento vai de boa, e o pessoal da bematech, não retorna, para ter uma ideia, eu tenho eles no skpe, e estou esperando a resposta desde 9 de setembro de 2016, parece que eles não estão nem aí para quem compra os aparelhos, não respondem mesmo
  3. KKKK, pensei que tinha parado com o problema de não ler antes de mandar um link, não é NFC-e e sim CF-e (Cupom fiscal eletrônico)
  4. Bom, dia, Alguém teria um exemplo do xml com múltiplos pagamentos para um CF-e, tipo parte em dinheiro e parte em cartão de débito ou crédito, ou até mesmo parte em dinheiro e parte em contra vale ? Todos que eu tento retornam como erro desconhecido Obrigado,
  5. Olá, Esse erro não é do fw e sim do DOS, erro 2, não encontrou onde criar, ou o diretório não existe, ou vc não têm permissão de criar o arquivo, veja também a quantidade de arquivos na pasta, se está mandando criar no "C:" o Windows não deixa mais
  6. Geralmente o corruption se dá pela forma que está dando um pack no arquivo, qndo existem campos memo, o melhor é ao invés de dar pack, criar uma estrutura nova e ir copiando os registro quem não são deletados.
  7. Já tentou assim ? ​Function Cube(n) Local nX := n^^ 2 ​Return(nX)
  8. Olá, procure por Calendar nos samples
  9. Olá procure por DBf em LETO
  10. vagner

    Windows 10

    o Windows 10 me deu um problema, com algumas dlls mesmo elas estando no diretório correto (dll do visual c) não encontrava, mandei perguntas sobre o mesmo, aí me falaram que meu computador pode estar em conflito e teria que ser formatado para instalar o Windows 10, só sendo piada mesmo né ?
  11. AaDd() aEstoque := {} AaDd(aEstoque,Grupo) AaDd(aEstoque,...)
  12. Blz Alê ? Bom muito interessante mesmo , no que puder conte comigo, em DBF eu manjo
  13. Kapi, pelo que ví (muito por cima), essa função é somente para verificar se o IP ou Ulr existe, ele deveria retornar o número do ip, Eu tenho uma que pega a hora de um site, mas como sempre não consigo postar nada aqui, e para digitar demora muito, então qq coisa me chame.
  14. vagner

    Desafio

    Nem é tão difícil assim, se seu cliente já recebe o e-mail, dê uma olhada em sendmail, se não me engano lá têm um que recebe também, eu tinha isso a muito tempo, mas com outras finalidades, mas suponha que seu cliente precisa baixar o xml para seu programa, ou seja incluir automaticamente a nota de entrada, então peça para ele sempre jogar em uma pasta específica, seu programa olha essa pasta, baixa o xml para seu sistema, verifica a quantidade com Directory(), e qndo atingir o que quer compacta com hb_zip e mande para o contador com o sendmail
  15. Olá, Não começou hoje a 3.10 dia 02/04/2015
  16. Olá, Troque o Chr(10) por Chr(10)+Chr(13) leia e depois transforme novamente cTexto := MemoRead("SeuArquivoTexto") cTexto := StrTran(cTexto,Chr(10),Chr(10)+Chr(13) e depois de usar mude novamente cTexto := StrTran(cTexto,Chr(10)+Chr(13),Chr(10))
  17. Se for o listbox normal : oBrow:aHeader[1]
  18. Olá, Vc também pode dar um copy to \\seunumeroip\arquivo
  19. Olá, Talvez somente com o Format Get, vc conseguirá isso. \Samples\TestFGet.Prg
  20. Nada de anormal Oscar, somente tomar muito cuidado, com os append da vida, travar corretamente e destravar, ter uma rede estável, para vc ver tenho um cliente, que está fazendo este ano de 2014, 6 anos de trabalho, e sem reorganização, é uma maravilha, o cliente, nem têm aqueles botões que eu costumava antigamente colocar "reorganização" , veja que o DbSetOrder(0), eu comecei a usar depois de uma discussão sobre o assunto onde o Eduardo Motta e o Villiam, me falaram, antigamente eu usava o seguinte recurso : Se eu tinha que dar um "replace" no campo do nome eu mudava o índice para o um que não tinha o nome como chave, isso funcionava, porém eu tinha que sempre ficar mudando e saber se tal índice tinha ou não o field, com o DbSetOrder(0), não preciso me preocupar com isso além de estar voltado para "0" ele atualiza os outros índices sem problemas vou dar um pequeno exemplo : DbAppend() -> Não necessita travar o registro depois, pois ele mesmo já trava, nem precisa mudar o índice, pois não há nada nele para poder corromper Já o RLock(), esse sim precisa ser tomado cuidado, pelo que eu reparei na época que me corrompia os índices, era justamente o motivo de eu tentar alterar o field onde ele se encontrava no índice Sempre que usar um desses dois, use o dbcommit() e dbunlock(), em seguida, muitos esquecem do dbcommit(), e dão direto o dbunlock(), onde destrava o registro sem antes "commitar" os dados
  21. cTexto := "MeuTexto" MemoWrite("\SuaPastaDropBox\SeuArquivoTxt",cTexto)
  22. Olá Kapi, como assim para um teclado ? Onde vc quer colocar esse teclado ?
  23. Olá, eu coloquei em dicas, mas isso qndo era o outro site, ftptodos.zip, não sei se ainda irá encontrar, pois a mensagem é de 2002 , hoje em dia eu utilizo o DropBox
  24. Evando, É só uma pasta , basta copiar ou cria direto na pasta por exemplo cTexto := "Estou no drop" MemoWrit("\DropBox\SuaPastaCompartilhada\Teste.Txt",cTexto)
×
×
  • Create New...