HERGON

Nossos sentimentos, Vitor.

Tenha fé que Deus sabe o que faz.

Herberson e Cacau

01 - Christiano A. Silveira - CTOAS - São Paulo - christiano.silveira@gmail.com

02 - Rubens Martins - rubensma - São Paulo - rumarti@gmail.com

03 - Luis Antonio da Paixao - Sao Sebastiao do Paraiso - Minas Gerais - luispaixao13@hotmail.com

04 - Luiz Roberto Servulo - Diadema - São Paulo - lrservulo@terra.com.br

05 - eduardo mazur - Sao Paulo

06 - Vailton Renato - São Paulo (vailtom@gmail.com)

07 - Charles - Palmas - TO integresis@brturbo.com.br

08 - Evandro G. de Paula - MG (imortal@skillnet.com.br)

09 - Kleyber Derick Batalha Ribeiro - Kleyber - São Luis - Ma - (kleyber.ribeiro@grupoferraz.com.br)

10 - vitor s.b.c. vitor.reis@terra.com.br

11 - Vagner Wirts (vwirts@terra.com.br)

12 - Gilmer Luiz Orro Tavares (gilmer@fivewin.com.br)

13 - Antenor Trufelli Filho (trufelli@uol.com.br) - São Paulo

14 - Eduardo Motta - eduardo@emotta.com.br

15 - EMPRESOFT(Luiz Fernando) - empresoft@globo.com

16 - Herberson Carlos Gontijo - hergon - BH/MG - (herberson@ponteware.com.br)

17 - Atenilto Marinho + um acompanhante -atenilto@itksoft.com.br

18 - Carlos Leÿen - decker - celeyendecker@hotmail.com

19 - Alexandre Zilves - azilves - RJ - azilves@hotmail.com

20 - Jackson Douglas Cavalcante Brito - RR - miragerr@osite.com.br

21 - Evaldo Wagner - Sao Paulo/SP - evaldowl@hotmail.com

22 - Geraldo Barbosa da Silva - lucgera@terra.com.br

23 - Sebastião de Oliveira Pessoa - tiaopessoa@hotmail.com

24 - Alexandre Serafini (Polirep) (hehehehehehehehee...)

25 - Valdir - Jundiaí/SP - valdir@fivesolution.com.br

26 - André E. dos Santos - BH/MG - (andre@ponteware.com.br)

01 - Christiano A. Silveira - CTOAS - São Paulo - christiano.silveira@gmail.com

02 - Rubens Martins - rubensma - São Paulo

03 - Luis Antonio da Paixao - Sao Sebastiao do Paraiso - Minas Gerais - luispaixao13@hotmail.com

04 - Luiz Roberto Servulo - Diadema - São Paulo - lrservulo@terra.com.br

05 - eduardo mazur - Sao Paulo

06 - Vailton Renato - São Paulo (vailtom@gmail.com)

07 - Charles - Palmas - TO integresis@brturbo.com.br

08 - Evandro G. de Paula - MG (imortal@skillnet.com.br)

09 - Kleyber Derick Batalha Ribeiro - Kleyber - São Luis - Ma - (kleyber.ribeiro@grupoferraz.com.br)

10 - vitor s.b.c. vitor.reis@terra.com.br

11 - Vagner Wirts (vwirts@terra.com.br)

12 - Gilmer Luiz Orro Tavares (gilmer@fivewin.com.br)

13 - Antenor Trufelli Filho (trufelli@uol.com.br) - São Paulo

14 - Eduardo Motta - eduardo@emotta.com.br

15 - EMPRESOFT(Luiz Fernando) - empresoft@globo.com

16 - Herberson Carlos Gontijo - hergon - BH/MG - (herberson@ponteware.com.br)

Editado por - hergon on 15/08/2011 14:12:24

Herberson

Belo Horizonte - MG - Completando meus 46 anos hoje.

Concordo com o ecmsoft, é muito melhor ler um post sabendo de onde é a pessoa que o respondeu/perguntou, as ferramentas que utiliza e agora alguns já tem até a foto.

Olá

Acho que ninguém tá se importando com isso

Uma pena, seria bom rever os amigos

Herberson Gontijo

Olá

Também achei interessante isso

Quando postar o exemplo completo vou testar.

Herberson Gontijo

Ponteware Software

Olá

Não vejo nenhum problema em a colocar foto nos post, ao contrário, acho que todos deveriam fazer isso, ficaria mais fácil identificar com quem estamos falando virtualmente.

Quanto a foto da minha esposa, vocês deveriam agradecer, já que ela é linda e aqui a maioria é barbado e feio, melhora o ambiente.

Bye

Herberson Gontijo

Ponteware Software

Olá Hilbert, bom dia

