Jump to content
Fivewin Brasil

HERGON

Membros
  • Posts

    270
  • Joined

  • Last visited

  • Days Won

    9

Posts posted by HERGON

  1. Bom dia pessoal

    Estou acompanhando o post, apesar de ainda não ter manifestado... Com certeza também participarei.

    A data 29/10 é legal. Se quiserem passar para novembro, para mim também não há problema.

    Sobre os temas de palestras até agora apresentados, são bem interessantes, apenas acrescentaria falarmos sobre a FiveTouch e se alguém já tiver utilizando, quem sabe apresentar algum aplicativo pronto para termos maior contato com o produto.

    Não vamos deixar esfriar este assunto do encontro, senão acaba ficando para última hora e não sair do papel.

    Abraços

  2. Boa tarde

    fnl, tudo, EXATAMENTE TUDO que vc citou foi feito no encontro de BH/MG, elegemos o estado/cidade, quem o organizaria, data (mês de preferência) e os assuntos seriam debatidos no decorrer do ano para o próximo evento, assim como hotel e palestrantes... o que aconteceu? FUROU. Porque? Porque todos ficaram a espera de um milagre e que tudo fosse feito a gosto e hora sem que ninguém mexesse uma palha... final da estória, estamos sem realizar o evento até hoje.

    MEXAM-SE, ou não existirão eventos futuros.

    Herberson Gontijo

  3. Boa tarde

    No ano passado eu me dispus a organizar o evento em BH/MG, nos mesmos moldes do anterior que foi realizado no SESC... Perdi meu tempo fazendo cotações, pré contratos com o SESC e empresas para buffet e etc. O único trabalho que os participantes interessados teriam era fazer uma pré-inscrição para levantarmos o número de pessoas que participariam e assim termos como contratar os serviços. Depois, obviamente viria a parte onde levantaríamos o conteúdo programático do evento.

    Para resumir, TODOS estão a favor do evento, querem que seja realizado mas não contribuem com NADA, nem mesmo com uma simples pré-inscrição.

    Estou totalmente a favor da realização do evento, desde que bem preparado e que exista um conteúdo elaborado para usufruirmos não só da companhia dos participantes, mas também adquirirmos conhecimento e quem sabe promovermos parcerias. Se for apenas uma reunião para tomarmos cervejas numa padaira/bar, não contem comigo.

    Herberson Gontijo

  4. Edutraini,

    A Cobrebem não desenvolveu (apesar de prometido) a geração do boleto em PDF. A Dll está parada a muito tempo, não está tendo atualizações e sempre que questionamos o suporte deles falam que não tem previsão... O que tudo indica é que eles descontinuaram o produto, mas continuam vendendo licenças.

    Uma alternativa que você tem é, em vez de mandar o boleto via PDF enviá-lo em HTML, aqui mesmo no fórum e no manual tem exemplos de como fazer.

    Att.

    Herberson Gontijo

  5. Boa tarde Miragerr

    Se seu objetivo é cancelamento de NF-e, eu fiz assim, talvez te ajude:

    nDias:= Date()-Ctod(Subs(CabNf->DTRET,9,2)+"/"+Subs(CabNf->DTRET,6,2)+"/"+Subs(CabNf->DTRET,1,4))
    cHora:= Subs(CabNf->DTRET,12,8)
    If nDias>1 .or. (nDias=1 .and. Secs(Elaptime(cHora,"23:59:59"))+Secs(Elaptime("00:00:00",Time()))>86400)
       If !MsgYesNo("Nota fiscal fora do prazo legal para cancelamento."+CRLF+;
          "Se deseja realmente cancelar esta NF, é necessário primeiro solicitar o cancelamento EXTEMPORÂNEO pelo"+CRLF+;
          "site da Secretaria da Fazenda (SEFAZ) do seu estado."+CRLF+;
          "Caso já tenha solicitado o cancelamento extemporâneo, deseja continuar o cancelamento?",;
          "Prazo Para Cancelamento Terminado")
          Return .t.
       Endif
    Endif
    

    Herberson Gontijo

  6. Bom dia

    Obrigado a todos que responderam o post, especialmente ao JoãoSolution que me enviou a classe por email.

    Estudando a classe, consegui chegar no resultado desejado mesmo sem utilizá-la... Vamos à solução do problema:

    Quando utilizava o comando

    aFilesInZip:=HB_GetFilesInZip(cArqZip)

    o retorno é uma array unidimensional com os nomes dos arquivos zipados contidos no arquivo .zip

    Se utilizarmos o mesmo comando passando .t. como segundo parâmetro, o retorno será uma array multi com todos os dados dos arquivos zipados contidos no arquivo .zip, inclusive o tamanho real, que era o que eu precisava. Exemplo:

    aFilesInZip:=HB_GetFilesInZip(cArqZip, .t.)

    Solução perfeita para o que eu queria, mas se não fosse a classe que o João enviou não saberia.... Por isso, meu MUITO OBRIGADO.

    Herberson Gontijo

    Ponteware Software Ltda.

  7. Boa tarde

    Obrigado JoãoSolution e Kapiaba por responder.

    Olhei no link que o Kapiaba postou mas não achei nada que pudesse me retornar o tamanho dos arquivos dentro do arquivo zipado, já a rotina do JoaoSolution está acusando a falta das funções: DetalheLog() e SaveZipLog(), se puder me enviar eu testo aqui e dou o retorno.

    Obrigado

    Herberson Gontijo

  8. Bom dia

    Utilizo:

    - HB_ZipFile() para compactar ;

    - HB_GetFilesInZip() para listar arquivos que estão dentro do zip. (cria uma array)

    Existe algum comando que me retorne os arquivos e seus respectivos tamanhos que estão em um arquivo ZIP (tamanho real do arquivo, não compactado) ?

    Alguém teria uma lista completa dos comandos?

    Agradeço antecipadamente.

    Herberson Gontijo

    Ponteware Informática

  9. Crisvam, não sei se é o que você precisa, mas se utiliza a classe do Gilmer + Flexdocs, deve ser isso, espero que ajude:

    // Modificação nos dados do XML a partir de 01/05/2011 obrigado pelo SEFAZ para ambiente de HOMOLOGAÇÃO
    If Val(cTpAmbiente)=1 // Producao
    cDestNome := If(!Empty((cAliasCliFor)->RAZAO),(cAliasCliFor)->RAZAO,(cAliasCliFor)->NOME )
    cDestCnpjCpf:= If(lPosIcm,(cAliasCliFor)->CNPJ, (cAliasCliFor)->CPF)
    cDestIe := (cAliasCliFor)->IEST
    Else // Homologação
    cDestNome := "NF-E EMITIDA EM AMBIENTE DE HOMOLOGACAO - SEM VALOR FISCAL"
    cDestCnpjCpf:= If(lPosIcm,(cAliasCliFor)->CNPJ, (cAliasCliFor)->CPF)
    cDestIe := (cAliasCliFor)->IEST
    Endif
    If cUfCli <> "EX" // Só passar CNPF se não for importação/exportação.
    If lPosIcm // .or. Val(cTpAmbiente)=2
    oNFe:SetValue("dest" , "CNPJ" , R_CnpjLienar(cDestCnpjCpf)) // CNPJ
    Else
    oNFe:SetValue("dest" , "CPF" , R_CpfLienar(cDestCnpjCpf) ) // CPF
    Endif
    Else
    oNFe:SetValue("dest" , "CNPJ" , "") // CNPJ
    Endif
    oNFe:SetValue("dest" , "xNome" , cDestNome )// Razão Social
    oNFe:SetValue("dest" , "xFant" , " " ) // Nome Fabtasia
    oNFe:SetValue("dest" , "xLgr" , Alltrim((cAliasCliFor)->TIPO)+" "+Alltrim((cAliasCliFor)->END) ) // Endereço
    oNFe:SetValue("dest" , "nro" , (cAliasCliFor)->NUMERO ) // Numero do Endereço
    oNFe:SetValue("dest" , "xCpl" , (cAliasCliFor)->COMPL ) // Complemento do Endereço
    oNFe:SetValue("dest" , "xBairro" , (cAliasCliFor)->BAIRRO ) // Bairro
    oNFe:SetValue("dest" , "cMun" , (cAliasCliFor)->CODCID ) // Código do IBGE do Municipio
    oNFe:SetValue("dest" , "xMun" , (cAliasCliFor)->CIDADE ) // Municipio
    oNFe:SetValue("dest" , "UF" , (cAliasCliFor)->UF ) // Estado
    oNFe:SetValue("dest" , "CEP" , ClearChar( (cAliasCliFor)->CEP, {"-"}) ) // CEP
    oNFe:SetValue("dest" , "cPais" , If(Empty((cAliasCliFor)->CODPAIS), "1058", (cAliasCliFor)->CODPAIS))// RetCodPaisIBGE()) //Default := Brasil // Código do IBGE do Pais
    oNFe:SetValue("dest" , "xPais" , cNomePais) // Pais
    oNFe:SetValue("dest" , "fone" , ClearChar((cAliasCliFor)->FONE ,{"-","(",")"," ","."}) ) // Telefone
    oNFe:SetValue("dest" , "indIEDest", If("ISENTO" $ cDestIe .or. Empty(Alltrim(cDestIe)), "2","1") )
    If ! ( "ISENTO" $ cDestIe .or. Empty(Alltrim(cDestIe)) )
    oNFe:SetValue("dest" , "IE" , ClearChar(cDestIe ,{".","-"} ) ) // Inscrição Estadual
    Endif
    oNFe:SetValue("dest" , "ISUF" , cSuframa ) // Inscrição Suframa
    oNFe:SetValue("dest" , "email" , (cAliasCliFor)->EMAIL ) // Email
  10. Boa tarde pessoal

    Estou com um problema para gerar o NOSSO NUMERO no arquivo de remessa pelo CobreBemX, mas não utilizo a opção

    oCbx:InicioNossoNumero := "000000001"
    oCbx:FimNossoNumero := "999999999"
    oCbx:ProximoNossoNumero := Strzero(Val(cProximoNro),9,0)
    porque meus cleintes geram o boleto e imprimem enviando junto com a NF e apenas no final do dia gera o arquivo remessa. Se utilizasse da forma acima na geração do arquivo remessa o nosso numero seria outro, então eu tenho que passa-lo exatamente como foi impresso no boleto gerado anteriormente, da seguinte forma:
    oBoleto:NossoNumero := cNossoNumero
    Só que as vezes a geração do boleto é junto com o arquivo remessa, nestes casos ainda não tenho o nosso numero gerado e gostaria que a dll calculasse o dígito verificador para que eu possa passá-lo corretamente. Em contato com o suporte da CobreBemX foi passado que eu deveria fazer assim:
    Prezado(a) Sr. Herberson Gontijo,
    
    Quanto a sua dúvida, por favor, leia o valor da propriedade
    "NossoNumero" do objeto 'IDocumentosCobranca', após a chamada de um dos métodos a seguir:
    
    "CalcularDadosBoletos";
    "EnviaBoletosPorEmail";
    "ImprimeBoletos";
    "ImprimeBoletosSemPreview";
    "GravaArquivoRemessa";
    "GeraHTMLBoleto";
    
    Segue o exemplo abaixo:
    
    CobreBemX.ImprimeBoletos;
    
    ShowMessage(Boleto.NossoNumero);
    
     

    Fiz o que orientaram e não surtiu resultado. :(

    Alguém saberia como resolver esse problema?

    Att.

    Herberson Gontijo

    Ponteware Informática

  11. Bom dia Erciley

    Possível é, mas não é o maior problema, todo o custo é negociado em relação ao número de participantes, happy houer, coffee break, churrasco, etc. Isso para não falar da parte técnica, como apresentações, projetor, sistema de som, e por ai vai... depois temos a parte do material didático, ou seja, sem um número mínimo para trabalhar não há organização possível.

    Mas valeu pela tentativa, eu já entreguei... quem sabe em cima da hora no final do ano fazemos um "junta-junta" de abnegados e vamos tomar umas brejas e conversar em um buteco em SP?

    Herberson Gontijo

    Ponteware Informática Ltda.

  12. Bom dia pessoal

    Agradeço a todos que responderam o tópico, posicionando suas opiniões e sugestões e principalmente aos que fizeram a "pré-inscrição". Opiniões diversas além de saudável é democrático, expressá-las, defender seu ponto de vista com diplomacia é prova de apoio ao evento e vontade que nossa comunidade FW cresça.

    Conforme dito anteriormente, a viabilidade do "encontro/congresso" depende de no mínimo 50 participantes para que tenhamos um custo acessível e, até o momento temos apenas 23 participantes (27 contando com acompanhantes) pré-inscritos. Diante do número insuficiente de interessados, comunico agora que estou encerrando minha participação na organização do evento.

    PS: Narlem, minha intenção não é unanimidade ou agradar a todos... temos e podemos fazer um grande evento, bem organizado e proveitoso, mas para isso é necessário vontade e animação de quem participará. Não estou vendo isso neste ano. Se alguém se habilitar na organização, ajudo no que for possível.

    Herberson Gontijo

    Ponteware Informática Ltda.

  13. Boa tarde senhores,

    Gostaria apenas de esclarecer alguns pontos:

    - O encontro não será lazer. A proposta é fazer um encontro parecido com o de 2010, com várias palestras importantes e multiplicação do conhecimento, com temas importantes para a maioria, que impactam diretamente no nosso dia a dia. Óbvio que teremos a parte de confraternização, com o happy houer da chegada, no primeiro dia e o churrasco, no segundo dia.

    - Por enquanto não há como definir as palestras, será feito em momento oportuno, por sugestão e votação, vencendo a maioria, mas podem ter certeza que compensará o investimento.

    - Em relação a inscrições fora do prazo, minha posição é que não há problema da MINHA PARTE, apesar de dificultar (e muito) qualquer tipo de organização, mas consigo lidar com isso... Mas é importante frisar que, não haverá garantias que consigamos chalés para quem não fizer dentro do prazo, então ficar esperando para ver com fica pode não ser uma boa ideia para quem REALMENTE quer participar.

    Sem querer fazer qualquer tipo de pressão/imposição, mas volto a falar, até sexta-feira (16/05/2014), data limite para eu reunir com o SESC para fecharmos o contrato. Após esta data fica encerrada minha tentativa de organização do evento.

    Herberson Gontijo

    Ponteware Informática Ltda.

  14. Olá

    Nada contra inscrições após a data, mesmo porque imprevistos acontecem, mas não posso assinar um contrato com SESC, com buffet etc sem um número mínimo de participantes que possam arcar com os custos do evento.

    Outro detalhe importante é, o SESC é muito solicitado para eventos e se não contratarmos já não haverá disponibilidade para a data que desejamos.

    Herberson Gontijo

    Ponteware Informática Ltda.

  15. Olá pessoal


    Neste ritmo de "pré-inscrições" não vamos conseguir fazer o encontro. Estava marcando reunião amanhã com o SESC para discutirmos o contrato, mas com esse número de participantes não rola. Vou remarcar para outra sexta-feira, dia 16/05/2014, mas se tivermos menos que 50 pré-inscritos não dá segurança e encerro minha tentativa de organização neste ano.


    Chalés Nome

    -----------------------------------------------------------------------------------------------------------------

    01 01 - Herberson Carlos Gontijo (Hergon) - Belo Horizonte / MG - (01 chalé - 2 pessoas)

    02 - Claudia M. R. Glória Gontijo (Cacau7) - Belo Horizonte / MG (Acompanhante)

    02 03 - Ana Possani (AnaCatacombs) - Cianorte / PR (01 Chalé - 1 Pessoa)

    03 04 - João Bosco de Paulo - Contagem / MG (01 chalé )

    04 05 - Cleber Luiz Souza - Contagem / MG

    05 06 - Nárlem - Beloarrow-10x10.png Horizonte / MG - ( 01 chalé - 1 pessoa )

    06 07 - Vander Lúcio Nunes (VLNunes) - João Monlevade / MG

    07 08 - Gilmer - Sorocaba / SP

    08 09 - Evandro G. de Paula - Curvelo / MG - ( 01 chalé - 1 pessoa )

    09 10 - Cleber Ribeiro Conde - Caratinga / MG

    10 11 - Vailton Renato - Sorocaba / SP

    11 12 - José Manoel da Silva - São Paulo / SP

    12 13 - Rodrigo Portugual - São Paulo / SP

    13 14 - Roberto Júnior - São Paulo / SP

    14 15 - Wesley Rodrigues - São Paulo / SP

    15 16 - Luiz Roberto SERVULO Diadema/SP

    16 17 - Leonardo Guimarães(LHSISTEMAS) Vitória-ES

    18 - Helder Angelo Fiorotti(LHSISTEMAS) Vitória-ES

    17 19 - Marcio Eduardo Teixeira - Visconde do Rio Branco - MG

    18 20 - Rubens Martins (RUBENSMA) - São Paulo - SP - (01 chalé - 2 pessoas)

    21 - Maria A. F. O. Martins - São Paulo - SP (Acompanhante)

    19 22 - Sebastião de Oliveira Pessoa - Contagem - MG - TiaoFw

    20 23 - Alexandre Pereira da Silva - B. Horizonte / MG - alex2002

    21 24 - André Emerenciano dos Santos - Belo Horizonte / MG - (01 chalé - 2 pessoas)

    25 - Eliane Correia da Silva (Acompanhante)


    Herberson Gontijo

    Ponteware Informática Ltda.

×
×
  • Create New...