Cara, vou plagiar meu amigo Evandro, EU NÃO SEI COMO CONSEGUI VIVER ATÉ HOJE SEM O FAST REPORT. Ele é simplesmente The Best. Faz tudo que você relacionou, apenas boleto que seria melhor usar o CobreBemX.

Abraço

Herberson Gontijo

Ponteware Software

Problema resolvido, com uma ajudinha do Keyber via MSN, obrigado.

Solução:

nTamPag := 28

oFrPrn:SetProperty( "Page1","PaperHeight", nTamPag*10 )

Abraço

Herberson Gontijo

Ponetware Software

Olá, Bom dia

Alguém saberia me informar como eu posso mudar o tamanho da página de um relatório via programação no Fast Report ?

No modo design eu modifico manualmente a propriedade Paper Height, passo para 28 cm, como eu faria isso via programação?

Agradeço qualquer ajuda

Herberson Gontijo

Ponteware Software

Editado por - hergon on 12/06/2011 12:38:36

Olá, Bom dia

Alguém saberia me informar como eu posso mudar o tamanho da página de um relatório via programação no Fast Report ?

No modo design eu modifico manualmente a propriedade Paper Height, passo para 28 cm, como eu faria isso via programação?

Agradeço qualquer ajuda

Herberson Gontijo

Ponteware Software

Editado por - hergon on 12/06/2011 12:38:36

Olá

Não estou conseguindo que a chave seja preenchida no campo fazendo conforme indicado abaixo:

citação:

Function nfe5b(nChave)

local oOle

if !VerificaNet()

alerta1(,"Computador Não Conectado", "na INTERNET")

showmenu()

return .f.

endif

oOle:=CreateObject("InternetExplorer.Application")

oOle:Visible:=.t.

oOle:ToolBar:=.f.

oOle:StatusBar:=.f.

oOle:MenuBar:=.f.

oOle:Navigate("https://www.nfe.fazenda.gov.br/portal/FormularioDePesquisa.aspx?tipoconsulta=completa&chaveacesso="+nChave)

SysRefresh()

return .t.

desta forma o usuario so tem que digitar o CAPTCHA[/center]

---

Outra dúvida, se o cliente não utilizar o Internet Explorer como navegador e possuir o Mozilla ou Chrome, tem como utilzar direto? como seria a chamada? oOle:=CreateObject("InternetExplorer.Application")

Obrigado

Herberson Gontijo

Ponteware Software

Olá

id=code>

Infelizmente não é coisa de "Mineirim". A sugestão que dei para a realização do encontro em setembro foi porque tínhamos a possibilidade de fazer o encontro naquele hotel fazenda que o Vitor indicou. E todos sabemos que, para usufruirmos melhor das opções disponíveis, seria interessante marcarmos numa época que não chovesse tanto.

Independente da data de realização, já está ficando muito tarde para programar qualquer coisa organizada. Mas a idéia de trazer o Linares é boa, só que para isso seria necessário ORGANIZAÇÃO e postagens MAIS SÉRIAS sem tantas "COALIRAGEM" e BAYTOLAGEM porque senão quer vir acha que é brincadeira.

Abraço

Herberson Gontijo

Ponteware Software

Olá Luisão

citação:Herberson, faça assim:

cVar:= GetEvn(PROGRAMFILES)

Para testar, vá no Executar e digite %PROGRAMFILES%

---

Obrigado pela resposta... Deu certinho.

Herberson Gontijo

Ponteware Software

Olá

Ninguém sabe como pegar o PATH para criar o atalho no menu "Meus Arquivos de Programas"?

Herberson Gontijo

Ponteware Software

Olá

Bom dia

Legal isso de criar o atalho na área de trabalho direto via código. Uma idéia que me vem agora é o seguinte...

Por algum motivo o usuário perdeu o atalho da área de trabalho, então ele teria que procurar via windows explorer/meu computador para entrar no sistema, e só depois que entrar no sistema será criado novamente o atalho.

Não seria interessante criar também em "Meus Arquivos de Programas"? Pq se perder o atalho na área de trabalho poderia entrar no sistema via "Meus Arquvios de Programa" e recriar o atalho.

Como pegar o PATH para criar em "Meus Arquivos de Programas"?

Herberson Gontijo

Ponteware Software

Olá pessoal

Aprecio o bom humor e as brincadeiras, mas se esse tópico é uma lista dos participantes do VIII Encontro FW, seria legal que fosse um pouco mais sério e objetivo, para que o evento seja também levado a sério.

Da forma que está sendo conduzido, não sei se compensa participar.

Desculpe a sinceridade, mas poderíamos ser mais profissionais.

Esse encontro é a oportunidade que temos para trocar conhecimentos, contatos, negócios, não vamos torná-lo em bagunça.

Herberson Gontijo

Ponteware Software

Olá pessoal

Muito bom saber que voltaram a animar com VIII Encontro FW.

Então para dar mais uma animada na galera, assim que formarem uma comissão organizadora vou transferir o valor de R$ 2.350,00 que estão aplicados numa poupanca referente a sobra de caixa do VII Encontro.

Abraços

Herberson Gontijo

Ponteware Software

Olá

Cadê os voluntários para organizar o evento em SP ???

Vamos agitar esse encontro para não corrermos o risco de não acontecer.

Herberson Gontijo

Ponteware Software

rsrsrssrsr

São só umas cervejinhas...

e claro a satisfação de rever os amigos

Vamos ver se a gente faz isso pelo menos uma vez por mês, ai quem sabe vc anima na próxima e encara a estrada.

Abraços

Herberson Gontijo

Ponteware Software

Olá Mineiros (ou a quem interessar)

Vamos tomar umas cervejas e trocar idéias hoje a noite, quem quiser aparece lá.

Confirmados: Herberson, André, Tião, Francis, Polirep, Evandro, Cléber Condé e Narlem.

Local: Av. Valdomiro Lobo, 1180 - Guarani - Belo Horizonte - MG

Abraço

Herberson Gontijo

Ponteware Software

Editado por - hergon on 04/02/2011 11:56:39

Olá Mineiros (ou a quem interessar)

Vamos tomar umas cervejas e trocar idéias hoje a noite, quem quiser aparece lá.

Confirmados: Herberson, André, Tião, Francis, Polirep, Evandro, Cléber Condé e Narlem.

Local: Av. Valdomiro Lobo, 1180 - Guarani - Belo Horizonte - MG

Abraço

Herberson Gontijo

Ponteware Software

Editado por - hergon on 04/02/2011 11:56:39

Olá

Vou dar uma dica aqui, mas desde já adianto que não posso participar da organização do evento neste ano, devido a compromissos assumidos e falta de tempo.

Eu sugeri a mudança de data do evento, e aparentemente todos apoiaram, já que em setembro, a possibilidade de chuvas são menores. Mas para que essa mudança de data não comprometa, e tenhamos tudo que já comentado neste próprio post, é IMPRESCINDIVEL que se crie a comissão organizadora JÃ.

Façamos algumas contas:

Temos 7 meses até a data do encontro (não contando setembro que ainda não tem o dia definido), ou seja, a comissão organizadora terá apenas 1 mês para fazer todo o serviço pesado de orçamento/contrato de tudo, para ter o valor do investimento e assim iniciar as inscrições dividindo em 6 parcelas. Isso sem falar da própria inscrição pela internet que se mostrou bastante cansativa (só quem já fez sabe como é).

MUITO trabalho, pouco tempo.

MOVIMENTEM-SE PAULISTAS.

Vão deixar a peteca cair???

Herberson Gontijo

Ponteware Software

Editado por - hergon on 28/01/2011 10:35:48

Olá

Fico feliz em ter ajudado

Também penei com isso e sei bem o que é cliente pressionando e não sabermos o que temos que alterar para funcionar.

Abraço

Herberson Gontijo

Ponteware Software

Olá Luiz

Bom dia

Veja:

Instrução de Procedimento.

Notas Fiscais emitidas para Escrituração Fiscal.

Notas Fiscais de crédito relativo à compra de bem para o ativo permanente.

1. Dados do Produto.

1.1. Código do Produto – utilizar o código do CFOP.

Ex.: CFOP=1604, Código do produto = ‘CFOP1604’.

Descrição do produto – preencher com “Ativo permanente - ICMS a ser apropriadoâ€.

1.2. NCM – não preencher.

1.3. Código de Situação Tributária = 090.

1.4. Valor unitário = 0.

1.5. Valor total = 0.

1.6. BC ICMS = Valor do crédito a apropriar.

Obs.: campo será preenchido somente para permitir a validação da NF-e.

1.7. Valor do ICMS = Valor do crédito a apropriar.

1.8. Alíquota ICMS = 100.

Obs.: campo será preenchido somente para permitir a validação da NF-e.

2. Cálculo do Imposto.

2.1. Base de Cálculo = Valor do crédito a apropriar.

2.2. Valor do ICMS = Valor do crédito a apropriar.

2.3. Valor Total dos Produtos = 0.

2.4. Valor total da Nota Fiscal = 0.

3. Transportador.

3.1. Frete por conta = 0.

4. Dados Adicionais.

4.1. Informações Adicionais de interesse do Fisco – preencher de acordo com o regulamento.

B.H. – 07/03/2008.

Secretaria de Estado de Fazenda de Minas Gerais.

SAIF/DINF/DCA.